image of READY prompt

Wang2200.org

Listing of file='LPOVER05' on disk='vmedia/701-2721C.wvd.zip'

# Sector 433, program filename = 'LPOVER05'
1000 REM %  LOAD WPFM ROUTINES - APPEND, INITIALIZE
1010 LOAD T"WPFM.DAT"7000,8999BEG 1020
1020 GOSUB '216(2,"225246")
   : A0$()="LPINTER1"&"JCATSMAL"&"LPFILEID"&R9$()
   : R9=R9+3
   : LOAD T<R9>A0$()
9000 DEFFN'0"SCRATCH T";HEX(22);"LPOVER05";HEX(22);
9100 DEFFN'1"SAVE T ()";HEX(22);"LPOVER05";HEX(22);