Listing of file='LPID1OPN' on disk='vmedia/701-2721C.wvd.zip'
# Sector 258, program filename = 'LPID1OPN' 0090 COM B2,B4,B5,B6,B7,B8,C3,C4,C5,C6,C7,C8,D3,D4,D5,D6,D7,B2$16,B4$(1)45,B5$ (2)60,B6$(10)1,B7$(5)64,B8$(128)2,C3$(1)2,C4$64,C4$(1)64,C6$8,C7$(9)1,C8$ 39,D3$(1)3,D4$(64,2)8,D5$8,D6$1,E3$34 4010 DEFFN'70 : DIM A9$2 : E3$=HEX(3000310132023303340435053606370738083909200A2C0C2D0D2E0E240F) : SELECT #10<L9$(1)> : STR(B4$(1),,8)=L0$(1) : STR(B4$(1),9,2)=HEX(010A) : A9$=STR(L9$(1),2,1)&"0" : HEXPACKSTR(B4$(1),11,1)FROMA9$ : D6=1 : LIMITS T#10,L0$(1),A,B,B,B : DATA LOAD DA T#10,(A,STR(B4$(1),44,2))STR(B4$(1),12,32) : RETURN 9000 DEFFN'0"SCRATCH T ";HEX(22);"LPID1OPN";HEX(22); 9100 DEFFN'1"SAVE T () ";HEX(22);"LPID1OPN";HEX(22);