2 BA$="[192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192]"
3 A$="[221][157][221][157][221][157][221][157][221][157][221][157][221][157]":FORI=1TO6:BD$=BD$+A$:NEXT
5 POKE198,0:POKE53280,0:POKE53281,0:PRINT"[147]
6 C(1)[178]15:C(2)[178]12:C(3)[178]11:C(4)[178]12
7 BX[178]4:BY[178]6:EX[178]36:BD[178]1:BC[178]4::[141]10
8 [129]I[178]1[164]3:BX[178]BX[171]1:BY[178]BY[171]1:EX[178]EX[170]1:BD[178]BD[170]2:BC[178]BC[170]1:[141]10:[130]:[137]18
10 OC[178][194](646):[151]646,BC:RV$[178]"":[139]RV[167]RV$[178]""
11 [151]211,BX:[151]214,BY:[158]58732:[153]RV$"OR"[200](BA$,EX[171]BX[171]2)"^CMD";
12 [153]RV$[200](BD$,BD[172]3):[153]RV$[166]BX)"ON/"[200](BA$,EX[171]BX[171]2)"EXP"
13 [151]211,BX:[151]214,BY[170]1:[158]58732:[153]RV$[200](BD$,BD[172]3)"":[151]646,OC:RV[178]0
14 [142]
16 BX[178]BX[171]1:BY[178]BY[171]1:EX[178]EX[170]1:BD[178]BD[170]2:[142]
17 BX[178]BX[170]1:BY[178]BY[170]1:EX[178]EX[171]1:BD[178]BD[171]2:[142]
18 [151]214,15:[153]:[153]"LIST (null)HIS ALGORITHM BY MID$EFF MID$ONES. "
19 [153]"   (null)SE IT AND RIGHT$'LL LOVE YOU.  "
20 RV[178]1:EX[178]36:BY[178]17:BD[178]2:BX[178]4:BC[178]15:[141]10
21 [129]I[178]1[164]3:RV[178]1:[141]16:BC[178]C(I):[141]10:[130]:[151]198,0
22 [161]A$
23 C[178]C[170].3:[151]646,C(C):[153]""[166]5)"(null)RESS (null)(null)ATNLENVAL TO SEE BOX DEMO..."
24 [139]C[177]4[167]C[178]1
25 [139]A$[179][177]" "[167]22
26 EX[178]39:BY[178]1:BD[178]21:BX[178]1:BC[178]15:[141]10
27 [129]I[178]1[164]10:C[178]C[170]1:[139]C[177]4[167]C[178]1
28 BC[178]C(C):[141]17:[141]10:[130]
29 BX[178]18:BY[178]1:EX[178]22:BD[178]21:BC[178]14:[141]10
30 [129]I[178]1[164]17:BX[178]BX[171]1:EX[178]EX[170]1:[141]10:[130]
31 BX[178]1:BY[178]11:EX[178]39:BD[178]2:BC[178]C(1):[141]10
32 [129]I[178]1[164]9:RV[178]1:BY[178]BY[171]1:BD[178]BD[170]2:[141]10:C[178]C[170]1:[139]C[177]4[167]C[178]1
33 BC[178]C(C):[130]:BY[178]BY[171]1:RV[178]1:BD[178]BD[170]1:[141]10
34 RV[178]1:BX[178]2:BY[178]11:EX[178]38:BD[178]1:BC[178]6:[141]10
35 [151]214,11:[153]:[153]"CONT                                  "
36 [141]58
37 BX[178]0:BY[178]1:EX[178]4:BD[178]3:BC[178]C(4)
38 [129]II[178]1[164]4:[129]I[178]1[164]5:RV[178]1:BX[178]BX[170]6:EX[178]EX[170]6:[141]10:[130]:C[178]C[170]1:[139]C[177]4[167]C[178]1
39 BC[178]C(C):BY[178]BY[170]5
40 BX[178]0:EX[178]4:[130]:[141]55:C3[178]1
41 EX[178]39:BY[178]1:BD[178]21:BX[178]1
42 [129]I[178]1[164]10:C[178]C[170]1:[139]C[177]4[167]C[178]1
43 [139]C3[179]1[167]RV[178]1
44 [139][194](197)[178]62[167]62
45 [139][194](197)[178]60[167][138]
46 BC[178]C(C):[141]17:[141]10:[141]50:[130]
47 OF[178]OF[170]1:[139]OF[177]4[167]OF[178]1
48 C[178]OF:C3[178]C3[170]1:[139]C3[177]7[167]C3[178][171]C3
49 [137]41
50 C1[178]C1[170]1:[139]C1[177]4[167]C1[178]1
51 C2[178]C2[171]1:[139]C2[179]1[167]C2[178]4
52 [151]646,C(C1):[153]"     (null)RESS (null) TO RETURN TO (null)(null)ATNSTR$(null)(null)ATN(null)"
53 [151]646,C(C2):[151]214,23:[153]:[153][166]8)"(null)RESS (null)(null)ATNLENVALCLOSETO (null)(null)(null)CLOSEAGAIN"
54 [142]
55 EX[178]39:BY[178]1:BD[178]21:BX[178]1:BC[178][194](53281):[141]10
56 [129]I[178]1[164]10
57 [141]17:[141]10:[130]:[153]"LOAD":[142]
58 EX[178]39:BY[178]1:BD[178]21:BX[178]1:BC[178][194](53281):[141]10
59 [129]I[178]1[164]18
60 EX[178]EX[171]1:BX[178]BX[170]1:[141]10:[130]:[153]"LOAD":[142]
61 [144]
62 [159]15,8,15,"R0:HELLO CONNECT=HELLO CONNECT":[132]15,ER:[160]15
63 [139] ER[179][177]63 [167] [153]"LOAD":[128]
64 A$[178]"HELLO CONNECT":Q$[178][199](34):[151]53281,7:[151]53280,7:[153]"LOAD"
65 [153]"SYSLOAD"Q$A$Q$",8"
66 [153]"RUN":[151]631,13:[151]632,13:[151]198,2:[128]