Annotation of freem/contrib/%SYSDEV.m, revision 1.1.1.1
1.1 snw 1: %SYSDEV ; A.Trocha ; [1999/01/29- 7:41:14]
2: ; $Source: /cvsroot-fuse/gump/FreeM/mlib/%SYSDEV.m,v $
3: ; $Revision: 1.2 $ $Date: 2000/02/18 15:13:42 $
4: ;
5: ;--- set special screen variables
6: S %GO="N tmp S tmp=$V(1) U 0:(0::::65) W $C(27,40,48) V 1:tmp"
7: S %GF="N tmp S tmp=$V(1) U 0:(0::::65) W $C(27,40,66) V 1:tmp"
8: S %C="$C(27,91)_%Y_"";""_%X_""H"""
9: S %CLR="$C(27,91)_""2J"""
10: Q
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>