image of READY prompt

Wang2200.org

Listing of file='CAT.FFCB' on disk='vmedia/731-0067F-disk2.wvd.zip'

# Sector 999, program filename = 'CAT.FFCB'
4552 DEFFN'235(V3,U1$())
   : M=0
   : GOSUB 4726
   : U3(1)=VAL(STR(V5$(),V7(8)+15,2),2)
   : GOSUB 4710
   : STR(V2$(),129,128)=STR(U1$(),,128)
   : STR(V2$(),3,33)=BIN(1)&STR(V5$(),V7(8)+1,32)
   : GOSUB 4714
   : GOTO 4836