image of READY prompt

Wang2200.org

Listing of file='IDS2P009' on disk='vmedia/701-2725B.wvd.zip'

# Sector 110, program filename = 'IDS2P009'
1000 REM 'IDS2P009' - DEFFN'S OVERLAY
9824 DEFFNA(F)=INT(VAL(STR(E2$(F),8))*.015625)
   : DEFFNB(F)=VAL(STR(E2$(F),9))
   : DEFFNF(F)=MOD(VAL(STR(E2$(F),6)),8)
   : DEFFNN(F)=MOD(VAL(STR(E2$(F),4)),8)
   : DEFFNT(F)=INT(VAL(STR(E2$(F),6))*.0625)