image of READY prompt

Wang2200.org

Listing of file='CROSS16K' on disk='vmedia/tbo_81.wvd.zip'

# Sector 565, program filename = 'CROSS16K'
0010 REM 1/11/79  CROSS16K+CROSSRF+CROSSRF0  T.OLSEN WANG R&D
0020 COM D6,E$(8)42,E,E9,F9,D9,T9,X9,Q9,D7,D8,A$(16)16,B
0030 COM X0$(16)21,T1$(1,255)2,T2$(1,255)2,D$(1)20,P$(8)9,F$(31,1)3
0040 COM R$(4)38,M1,X,R1,R,S2,T1,A,D,F,P,P5,P6,P7,L9,T,I,L,H,M,Q1,S,S1,M2,M3
0050 COM U,E$50,D$64,H$1,S$64,P$8,C$(122)10,V1$1,R$1,L$2,U$(60)2
0060 COM M9,V$1,C,J,V,W,M$(1)2,C$21,T$1,T$(1,255)4,B$(255)1,B$1,X$(46)21,N$(4)
     1,Q$4,Q$(1,46)4,Q,G,Z
0070 REM %MAX.CAPACITY VARIABLES
   : REM %0E9 # PROGRAM FILES,F9 MAX.S.F.,D9 MAX.MEANINGS,T9 MAX.STMT REFS,X9
     MAX.VAR.OFLO,Q9 MAX.VARIABLES
0080 E9=8
   : F9=30
   : D9=1
   : T9=1
   : X9=15
   : Q9=45
0090 LOAD DC T "CROSSRF"