image of READY prompt

Wang2200.org

Listing of file='IDS2PS50' on disk='vmedia/701-2724B.wvd.zip'

# Sector 639, program filename = 'IDS2PS50'
1000 REM "IDS2PS50" - Release 2.1 - MODULE TO PROPERLY CANCEL OUT OF ADDITIONA
     L EDITS
1010 Q=31
   : LOAD T#2,"IDS2PS29"1000,
3699 ON ERRORE1$,E2$GOTO 3700
3700 DEFFN'31
   : E$="IDS2PS50"
   : IF E5$<"Y"THEN LOAD T#2,"IDS2PER1"1000,
   : STOP "ERROR"