image of READY prompt

Wang2200.org

Listing of file='SUBDATE' on disk='vmedia/701-2606C.wvd.zip'

# Sector 87, program filename = 'SUBDATE'
0010 REM SUBDATE, RELEASE 2.2, (09/11/80) THIS PROGRAM IS A COPYRIGHT PRODUCT
     OF     WANG LABORATORIES INC. UNAUTHORIZED REPRODUCTION OR USE IS PROHIBI
     TED
0170 COM Q6$80,U9$8,Q6,Q7,Q8,Q9,U9
0199 GOSUB '99
9998 DEFFN'29"Q$=";HEX(22);"SUBDATE";HEX(22);":SCRATCH TQ$:SAVET$()Q$";HEX(0D)