image of READY prompt

Wang2200.org

Listing of file='START' on disk='vmedia/toolbox.wvd.zip'

# Sector 952, program filename = 'START'
0010 REM START WANG 2200 V CODE T.C. DISK (12/22/81), COPYRIGHT WANG LABS INC.
     ,1981
0012 COM CLEAR
0015 $GIO/005(7601,A$)
   : B$=A$
   : AND (B$,10)
   : L=64
   : IF STR(B$,1,1)=HEX(10)THEN L=80
0020 SELECT PRINT 005(L),LIST 005(L),CO 005(L),CI 001,INPUT 001
0030 LOAD DC T"STARTTBO"