Listing of file='IDS2PC05' on disk='vmedia/701-2725B.wvd.zip'
# Sector 631, program filename = 'IDS2PC05' 1000 REM 'IDS2PC05' - CONVERSION MODULE - SETS UP RETURN TO MENU : COM CLEAR E() : $PSTAT="\CC\CF\C1\C4\CD\C5\CE\D5" : SELECT #15<D9$(2)> : LOAD T#2,"IDS2PCS1" 3699 ON ERRORE1$,E2$GOTO 3700 3700 DEFFN'31 : E$="IDS2PC05" : IF E5$<"Y"THEN LOAD T#2,"IDS2PER1"1000, : STOP "ERROR"