h42529
s 00125/00000/00000
d D 1.1 83/03/23 15:30:47 bog 1 0
c date and time created 83/03/23 15:30:47 by bog
e
u
4
U
t
T
I 1
       
Title   'GSS-4010 Configuration and Banner'
 
; Define names for control characters
Null    Equ     0
CntlA   Equ     1
CntlB   Equ     2
CntlC   Equ     3
CntlD   Equ     4
CntlE   Equ     5
CntlF   Equ     6
CntlG   Equ     7
Bs      Equ     8
Ht      Equ     9
Lf      Equ     10
CntlK   Equ     11
CntlL   Equ     12
Cr      Equ     13
CntlN   Equ     14
CntlO   Equ     15
CntlP   Equ     16
CntlQ   Equ     17
CntlR   Equ     18
CntlS   Equ     19
CntlT   Equ     20
CntlU   Equ     21
CntlV   Equ     22
CntlW   Equ     23
CntlX   Equ     24
CntlY   Equ     25
CntlZ   Equ     26
Esc     Equ     27
Fs      Equ     28
Gs      Equ     29
;Rs     Equ     30
Us      Equ     31
 
        Eject
@Config	ESeg	Para	Common
CfgPtr	Rw      1                       ;Not be initialized by this module
CfgLen	Dw	(Offset CfgEnd)-(Offset CfgStr);# of chars in config string
 
; The following string will be executed by GSS-4010 at powerup
; just as if it had been typed at the keyboard.
 
; At the beginning of the string GSS-4010 is:
;  in Local Mode
;  at the Main Options Menu (NOT in the emulator)
;  will NOT put anything to the Menu Device until an exit has
;    been done to the Emulator from the Menus
; Any of the above may be changed, of course, by the string.
 
 
CfgStr	Db      'b'                     ;Go to Special Key Definitions menu
        Db      'a',CntlX,CntlP,Cr      ;Def Page               ^X^P
        Db      'b',CntlX,CntlR,Cr      ;    Reset              ^X^R
        Db      'c',CntlX,CntlL,Cr      ;    Local/Line         ^X^L
        Db      'd',CntlX,CntlB,Cr      ;    Break              ^X^B
        Db      'e',CntlX,CntlG,Cr      ;    Goto Menus         ^X^G
        Db      'f',CntlX,'"',Bs,Cr     ;    Hardcopy           ^X^H (^X Bs)
        Db      'g',CntlX,CntlF,Cr      ;    Release Pagefull   ^X^F
        Db      'h',CntlX,'"',Cr,Cr     ;    Toggle Pf Margin   ^X^M (^X Cr)
        Db      'i',CntlX,CntlE,Cr      ;    Exit to O/S        ^X^E
        Db      's'                     ;Return to Main Menu
 
        Db      'c'                     ;Go to 4010 Options menu
        Db      'a'                     ;Cr is Cr only
        Db      'c'                     ;Lf is Lf only
        Db      'e'                     ;Gin termination is Cr only
        Db      'h'                     ;Remote echo
        Db      'j'                     ;Del is Low Y -- don't ignore Dels
        Db      's'                     ;Return to Main Menu
 
        Db      'd'                     ;Go to Pagefull Options Menu
        Db      'a'                     ;  no BREAK at pagefull
        Db      'c'                     ;  no HARDCOPY at pagefull
        Db      'e'                     ;  no await RELEASE at pagefull
        Db      'g'                     ;  no ERASE at pagefull
        Db      's'                     ;Return to Main Menu
 
        Db      'e'                     ;Go to Character Options Menu
        Db      'b'                     ;Use Native Character Sizes
        Db      's'                     ;Return to Main Menu
 
        Db      'f'                     ;Go to Display Options Menu
        Db      'a'                     ;Use 4010 Aspect Ratio
        Db      'c1',Cr                 ;Menu Device is 1
        Db      'd1',Cr                 ;Emulator Device is 1
        Db      's'                     ;Return to Main Menu
 
        Eject
        Db      'g'                     ;Go to Baud Rate Menu
        Db      'n'                     ;Select 9600 Baud
        Db      's'                     ;Return to Main Menu
 
        Db      'h'                     ;Go to Other Comm Options menu
        Db      'a'                     ;  1 Stop Bits
        Db      'd'                     ;  No parity bit
        Db      'i'                     ;  Data String Flagging
        Db      'l',CntlS,Cr            ;   Stop with ^S
        Db      'm',CntlQ,Cr            ;   Go with ^Q
        Db      's'                     ;Return to Main Menu
 
        Db      'a'                     ;Go to Configuration Menu
        Db      'a'                     ;No user access to Config Menu
        Db      'd'                     ;Allow user to change Special Keys
        Db      'f'                     ;Allow user to change 4010 Options
        Db      'h'                     ;Allow user to change Pagefull Opts
        Db      'j'                     ;Allow user to change char spacing
        Db      'l'                     ;Allow user to change display opts
        Db      'm'                     ;No hardcopy capability
 
        Db      'x'                     ;Return to Emulator
 
 
; Now talking to Emulator
        Db      Esc,'8'                 ;Largest character size
 
        Db      'Go to Menus with ^X^G',Cr,Lf   ;Banner message
        Db      'Terminal is On Line',Cr,Lf
        Db      CntlX,CntlL             ;Toggle to On Line
 
CfgEnd	Rb	0
        End
 
E 1
