Listing of file='ISS.205S' on disk='vmedia/701-2423D.wvd.zip'
# Sector 645, program filename = 'ISS.205S' 0010 REM ISS.205S, RELEASE 5-1, (11/07/79) - COPYRIGHT WANG LABS. INC. 0084 DIM W3$3,W2$2,Q$1,R,R1 8875 DEFFN'205(R,W3$,R1) : Q$=" " : MAT SEARCH"310320330350360370B10B20B30B50B60B70D10D11D12D13D14D15D20D21D2 2D23D24D25D30D31D32D33D34D35D50D51D52D53D54D55D60D61D62D63D64D65D70D71D72 D73D74D75",=STR(W3$,,3)TO W2$STEP 3 : IF R1<>0AND R1<>1OR R<0OR R>15THEN Q$="X" : IF W2$=HEX(0000)THEN Q$="I" 8915 IF R1=0OR Q$<>" "THEN RETURN : SELECT #R<W3$> : RETURN