5 DV=PEEK(186):IFDV<8THENDV=8
7 DIMW$(300)
10 POKE53281,0:POKE53280,0:PRINT""
12 SYS57812"INP/CM CE00",DV,0:POKE780,0:POKE781,0:POKE782,206:SYS65493
16 SYS52736,"ORDFORM 102",DV
18 H=PEEK(252)*256+PEEK(251)
100 PRINT"[147][158]     [212] [200] [197]    [205] [193] [210] [203] [197] [212] [208] [204] [193] [195] [197]
102 [153]"          (null) (null) STR$ VAL (null)   ASC (null) (null) (null)"
104 [153]"         1  CONT(null)RINT ORDER FORM
106 PRINT"         2  [154][210]ETURN TO [204][207][193][196][211][212][193][210]
110 [161]A$:[139]A$[179]"1"[176]A$[177]"2"[167]110
112 [139]A$[178]"2"[167]40000
120 [153]"OPEN   (null)ET YOUR PRINTER AT THE TOP OF A
130 PRINT"   PAGE AND PRESS A KEY.
135 [161]A$:[139]A$[178]""[167]135
140 [159]4,4,7:[160]4
150 [139]ST[178]0[167]200
160 [151]214,16:[153]:[153]"DEF (null)(null)(null)(null) (null)(null)(null)(null) (null)(null)RIGHT$(null)(null)VAL(null) (null)(null) AND PRESS A KEY."
170 [161]A$:[139]A$[178]""[167]170
180 [137]100
200 [159]4,4,7
210 [129]I[178]0[164]H
220 [152]4,"        "W$(I)
230 [130]:[160]4
240 [137]100
10000 [159]15,8,15,"S0:MARKETPLACE102":[160]15:[148]"MARKETPLACE102",8:[128]
40000 A$[178]"HELLO CONNECT":[129]I[178]8[164]9:[160]2:[159]2,I,2:[160]2:[139]ST[167]40030
40010 [160]15:[159]15,I,15,"R0:"[170]A$[170]"="[170]A$:[132]15,ER:[160]15:[139]ER[178]63[167]40030
40020 [130]:[153]"LOAD":[151]2048,0:[151]44,8:[151]53272,23:[151]186,DV:[128]
40030 [151]646,[194](53281):[153]"LOADLOAD"[199](34)A$[199](34)","I
40040 [153]"RUN":[151]631,13:[151]632,13:[151]198,2:[128]