image of READY prompt

Wang2200.org

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

# Sector 420, program filename = 'CROSS28K'
0010 REM 1/11/79  CROSS28K+CROSSRF+CROSSRF0  T.OLSEN WANG R&D
0020 COM D6,E$(50)42,E,E9,F9,D9,T9,X9,Q9,D7,D8,A$(16)16,B
0030 COM X0$(126)21,T1$(2,255)2,T2$(2,255)2,D$(150)20,P$(50)9,F$(61,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$(2,255)4,B$(255)1,B$1,X$(141)21,N$(4
     )1,Q$4,Q$(1,141)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=50
   : F9=60
   : D9=150
   : T9=2
   : X9=125
   : Q9=140
0090 LOAD DC T "CROSSRF"