Listing of file='609Erep5' on disk='vmedia/731-0067G.wvd.zip'
# Sector 1104, program filename = '609Erep5'
0010 REM 609Erep5 ------------------------------------------------------------
-
0040 J7(2)=0
: J7(3)=0
: J7(1)=3
: D1$,D2$,D3$=HEX(82)
: J1=J0(1)
: V1$()="609IpageRECMGR"
: C=LEN(STR(J2$()))
: LOAD T<2>V1$()
3000 DEFFN'31
: A5=0
: A5$()="609CloseJCATSMAL"
: A5$=R3$()
: R3$()=STR(R3$(),10)
: IF A1>-1OR A2>-1THEN LOAD T<2>A5$()
: COM CLEAR C
: LOAD TA5$