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)