image of READY prompt

Wang2200.org

Listing of file='IDS2P000' on disk='vmedia/701-2717B.wvd.zip'

# Sector 186, program filename = 'IDS2P000'
1000 REM 'IDS2P000' DEFFN'S OVERLAY
9804 DEFFNP(F)=INT(VAL(STR(E2$(F),2),2)*.0625)
   : DEFFNL(F)=VAL(E2$(F))
   : DEFFNR(F)=INT(VAL(STR(E2$(F),4))*.125)
   : DEFFNC(F)=INT(VAL(STR(E2$(F),5))*.5)
   : DEFFND(F)=INT(VAL(STR(E2$(F),7))*.015625)