Listing of file='609EWICH' on disk='vmedia/701-2737G.wvd.zip'
# Sector 203, program filename = '609EWICH'
0010 REM 609EWICH
0025 MAT COPY -STR(R3$(),1,LEN(STR(R3$()))-9)TO -STR(R3$(),10,LEN(STR(R3$()))-
9)
: R3$(1)="609menu"
: D=SPACEK
: IF D>=42THEN A5$()="609ECOM 609Enewo609Esum'Prime 62CAT.newo"
: IF D<42THEN A5$()="609Ecom 609Enewo609Esum'Prime 62CAT.newo"
: LOAD T<5>A5$()
9031 DEFFN'31
: A5$=R3$()
: R3$()=STR(R3$(),10)
: LOAD TA5$