home *** CD-ROM | disk | FTP | other *** search
/ Compute! Gazette 1984 November / 1984-11.d64
Encoding:
Commodore Disk Image  |  1984-01-01  |  170.8 KB
  1.  
  2.  
  3.  
  4.  
  5.  
  6.  
  7.  
  8.  
  9.  
  10.  
  11.  
  12.  
  13.  
  14.  
  15.  
  16.  
  17.  
  18.  
  19.  
  20.  
  21.  
  22. kkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkk
  23. J a{CBM-R}0 {CBM-M} a{CBM-R}1:"c/g term",8,1
  24. c,a${CBM-R}"sys4621"{CBM-N}G(13):198,C(a$)
  25. F6i{CBM-R}1{CBM-@}C(a$):630{CBM-N}i,F(J(a$,i)):
  26.  
  27.  
  28.  
  29. when screen clears 
  30. enter your message
  31. *screen empty*
  32.  
  33.  id #
  34.  
  35. thank you.
  36.  
  37. entry is invalid.
  38.  
  39. one moment, please...
  40. to 
  41. subject 
  42. 0:
  43.  
  44.  
  45.  
  46. %
  47. "":65517:B(781){CBM-R}40{CBM-M}"":10
  48. .
  49. ""
  50. >
  51.  
  52. ck{CBM-R}0:251,0
  53. _
  54. j{CBM-R}679{CBM-@}703:a:ck{CBM-R}ck{CBM-N}a:j,a:
  55.  
  56. ck{CBM-W}{CBM-E}3615{CBM-M}"check data statements":
  57. Q
  58. 72,138,72,152,72,8,166,251,240,8,160,255,136,208,253,202,208,248,40
  59. {$ed}(
  60. 104,168,104,170,104,76
  61. 2
  62. B(807){CBM-W}{CBM-E}2{CBM-M}{CBM-N}A 142,5,3,173,21,3
  63. #{CBM-A}A 201,-256,240,19,141,-147
  64. @{CBM-L}A -257,173,20,3,141,-146
  65. _{CBM-C}A -257,169,-130,120,141,20
  66. WBA 3,142,21,3,88,173
  67. HA 144,2,201,-256,240,19
  68. {CBM-E}NA 141,-170,-256,173,143,2
  69. RTA 141,-169,-256,169,-168,120
  70. {$ec}ZA 141,143,2,142,144,2
  71. {$fc}
  72. 704,B(806):705,B(807)
  73. (<
  74. 806,167:807,2
  75. ff
  76. " x = a number (0-255)"
  77. Ep
  78. " poke 251,x  <return>"
  79. z
  80. " list  <return>"
  81.  
  82.  
  83. sk autoload   
  84.  
  85.  
  86.  
  87.  
  88.  
  89.  
  90.  
  91.  
  92.  
  93.  
  94.  
  95.  
  96. supertank       
  97.  
  98.  
  99.  
  100.  
  101.  
  102.  
  103.  
  104.  
  105.  
  106.  
  107.  
  108. kaylon/64       
  109.  
  110.  
  111.  
  112.  
  113.  
  114.  
  115.  
  116.  
  117.  
  118.  
  119.  
  120.  
  121. kaylon/vic      
  122.  
  123.  
  124.  
  125.  
  126.  
  127.  
  128.  
  129.  
  130.  
  131.  
  132. ,15,208,243
  133. >A 240,182,192,0,208,4
  134. 5dA 162,8,208,176,232,189
  135. ljA 0,2,201,49,240,8
  136. EpA 201,56,240,4,162,9
  137. vA 208,160,41,15,170,152
  138. \A 72,160,0,138,32,186
  139. {CBM-O}BA 255,104,168,104,170,152
  140. THA 160,2,32,189,255,162
  141. {$f2}NA -1,134,251,169,-256,1333,10,10,10,10
  142. L{SHIFT-*} 9,1,141,-1,-256,96
  143. 8R{SHIFT-*} 166,122,189,0,2,201
  144. rX{SHIFT-*} 70,208,68,232,189,0
  145. L{$de}{SHIFT-*} 2,201,49,144,60,201
  146. {$e4}{SHIFT-*} 57,176,59,41,15,168
  147. {CBM-+}{$ea}{SHIFT-*} 185,-135,-257,168,232,189
  148. {CBM-X}{$f0}{SHIFT-*} 0,2,201,61,240,5
  149. V{$f6}{SHIFT-*} 162,11,108,0,3,232
  150. {$ef}{$fc}{SHIFT-*} 189,0,2,201,13,240
  151. A 
  152. Z$
  153.  
  154. "  sys 830 to activate"
  155. @  adres{CBM-R}830{CBM-@}859: datta
  156. z* adres,datta: adres
  157. R> 169,5,160,0,153,0
  158. d 148,153,0,149,136,208
  159. {CBM-POUND}j 247,162,0,181,0,157
  160. {CBM-B}p 0,16,189,0,2,157
  161. Vv 0,17,202,76,77,3
  162.  
  163.  
  164.  
  165.  
  166.  
  167.  
  168.  
  169.  
  170.  
  171.  
  172.  
  173.  
  174.  
  175.  
  176.  
  177.  
  178.  
  179.  
  180.  
  181.  
  182.  
  183.  
  184.  
  185.  
  186.  
  187.  
  188.  
  189.  
  190.  
  191.  
  192.  
  193.  
  194.  
  195.  
  196.  
  197.  
  198.  
  199.  
  200.  
  201. h{SHIFT-*} 0,0,0,0,0,0
  202. n{SHIFT-*} 0,0,0,0,0,0
  203. /t{SHIFT-*} 0,0,0,0,0,0
  204. az{SHIFT-*} 0,0,0,0,0,0
  205. s{$60}{SHIFT-*} 0,0,0,0,0,0
  206. EF{SHIFT-*} 0,0,0,0,0,0
  207. WL{SHIFT-*} 0,0,0,0,0,0
  208. R{SHIFT-*} 0,0,0,0,0,0
  209. X{SHIFT-*} 0,0,0,0,0,0
  210. {CBM-W}{$7e}{SHIFT-*} 0,0,0,173,-1,-256
  211. O{SHIFT-*} 240,30,166,198,224,11
  212. {$ec}{SHIFT-*} 176,24,168,185,-1,-256
  213. {SHIFT-*} 240,15,.
  214.  
  215. "         sys 830 to activate"
  216. j  adres{CBM-R}830{CBM-@}877: datta
  217. D* adres,datta: adres
  218. {$7c}> 169,7,160,0,153,0
  219. d 216,153,0,217,153,0
  220. {CBM-R}j 218,153,0,219,136,208
  221. Lp 241,162,0,181,0,157
  222. {$e2}v 0,4,189,0,2,157
  223. {$fa}\ 0,5,189,0,208,157
  224. B,-256,173,-1
  225. !{SHIFT-*} -256,41,15,208,3,141
  226. @{CBM-I}{SHIFT-*} -1,-256,108,-146,-257,32
  227. ]{CBM-POUND}{SHIFT-*} 72,235,173,-1,-256,208
  228. Y{CBM-S}{SHIFT-*} 34,165,157,240,30,165
  229. {CBM-H}{SHIFT-*} 212,208,26,166,198,202
  230. {CBM-R}{SHIFT-@}{SHIFT-*} 189,119,2,201,133,144
  231. M{SHIFT-*}{SHIFT-*} 16,201,141,176,12,56
  232. {$e7}F{SHIFT-*} 233,133,10,10,10,10
  233.  
  234. L{SHIFT-*} 9,1,141,-1
  235. {$ec} load
  236. disk autoload
  237. get more from your commodore  (ad)
  238. gazette
  239. descent to kaylon
  240. kaylon/64
  241. power basic - slowpoke
  242. power basic
  243. budgeteer
  244. budgeteer/64
  245. special offer - compute! mag. (ad)
  246. compute!
  247. jump
  248. jump/64
  249. function key
  250. function key/64
  251. 4       
  252.  
  253.  
  254.  
  255.  
  256.  
  257.  
  258.  
  259.  
  260.  
  261.  
  262.  
  263. {CBM-E}bler  (8k)
  264. ml beg
  265. ml for beginners - mem display (8k)
  266. ml beg/vic
  267. function key
  268. function key
  269. jump
  270. jump/vic
  271. special offer - compute! mag. (ad)
  272. compute!/vic
  273. budgeteer
  274. budgeteer/v1
  275.    
  276.  
  277.  
  278.  
  279.  
  280.  
  281.  
  282.  
  283.  
  284.  
  285.  
  286.  
  287. kaylon/vic      
  288.  
  289.  
  290.  
  291.  
  292.  
  293.  
  294.  
  295.  
  296.  
  297.  
  298.  
  299. kaylon/64       
  300.  
  301.  
  302.  
  303.  
  304.  
  305.  
  306.  
  307.  
  308.  
  309.  
  310.  
  311. Bmodore  (ad)
  312. gazette
  313. descent to kaylon
  314. kaylon/64
  315. power basic - slowpoke
  316. power basic
  317. budgeteer
  318. budgeteer/64
  319. special offer - compute! mag. (ad)
  320. compute!
  321. jump
  322. jump/64
  323. function key
  324. function key/64
  325. kaylon/64       
  326.  
  327.  
  328.  
  329.  
  330.  
  331.  
  332.  
  333.  
  334.  
  335.  
  336.  
  337.  
  338. kaylon/vic      
  339.  
  340.  
  341.  
  342.  
  343.  
  344.  
  345.  
  346.  
  347.  
  348.  
  349. k
  350. TA 252,160,-257,169,251,162
  351. .ZA -227,32,216,255,169,13
  352. jA 32,210,255,76,116,196
  353. {$60}A 0,1,65,17,81,33
  354. {$7b}A 97,49,113,124,165,49
  355. A 234,162,-256,173,5,3
  356. {CBM-J}A 201,-256,240,17,141,-145
  357. QA -257,173,4,3,141,-144
  358. {$ed}{CBM-@}A -257,169,-211,141,4,3
  359. 15,201,95,208,2,169
  360. &A 13,153,-1,-256,200,152
  361. @A 41,15,208,233,169,0
  362. ]A 153,-1,-256,160,107,32
  363. WA 230,241,108,2,3,108
  364.  A -144,-257,208,251,232,189
  365. {CBM-A}&A 0,2,201,61,208,202
  366. K,A 232,138,72,160,0,189
  367. {$e2}2A 0,2,201,44,240,8
  368. ~8A 232,200,192
  369.  A 88,96,256
  370.  
  371.  
  372. 57,169,251,162
  373. .ZA -227,32,216,255,169,13
  374. jA 32,210,255,76,116,196
  375. {$60}A 0,1,65,17,81,33
  376. {$7b}A 97,49,113,124,165,49
  377. A 234,162,-256,173,5,3
  378. {CBM-J}A 201,-256,240,17,141,-145
  379. QA -257,173,4,3,141,-144
  380. {$ed}{CBM-@}A -257,169,-211,141,4,3
  381. 157,119,2,230
  382. ${SHIFT-*} 198,238,-1,-256,173,-1
  383. ?{SHIFT-*} -256,41,15,208,3,141
  384. ^{CBM-I}{SHIFT-*} -1,-256,108,-146,-257,32
  385. {$7b}{CBM-POUND}{SHIFT-*} 72,235,173,-1,-256,208
  386. {CBM-S}{SHIFT-*} 34,165,157,240,30,165
  387. {CBM-H}{CBM-H}{SHIFT-*} 212,208,26,166,198,202
  388. P{SHIFT-@}{SHIFT-*} 189,119,2,201,133,144
  389. {$eb}{SHIFT-*}{SHIFT-*} 16,201,141,176,12,56
  390. F{SHIFT-*} 233,13
  391. . 0,6,189,0,220,157
  392. (H 0,7,202,76,83,3
  393.  
  394.  
  395. 64    
  396.  
  397.  
  398.  
  399.  
  400.  
  401.  
  402.  
  403.  
  404.  
  405.  
  406.  
  407. budgeteer/v1    
  408.  
  409.  
  410.  
  411.  
  412.  
  413.  
  414.  
  415.  
  416.  
  417.  
  418.  
  419. b2              
  420.  
  421.  
  422.  
  423.  
  424.  
  425.  
  426.  
  427.  
  428.  
  429.  
  430.  
  431. function key/64 
  432.  
  433.  
  434.  
  435.  
  436.  
  437.  
  438.  
  439.  
  440.  
  441.  
  442.  
  443.  
  444. supertank       
  445.  
  446.  
  447.  
  448.  
  449.  
  450.  
  451.  
  452.  
  453.  
  454.  
  455.  
  456. kaylon/vic      
  457.  
  458.  
  459.  
  460.  
  461.  
  462.  
  463.  
  464.  
  465.  
  466.  
  467.  
  468. kaylon/64       
  469.  
  470.  
  471.  
  472.  
  473.  
  474.  
  475.  
  476.  
  477.  
  478.  
  479. ,-256,96
  480. R{SHIFT-*} 166,122,189,0,2,201
  481. 4X{SHIFT-*} 70,208,68,232,189,0
  482. n{$de}{SHIFT-*} 2,201,49,144,60,201
  483. H{$e4}{SHIFT-*} 57,176,59,41,15,168
  484. {$ea}{SHIFT-*} 185,-135,-257,168,232,189
  485. {$f0}{SHIFT-*} 0,2,201,61,240,5
  486. {CBM-U}{$f6}{SHIFT-*} 162,11,108,0,3,232
  487. Q{$fc}{SHIFT-*} 189,0,2,201,13,240
  488. {$eb}A 15,201,95,208,2,169
  489. A 13,10,0
  490. t{SHIFT-*} 0,0,0,0,0,0
  491. #z{SHIFT-*} 0,0,0,0,0,0
  492. 5{$60}{SHIFT-*} 0,0,0,0,0,0
  493. gF{SHIFT-*} 0,0,0,0,0,0
  494. yL{SHIFT-*} 0,0,0,0,0,0
  495. KR{SHIFT-*} 0,0,0,0,0,0
  496. {$7d}X{SHIFT-*} 0,0,0,0,0,0
  497. {$7e}{SHIFT-*} 0,0,0,173,-1,-256
  498. {CBM-E}{SHIFT-*} 240,30,166,198,224,11
  499. N{SHIFT-*} 176,24,168,185,-1,-256
  500. {$e9}{SHIFT-*} 240,15,157,119,2,230
  501. {SHIFT-*} 198,238,-1
  502. po{CBM-N}22{CBM-N}c,cm:s1,.:219
  503. {$e9}
  504. p{CBM-E}18{CBM-M}219
  505. *{$ea}
  506. {CBM-Q}(p{CBM-R}18)350
  507. @{$eb}
  508. {CBM-Q}(p{CBM-R}17)300:219
  509. u,B(po{CBM-Q}1){CBM-W}{CBM-E}32{CBM-M}500
  510. {$7d}.po,32:po{CBM-R}po{CBM-Q}1:po,34:po{CBM-N}c,cl:219
  511. ^B(po{CBM-N}1){CBM-W}{CBM-E}32{CBM-M}500
  512. {SHIFT-@}{$60}po,32:po{CBM-R}po{CBM-N}1:po,34:po{CBM-N}c,cl:219
  513. M{$f4}B(po){CBM-E}128{CBM-M}600
  514. {$e9}{$f6}v,.:s1,200:po{CBM-Q}22{CBM-N}c,2
  515. {$fe}{$f7}d{CBM-R}15{CBM-@}4
  516. 53281,13:53280,13:""G(142):52,48:56,48:
  517. d
  518.  
  519. 51,0:55,0
  520.  
  521. 214,12::211,3:"loading characters......please wait"
  522. {CBM-G}
  523. 56334,B(56334){CBM-P}254:1,B(1){CBM-P}251
  524. Z
  525. i{CBM-R}0{CBM-@}511:i{CBM-N}12288,B(i{CBM-N}53248):i{CBM-N}12800,B(i{CBM-N}53760)
  526. {$f4}
  527. i{CBM-N}13312,B(i{CBM-N}54272):
  528. #
  529. 1,B({CBM-A}12
  530.  
  531.  
  532. a
  533. lf{CBM-R}3:c{CBM-R}sd
  534. b
  535. f
  536. tb${CBM-R}"{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}"
  537. G
  538. k
  539. m$(1){CBM-R}" ":m$(2){CBM-R}"$":co{CBM-R}(lv{CBM-N}1){CBM-Z}50
  540.  
  541. p
  542. d{CBM-R}1{CBM-@}3:ma${CBM-R}"":as{CBM-R}1{CBM-@}40
  543.  
  544. u
  545. b{CBM-R}1:{CBM-F}(ti){CBM-E}.9{CBM-Q}co{CBM-M}b{CBM-R}2
  546. {CBM-P}
  547. z
  548. ma${CBM-R}ma${CBM-N}m$(b):
  549. B
  550. _
  551. d100,105,110
  552. R
  553. D
  554. a${CBM-R}ma$:115
  555. {$e2}
  556. I
  557. b${CBM-R}ma$:115
  558. {$ed}
  559. N
  560. c${CBM-R}ma$
  561. {$f3}
  562. S
  563.  
  564. V
  565. 5
  566. !!!!!  !!  !!!!! !!!!!!"
  567. =
  568. ""c$""a$:e${CBM-R}""
  569. y
  570. e$"!!!!!"{CBM-+}30)"!!!!!";
  571.  
  572. "!!!!!!!!!!"{CBM-+}20)"!!!!!!!!!!";:""d$;
  573. {CBM-F}{CBM-G}
  574. 1915,100:1915{CBM-N}c,5:1921,100:1921{CBM-N}c,5:1925,100
  575. {SHIFT--}{CBM-N}
  576. 1925{CBM-N}c,5:1930,100:1930{CBM-N}c,5
  577. {$f6}{CBM-P}
  578. "":po{CBM-R}1144:x{CBM-R}1:d{CBM-R}0{CBM--}
  579. c${CBM-R}I(c$,1){CBM-N}H(c$,39)
  580. 5{$e1}
  581. ""a$;:""b$;:""c$""a$
  582. m{$e6}
  583. pk{CBM-R}B(po):pk{CBM-R}35{CBM-M}240
  584. D{$eb}
  585. pk{CBM-W}{CBM-E}34{CBM-P}pk{CBM-W}{CBM-E}32{CBM-M}295
  586. {$f0}
  587. m{CBM-R}m{CBM-N}1:m{CBM-E}sr{CBM-M}m{CBM-R}.:po,32:po{CBM-R}po{CBM-N}40:B(po){CBM-W}{CBM-E}32{CBM-M}295
  588. {CBM-A}{$f5}
  589. po,34:po{CBM-N}c,cl:375
  590. {CBM-X}{$fa}
  591. p{CBM-R}B(197)
  592. {$f2}~
  593. p{CBM-R}60{CBM-M}m{CBM-R}.:ls{CBM-R}B(po{CBM-N}40):lc{CBM-R}B(po{CBM-N}40{CBM-N}c){CBM-P}15:380:21586:po{CBM-N}c,2:365:sd{CBM-N}24,15
  594. 16lf{CBM-R}lf{CBM-Q}1:{CBM-Q}(lf{CBM-R}.)430:""{CBM-T}36)lf""
  595. <;po,32
  596. j@355:175
  597. Zepo,34:po{CBM-N}c,.:bs{CBM-R}bs{CBM-Q}1:bs{CBM-R}0{CBM-M}sc{CBM-R}sc{CBM-N}100:340
  598. jsc{CBM-R}sc{CBM-N}100:""{CBM-T}6)sc
  599. {CBM-K}o355:175
  600. Htsc{CBM-R}sc{CBM-N}((lv{CBM-N}1){CBM-D}100):bs{CBM-R}4:""{CBM-T}6)sc
  601. y"                    
  602. [ve right"
  603. {CBM-C}"press any key..."
  604. '{CBM-V}198,.:198,1:{CBM-K}r$
  605. c{CBM-B}lv{CBM-R}.:sc{CBM-R}.:m{CBM-R}.::co{CBM-R}.:6
  606.  
  607.  
  608. 255,255,255,170
  609. Z{$ec}24,60,102,126,126,24,36,195
  610. {$ee}24,36,66,66,36,24,24,0
  611. {CBM-H}{$f0}24,60,126,254,127,60,8,0
  612. M{$f2}0,0,0,0,0,0,126,255
  613. {$f2}{$f4}170,255,255,255,255,254,2528:
  614. Wsd{CBM-N}4,33:hf,100:fl,250:sd{CBM-N}4,32:
  615. h{$7c}po{CBM-N}40,35:po{CBM-N}40{CBM-N}c,2:po{CBM-N}40,ls:po{CBM-N}40{CBM-N}c,lc:
  616. u,,,,,,,
  617. Z170,255,255,255,255,255,255,170
  618. 24,60,102,126,126,24,36,195
  619. {CBM-Y}24,36,66,66,36,24,24,0
  620. U24,60,126,254,127,60,8,0
  621. {$ee}0,0,0,0,0,0,126Fsc{CBM-R}sc{CBM-N}((lv{CBM-N}1){CBM-D}100):lv{CBM-R}lv{CBM-N}1:bs{CBM-R}4:d{CBM-R}.{CBM-@}1000::"":31
  622. 4{$e8},,,,,,,
  623. y{$ea}170,255,255,255,255,255,255,170
  624. Z{$ec}24,60,102,126,126,24,36,195
  625. {$ee}24,36,66,66,36,24,24,0
  626. {CBM-H}{$f0}24,60,126,254,127,60,8,0
  627. M{$f2}0,0,0,0,0,0,126,255
  628. {$f2}{$f4}170,255,255,255,255,254,252
  629. {$de}198,0:455
  630. 2{CBM-U}" press (space bar) to release and fire   retro-rockets."
  631. J{CBM-X}" press (a)-to move left and (d)-to move  right."
  632. B"press b to begin...":198,0
  633. {CBM-G}G{CBM-K}z$:z${CBM-W}{CBM-E}"b"{CBM-M}455
  634. BLlv{CBM-R}.:sc{CBM-R}.:m{CBM-R}.::co{CBM-R}.:60
  635.  
  636.  
  637. 4,127,60,8,0
  638. {$ee}0,0,0,0,0,0,126.{SHIFT-POUND}{CBM-Q}.5:v,d
  639. :{$f8}po{CBM-Q}22,219:s{CBM-R}.{CBM-@}20::po{CBM-Q}22,214:s{CBM-R}.{CBM-@}20:::s1,.:v,15
  640. G{$fe}d{CBM-R}200{CBM-@}150{SHIFT-POUND}{CBM-Q}.5:s1{CBM-Q}2,d::s1{CBM-Q}2,.:lf{CBM-R}lf{CBM-Q}1
  641. ~{CBM-Q}(lf{CBM-W}{CBM-R}.)1200:""{CBM-T}17)lf"":B(po){CBM-R}34{CBM-M}po,32
  642. Jpo{CBM-Q}22,32:""H(tb$,x)"{SHIFT-*}    ":185
  643. {$fa}xpo,34:po{CBM-N}c,.:bs{CBM-R}bs{CBM-Q}1:bs{CBM-R}.{CBM-M}sc{CBM-R}sc{CBM-N}1){CBM-A}4:56334,B(56334){CBM-A}1
  644. 4(
  645. d{CBM-R}12544{CBM-@}12544{CBM-N}63:y:d,y:
  646. Z-
  647. 53281,6:53280,12:"      welcome to the planet kaylon"
  648. {CBM-T}2
  649. sd{CBM-R}54272:l{CBM-R}sd{CBM-@}sd{CBM-N}24:l,0::sd{CBM-N}9,14
  650. N7
  651. sd{CBM-N}6,240:sd{CBM-N}24,15:hf{CBM-R}sd{CBM-N}1:fl{CBM-R}sd:440
  652. ~<
  653. "":cl{CBM-R}0:sr{CBM-R}1:bs{CBM-R}4:53272,(B(53272){CBM-P}240)3280,1:53281,1
  654. ;X
  655. d${CBM-R}"!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!"
  656. O{$7d}
  657. "score"{CBM-T}31)"left":"high"{CBM-T}31)"level"
  658.  
  659. "{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}"
  660. H
  661. ""{CBM-T}6)sc{CBM-T}36)lf:""{CBM-T}6)hi{CBM-T}36)lv{CBM-N}1
  662. {CBM-*}
  663. ""a$""b$
  664.  
  665. "!!!!!!  !!!!!!! !
  666.  
  667.  
  668. {CBM-H}
  669. x{CBM-R}x{CBM-N}1:x{CBM-E}38{CBM-M}205
  670. c
  671. {CBM-O}
  672. po{CBM-N}c{CBM-N}x,cl:po{CBM-N}x,34:""H(tb$,x)"% '&":360
  673. {$60}
  674. {CBM-V}
  675. d{CBM-R}d{CBM-N}1:p{CBM-R}B(197):p{CBM-R}60{CBM-M}210
  676. N
  677. C
  678. d{CBM-E}38{CBM-M}180
  679. W
  680. H
  681. 190
  682.  
  683. M
  684. ""{CBM-T}x{CBM-Q}1)"{SHIFT-*}     ":175
  685. G
  686. R
  687. po{CBM-R}po{CBM-N}x:po{CBM-R}po{CBM-N}40:po{CBM-Q}40,100:po,34:po{CBM-N}c,cl
  688. {$f3}
  689. W
  690. a${CBM-R}I(a$,39){CBM-N}H(a$,1):b${CBM-R}I(b$,1){CBM-N}H(b$,39)
  691.  
  692.  
  693. p{CBM-R}64{CBM-M}215
  694. {CBM-Q}(p{CBM-R}18)285
  695. '{CBM-Q}(p{CBM-R}10)275:215
  696. <B(po{CBM-Q}1){CBM-W}{CBM-E}32{CBM-M}295
  697. Ipo,32:po{CBM-R}po{CBM-Q}1:po,34:po{CBM-N}c,cl:375:215
  698. {$7e}B(po{CBM-N}1){CBM-W}{CBM-E}32{CBM-M}295
  699. {CBM-Q}"po,32:po{CBM-R}po{CBM-N}1:po,34:po{CBM-N}c,cl:375:215
  700. D'pk{CBM-R}B(po):pk{CBM-R}100{CBM-M}325
  701. X,pk{CBM-R}33{CBM-M}po{CBM-R}po{CBM-Q}40
  702. 1po,91:po{CBM-N}c,0:po,                    "
  703. ;z"             bonus level"lv{CBM-N}1:lv{CBM-R}lv{CBM-N}1
  704. t^d{CBM-R}.{CBM-@}1500::"":75
  705. UC""H(tb$,x)"{SHIFT-*}    ":
  706. {CBM-M}Hsd{CBM-N}4,17:hf,{CBM-J}({CBM-F}(0){CBM-D}50){CBM-N}50:fl,250:sd{CBM-N}4,16:
  707. {SHIFT--}Msd{CBM-N}4,129:mu{CBM-R}15{CBM-@}0{SHIFT-POUND}{CBM-Q}1:hf,100:sd{CBM-N}24,mu:ll{CBM-R}1{CBM-@}5:
  708. {$ef}R:sd{CBM-N}4,12
  709. " please wait..."
  710. q
  711.  
  712. i{CBM-R}B(55){CBM-N}256{CBM-D}B(56){CBM-Q}512:sh{CBM-R}{CBM-J}(i{CBM-Z}256):sl{CBM-R}i{CBM-Q}sh{CBM-D}256
  713. N
  714.  a:ck{CBM-R}ck{CBM-N}a: a{CBM-R}256 {CBM-M} 40
  715. {$7e}
  716.  a{CBM-W}0 {CBM-M} 100
  717.  
  718.  i,a:i{CBM-R}i{CBM-N}1: 20
  719. {CBM-J}(
  720. ck{CBM-W}{CBM-E}28410{CBM-M}"error in data":
  721. {$eb}2
  722. "use sys"sh{CBM-D}256{CBM-N}sl{CBM-N}403"to start":55,sl:56,sh:
  723.  
  724. D
  725.  a{CBM-W}{CBM-Q}255 {CBM-M} a{CBM-R}{CBM-L},255
  726. 170,255,255,255,255,254,252,248
  727. 5{CBM-@}85,255,255,255,255,127,63,31
  728. r{SHIFT-POUND}215,225,231,235,231,235
  729. O{CBM-S}sc{CBM-E}hi{CBM-M}hi{CBM-R}sc:""{CBM-T}6)hi
  730. {CBM-W}"            game over"
  731. {CBM-C}{CBM-H}"               score"sc
  732. {$f2}{CBM-J}"            press b to begin":,248
  733. {$f6}85,255,255,255,255,127,63,31
  734. 1{$f7}215,225,231,235,231,235
  735. q{CBM-A}sc{CBM-E}hi{CBM-M}hi{CBM-R}sc:""hi
  736. O{CBM-E}"game over"
  737. {CBM-P}{CBM-R}"press:":"(space) to release.   then (space) to fire"
  738. E{CBM-W}"retro-rockets"
  739. {$f5}{CBM-H}"(a)-to move left      (d)-to mo(a{CBM-N}256){CBM-N}sh: 30
  740. !N
  741. a{CBM-R}{CBM-L}(a{CBM-N}1){CBM-N}sl:30
  742. 3
  743. {SHIFT-*} 0,0,0,0,0,0
  744. e{SHIFT-*} 0,0,0,0,0,0
  745. w{SHIFT-*} 0,0,0,0,0,0
  746. I{SHIFT-*} 0,0,0,0,0,0
  747. {$7b}{SHIFT-*} 0,0,0,0,0,0
  748. {SHIFT-*} 0,0,0,0,0,0
  749. ${SHIFT-*} 0,0,0,0,0,0
  750. {CBM-E}*{SHIFT-*} 0,0,0,0,0,0
  751. C0{SHIFT-*} 0,0,0,0,0,0
  752. U6{SHIFT-*} 0,0,0,0,0,0
  753. {$e7}<{SHIFT-*} 0,0,0,0,0,0
  754. {$f9}b{SHIFT-*} 0,0,0,0,0,0
  755. 100:700
  756. 3zsc{CBM-R}sc{CBM-N}100:s1{CBM-Q}1,200:s{CBM-R}0{CBM-@}200::s1{CBM-Q}1,.:""sc
  757. x[""H(tb$,x)"{SHIFT-*}    ":185
  758. {CBM-C}"bonus level"lv{CBM-N}1"x":q1{CBM-R}36876:q2{CBM-R}36875:v,15
  759. {CBM-L}{CBM-V}x{CBM-R}1{CBM-@}6:q1,no%(x):q2,no%(x)
  760. {CBM--}{CBM-B}t{CBM-R}1{CBM-@}150::no%(x){CBM-R}235{CBM-M}t{CBM-R}.{CBM-@}200:
  761. {$ee}{SHIFT-*}:q1,.:q2,.
  762. '
  763. {CBM-U}:380
  764.  
  765. Bt{CBM-R}t{CBM-N}1: t{CBM-R}1 {CBM-M} d${CBM-R}dd$
  766. g
  767. L"Menu: T=acct Transfer
  768. ^
  769. V{CBM-+}6)"C=write Check
  770. V
  771.  {CBM-+}6)"D=make Deposit
  772.  
  773. {$e5}1080
  774.  
  775. {$ea}{CBM-K} a$: a${CBM-R}""{CBM-M}490
  776. {CBM-+}
  777. {$f4} a${CBM-R}"c"{CBM-M}590
  778. {CBM-Y}
  779. {$fe} a${CBM-R}"d"{CBM-M}620
  780. H
  781.  a${CBM-R}"t"{CBM-M}650
  782. Z
  783. 1160: r{CBM-R}1{CBM-@}3
  784. {$fb}
  785. "S.."
  786. '"MISCELLANEOUS..","TOTAL BALANCE.."
  787. 11050
  788. z x {CBM-M} 1,8,2,"0:chbkfile,read": 350
  789. ""Insert data cassette and rewind to read balances.
  790. {CBM-Q},:"Ready?...Press Y
  791. A6{CBM-K} a$: a${CBM-R}"" {CBM-M}310
  792. R@ a${CBM-R}"n" {CBM-M} 
  793. {$e5}j a${CBM-W}{CBM-E}"y" {CBM-M}290
  794. {$fb}t1,1,0,"chbkfi
  795. {CBM-N}5,15: s{CBM-N}12,15
  796.  s{CBM-N}3,4:3{CBM-N}10,4
  797.  s{CBM-N}24,6
  798. *{CBM-+} s{CBM-N}4,65:s{CBM-N}18,65
  799. @{CBM-A} s{CBM-N}1,12: s{CBM-N}8,14
  800. p{SHIFT-@} q{CBM-R}1{CBM-@}250:
  801. FD s{CBM-N}1,0: s{CBM-N}8,0:
  802.  
  803.  
  804. 0
  805. {$f2}{CBM-K} a$: a${CBM-R}"" {CBM-M}1010
  806.  
  807. {CBM-Q}"Insert data disk or tape"
  808. N"Press any key to load data."
  809. X"1080
  810. {$ef}${CBM-K} a$: a$,162
  811. ZA -227,32,216,255,169,13
  812. /A 32,210,255,76,116,164
  813. eA 0,1,65,17,81,33
  814. {$60}A 97,49,113,124,165,49
  815. {$7b}A 234,162,-256,173,5,3
  816. A 201,-256,240,17,141,-145
  817. {CBM-L}A -257,173,4,3,141,-144
  818. R{CBM-@}A -257,169,-211,141,4,3
  819. {$e9}{CBM-N}A 142,5,3,173,21,3
  820. {CBM-A}A  or tape"
  821. {$ea}"Pressing 'STOP' will abort session"
  822. >{$ed}" (transactions will be lost)
  823. D{$f0}" any other key will save data."
  824. N{$f1}1080
  825. {$f2}{CBM-K} a$: a${CBM-R}"" {CBM-M}1010
  826.  
  827. {CBM-Q}"Insert data disk or tape"
  828. N"Press any key to load data."
  829. X"1080
  830. {$ef}${CBM-K} a$: a$
  831. 1,76
  832. ;
  833.  30,2
  834.  
  835.  
  836. 55,169
  837. &)
  838.  1,162,65,160,1,32
  839. @*
  840.  189,255,169,1,162,8
  841. [+
  842.  160,0,32,186,255,169
  843. U,
  844.  0,170,160,24,32,213
  845. -
  846.  255,120,169,0,133,236
  847. {CBM-P}.
  848.  133,237,133,238,133,239
  849. M/
  850.  133,208,133,209,133,234
  851. {$ea}0
  852.  169,111,141,15,144,169
  853. 1
  854.  255>1,1,1,"chbkfile"
  855. #hr${CBM-R}G(13): r{CBM-R}1{CBM-@}11:1,a(r);r$;:
  856. 4r1,d$;r$;: 1
  857. ^w t$:"Date:"d$:"Had"t" trans.":150
  858. V\"New file done.":
  859. {CBM-N}F140:"No transactions.":"File not changed.":
  860. MP140:"Balances have changed."
  861. {$e4}Z"Write new file?"
  862. {$fa}{CBM-K}
  863.  
  864. 56,28:52,28:
  865. x
  866. 36869,255:36879,25:"welcome to the planet kaylon":1202
  867. {$7b}
  868. cl{CBM-R}.:v{CBM-R}36878:v,15:s1{CBM-R}v{CBM-Q}1:sr{CBM-R}1
  869.  
  870.  
  871. "":bs{CBM-R}4
  872. {CBM-POUND}
  873. d{CBM-R}7424{CBM-@}7424{CBM-N}63:y:d,y:
  874. {CBM-X}
  875. d{CBM-R}1{CBM-@}6:no%(d):
  876. Y
  877. lf{CBM-R}3:po{CBM-R}7724{CBM-N}21:c{CBM-R}30720
  878. {$fb}
  879. tb${CBM-R}"{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}"
  880.  2{CBM-Q}{CBM-J}(a2){CBM-E}0 {CBM-M} 1160:650
  881. .a(a1){CBM-R}{CBM-G}r(a(a1){CBM-Q}a):a(a2){CBM-R}{CBM-G}r(a(a2){CBM-N}a)
  882. a{CBM-POUND}140:e{CBM-R}a1:f{CBM-R}a2
  883. N{CBM-R} e{CBM-E}6 {CBM-M} ""{CBM-+}255){CBM-+}198){CBM-+}e{CBM-D}40{CBM-Q}255)"*":710
  884. {CBM-C}""{CBM-+}198){CBM-+}e{CBM-D}40)"*"
  885. {CBM-R}F f{CBM-E}6 {CBM-M} ""{CBM-+}255){CBM-+}198){CBM-+}f{CBM-D}40{CBM-Q}255)"*":730
  886. IP""{CBM-+}198){CBM-+}f{CBM-D}40)"*"
  887. {$f4}Z m{CBM-R}1{CBM-@}750::""sc:""{CBM-T}17)lf:""hi:""{CBM-T}18)lv{CBM-N}1
  888. hE
  889. ""a$;:""b$
  890. IG
  891. "!   !!!   !!!   !!!!!!"
  892. ZH
  893. ""c$""a$
  894. {SHIFT-@}I
  895. "!!!"{CBM-+}16)"!!!!!!!"{CBM-+}14)"!!!!!!!!!"{CBM-+}12)"!!!!!!!!!!!{CBM-P}!";
  896. {$f0}J
  897. "!{CBM-P}!!{CBM-P}!!{CBM-P}!!!!!";:8185,33:8185{CBM-N}c,5
  898. {CBM-O}
  899. "";"{CBM-+}6)" "
  900. &{CBM-+}6)" ":{CBM-+}6)" ": m{CBM-R}1{CBM-@}300:
  901. <0""{CBM-+}6)"T"
  902. \:{CBM-+}6)"C":{CBM-+}6)"D": m{CBM-R}1{CBM-@}300:
  903. Gd:490
  904. n""
  905. {CBM-Z}o"Amt of Check,Acct #";:1080: a,l
  906. Vx l{CBM-E}10 {CBM-A} l{CBM-W}1 {CBM-A} l{CBM-Q}{CBM-J}(l){CBM-E}0 {CBM-M} 1160:590
  907. Ba(11){CBM-R}{CBM-G}r(a(11){CBM-Q}a):a(l){CBM-R}
  908. le"
  909. ^ r{CBM-R}1{CBM-@}11:1,a(r)::1,d$: 1
  910. $H140
  911. >R"Transaction?  Y/N"
  912. hW1080
  913. ^{$7c}{CBM-K} a$: a${CBM-R}"" {CBM-M}380
  914. P a${CBM-R}"y" {CBM-M}450
  915.  a${CBM-R}"n" {CBM-M}740
  916. 1160: r{CBM-R}1{CBM-@}3
  917. D{CBM-@}""{CBM-+}14)"   ": m{CBM-R}1{CBM-@}300:
  918. {$f4}{CBM-S}""{CBM-+}14)"Y/N": m{CBM-R}1{CBM-@}300:
  919. ~
  920. ):""a$;:""b$:""c$""a$
  921. [{$e2}
  922. m{CBM-R}m{CBM-N}1:m{CBM-E}sr{CBM-M}m{CBM-R}.:po,32:po{CBM-R}po{CBM-N}22:{CBM-Q}(B(po){CBM-W}{CBM-E}32)500:po,34
  923. {$e3}
  924. po{CBM-N}c,cl:od{CBM-R}B(po):{CBM-Q}((od{CBM-W}{CBM-E}34){CBM-P}(od{CBM-W}{CBM-E}32))500
  925. {CBM-T}{$e6}
  926. p{CBM-R}B(197):p{CBM-W}{CBM-E}32{CBM-M}233
  927. Q{$e7}
  928. m{CBM-R}.:s1,200:ls{CBM-R}B(po{CBM-N}22):cm{CBM-R}(B(c{CBM-N}po{CBM-N}22)){CBM-P}7
  929. {$e8}
  930. po{CBM-N}22,35:po{CBM-N}22{CBM-N}c,2:po{CBM-N}22,ls:92,0,208,4
  931. dA 162,8,208,176,232,189
  932. 1jA 0,2,201,49,240,8
  933. jpA 201,56,240,4,162,9
  934. FvA 208,160,41,15,170,152
  935. \A 72,160,0,138,32,186
  936. BA 255,104,168,104,170,152
  937. {CBM-O}HA 160,2,32,189,255,162
  938. WNA -1,134,251,169,-256,133
  939. {$f6}TA 252,160,-257,169,251{CBM-R}"" {CBM-M}1060
  940. {$f5}.
  941. 8 q{CBM-R}s {CBM-@} s{CBM-N}22: q,0:
  942. #b s{CBM-N}5,0: s{CBM-N}19,0
  943. 8g s{CBM-N}6,7: s{CBM-N}20,7
  944. fl s{CBM-N}24,15
  945. \v s{CBM-N}4,33:s{CBM-N}18,19
  946. O{$60} s,0: s{CBM-N}1,75
  947. J s{CBM-N}14,1: s{CBM-N}15,75
  948. O s{CBM-N}4,32:s{CBM-N}18,18
  949. {CBM-D}T q{CBM-R}1{CBM-@}150:
  950. C{$7e} s{CBM-N}1,0: s{CBM-N}15,0:
  951. {CBM--} q{CBM-R}s {CBM-@} s{CBM-N}22: q,0:
  952. {$f3} s
  953. {$f5}201,-256,240,19,141,-147
  954. %{CBM-L}A -257,173,20,3,141,-146
  955. d{CBM-C}A -257,169,-130,120,141,20
  956. \BA 3,142,21,3,88,173
  957. XHA 144,2,201,-256,240,19
  958. NA 141,-170,-256,173,143,2
  959. {CBM-Y}TA 141,-169,-256,169,-168,120
  960. QZA 141,143,2,142,144,2
  961. {$e1} A 88,96,256
  962.  
  963.  
  964. 57,169,251 a$: a${CBM-R}"" {CBM-M}900
  965.  a${CBM-R}"n" {CBM-M} 
  966.  a${CBM-W}{CBM-E}"y" {CBM-M}880
  967. '{CBM-I}360
  968. u{CBM-M}140:"Error - No balance.":"Acct Sum="z
  969. O{CBM-D}"Chbk Balance="a(11)
  970. {CBM-L}"Do you wish to continue?"
  971. {CBM-G}{SHIFT-*}{CBM-K} a$: a${CBM-R}"" {CBM-M}960
  972. {CBM-J}J a${CBM-R}"n" {CBM-M}
  973. HT a${CBM-W}{CBM-E}"y" {CBM-M}940
  974. Q{$de}360
  975. {$f1}{$e8}"Insert data disk1
  976. m$(1){CBM-R}" ":m$(2){CBM-R}"$":co{CBM-R}(lv{CBM-N}1){CBM-Z}50
  977. ;2
  978. d{CBM-R}1{CBM-@}3:ma${CBM-R}"":as{CBM-R}1{CBM-@}22
  979. t3
  980. b{CBM-R}1:{CBM-F}(ti){CBM-E}.9{CBM-Q}co{CBM-M}b{CBM-R}2
  981. H7
  982. ma${CBM-R}ma${CBM-N}m$(b):
  983. X8
  984. d{CBM-R}1{CBM-M}a${CBM-R}ma$
  985. 9
  986. d{CBM-R}2{CBM-M}b${CBM-R}ma$
  987. :
  988. d{CBM-R}3{CBM-M}c${CBM-R}ma$
  989. ;
  990.  
  991. {SHIFT-@}B
  992. "score        left"
  993. {$f0}C
  994. "high         level":"{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}
  995. .D
  996. "":370
  997. {$e4} t{CBM-R}0 {CBM-M}870
  998. {$ee}z{CBM-R}0: r{CBM-R}1{CBM-@}10:z{CBM-R}z{CBM-N}a(r):
  999. :{$f8} {CBM-L}(z{CBM-Q}a(11)){CBM-R}{CBM-E}.01 {CBM-M}940
  1000. L 140:"Sum of Accounts=Total Balance": 1000
  1001.  x {CBM-M} 1,8,2,"@0:chbkfile,write":840
  1002. {CBM-P}:"Ready?...press Y
  1003. D {CBM-K} a$: a${CBM-R}""{CBM-M}800
  1004. V* a${CBM-R}"n" {CBM-M}880
  1005. {$e9}4 a${CBM-W}{CBM-E}"y" {CBM-M}780
  1006. ~:po{CBM-R}7724{CBM-N}21
  1007. #{CBM-X}
  1008. x{CBM-R}2{CBM-@}20:po{CBM-N}x,34:po{CBM-N}c,cl
  1009. c{CBM-V}
  1010. ""H(tb$,x)"% '&"
  1011. B{CBM-B}
  1012. d{CBM-R}1{CBM-@}20:p{CBM-R}B(197):p{CBM-R}32{CBM-M}200
  1013. {SHIFT-*}
  1014. ::""{CBM-T}x{CBM-Q}2)"{SHIFT-*}   ":189
  1015. {CBM-J}H
  1016. po{CBM-R}po{CBM-N}x:po{CBM-R}po{CBM-N}22:po{CBM-Q}22,228:po,34:po{CBM-N}c,cl
  1017. {$e1}{SHIFT-+}
  1018. a${CBM-R}I(a$,21){CBM-N}H(a$,1):b${CBM-R}I(b$,1){CBM-N}H(b$,21)
  1019. {CBM--}
  1020. c${CBM-R}I(c$,1){CBM-N}H(c$,21{CBM-G}r(a(l){CBM-Q}a):640
  1021. $L:"Amt of Deposit";:1080: a
  1022. oVl{CBM-R}10:a(11){CBM-R}{CBM-G}r(a(11){CBM-N}a):a(l){CBM-R}{CBM-G}r(a(l){CBM-N}a)
  1023. F140:e{CBM-R}l:f{CBM-R}12:690
  1024. ""
  1025. {CBM-D}"Amt,from #,to #";:1080: a,a1,a2
  1026. Y a1{CBM-E}10 {CBM-A} a1{CBM-W}1 {CBM-A} a1{CBM-Q}{CBM-J}(a1){CBM-E}0 {CBM-M} 1160:650
  1027.  a2{CBM-E}10 {CBM-A} a2{CBM-W}1 {CBM-A} a
  1028.  
  1029. 2500
  1030. i
  1031. :q{CBM-R}7680:1000:n{CBM-R}8 :36879,n:s1{CBM-R}36878:s4{CBM-R}36876:s1,15:s{CBM-R}0
  1032. _
  1033.  
  1034. 36879,n:w{CBM-R}3:""
  1035.  
  1036. a{CBM-R}8131:b{CBM-R}a:m{CBM-R}1:ac{CBM-R}1:a1{CBM-R}7798:a2{CBM-R}7801:q2{CBM-R}1000
  1037. {CBM-E}
  1038. "sc=";l;"A=";w;"en=";q2
  1039. {$e6}
  1040. "{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}";
  1041. ~
  1042. x{CBM-R}8164{CBM-@}8185:x,99:f{CBM-R}2{CBM-M}p1{CBM-R}12
  1043. df{CBM-R}3{CBM-M}p1{CBM-R}14
  1044. df{CBM-R}4{CBM-M}p1{CBM-R}16
  1045. (df{CBM-R}5{CBM-M}p1{CBM-R}{CBM-F}(0){CBM-D}16
  1046. <df{CBM-W}1{CBM-A}df{CBM-E}5{CBM-M}1030
  1047. b$
  1048. ED36879,8:a${CBM-R}"j   u   m   p "
  1049. PJa5${CBM-R}""
  1050. N"":i{CBM-R}1{CBM-@}C(a$)
  1051. Pk{CBM-R}1{CBM-@}155:
  1052. {SHIFT-POUND}S{CBM-T}4)"";H(a$,i):
  1053. {$de}X"   ready to battle?":"        y / n"
  1054. {$f2}
  1055. {CBM-K}y$::513
  1056.  
  1057. ~"0":513
  1058. #
  1059. "0"
  1060. f"game over!"
  1061. vi{CBM-R}1{CBM-@}2500:
  1062. _""
  1063. Wb${CBM-R}"battle again ?"
  1064.  
  1065. i{CBM-R}1{CBM-@}C(b$):""{CBM-T}4)H(b$,i)
  1066. {CBM-+}k{CBM-R}1{CBM-@}125::
  1067. {CBM-A}::
  1068. {SHIFT-*}b1${CBM-R}"(y/n)"
  1069. {$e1}i{CBM-R}1{CBM-@}C(b1$):"";{CBM-T}8)H(b1$,i)
  1070. {$f2}!k{CBM-R}1{CBM-@}1
  1071. 13,153,-1,-256,200,152
  1072. &
  1073. A 41,15,208,233,169,0
  1074. c
  1075. A 153,-1,-256,160,107,32
  1076. \
  1077. A 47,241,108,2,3,108
  1078. {$7c}
  1079.  A -144,-257,208,251,232,189
  1080.  
  1081. &A 0,2,201,61,208,202
  1082. {CBM-A}
  1083. ,A 232,138,72,160,0,189
  1084. G
  1085. 2A 0,2,201,44,240,8
  1086. {$e4}
  1087. 8A 232,200,192,15,208,243
  1088. {$fe}
  1089. >A 240,182,14,s:fc,93:fc
  1090.  
  1091. s4,0
  1092. $j{CBM-R}fc:h{CBM-R}B(j):h{CBM-R}32{CBM-M}410
  1093. -450
  1094. ?j,93:j{CBM-Q}0,93
  1095. ]fc{CBM-R}e{CBM-@}7724{SHIFT-POUND}{CBM-Q}22:fc,32:fc
  1096. E{CBM-@}75
  1097. {$7f}Bk,42:k{CBM-N}1,42:k{CBM-Q}1,42
  1098. Gcr{CBM-R}1{CBM-@}150:
  1099. {CBM-POUND}Li{CBM-R}7724{CBM-@}7745:i,32:
  1100. NQq2{CBM-R}q2{CBM-N}25:l{CBM-R}l{CBM-N}50:m{CBM-R}1:u{CBM-R}u{CBM-N}p1:p{CBM-R}{CBM-J}(u)
  1101. {SHIFT--}Vp{CBM-E}25{CBM-M}p{CBM-R}25
  1102. {$e6}{SHIFT-+}415
  1103.  "8,-1,-256,173,-1
  1104. %{SHIFT-*} -256,41,15,208,3,141
  1105. d{CBM-I}{SHIFT-*} -1,-256,108,-146,-257,32
  1106. A{CBM-POUND}{SHIFT-*} 72,235,173,-1,-256,208
  1107. {$7d}{CBM-S}{SHIFT-*} 34,165,157,240,30,165
  1108. {CBM-H}{SHIFT-*} 212,208,26,166,198,202
  1109. {CBM-L}{SHIFT-@}{SHIFT-*} 189,119,2,201,133,144
  1110. Q{SHIFT-*}{SHIFT-*} 16,201,141,176,12,56
  1111. {$eb}F{SHIFT-*} 233,133,10,10,10,10
  1112. L{SHIFT-*} 9,1,14,d{CBM-W}{CBM-E}0{CBM-P}a{CBM-W}8140{CBM-M}a{CBM-R}a{CBM-Q}22:325
  1113. -ac{CBM-R}5:75
  1114. 4.a{CBM-W}8120{CBM-M}a{CBM-R}a{CBM-N}1:75
  1115. j/a{CBM-E}8141{CBM-M}a{CBM-R}a{CBM-Q}1:75
  1116. x1g{CBM-R}B(a{CBM-N}22)
  1117. J6B(a){CBM-W}{CBM-E}32{CBM-M}500
  1118. ;g{CBM-R}32{CBM-A}g{CBM-R}104{CBM-A}g{CBM-R}100{CBM-M}a{CBM-N}22,42:30742{CBM-N}a,7:b,32:500
  1119. {CBM-P}@q2{CBM-R}q2{CBM-Q}4:40
  1120. Fea{CBM-W}8098{CBM-M}a{CBM-R}a{CBM-N}23:50
  1121. {SHIFT--}fa{CBM-E}8120{CBM-M}a{CBM-R}a{CBM-N}20:50
  1122. {$fc}hq2{CBM-R}q2{CBM-Q}9:ac{CBM-R}1:B(a)1){CBM-N}sl:30
  1123.  
  1124. {SHIFT-*} 0,0,0,0,0,0
  1125. +{SHIFT-*} 0,0,0,0,0,0
  1126. ={SHIFT-*} 0,0,0,0,0,0
  1127. o{SHIFT-*} 0,0,0,0,0,0
  1128. A{SHIFT-*} 0,0,0,0,0,0
  1129. S{SHIFT-*} 0,0,0,0,0,0
  1130. ${SHIFT-*} 0,0,0,0,0,0
  1131. *{SHIFT-*} 0,0,0,0,0,0
  1132. {SHIFT-POUND}0{SHIFT-*} 0,0,0,0,0,0
  1133. {CBM-F}6{SHIFT-*} 0,0,0,0,0,0
  1134. M<{SHIFT-*} 0,0,0,0,0,0
  1135. {CBM-*}b{SHIFT-*} 0,0,0,0,0,0
  1136. {$f1}h{SHIFT-*} 0,0,0,0,0,0
  1137.  
  1138. n{SHIFT-*} 0,0,85
  1139. B
  1140. m{CBM-R}5
  1141. C
  1142. ac{CBM-R}5{CBM-M}ac{CBM-R}1:
  1143. D
  1144. 50
  1145. {$60}I
  1146. s{CBM-R}128:x{CBM-R}q{CBM-@}8119{SHIFT-POUND}22:qx{CBM-R}x{CBM-N}22:B(qx){CBM-R}65{CBM-M}x{CBM-N}22,42:30742{CBM-N}x,7:500
  1147. PJ
  1148. s{CBM-R}s{CBM-N}1:s4,s
  1149. {$7c}K
  1150. x,93:
  1151. L
  1152. s4,0:s{CBM-R}0:B(qx){CBM-R}90{CBM-M}b{CBM-R}a:500
  1153. {CBM-POUND}M
  1154. qx,93
  1155. YN
  1156. x{CBM-R}qx{CBM-N}22:t{CBM-R}B(x):t{CBM-R}90{CBM-M}x{CBM-R}q{CBM-@}8141:x,32:x:500
  1157. {$f4}S
  1158. t{CBM-R}102{CBM-M}x,230:x{CBM-Q}22,32
  1159. X0D
  1160. x{CBM-R}1: make x=0 for tape,or x=1 to use disk
  1161. qI
  1162.  53280,12: 53281,11:G(14)
  1163. N
  1164. t${CBM-R}"               BUDGETEER                "
  1165. {CBM-D}S
  1166. s{CBM-R}54272: q{CBM-R}s {CBM-@} s{CBM-N}23: q,0:
  1167. {$eb}X
  1168.  a$(11),a(11),b%(11): {CBM-G}r(x){CBM-R}{CBM-J}(x{CBM-D}100{CBM-N}.5){CBM-Z}100: t$""
  1169.  
  1170. "Today's Date
  1171. (
  1172. b,32:a,65:b{CBM-R}a
  1173. 42
  1174. c{CBM-R}B(197):d{CBM-R}B(653):b{CBM-R}a:s1,15
  1175. t3
  1176. "                       "
  1177. L4
  1178. q2{CBM-R}q2{CBM-Q}2:q2{CBM-W}{CBM-R}0{CBM-M}q2{CBM-R}0
  1179. 5
  1180. "sc=";l;"A=";w;"en=";q2;""
  1181. 6
  1182. q2{CBM-W}0{CBM-M}480
  1183. {CBM-E}7
  1184. c{CBM-R}34{CBM-M}a{CBM-R}a{CBM-N}1:300
  1185. F<
  1186. c{CBM-R}33{CBM-M}a{CBM-R}a{CBM-Q}1:300
  1187. {$e6}a
  1188. c{CBM-R}32{CBM-A}c{CBM-R}15{CBM-A}c{CBM-R}26{CBM-M}e{CBM-R}a{CBM-Q}22:400
  1189. {$f3}k
  1190. m{CBM-E}{CBM-R}5{CBM-M}90
  1191. p
  1192. k{CBM-R}{CBM-J}(
  1193. +y${CBM-R}""{CBM-M}2575
  1194.  
  1195.  
  1196. y${CBM-R}"n"{CBM-M}
  1197.  
  1198. 5
  1199. (
  1200. :
  1201.  
  1202.  
  1203. 551
  1204. (+yn${CBM-R}"n"{CBM-M}
  1205. /05
  1206. P{$e8}"difficulty factors{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}"
  1207. {$ed}"1-beginner"
  1208. {$f2}"2-rookie"
  1209. {CBM-I}{$f7}"3-pro"
  1210. {CBM-W}{$fc}"4-expert"
  1211. D"5-random"
  1212. {$e3}{CBM-K}df$:df{CBM-R}E(df$):df{CBM-R}1{CBM-M}p1{CBM-R}10
  1213. {$f3}d25::
  1214. &v{CBM-R}1{CBM-@}10:{CBM-K}a$:
  1215. '{CBM-K}yn$:yn${CBM-R}""{CBM-M}551
  1216. (+yn${CBM-R}"n"{CBM-M}
  1217. /05
  1218. P{$e8}"difficulty factors{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}"
  1219. {$ed}"1-beginner"
  1220. {$f2}"2-rookie"
  1221. {CBM-I}{$f7}"3-pro"
  1222. {CBM-W}{$fc}"4-expert"
  1223. D"5-random"
  1224. {$e3}{CBM-K}df$:df{CBM-R}E(df$):df{CBM-R}1{CBM-M}p1{CBM-R}10
  1225. {$f3}d({CBM-J}({CBM-L}(a(r)))))
  1226. $
  1227. R
  1228.  {CBM-L}(a(r)){CBM-W}1 {CBM-M} b%(r){CBM-R}31
  1229. ,
  1230. {CBM--}
  1231. :
  1232. c
  1233. {$e6}
  1234.  r{CBM-R}1{CBM-@}11: a$(r):
  1235. L
  1236. {$f0}
  1237. "HOUSING........","UTILITIES......"
  1238.  
  1239. {$f3}
  1240. "INSURANCE......","SERVICE CHARGES"
  1241. {CBM-D}
  1242. {$f7}
  1243. "CREDIT CARDS..."
  1244. U
  1245. {$fa}
  1246. "VACATION.......","MEDICAL........"
  1247. {$fe}
  1248. {$fd}
  1249. "BOOKS&MAGAZINES","STORE CHARGEout of energy !!":x{CBM-R}1{CBM-@}2500:
  1250. !{$e5}""
  1251. 6{$f4}i{CBM-R}1{CBM-@}900::s4,0
  1252. p{$f6}k,32:k{CBM-N}1,32:k{CBM-Q}1,32
  1253. K{$f7}fc{CBM-R}q{CBM-@}8119{SHIFT-POUND}22:fc,32:
  1254. {$7d}{$f8}w{CBM-R}w{CBM-Q}1:w{CBM-E}0{CBM-M}20
  1255. {$f9}l{CBM-W}10{CBM-M}509
  1256. {$fa}l{CBM-E}9{CBM-P}l{CBM-W}100{CBM-M}510
  1257. {CBM-W}{$fb}l{CBM-E}99{CBM-P}l{CBM-W}1000{CBM-M}511
  1258. B{$fc}l{CBM-E}999{CBM-M}512
  1259. Z{$fd}"0":513
  1260. {$f3}{$fe}"0"1,-1,-256,96
  1261. R{SHIFT-*} 166,122,189,0,2,201
  1262. 8X{SHIFT-*} 70,208,68,232,189,0
  1263. r{$de}{SHIFT-*} 2,201,49,144,60,201
  1264. L{$e4}{SHIFT-*} 57,176,59,41,15,168
  1265. {$ea}{SHIFT-*} 185,-135,-257,168,232,189
  1266. {CBM-T}{$f0}{SHIFT-*} 0,2,201,61,240,5
  1267. {CBM-C}{$f6}{SHIFT-*} 162,11,108,0,3,232
  1268. U{$fc}{SHIFT-*} 189,0,2,201,13,240
  1269. {$ef}A 15,201,95,208,2,169
  1270.  
  1271. A {CBM-W}{CBM-E}32{CBM-M}500
  1272. ib,32:a,65:b{CBM-R}a
  1273. !jc{CBM-R}34{CBM-M}a{CBM-R}a{CBM-N}24
  1274. 2kc{CBM-R}33{CBM-M}a{CBM-R}a{CBM-N}20
  1275. dna{CBM-W}8120{CBM-M}a{CBM-R}a{CBM-N}2
  1276. voa{CBM-E}8141{CBM-M}a{CBM-R}a{CBM-Q}2
  1277. Mtac{CBM-R}5:75:g{CBM-R}B(a{CBM-N}22)
  1278. {$7f}yB(a){CBM-W}{CBM-E}32{CBM-M}500
  1279. {CBM-H}^g{CBM-R}32{CBM-A}g{CBM-R}104{CBM-A}g{CBM-R}100{CBM-M}a{CBM-N}22,42:a{CBM-N}30742,7:b,32:500
  1280. H{$60}b,32:a,65:b{CBM-R}a
  1281. PC90
  1282.  
  1283. s{CBM-R}255:fc{CBM-R}e{CBM-@}7746{SHIFT-POUND}{CBM-Q}22:s{CBM-R}s{CBM-Q}1:s0,0,0,0
  1284.  
  1285. t{SHIFT-*} 0,0,0,0,0,0
  1286. '
  1287. z{SHIFT-*} 0,0,0,0,0,0
  1288. 9
  1289. {$60}{SHIFT-*} 0,0,0,0,0,0
  1290. k
  1291. F{SHIFT-*} 0,0,0,0,0,0
  1292. ]
  1293. L{SHIFT-*} 0,0,0,0,0,0
  1294. O
  1295. R{SHIFT-*} 0,0,0,0,0,0
  1296.  
  1297. X{SHIFT-*} 0,0,0,0,0,0
  1298.  
  1299. {$7e}{SHIFT-*} 0,0,0,173,-1,-256
  1300. {CBM-J}
  1301. {SHIFT-*} 240,30,166,198,224,11
  1302. R
  1303. {SHIFT-*} 176,24,168,185,-1,-256
  1304. {$ed}
  1305. {SHIFT-*} 240,15,157,119,2,230
  1306.  
  1307. {SHIFT-*} 198,23
  1308. t{CBM-R}230{CBM-M}x,104:x{CBM-Q}22,32
  1309. :{$7d}
  1310. t{CBM-R}104{CBM-M}x,32:x{CBM-Q}22,32:l{CBM-R}l{CBM-Q}25:l{CBM-W}{CBM-R}0{CBM-M}l{CBM-R}0
  1311. L
  1312. t{CBM-R}32{CBM-M}x,32:x{CBM-Q}22,32:f{CBM-R}1{CBM-@}10::x,32:x{CBM-Q}22,32
  1313.  
  1314. x{CBM-R}q{CBM-@}8119{SHIFT-POUND}22:x,32:
  1315.  
  1316. ac{CBM-R}5{CBM-M}ac{CBM-R}1:
  1317. {CBM-G}
  1318. 50
  1319. {CBM-Z}H
  1320. z{CBM-R}k:k{CBM-R}k{CBM-N}az
  1321. KM
  1322. z,32:z{CBM-N}1,32:z{CBM-Q}1,32:85
  1323. {$e8}R
  1324. k,218:k{CBM-N}1,223:k{CBM-Q}1,233
  1325. {$f4}W
  1326. m{CBM-R}5:50
  1327.  
  1328. ";:1080: dd$::230
  1329. a
  1330.  t$:"  Date:"d$:"  Last Amount:$"a
  1331. Y
  1332. 190:: r{CBM-R}1{CBM-@}9:"  "r".."a$(r)"..$"{CBM-T}b%(r))a(r):
  1333. {CBM-T} 
  1334. "  10.."a$(10)"..$"{CBM-T}b%(10))a(10):
  1335. O{CBM-N}
  1336. "  11.."a$(11)"..$"{CBM-T}b%(11))a(11)::
  1337. {CBM--}{CBM-V}
  1338.  r{CBM-R}1{CBM-@}11
  1339.  
  1340. H
  1341.  {CBM-L}(a(r)){CBM-R}{CBM-E}1 {CBM-M} b%(r){CBM-R}32{CBM-Q}C(D18{CBM-D}{CBM-F}(0){CBM-N}7727)
  1342. &u
  1343. k,218:k{CBM-N}1,223:k{CBM-Q}1,233
  1344. 7v
  1345. ac{CBM-R}5{CBM-M}ac{CBM-R}1:
  1346. cw
  1347. m{CBM-R}5:50
  1348. zz
  1349. o{CBM-R}0:o{CBM-R}{CBM-J}(64{CBM-D}{CBM-F}(0){CBM-N}1)
  1350. F[
  1351. z{CBM-R}k:m{CBM-R}5
  1352. {$7c}\
  1353. k{CBM-W}7728{CBM-M}az{CBM-R}1:200
  1354. ]
  1355. k{CBM-E}7743{CBM-M}az{CBM-R}{CBM-Q}1:200
  1356. {SHIFT-POUND}^
  1357. o{CBM-W}p1{CBM-M}q{CBM-R}k{CBM-N}22:105
  1358. S{$60}
  1359. o{CBM-E}45{CBM-M}k{CBM-R}k{CBM-N}1:z,32:z{CBM-N}1,32:z{CBM-Q}1,32:85
  1360. {$fd}A
  1361. o{CBM-E}25{CBM-M}k{CBM-R}k{CBM-Q}1:z,32:z{CBM-N}1,32:z{CBM-Q}1,32:
  1362. ~{CBM-S},{CBM-X}G*+{$ee},{CBM-S},{$ec},{$ec}{SHIFT-POUND}
  1363.  ~{SHIFT-POUND} ~{SHIFT-POUND}{CBM-I} 
  1364.  {SHIFT-@}~{CBM-S},{$e8}{CBM-I} + {CBM-X}~{SHIFT-POUND}
  1365. {CBM-I}< - U~{CBM-Z}V,I
  1366. {$f0}{SHIFT-POUND}, {$f6}l{$fe}{CBM-I} ,{CBM-X}<-
  1367. ,{$ee},{CBM-S},{CBM-X}<-,{$ee},{CBM-S},{CBM-X}<-I"P{$f3}{$ee},{CBM-S},{CBM-X}<-I"P{$f3}{$ee},{CBM-S},{CBM-X}<-I {$f0}{$f3}
  1368. , L~{CBM-Z}
  1369. ,,Ip{$f0}
  1370. 8{CBM-Z},{$e9}{CBM-N}{CBM-Z},I*{CBM-Z}
  1371. ,, ('{CBM-Z},,{CBM-Z}
  1372. ,){CBM-N}{CBM-X}{$de}*,{CBM-Z},, ('{CBM-Z},,{CBM-Z},){CBM-N}{CBM-X}{$de}*,{CBM-I},{SHIFT-POUND}, {$f6}{CBM-S},{CBM-X},, {$f6}{$ee},{CBM-S}
  1373. " please wait..."
  1374. /
  1375.  
  1376. b{CBM-R}679:c{CBM-R}767:tt{CBM-R}0
  1377. l
  1378. a{CBM-R}b{CBM-@}c:d:tt{CBM-R}tt{CBM-N}d:a,d:
  1379. {$7e}
  1380. tt{CBM-W}{CBM-E}8554{CBM-M}"check data statements";b;"to";c:
  1381.  
  1382. b{CBM-R}7168:c{CBM-R}7623:tt{CBM-R}0
  1383. {CBM-R}(
  1384. a{CBM-R}b{CBM-@}c:d:tt{CBM-R}tt{CBM-N}d:a,d:
  1385. {$e5}-
  1386. tt{CBM-W}{CBM-E}42577{CBM-M}"check data statements";b;"to";c:
  1387. %2
  1388.  " auto-load a b166:724,76:725,116:726,164:
  1389. <
  1390. {CBM-M}169,131,141,2,3,169,164,141
  1391. x
  1392. {CBM-P}3,3,169,8,170,160,0,32
  1393. Y
  1394. {CBM-Y}186,255,169,2,162,239,160,2
  1395.  
  1396. {CBM-B}32,189,255,169,0,166,43,164
  1397. {CBM-C}
  1398. G44,32,213,255,32,231,255,165
  1399. {CBM-*}
  1400. O174,133,45,133,47,165,175,133
  1401. W46,133,48,234,169,82,
  1402. 2,162,0,189,13,29,32,210
  1403. 3(255,232,224,59,208,245,162,0
  1404. v0160,0,232,234,208,252,200,208
  1405. Z8249,165,197,201,64,240,250,169
  1406. @0,133,198,162,0,189,74,29
  1407. {CBM-C}h32,210,255,232,224,85,208,245
  1408. {SHIFT--}p162,0,32,207,255,201,13,240
  1409. {$fe}x8,157,200,29,232,22
  1410.  
  1411.  
  1412.  
  1413.  
  1414.  
  1415.  
  1416.  
  1417.  
  1418.  
  1419.  
  1420.  
  1421.  
  1422.  
  1423.  
  1424.  
  1425.  
  1426. 0123456789abcdeffilename 
  1427. UPLOAD 
  1428.  CTRL-C to cancel 
  1429.  
  1430. $0:@!%!$
  1431.  
  1432.  
  1433.  
  1434.  
  1435.  
  1436.  
  1437.  
  1438.  
  1439.  
  1440.  
  1441.  
  1442.  
  1443.  
  1444.  
  1445.  
  1446.  
  1447.  
  1448.  
  1449.  
  1450.  
  1451.  
  1452.  
  1453. *operation*
  1454. *cancelled*
  1455.  
  1456.  
  1457. *file won't fit*
  1458.  
  1459. DOWNLOAD
  1460. CTRL-C to cancel
  1461.  
  1462.  
  1463. OK continue
  1464.  
  1465.  
  1466. *transmission*
  1467. *garbled*
  1468.  
  1469. Press any key
  1470. to start, or
  1471.  
  1472. CTRL-C to
  1473. by,3,3,162,0,189
  1474. $ 159,29,32,210,255,232,224,41
  1475. d{CBM-POUND}208,245,96,147,17,32,69,78
  1476. A{CBM-A}84,69,82,32,78,65,77,69
  1477. {$7e}{CBM-U}32,79,70,32,13,80,82,79
  1478. {SHIFT-*}71,82,65,77,32,84,72,65
  1479. {CBM-U}H84,32,73,83,32,84,79,32
  1480. UP66,69,13,65,85,84,79,77
  1481. {$f2}X65,84,73,67,65,76,76,89{$de}({SHIFT-POUND}
  1482.  R~l{CBM-T} R~{CBM-S},,{$ee},{$60}{SHIFT-POUND}{CBM-@}B'{SHIFT-POUND}*C' v'{$60} L~{SHIFT-POUND} R~{SHIFT-POUND},{CBM-S}{$ef}+ P W)l){CBM-Z}, P{SHIFT-POUND},{CBM-S}{$ef}+ P {$e3})l.){CBM-Z},!P{CBM-S}{$ef}+ P **l>) *{SHIFT-POUND} R~{$60}h{SHIFT-POUND}
  1483.  R~H{$60} {$f6}({SHIFT-POUND}ZB'{SHIFT-POUND}+C' v'{$60} {$f6}({SHIFT-POUND}2B'{SHIFT-POUND}+C' v'{$60}{SHIFT-POUND}{CBM-I}  {SHIFT-@}~{SHIFT-POUND}
  1484.  {CBM-X}~ {SHIFT-*}~{$60}{CBM-S}{$ef}+ P ){$60}{CBM-S} P{CBM-+}E "{$f0} 3P
  1485. {SHIFT-POUND},l{SHIFT-POUND}){SHIFT-POUND},{CBM-I}
  1486. JP{$fd}{$60}{CBM-Z}C,)IC,{CBM-Z}){$f8}
  1487. C,{$60}{CBM-Z}I32,68,73
  1488. (83,75,32,73,78,32,68,73
  1489. 2083,75,32,68,82,73,86,69
  1490. o844,13,84,72,69,78,32,80
  1491. L@82,69,83,83,32,70,49,46
  1492. h17,13,147,17,32,69,78,84
  1493. {CBM-M}p69,82,32,78,65,77,69,32
  1494. Dx79,70,32,66,79,79,84,13
  1495. {$e2}{$60}80,82,79,71,46,32,157,84
  1496. ~H72,69, l)l{SHIFT-POUND}, {$f6}{CBM-I}
  1497. , L~{SHIFT-POUND} C~ V{CBM-Z},IP{$f6} L~ l){CBM-I}
  1498. ,lIP y#lV&l&{CBM-Z},M,,{CBM-Z},I
  1499. ,{$60}{CBM-Z},){$f0}jjjj{CBM-N}{CBM-X}{$de}*,{$60}{SHIFT-POUND}B'{SHIFT-POUND}*C' v'{$60}{SHIFT-POUND}B'{SHIFT-POUND}*C' v'{$60}{CBM-I}
  1500. , L~{CBM-S},{CBM-X}*I
  1501. {$f0} R~{$ee},l^'{$60}{SHIFT-POUND}{$7b}B'{SHIFT-POUND}*C' v'{$60}{CBM-I}
  1502. V,, L~{CBM-I} F~ {$e4}~{CBM-D},,{$ee},I
  1503. P{$f0}{SHIFT-POUND}
  1504. {CBM-D},,{CBM-Z},I2tI4I6l{CBM-I}V,{CBM-S}, 
  1505. {$f0}lP'{CBM-S}{CBM-C}, 
  1506. Pl({CBM-I}
  1507.  
  1508. w32,79,70,70,47,79,78,13
  1509. "{CBM-U}84,79,32,82,69,83,69,84
  1510. ?{SHIFT-*}32,86,69,67,84,79,82,83
  1511.  
  1512.  
  1513. ,78,32,80
  1514. L@82,69,83,83,32,70,49,46
  1515. h17,13,147,17,32,69,78,84
  1516. {CBM-M}p69,82,32,78,65,77,69,32
  1517. Dx79,70,32,66,79,79,84,13
  1518. {$e2}{$60}80,82,79,71,46,32,157,84
  1519. ~H72,69,, {$ea}{CBM-Z},, {$f6}{CBM-S}1+ 
  1520. {$f0}+{CBM-I}
  1521. ,{CBM-S},J
  1522. ,{CBM-S},{CBM-X}G*, {$f6}{$ee},{CBM-S},{$ec}
  1523. ,{$e9}{SHIFT-POUND}
  1524. , {$f6} V{CBM-Z},I{$f0}IP{$f2} L~ ]) y# y#{CBM-I}
  1525. V,l{$fe} L~{SHIFT-POUND}{CBM-I}  {SHIFT-@}~{CBM-S},{$e8}{$e8}{CBM-I}G * {CBM-X}~ {SHIFT-*}~ '{CBM-S}V, P{SHIFT-POUND} C~ L~{SHIFT-POUND}, {$f6} ]) y# y#l{$fe}{CBM-I} F~{CBM-I}
  1526. ,,,, y# L~{CBM-I} F~{SHIFT-POUND}:{$ef},{CBM-I}
  1527. , L~{CBM-I} F~ O~{CBM-S},I,{$ee}, {$f7}{CBM-Z}{CBM-X},I
  1528. {$f0}{CBM-I},lR%{CBM-S}, $PS{SHIFT-POUND},asic or machine language   program?"
  1529. 7f
  1530. {CBM-K}a$:a${CBM-R}""{CBM-M}70
  1531. hp
  1532. a${CBM-R}"m"{CBM-M}300
  1533. t+7168:
  1534. ," enter starting address of machine lang. program."
  1535. {CBM-M}jn:n{CBM-W}0{CBM-A}n{CBM-E}65535{CBM-M}300
  1536. Wtnn{CBM-R}{CBM-J}(n{CBM-Z}256):722,n{CBM-Q}(nn{CBM-D}256):723,nn:721,32
  1537. {$e2}y693,1
  1538.  
  1539. ^718,32:719,66:720,141,119
  1540. !{CBM-*}2,169,213,141,120,2,169,13
  1541. a{$e7}141,121,2,169,3,133,198,96
  1542. v{$ef}0,0,0,0,0,0,0,0
  1543. M{$f7}0,0,0,0,0,0,0,0,0
  1544.  
  1545. 162,0,189,171,28,32,210,255
  1546. {CBM-P}232,224,98,208,245,162,0,32
  1547. Q207,255,201,13,240,8,157,239
  1548. {$f3}2,232,224,16,208,241,142,186
  1549.  4,16,208
  1550.  
  1551. {$60}241,142,111,28,169,167,141,2
  1552. ;
  1553. H3,169,2,141,3,3,169,0
  1554. ^
  1555. P162,200,160,29,32,189,255,169
  1556.  
  1557. X8,170,160,255,32,186,255,169
  1558. {CBM-T}
  1559. 167,133,251,169,2,133,252,169
  1560. C
  1561. 251,162,4,160,3,32,216,255
  1562. {$e3}
  1563. 32,231,255,169,131,141,2,3
  1564. 169,164,141
  1565. 5pass handshake
  1566.  
  1567. *message mode*
  1568.  
  1569. {$ea}{$ea}{$ea}{$ea}{$e3}{$ea}{$ea}{$ea}{$ea}){$f0}jjjj,{$60}{CBM-Z}P){$fd}P{$60}{CBM-Z}PP{$60}{CBM-Z}){$fd}{$60}{CBM-Z}{$60}
  1570. when screen clears 
  1571. enter your message
  1572. *screen empty*
  1573.  
  1574.  id #
  1575.  
  1576. thank you.
  1577.  
  1578. entry is invalid.
  1579.  
  1580. one moment, please...
  1581. to 
  1582. subject 
  1583. 0:
  1584.  
  1585.  
  1586.  
  1587.  
  1588.  32,66,79,79,84,69,68,46
  1589. ,{$e8}13,17,32,77,65,88,73,77
  1590. i{$f0}85,77,32,76,69,78,71,84
  1591. F{$f8}72,32,61,32,49,54,13,67
  1592.  
  1593. 72,65,82,65,67,84,69,82
  1594. {CBM-K}83,46,17,17,13,147,17,80
  1595. {CBM-V}76,65,67,69,32,78,69,87
  1596. {SHIFT-+}76,89,32,70,79,82,77,65
  1597. {$f8} 84,84,69,68,13,{$60}{CBM-Z}){$f8}
  1598. ,{$60}{CBM-Z},
  1599.  
  1600.  
  1601.  
  1602. ,{CBM-Z})
  1603. ,{$60}{CBM-Z}),{$60}{CBM-Z}){$f0}jjjj,{$60}{CBM-Z}P){$fd}P{$60}{CBM-Z}PP{$60}{CBM-Z}){$fd}{$60}{CBM-Z}{$60}
  1604. when screen clears 
  1605. enter your message
  1606. *screen empty*
  1607.  
  1608.  id #
  1609.  
  1610. thank you.
  1611.  
  1612. entry is invalid.
  1613.  
  1614. one moment, please...
  1615. to 
  1616. subject 
  1617. 0:
  1618.  
  1619.  
  1620.  
  1621. 78,32,80,82,69,83
  1622. P83,13,82,69,84,85,82,78
  1623. 9X46,17,13,32,77,65,88,73
  1624. v77,85,77,32,76,69,78,71
  1625. S84,72,32,61,32,49,54,13
  1626. 32,67,72,65,82,65,67,84
  1627. {CBM-S}69,82,83,46,17,17,13,147
  1628. K 17,32,18,84,85,82,78,32
  1629. {$e8}{CBM-POUND}67,79,77,80,85,84,69,82
  1630. {CBM-A},W, L~ ({CBM-S},{CBM-X},I,{$f0} R~{$ee},l{$de}'{CBM-S}W, 
  1631. P R~{CBM-I}W,l{$eb}' L~{CBM-S}{$f9}+JJ 
  1632.  {$f0}~{$60}{CBM-S}{$f9}+ 
  1633.  {$f0}~{CBM-I}
  1634. ,{SHIFT-POUND}  R~{$ee},{CBM-S}, {$f1}{CBM-S}{$f9}+ 
  1635.  {$f0}~{$60}{SHIFT-POUND}{SHIFT-@}B'{SHIFT-POUND}*C' v'{$60}{SHIFT-POUND}{CBM-V}B'{SHIFT-POUND}*C' v'{$60}{CBM-I}
  1636. ,{$e8} P{$f8}{$60} L~{SHIFT-POUND} R~ 9( R'{CBM-I},{CBM-I}
  1637. , {$e4}~I
  1638. {$f0}{$f9}I1P{$f5}, R~ {$e4}~I
  1639. {$f0}{$f9}IP{CBM-S}, {$f0}{$ee} R~N,l(I
  1640. P R~lD(I0WI:{CBM-A}S{CBM-S}, {CBM-A} {SHIFT-+}(l({SHIFT-POUND} {$de}({SHIFT-POUND} {$de}({SHIFT-POUND}
  1641.  !
  1642. "   please wait..."
  1643. e
  1644.  
  1645. i{CBM-R}51712:sh{CBM-R}{CBM-J}(i{CBM-Z}256):sl{CBM-R}i{CBM-Q}sh{CBM-D}256
  1646. B
  1647.  a:ck{CBM-R}ck{CBM-N}a: a{CBM-R}256 {CBM-M} 40
  1648. R
  1649.  a{CBM-W}0 {CBM-M} 100
  1650.  
  1651.  i,a:i{CBM-R}i{CBM-N}1: 20
  1652. {SHIFT-POUND}(
  1653. ck{CBM-W}{CBM-E}28195{CBM-M}"error in data":
  1654. Q2
  1655. "use sys"sh{CBM-D}256{CBM-N}sl{CBM-N}403"to start":
  1656. {$f3}D
  1657.  a{CBM-W}{CBM-Q}255 {CBM-M} a{CBM-R}{CBM-L}(a{CBM-N}256){CBM-N}sh: 30
  1658. N
  1659. a{CBM-R}{CBM-L}(a{CBM-N} 
  1660. ,{CBM-D},{CBM-O}I,,{$ee},{CBM-S},{$ec},0 ('{CBM-Z},{CBM-S},{$ef},,{$ee}, '{CBM-Z},){CBM-N}{CBM-X}{$de}*{CBM-S},{$ef},,{$ee}, 'l{CBM--}%{CBM-Z},, ('{CBM-Z},{CBM-S},{$ef},{$ee},{CBM-Z},){CBM-N}{CBM-X}{$de}*{CBM-S},{$ef},{$ee},{CBM-Z},, ('{CBM-Z},{CBM-S},{$ef},{$ee},{CBM-Z},){CBM-N}{CBM-X}{$de}*{CBM-S},{$ef},{$ee},{SHIFT-POUND}
  1661. {CBM-S},{$ef},{CBM-I}
  1662. ,{CBM-S},{CBM-X}{$ef},,{$ee}, L~{CBM-Z}, R~{CBM-Z}, {$f6}{CBM-Z},I
  1663. P{$de} V{CBM-Z},IP
  1664. {CBM-S}, {$f0}-l%IPs{CBM-I}
  1665. , L~{SHIFT-POUND}B'{SHIFT-POUND}+C' v' ]) L~{SHIFT-POUND} C~
  1666.  
  1667.  
  1668.  
  1669. 4621
  1670.  
  1671.  
  1672.  {$e7}~{CBM-I}
  1673. ~+{SHIFT-POUND}
  1674. {$fb}{SHIFT-POUND},{$fc}{CBM-D}~+{SHIFT-POUND}
  1675. {$fb} {$fb}{CBM-S}~+ LP{$ef}{CBM-+}{$fc} .{$e9}{CBM-I}
  1676. ~+ N){SHIFT-POUND}{CBM-Z}{$ef}+IP{SHIFT-POUND} lu{SHIFT-POUND} {SHIFT--}{SHIFT-POUND}{CBM-I} ~ {SHIFT-@}~{SHIFT-POUND}{CBM-I}  {CBM-X}~ {SHIFT-*}~ {$f6}( L~{SHIFT-POUND}{CBM-T}B'{SHIFT-POUND}+C' v'{SHIFT-POUND}
  1677. , L~ ){CBM-S}, 
  1678. P
  1679.  L~ {$e4}~I
  1680. {$f0}{$e4},{CBM-Z},IP l)l{CBM-S}{$ef}+ P{CBM-Z}l{CBM-O}{CBM-Z}{SHIFT--})I
  1681. P{$ea}{CBM-Z}{$ef}+, {$f6} V{CBM-Z},IP{SHIFT-POUND}1+l{$e5}IPl{$e5}IPZ L~ {$e4}~I
  1682. P{$f6}{CBM-Z}{$ef}+, {$f6} l)l
  1683. P{SHIFT-POUND}
  1684. {CBM-X}8{$e5}{$e2}i~I
  1685. l{$e6}{CBM-A}{CBM-G}{CBM-A}){CBM-A}{$e6}{CBM-Y}{CBM-G}{CBM-Y}IPlCIP_{$fe}{CBM-X}{$f1}{CBM-X}{$f2}{SHIFT-POUND}
  1686. {$f3}{CBM-G}{CBM-H}jj{CBM-POUND}{CBM-O}{CBM-U}
  1687. {$f4} {SHIFT-POUND}{CBM-G}L{SHIFT-POUND}{CBM-X}){$f0}lC{$de}{CBM-X}IP{$f3}{$fe}
  1688. {SHIFT-POUND} ){SHIFT-POUND}lCI{$f0}lM{CBM-X}j{$f1}{CBM-X}j{$f2}F{$f2} R{CBM-X}){$f0} {SHIFT-POUND}"{$ea} ( ,{SHIFT-POUND}#lR 
  1689. {CBM-E}I"P{SHIFT-POUND}  {SHIFT-POUND}!{$ea} ( ,{CBM-E}I3{CBM-A}
  1690. {$de}P{$fe}{SHIFT-POUND}{$de}P{$de}P
  1691. {SHIFT-POUND} {$fe}
  1692.  
  1693. {CBM-E}{$fb}I {$f0}*{SHIFT-POUND}
  1694. ,{SHIFT-POUND}
  1695. ,{CBM-Z}Z,M{$f6}+Z,{CBM-Z}{$7b},I
  1696. {$7b},{CBM-Z}{$f7}+,{SHIFT-POUND}~,l{SHIFT-POUND}
  1697. ,{CBM-D},{CBM-E}{$fb}I P9{$ee},{CBM-Z},M{$f6}+P{$ec}{SHIFT-POUND}
  1698. ,{CBM-Z}Z,M{$f6}+Z,{CBM-Z}{$7b},I
  1699. {$7b},{CBM-Z}{$7d},{$fb}{CBM-Z}{$7e},{$fc}{CBM-D}~+{SHIFT-POUND}
  1700. {$fb} {$fb}l{CBM-K}{CBM-D}{$f8}+,{CBM-D},{CBM-E}{$fb}I PN,lJ{$ee},{CBM-Z},,{SHIFT-POUND}~,{CBM-Z}Z,M{$f6}+Z,{CBM-Z}{$7b},I
  1701. {$7b},{SHIFT-POUND}
  1702. ,{CBM-D},{CBM-E}{$fd}),{$ee},{CBM-Z},M,{$f0}#M{$7c},{$f0}{CBM-N}{CBM-X}3*{$7c},{CBM-S}{$7d},{$fb}{CBM-S}{$7e},{$fc}{CBM-D}~+{$fb} {$fb}{CBM-G}{$fc}{$7e},{CBM-D},L,P{CBM-Z}{$7d},{$fb}{CBM-Z}{$7e},{$fc}{SHIFT-POUND}
  1703. {CBM-D}
  1704.  
  1705. {CBM-O}{$f1}{$fe}
  1706. {$e6}{CBM-R}{SHIFT-POUND}p{CBM-W}{SHIFT-POUND} l{$e6}{CBM-A}{CBM-G}{CBM-A}){CBM-A}{$e6}{CBM-Y}{CBM-G}{CBM-Y}IPlCIP_{$fe}{CBM-X}{$f1}{CBM-X}{$f2}{SHIFT-POUND}
  1707. {$f3}{CBM-G}{CBM-H}jj{CBM-POUND}{CBM-O}{CBM-U}
  1708. {$f4} {SHIFT-POUND}{CBM-G}L{SHIFT-POUND}{CBM-X}){$f0}lC{$de}{CBM-X}IP{$f3}{$fe}
  1709. {SHIFT-POUND} ){SHIFT-POUND}lCI{$f0}lM{CBM-X}j{$f1}{CBM-X}j{$f2}F{$f2} R{CBM-X}){$f0} {SHIFT-POUND}"{$ea} ( ,{SHIFT-POUND}#lR 
  1710. {CBM-E}I"P{SHIFT-POUND}  {SHIFT-POUND}!{$ea} ( ,{CBM-E}I3{CBM-A}
  1711. {$de}P{$fe}{SHIFT-POUND}{$de}P{$de}P
  1712. {SHIFT-POUND} {$fe}
  1713.  
  1714. , 
  1715. P 
  1716. le{CBM-S}{CBM-C}, 
  1717. {$f0} 
  1718. l{CBM-*}{CBM-S}U, 
  1719. {$f0}
  1720. {CBM-I}
  1721. U,{SHIFT-POUND} R~l{CBM-S}, 
  1722. {$f0}{CBM-I}
  1723. ,R, 
  1724.  l)l{CBM-S}, 
  1725. {$f0} 
  1726. l{CBM-*}l 
  1727. {SHIFT-POUND}
  1728.  
  1729. ,{$fb}{CBM-Z}{$f2}+{$fc}{CBM-Z}{$f3}+,{CBM-D},{CBM-E}{$fb}I PjN,{CBM-S}, ~P{$ed}F{$fc}{CBM-+}{$fc}{$ec}{$f1}+P{$e4} {$f6}({SHIFT-POUND}KB'{SHIFT-POUND}*C' v'{CBM-S}{CBM-C}, 
  1730. {$f0}l L~{CBM-I} I~{SHIFT-POUND} R~ {$ee}{CBM-S}{CBM-X}, 
  1731. P{$e9} ])l{$fe}{CBM-S}{$f3}+{$e8}X,{CBM-Z}{$f2}+Y, ( {$e8}( y# y# ({CBM-Z}{$f4}+{$7b},{SHIFT-POUND}
  1732. ,,~+Z,{CBM-S}{$ef}+ P{SHIFT-POUND}
  1733. {$fd}{SHIFT-POUND}{$fe}l{$f7}
  1734. {$fb}{CBM-I}.{$fc}{CBM-D}~+{CBM-E}{$fb}, L~{CBM-I} I~{CBM-Z}, R~ {$fb}{CBM-Z},IP  L~{CBM-I} I~{SHIFT-POUND}
  1735.  R~ R~ R~ L~{SHIFT-POUND} C~{CBM-I}
  1736. {CBM-C},{CBM-I}
  1737.  
  1738.  {$f0}~l{CBM-S}{$ef}+ P,{CBM-Z}{CBM-C},I
  1739. P%{CBM-Z}
  1740. ,I
  1741. {$f0}{CBM-Z}{$7d},{$fb}{CBM-Z}{$7e},{$fc}{CBM-D}~+{SHIFT-POUND}{$fb} {$fb}{CBM-I}
  1742.  
  1743. ,{CBM-G}{$fc}{$7e},{SHIFT-POUND}
  1744. ,,{CBM-G}{$fd}M{$f6}+{$fd}{CBM-G}{$fe}I
  1745. {$fe}{CBM-Z}{$7f},M{$f6}+{$7f},{CBM-Z},I
  1746. ,l {CBM-D}~+{CBM-S}{$7d},{$fb}{CBM-S}{$7e},{$fc}{SHIFT-POUND}{$fb} {$fb}{CBM-D}~+{SHIFT-POUND}{$fb}{SHIFT-POUND}, {$f6} V{CBM-Z},IP{$f6}{CBM-I}L{$fb}{CBM-I}.{$fc}{CBM-I}
  1747. ~+{CBM-D}~+{CBM-E}{$fb}, {$f6} {$fb}{CBM-Z},I{$f0}
  1748.  L~l L~{SHIFT-POUND} R~ 9({CBM-I}
  1749. , {$e4}~{$f0}{$fb}IP{CBM-S},{$f0}{$f2}N, R~lI
  1750. {$f0}jI {$f0}I0{SHIFT--}I:{CBM-A}# R~{CBM-S}{CBM-V}, 
  1751. {$f0}l{CBM-W}{CBM-S},,{$ee},{CBM-S}, P{CBM-C} *l{$fb}Ia{CBM-R}I[UIA{CBM-N}I{$7b}MIA{CBM-I}I{SHIFT-+}El R~{CBM-S}{CBM-V}, 
  1752. {$f0}lL{CBM-S},{SHIFT-POUND},{$ee},{CBM-I}
  1753. ,{CBM-S},{SHIFT-POUND},{$ee},{CBM-S},{SHIFT-POUND}
  1754. , d) g({CBM-I}
  1755. ,{CBM-I}{CBM-V},l{CBM-S},m,{$ee},{CBM-S},  {$f0}l :'l{CBM-T}{CBM-S},{SHIFT-POUND}m,{$ee},{CBM-S},{SHIFT-POUND}
  1756. m,{CBM-N}{CBM-V}, h'{SHIFT-POUND}cB'{SHIFT-POUND}*C' v'
  1757. IP{$f2} ])l V{CBM-Z},, V{CBM-Z},, V{CBM-Z},, V{CBM-Z},, V{CBM-Z},,IpPl0Is{$f0} L~ ])l{CBM-K}{CBM-Z},, {CBM-Z},, {CBM-J}{CBM-Z},,{CBM-Z},, {CBM-Z},, {CBM-J}{CBM-Z},, ,{CBM-Z}V,I
  1758. {$f0}{SHIFT-POUND}, {$f6} {$fe}{CBM-Z},M,rP{CBM-Z},M
  1759. ,h L~{SHIFT-POUND}^ R~{SHIFT-POUND}C R~{SHIFT-POUND}lB'{SHIFT-POUND}+C' v'{SHIFT-POUND}, {$f6}{CBM-S}1+ 
  1760. P{CBM-I}
  1761. ,{CBM-S},{CBM-X}l+{$f0}{CBM-Z}, {$f6}{$ee},l{CBM-J} l)l L~{SHIFT-POUND}_B'{SHIFT-POUND}+C' v' ( 
  1762. ~)@{CBM-X},{$60} L~{SHIFT-POUND} R~ L~{$60}{CBM-Z},I:)I
  1763.  
  1764.  
  1765.  
  1766. ,l+)
  1767.  
  1768.  
  1769.  
  1770. ,{$60}{SHIFT-POUND} C~ L~{SHIFT-POUND}
  1771.  ~{SHIFT-POUND} ~{SHIFT-POUND}{CBM-I} 
  1772.  {SHIFT-@}~{SHIFT-POUND}{CBM-I} + {CBM-X}~{SHIFT-POUND}
  1773. {CBM-I}< - U~ '{CBM-S}V, 
  1774. {$f0}{$60}{CBM-I}
  1775. , L~{CBM-S},{CBM-X}<-Ib{$f0}
  1776. {$ee},{CBM-S}, 
  1777. P{$ec}lL{$ee},{CBM-S},{CBM-X}<-Il{$f0}{$ee},lLN,N,N,{CBM-S},{CBM-X}<-
  1778. ,{$ee},{CBM-S},{CBM-X}<-,{$60}{CBM-Z},I:)I,lL),{CBM-Z},
  1779. ,,{$60} {CBM-Y}~ L~{CBM-I} F~ O~I
  1780. {$f0}{$f9}, {$ee}{CBM-S}{CBM-X}, 
  1781. P{$e1}{$60} 
  1782. I*{$ee},{CBM-S}, {$f0}l {CBM-S},{SHIFT-POUND},I*{CBM-S},,{$ee},{CBM-S}, 
  1783. P{CBM-S}{CBM-C}, 
  1784. {$f0}{SHIFT-POUND}pl!{CBM-Z},{CBM-S},I*{$ee},{CBM-S},{SHIFT-POUND},I*{$ee},{CBM-S},
  1785. ,{CBM-S}, Pl{CBM-S}, 
  1786. {$f0}l{CBM-W}#{CBM-S},{SHIFT-POUND}wI*{$ee},{SHIFT-POUND}{CBM-I}  {SHIFT-@}~{$ee},{$ee},{CBM-Z},{CBM-I}G * {CBM-X}~ {SHIFT-*}~ '{CBM-S}V, P5 L~{SHIFT-POUND} C~{CBM-S}, 
  1787. {$f0}l!{CBM-S}{CBM-C}, 
  1788. {$f0}{CBM-I}
  1789. ,{CBM-C},V,l{SHIFT-POUND}, {$f6} ])l{$fe}{CBM-S}, 
  1790. {$f0}l{CBM-S}{CBM-C}, 
  1791. {$f0}le d){CBM-I}
  1792. ,Q,{SHIFT-POUND}, {$f6} V{CBM-Z},I:P L~
  1793.  {$f6}( L~{CBM-S}V, 
  1794. {$f0}{SHIFT-POUND}B'{SHIFT-POUND},C' v'{CBM-I}
  1795. V, A{CBM-I}
  1796. F,, L~ ){CBM-S}, 
  1797. P
  1798.  {$e4}~,I
  1799. {$f0}3{CBM-I}F,{CBM-Z},I{CBM-A}$I
  1800. {$f0} I{$f0}I 
  1801. lI{CBM-A}I{$f0}
  1802. I{$f0} 
  1803. ll L~{CBM-I} F~ {$e4}~I
  1804. {$f0}, {$ee}{CBM-S}{CBM-X}, 
  1805. P{$e4} L~ld{CBM-Z},IP{SHIFT-POUND}
  1806. ,l%{CBM-S}F, 
  1807. {$f0}{$7b}{CBM-Z},IP{CBM-S}{$ef}+ P {CBM-P})lA{$ee} P{SHIFT-POUND}
  1808. ,l%IP{CBM-S}{$ef}+ P H)l{SHIFT--}{$ee}!P{SHIFT-POUND}
  1809. ,l%IP
  1810. {SHIFT-POUND}U,{SHIFT-POUND}
  1811. ,l%IP{$ea}
  1812. {CBM-I} I~{CBM-Z}, R~{$ee},{CBM-S},{$ec},LlB! L~ d){SHIFT-POUND}^ R~{SHIFT-POUND}R R~{$ee}Q,{CBM-S}Q, {CBM-A}
  1813. {CBM-I}
  1814. ,{SHIFT-POUND},lO!{SHIFT-POUND}B'{SHIFT-POUND}+C' v' ]) L~{SHIFT-POUND} C~{SHIFT-POUND}, {$f6} L~ l)l{SHIFT-POUND}> R~{$60}{CBM-S}, 
  1815. PF{$fc}N,{$60} 
  1816. {CBM-I}
  1817. ,{$e8} 
  1818. P{$fb}H{SHIFT-*}
  1819. P{$f6}{$ee},,{CBM-D},{SHIFT-*}{$f0}{CBM-D},l{$60}#{$60} L~{SHIFT-POUND}{$f8}B'{SHIFT-POUND}*C' v'{CBM-S}{$f9}+ 
  1820.  ({SHIFT-POUND}{$ee}B'{SHIFT-POUND}*C' v' f#{CBM-I},{CBM-I}
  1821. ,l{$fa}{CBM-I}
  1822. ,{CBM-S},{SHIFT-POUND}rI*{$ee},{CBM-S},, h'{CBM-I}
  1823. ,{CBM-S},{$e8}{$e8}, L
  1824. ~+{$fb} {$fb}{CBM-G}{$fc}{$7e},l{CBM-K}{CBM-Z}{$7f},{$fb}{CBM-Z},{$fc}{CBM-D},{CBM-E}{$fb}E,){$7f}D,{CBM-Z}E,
  1825. #{CBM-Z},I
  1826. P<{CBM-Z}{$7d},{$fb}{CBM-Z}{$7e},{$fc}{SHIFT-POUND}{CBM-D}~+{$fb} {$fb}{SHIFT-POUND},l[{CBM-D},{SHIFT-*}
  1827. {$f0} 
  1828. ,{CBM-Z}{$7d},{$fb}{CBM-Z}{$7e},{$fc}{SHIFT-POUND}{CBM-D}~+{$fb} {$fb}{$ee},{CBM-Z},M,Pl{CBM-K}{CBM-Z}{$7d},{$fb}{CBM-Z}{$7e},{$fc}{CBM-U}{CBM-Z}D,B,)?B,,B,P@IP{SHIFT-POUND} {CBM-D}~+{$fb} {$fb}{CBM-G}{$fc}{$7e},l{CBM-Z}Z,MX,{CBM-A}l:{CBM-Z}{$7b},MY,{CBM-A}l:{CBM-S}{CBM-C}, 
  1829. Pl 
  1830. {CBM-D}~+{CBM-S}{$7d},{$fb}{CBM-S}{$7e},{$fc}{SHIFT-POUND}{$fb} {$fb}{CBM-D}~+{SHIFT-POUND}{$fb}{CBM-I}
  1831. ~+ L~{CBM-I}L
  1832. {SHIFT-POUND}{$60} {CBM-G}{$e5}{$f0} l0{CBM-A}{$ea}{$ea}{$ea}{CBM-X}8{$e5}{$e2}IlC{SHIFT-POUND} {SHIFT-POUND}
  1833.  
  1834. {SHIFT-POUND}   ,{CBM-E}I#P{SHIFT-POUND} {SHIFT-POUND}% ;lJ{$f8}E{$ef}{$ef}{CBM-G}{$ed}I
  1835. {$ed}E{$ec}P{CBM-G}{$ef}E{$ee}{CBM-G}{$ed}{$ec}{CBM-G}{$ef}{$ee}{CBM-G}{$ed}E{$eb}PI 5{$ea}Xl?{$ea}IPn{CBM-X}j{$f1}{CBM-X}j{$f2}F{$f2} R{SHIFT-POUND}$ {CBM-G}{CBM-H}jj{CBM-POUND}{CBM-O}{CBM-U}
  1836.   p{CBM-A}#{SHIFT-POUND} {$de}{$de}{SHIFT-POUND}{SHIFT-POUND}{SHIFT-POUND}
  1837. lCl{$f6}I{$f0}I{CBM-N}{$e6}{CBM-H}{CBM-G}{CBM-H}I{$f0}l{$60}
  1838.  
  1839.  
  1840.  
  1841.  
  1842.  
  1843.  
  1844. {CBM-X}{CBM-X}Ps{CBM-X}E{$e2}{CBM-A}{SHIFT-POUND}
  1845. {SHIFT-POUND}
  1846. {$fd}{SHIFT-POUND}X{$fe}{SHIFT-POUND}L{$7d},{SHIFT-POUND}.{$7e},{SHIFT-POUND}
  1847. {$7f},{CBM-Z}{$f4}+,{CBM-S}{$7d},{$fb}{CBM-S}{$7e},{$fc}{CBM-Z}{$ef}+IP{CBM-Z}l&{CBM-Z}P)I
  1848. P{SHIFT-POUND}0l3{SHIFT-POUND}2{CBM-D}~+{$fb} {$fb}{CBM-Z}{$ef}+IP {$f9})lp{CBM-Z} P),{CBM-Z},0{CBM-D}~+{$fb} {$fb}{CBM-Z}{$ef}+IP *lR{CBM-Z}!P),{CBM-Z},0{CBM-D}~+{$fb} {$fb}{CBM-S}{CBM-C}, {$f0}:{CBM-I}
  1849. ,{CBM-S},{CBM-X},I
  1850. {$f0}{CBM-D}~+{$fb} {$fb}{$ee},l{CBM-I}
  1851. ,{CBM-S},{CBM-X}m,I
  1852. {$f0}{CBM-D}~+{$fb} {$fb}{$ee},l{CBM-POUND}{CBM-Z}{$ef}+IP *{CBM-Z},lU{CBM-Z}!P){$7c},,{SHIFT-POUND}
  1853. ,{CBM-Z}{$7f},{$fb}{CBM-Z},{$fc}{CBM-D}{$f5}+
  1854. IP{$e7} V{CBM-Z},IP{$f6}lRl{$ee}~+{CBM-S}~+ 
  1855. P{$e6}{$fc}{$60}{CBM-S},{SHIFT-POUND}rI*lm!{CBM-I}
  1856.  
  1857.  {$f0}~ L~{CBM-I} F~ O~,I0P{CBM-S}{$ef}+ P !*lt *ltI2PW{CBM-S}{$ef}+ P **lt * L~{CBM-I} F~ O~,{CBM-S}{$ef}+ P W)lW{CBM-Z},) P L~{CBM-I} F~ O~,{CBM-S}{$ef}+ P {$e3})l{CBM-Z},)!P L~{CBM-I} F~ O~,I{$f0} L~{CBM-Z}, R~l L~{SHIFT-POUND} C~{CBM-I}
  1858. ,{SHIFT-POUND}
  1859.  R~l y#{SHIFT-POUND}, {$f6}l{$ef} V{CBM-Z},I{$f0}
  1860.  
  1861.  y# y# y# {$f6}({CBM-S}R, 
  1862. {$f0}
  1863. {SHIFT-POUND}{SHIFT-+}B'{SHIFT-POUND}+C' v' A{SHIFT-POUND}
  1864. , L~ ){CBM-S}, 
  1865. P
  1866.  L~ {$e4}~I
  1867. {$f0}{$e4},{CBM-Z},I{$f0}ZIP{CBM-Z}R,I
  1868.  
  1869. {$f0} {$f6} {$f6}( ]){SHIFT-POUND}
  1870. ,R,l{$fe}IP{SHIFT-POUND},lLIP{SHIFT-POUND}S,lLIP{CBM-S}{$ef}+ P {CBM-P})lL{$ee} PlLIP{CBM-S}{$ef}+ P H)lL{$ee}!PlLIP{SHIFT-POUND}{CBM-C},lLIP{SHIFT-POUND}U,lLIPlLIP{SHIFT-POUND},  {CBM-Z}, R~{CBM-@}VL{$fa}+FV{SHIFT-POUND}
  1871.  R~{CBM-S}S, 
  1872. {$f0}{CBM-I}
  1873. S,{CBM-S}R
  1874. L~{SHIFT-POUND}{$ee}B'{SHIFT-POUND}*C' v' f#{CBM-I}
  1875. , L~ {$e4}~I
  1876. P{$f6} L~{SHIFT-POUND}
  1877. , ){CBM-S}, 
  1878. P
  1879.  L~ {$e4}~I
  1880. {$f0}{$e4},{CBM-Z},IP{CBM-S}, 
  1881. {$f0}S R~N,l IPd L~{SHIFT-POUND}^ R~{SHIFT-POUND}C R~{CBM-Z}, {$f6} L~ ]){CBM-S}, P{CBM-I}
  1882. ,l{CBM-S}, 
  1883. P
  1884. {CBM-S}{CBM-C}, 
  1885. Pl{CBM-I}
  1886. ,{CBM-C},lI
  1887. P
  1888. {CBM-S}, 
  1889. Pl l{$f0} I {CBM-A}l {CBM-Z},I {$f0}6I.{$f0}2I0{CBM-A}l I:'Ia{CBM-A}l I[IA{CBM-A}l I{$7b}{CBM-A}l IA{CBM-A}l I{SHIFT-+}l {CBM-Z}, R~{CBM-S},
  1890. {CBM-Y}~ L~{CBM-I} I~{CBM-Z}, R~ {$ee}{CBM-S}{CBM-X}, 
  1891. P{$e5}{$60}{CBM-Z},IP%{CBM-S}1+ 
  1892. P{CBM-S}F, 
  1893. {$f0}D{CBM-I},{SHIFT-POUND},l%{CBM-S}F, {$f0}pl{$7e}#{CBM-S}F, {$f0}fIPl{$fb}IP
  1894. {CBM-S}1+ P4lA(IP{CBM-S}1+ P L~lMl{SHIFT-+}IP
  1895. {CBM-S}1+ PlI
  1896. P {$f6}({SHIFT-POUND}
  1897. ,l{CBM-I}
  1898. F,{SHIFT-POUND}
  1899. ,lR V{CBM-Z},I0P{CBM-S}{$ef}+ P !*lE *lE{CBM-S}{$ef}+ P **lE * V{CBM-S}{$ef}+ P W)l{SHIFT--}{CBM-Z},) P V{CBM-S}{$ef}+ P {$e3})l{$f5}{CBM-Z},)!P
  1900. {CBM-Z}, R~l"IP y# L~{SHIFT-POUND} C~{SHIFT-POUND}, {$f6} L~ l)lIPl# V{CBM-Z}, R~{CBM-S},{CBM-Z},{$ef},{$ee},{CBM-Z},I
  1901. P{$e4}8{CBM-Z},{$e9},,{CBM-S},{CBM-X}{$ef},, {$ee},{CBM-S},{CBM-X}{$ef},, {CBM-J}{CBM-Z},,{$ee},{CBM-S},{CBM-X}{$ef},, {$ee},{CBM-S},{CBM-X}{$ef},, {CBM-J}{CBM-Z},,{CBM-I}
  1902. ,,,{CBM-S},{CBM-X}{$ef},,M,,{CBM-Z},I
  1903. ,{$ee},{CBM-S},{$ec},{SHIFT--}{CBM-Z},M,Pd{CBM-Z},M,P<{CBM-I}
  1904. ,{CBM-S},{CBM-X}{$ef},, {$ee},{CBM-S},{CBM-X}{$ef},, {CBM-J} L~
  1905. {$ea}{$ea}{$ea}{$ea}{$ea}{SHIFT-POUND}
  1906. ,l%IP{$ea}{$ea}{$ea}{$ea}{$ea}{$ea}{SHIFT-POUND}
  1907. ,IP
  1908. {CBM-I}R,{SHIFT-POUND}
  1909. ,  {CBM-Z},I
  1910. Pl{CBM-Z}F,IP L~{CBM-I} I~{CBM-Z}, R~ {$ee}{CBM-S}{CBM-X}, 
  1911. P{$f0}{CBM-S}1+ {$f0}*{CBM-Z},IP{CBM-S}F, 
  1912. P{SHIFT-POUND}
  1913. ,lM L~{CBM-Z}, R~{CBM-Z},I"P{SHIFT-POUND}
  1914. T{$ea}{$ea}{$ea}{$ea}{$ea}{$ea}{CBM-S}U, 
  1915. {$f0}{CBM-I}
  1916. U, L~{SHIFT-POUND} R~l{CBM-V}{CBM-S}, 
  1917. {$f0}{CBM-I}
  1918. , 
  1919. l{$7e}#{CBM-S}R, 
  1920. {$f0} 
  1921. l{$fc}l{CBM-G}Q{$f3}{CBM-G}RM{$f0}+{$f4}{CBM-@}S{CBM-E}QiQ{CBM-E}{$f3}{CBM-B},{CBM-Z}{$f3}{$60}{CBM-@}S{CBM-E}QiQ{CBM-Z}{CBM-B},{$f3}{$60} {CBM-Y}~){CBM-X},{$60} {CBM-Y}
  1922.  
  1923.  
  1924. ""{CBM-+}8)"bagdad"
  1925. q
  1926. "is this on a color tv or black and white?"
  1927. M
  1928. {CBM-K}g$:g${CBM-W}{CBM-E}"c"{CBM-P}g${CBM-W}{CBM-E}"b"{CBM-M}12
  1929.  
  1930.  
  1931. 0,1:g${CBM-R}"b"{CBM-M}0,0
  1932. {CBM-Y}
  1933. "you control the good":g${CBM-R}"c"{CBM-M}"green";:16
  1934. D
  1935. "grey";
  1936. {$fe}
  1937. " genie that":"appears at the bottom of the screen"
  1938. Pl{SHIFT-+}IPl{$f0}l{SHIFT-POUND}
  1939. {$f0}{CBM-G}{$f2})IP{SHIFT-POUND}{$f0}{CBM-G}{$f1})IP{CBM-G}{$f0}I{$f0}{CBM-G}{$f0}E{$f3}{$f0}f{$f1}f{$f2} R 
  1940. {CBM-G}{$f4}{CBM-G}{$f0}I{$f0}H{CBM-G}{$f4}{CBM-G}{$f0}I{$f0} {CBM-G}{$f4}{CBM-G}{$f0}I{$f0}H{CBM-G}{$f4}{CBM-G}{$f0}{$60}{SHIFT-POUND}{CBM-G}{$f1}{CBM-@}{$f2}{$f0}{CBM-G}I{CBM-G}I
  1941. P{$f0}{CBM-G}{CBM-G}IX{$60}f{$f1}f{$f2} R 
  1942. {SHIFT-POUND} H H{$60}{SHIFT-POUND}
  1943. {SHIFT-POUND}{$7f}"{CBM-Z} )P{SHIFT-POUND}{$f5}{SHIFT-POUND}~"{CBM-Z}i~)<{$f5}){$7f}j{$f5}{$60} {SHIFT-POUND}<UX0{SHIFT-POUND}=3fP{$e1}v{CBM-R}8{CBM-M}f${CBM-R}"0:"{CBM-N}f$
  1944. )ht${CBM-R}f$:zk{CBM-R}B(53){CBM-N}256{CBM-D}B(54){CBM-Q}C(t$):782,zk{CBM-Z}256
  1945. ri781,zk{CBM-Q}B(782){CBM-D}256:780,C(t$):65469
  1946. Sm780,1:781,dv:782,1:65466
  1947. r780,0:65493
  1948. {CBM-I}\(B(783){CBM-P}1){CBM-A}(191{CBM-P}st){CBM-M}870
  1949. {CBM-J}A"Done.":310
  1950. {$e3}F"Error on Load.  Try again.":dv{CBM-R}1{CBM-M}800
  1951. P1
  1952. Q{$60}{CBM-G}R{$f0}{SHIFT-POUND}T{SHIFT-POUND}{$e8}U{CBM-G}UI{$e8}P
  1953. FTP{SHIFT-POUND}
  1954. Q{$60}{SHIFT-POUND}{$f0}UFU{CBM-G}U{$60}{CBM-G}R{$f0}{SHIFT-POUND}RT{CBM-G}T{$e6}T{CBM-G}T
  1955. I{$f0}P{SHIFT-POUND}
  1956. Q{$60}{CBM-G}R{$f0}{SHIFT-POUND}{$e6}T{$e6}T{CBM-G}TI{$fa}P{SHIFT-POUND}
  1957. Q{$60}I{$f0}I{$f0}*I{$f0}{$7c}I
  1958. {$f0}:I{$f0}nl
  1959. {CBM-G}R{$f0}{SHIFT-POUND}T{SHIFT-POUND}{CBM--}{CBM-G}TFTP{SHIFT-POUND}
  1960. Q{$60}{CBM-G}R{$f0}{SHIFT-POUND}{CBM--}TFT{CBM-G}T
  1961. I{CBM-C}P{SHIFT-POUND}
  1962. Q{$60}{CBM-G}R{$f0}{SHIFT-POUND}PTFT{CBM-G}T
  1963. I{$7f}P{SHIFT-POUND}
  1964. Q{$60}{CBM-G}R{$f0}{SHIFT-POUND}MT8{$e9}
  1965. U{$e6}U{CBM-G}UET{$f0}{$60}{$e6}T{CBM-G}TI{$f0}P{$e7}{SHIFT-POUND}
  1966. Q{$60}{CBM-G}R{$f0}{SHIFT-POUND}T{$e6}T{CBM-G}T)ET{CBM-G}TI
  1967. {$f8}t${CBM-R}f$:zk{CBM-R}B(53){CBM-N}256{CBM-D}B(54){CBM-Q}C(t$):782,zk{CBM-Z}256
  1968. h{$fa}781,zk{CBM-Q}B(782){CBM-D}256:780,C(t$):65469
  1969. I{$fb}780,1:781,dv:782,1:65466
  1970. {$fd}k{CBM-R}s:254,k{CBM-Z}256:253,k{CBM-Q}B(254){CBM-D}256:780,253
  1971. E{$fe}k{CBM-R}e{CBM-N}1:782,k{CBM-Z}256:781,k{CBM-Q}B(782){CBM-D}256:65496
  1972. {$e2}(B(783){CBM-P}1){CBM-A}(191{CBM-P}st){CBM-M}780
  1973. {$f5}"Done{CBM-G} {$f0}lE{CBM-G}{$e1}{$f1}A{CBM-G}{$e2}{$f2}B F{$e6}Pg{CBM-G}{$e3} ){CBM-G}A{$e1}{CBM-G}C{$e3} {CBM-R}{SHIFT-POUND}${$f5}{$f0}{CBM-@}{$e3}{SHIFT-*}0F{$e3}{SHIFT-POUND}
  1974. {$e5}{SHIFT-POUND}${$f5}{$f0}{CBM-@}{$e3}{SHIFT-*}{$e6}{$e3}{SHIFT-POUND}{$e5}{CBM-G}{$e3}I0{SHIFT-POUND}8{$e5}{$e3}lu8{$e9}{$e6}F{$e7}P<{CBM-G}{$e4} {CBM-G}B{$e2}{CBM-G}D{$e4} {CBM-R}{SHIFT-POUND}${$f5}{$f0}{CBM-@}{$e4}{SHIFT-*}0
  1975. F{$e4}l{CBM-@}{$e4}{SHIFT-*}{$e6}{$e4}{CBM-G}{$e4}I0{SHIFT-POUND}8{$e5}{$e4}l8{$e9}{$e7}{CBM-G}{$e1}{$f1}{CBM-G}{$e2}{$f2}{CBM-G}{$e5}{$f3}{SHIFT-POUND}{$f4} {SHIFT-POUND}${$f5}{$f0}{SHIFT-POUND}  plH{$60}
  1976.  
  1977.  
  1978.  
  1979.  
  1980.  
  1981.  
  1982. F {CBM-G} {SHIFT-POUND}{$e1}{$e2}{$60}I{$7f}P{SHIFT-POUND}
  1983.  {CBM-G} IZ0#{SHIFT-POUND}{$e2}{CBM-D}{SHIFT-POUND}{$fb}{CBM-Z}{SHIFT-POUND}>B{SHIFT-POUND}{$e1}C{CBM-R}44{CBM-A}a{CBM-R}32{CBM-M}670
  1984. na{CBM-E}128{CBM-M}n{CBM-R}{CBM-Q}a:
  1985. #xa{CBM-W}{CBM-E}20 {CBM-M} 630
  1986. qBG(146);:690:i{CBM-R}1{CBM-P}t{CBM-R}44{CBM-M}n{CBM-R}{CBM-Q}1:" ";:690
  1987. zL570
  1988. MVa{CBM-W}48{CBM-A}a{CBM-E}57{CBM-M}580
  1989. a$;:n{CBM-R}n{CBM-D}10{CBM-N}a{CBM-Q}48
  1990. n{CBM-E}255 {CBM-M} a{CBM-R}20:1000:600
  1991. {CBM-R}z{CBM-R}z{CBM-N}1:z{CBM-W}3{CBM-M}580
  1992. Fz{CBM-R}0{CBM-M}1000:570
  1993. R{CBM-POUND}",";:
  1994. {$f2}{CBM-R}s%{CBM-R}B(209){CBM-N}256{CBM-D}B(210){CBM-N}B(211)
  1995.  160,16,32,213,255,169
  1996. &)
  1997.  1,162,65,160,1,32
  1998. @*
  1999.  189,255,169,1,162,8
  2000. [+
  2001.  160,0,32,186,255,169
  2002. U,
  2003.  0,170,160,24,32,213
  2004. -
  2005.  255,120,169,0,133,236
  2006. {CBM-P}.
  2007.  133,237,133,238,133,239
  2008. M/
  2009.  133,208,133,209,133,234
  2010. {$ea}0
  2011.  169,111,141,15,144,169
  2012. 1
  2013.  255310
  2014.  
  2015.  n{CBM-W}0 {CBM-M} :310
  2016. {$ea}a(j){CBM-R}n:j
  2017. v{$f4}cksum{CBM-R}ad{CBM-Q}{CBM-J}(ad{CBM-Z}256){CBM-D}256:i{CBM-R}1{CBM-@}6:cksum{CBM-R}(cksum{CBM-N}a(i)){CBM-P}255:
  2018. P{$fe}G(18);:570:G(146);
  2019. ~n{CBM-R}{CBM-Q}1{CBM-M}a{CBM-R}6:315
  2020. G(20):n{CBM-R}cksum{CBM-M}530
  2021. P:"Line Entered Wrong":"Re-enter"::1000:310
  2022. Z2000
  2023. {$f4}i{CBM-R}1{CBM-@}6:ad{CBM-N}i{CBM-Q}1,a(i):
  2024.  
  2025. ns withfour lives.  an extra life is added for"
  2026. b
  2027. "every 4000 points"
  2028.  
  2029. 29:"your drive will run   continuously.         after the game begins"
  2030. V
  2031. "you may turn the driveoff.":"      please wait": 32
  2032.  
  2033. "    
  2034. 3
  2035. "use joystick control  to move left and right"
  2036. X
  2037. "pressing fire button  will cause your genie to fly upwards..."
  2038. {CBM-V}
  2039. "releasing fire button will cause your genie to fall downwards"
  2040. {$fb}
  2041. "push the joystick     forward to start a newgame":29
  2042. {SHIFT-POUND}:U{$7c}!0{SHIFT-*}P{$60} {SHIFT-POUND};P{$e9}
  2043.  >{CBM-X}I){$f0} <LlC
  2044.  
  2045. {CBM-G}{CBM-H}jj{CBM-POUND}{CBM-O}{CBM-U}
  2046.  {$60}{$eb}{$e6}{$e9}X{SHIFT-POUND} {SHIFT-POUND}> -MP{$fa}{CBM-@}{$e9}{$f0}{SHIFT-POUND}%{$e5}P{$fa}{SHIFT-POUND}&{$ec}{SHIFT-POUND}'{$f3} {CBM-O}{$ea}
  2047. jjjjI({$eb}{CBM-O}{$ea}
  2048. )I({$ec}{CBM-O}{$eb}
  2049. jjjjI({$f2}{CBM-O}{$eb}
  2050. )I({$f3}PL{SHIFT-POUND}({$f8}{$f1}{$60}{SHIFT-POUND}@,{$f0}{$fb}{CBM-Z}{SHIFT-POUND}{$60}{SHIFT-POUND}
  2051. R{CBM-G}P{$f0}EQ0Q{SHIFT-POUND}
  2052.  R
  2053. P{$fa}{SHIFT-POUND}{SHIFT-POUND}
  2054. P{CBM-G}QI{$f0}I{$f0}#I{$f0}fI{$f0}_ly{CBM-G}R{$f0}{SHIFT-POUND}{$ec}TFT{CBM-G}TI{$e8}P{SHIFT-POUND}
  2055.  
  2056. {$e2}5,8,15:15,e1$,e2$:e1$;e2$: 15:800
  2057. {$e8} buzzer
  2058. 4{$e9}36878,15:36874,190
  2059. d{$ea}w{CBM-R}1{CBM-@}300:w
  2060. \{$eb}36878,0:36874,0:
  2061. MP bell sound
  2062. Qw{CBM-R}15{CBM-@}0{SHIFT-POUND}{CBM-Q}1:36878,w:36876,240:w
  2063. {CBM-I}R36876,0:
  2064. H{CBM-U}c$;"not zero page or rom":1000
  2065.  
  2066.  
  2067. d"{CBM-M}820
  2068. {$fa}>dv{CBM-R}1{CBM-Q}7{CBM-D}(a${CBM-R}"d"):d{$f0}P{SHIFT-POUND}
  2069. Q{$60} 
  2070. P{$fa}{$60}EP0P{$60}{$e6} {CBM-@} {CBM-E}{CBM-K}*M*{$e5}T*e{$e3}*{$f0}*M{$ea}{$60}CI{$f0}{$f9}03{$e6}A{CBM-G}AI*0{SHIFT-POUND}
  2071. Aj{$f1}{CBM-G}Bj{$f2} R {CBM-E}I3{CBM-A} {CBM-E}I2{SHIFT-POUND}C{SHIFT-POUND} FA{$60}FA{SHIFT-POUND})A{CBM-G}Aj{$f1}{CBM-G}Bj{$f2} R 
  2072. {CBM-E}I3{CBM-A} {CBM-E}I2{SHIFT-POUND}C{SHIFT-POUND} {$e6}A{$60}DI{$f0}{$f9}0*{$e6}B{CBM-G}Aj{$f1}{CBM-G}Bj{$f2} R {CBM-E}I3{CBM-A}H{CBM-E}I2{SHIFT-POUND}D{SHIFT-POUND} FB{$60}FB0{CBM-G}Aj{$f1}{CBM-G}Bj{$f2} R 
  2073. {CBM-E}I3{CBM-A}H{CBM-E}I2{SHIFT-POUND}D{SHIFT-POUND} {$e6}B{$60}{$ea}{$ea}{$ea}.":310
  2074. ""Error on Save.  Try again.":dv{CBM-R}1{CBM-M}720
  2075. m
  2076. 15,8,15:15,e1$,e2$:e1$;e2$: 15:720
  2077. v720
  2078. N"*** Load ***"
  2079.  f${CBM-R}"":" Filename";f$:f${CBM-R}""{CBM-M}310
  2080. {CBM-U}*:"Tape or Disk: (T/D)"
  2081. U4{CBM-K}a$:a${CBM-W}{CBM-E}"t"{CBM-P}a${CBM-W}{CBM-E}"d"{CBM-M}820
  2082. {$fa}>dv{CBM-R}1{CBM-Q}7{CBM-D}(a${CBM-R}"d"):d
  2083. {SHIFT-POUND}{CBM-D}{CBM-Z}BC{$60}IYP{SHIFT-POUND} )I{CBM-D}{CBM-Z}BC{$ea}{$ea}{$ea}{$ea} {CBM-D}H{CBM-Z}HBHC{CBM-G} {$f0} {CBM-R}){$f0}{SHIFT-POUND}
  2084.  QP{SHIFT-POUND}{$e1}{SHIFT-POUND}'{$e2}{SHIFT-POUND}{$e3}{$e4}{SHIFT-POUND}
  2085. {$e5}{SHIFT-POUND}{$e6}{$e7}{$60}
  2086.  
  2087.  
  2088.  
  2089.  
  2090.  
  2091.  
  2092.  
  2093.  
  2094. {SHIFT-POUND}8{$e5}{$ea}BCl{CBM-X}{$e6}{$e8} {CBM-R})Pl{CBM-X}{SHIFT-POUND}
  2095. l&
  2096.  
  2097.  
  2098. {CBM-I}
  2099. {CBM-H}{CBM-X}
  2100. I{$f0}l{CBM-G}{CBM-R}E{CBM-H}{$f0}lC{CBM-G}{CBM-W}{$f0}F{CBM-W}lC ){CBM-A}{SHIFT-POUND}
  2101. {CBM-Y}{CBM-G}{CBM-A}
  2102. {CBM-POUND}{CBM-O}{$f8}{CBM-J}{CBM-O}{$f9}{CBM-L} 
  2103. {SHIFT-POUND} Q{CBM-J}P>HHQ{CBM-J}P8HHQ{CBM-J}P2I({CBM-POUND}{SHIFT-*}P{$e5} P{CBM-E}{CBM-J}I3!{CBM-G}{CBM-A}
  2104. {CBM-POUND}{CBM-O}{$f0}
  2105. {CBM-H}i{CBM-R}1{CBM-@}3:t{CBM-R}B(s%{CBM-Q}i)
  2106. #{CBM-Y}t{CBM-W}{CBM-E}44{CBM-P}t{CBM-W}{CBM-E}58{CBM-M}s%{CBM-Q}i,32:
  2107. 8{CBM-C}H("",i{CBM-Q}1);:
  2108. qF"*** Save ***"
  2109. WPf${CBM-R}"":" Filename";f$:f${CBM-R}""{CBM-M}310
  2110. Z:"Tape or Disk: (T/D)"
  2111. {CBM-Y}{$e4}{CBM-K}a$:a${CBM-W}{CBM-E}"t"{CBM-P}a${CBM-W}{CBM-E}"d"{CBM-M}740
  2112. {$f0}{$ee}dv{CBM-R}1{CBM-Q}7{CBM-D}(a${CBM-R}"d"):dv{CBM-R}8{CBM-M}f${CBM-R}"0:"{CBM-N}f$:15,8,15,"s"{CBM-N}f$: 15,141,5,144,169,0
  2113. !2
  2114.  141,27,145,169,255,141
  2115. =3
  2116.  20,145,141,21,145,165
  2117. y4
  2118.  162,9,192,133,162,160
  2119. U5
  2120.  1,132,184,132,185,132
  2121. 6
  2122.  186,165,0,240,7,200
  2123. {CBM-Z}7
  2124.  200,132,185,200,132,186
  2125. F8
  2126.  160,0,185,0,30,153
  2127. {SHIFT--}9
  2128.  0,2,185,0,31,153
  2129. {$f6}:
  2130.  0,3,136,208,24&ad{CBM-R}ad{CBM-N}6: ad{CBM-W}e {CBM-M} 310
  2131. 0 710
  2132. #:n{CBM-R}0:z{CBM-R}0
  2133. -d"{CBM-+}";
  2134. @e{CBM-K}a$:a${CBM-R}""{CBM-M}581
  2135. fav{CBM-R}{CBM-Q}(a${CBM-R}"m"){CBM-Q}2{CBM-D}(a${CBM-R}","){CBM-Q}3{CBM-D}(a${CBM-R}"."){CBM-Q}4{CBM-D}(a${CBM-R}"j"){CBM-Q}5{CBM-D}(a${CBM-R}"k"){CBM-Q}6{CBM-D}(a${CBM-R}"l")
  2136. Bgav{CBM-R}av{CBM-Q}7{CBM-D}(a${CBM-R}"u"){CBM-Q}8{CBM-D}(a${CBM-R}"i"){CBM-Q}9{CBM-D}(a${CBM-R}"o"):a${CBM-R}"h"{CBM-M}a${CBM-R}"0"
  2137. Xhav{CBM-E}0{CBM-M}a${CBM-R}G(48{CBM-N}av)
  2138.  
  2139. iG(20);:a{CBM-R}F(a$):a{CBM-R}13{CBM-A}a  hit any key"
  2140.  
  2141. {CBM-K}g$:g${CBM-R}""{CBM-M}30
  2142.  
  2143.  
  2144. = 
  2145. i{CBM-R}832{CBM-@}989:a:i,a::832
  2146. y!
  2147.  162,255,154,160,0,185
  2148. Q"
  2149.  83,3,153,64,1,200
  2150. #
  2151.  192,180,208,245,76,66
  2152. {CBM-G}$
  2153.  1,66,67,169,1,162
  2154. {CBM-B}%
  2155.  64,160,1,32,189,255
  2156. W&
  2157.  169,1,162,8,160,0
  2158. {$f2}'
  2159.  32,186,255,169,0,170
  2160. (@
  2161. "your objective is to  knock the bad genies  off their magic"
  2162. K
  2163. "carpets and back into their bottles"
  2164. {CBM-E}
  2165. "you must then collect their bottles before  they emerge again"
  2166. {$e3}
  2167. "you only score points for getting bottles"
  2168. )
  2169. "your genie begi
  2170. november
  2171.  15 
  2172. bagdad
  2173. bagdad/64
  2174. human engineered software  (ad)
  2175. hesgames
  2176. mlx
  2177. mlx/64
  2178. ml for beginners - assembler
  2179. ml beg
  2180. ml for beginners - memory display
  2181. ml beg/64
  2182. compute! books for the 64  (ad)
  2183. 64 books
  2184. c/g term
  2185. c/g term/64
  2186. supertank
  2187. supertank
  2188. disk autonovember
  2189.  12 
  2190. bagdad
  2191. bagdad/vic
  2192. mlx  (8k)
  2193. mlx/vic
  2194. compute! books for the vic-20  (ad)
  2195. vic books
  2196. c/g term  (16k)
  2197. c/g term/vic
  2198. descent to kaylon
  2199. kaylon/vic
  2200. power basic - slowpoke
  2201. power basic
  2202. get more from your commodore
  2203. gazette/vic
  2204. ml for beginners - assemc
  2205.  
  2206.  lines changed from mlx version 2.00 are 750,765,770 and 860
  2207. S
  2208.  line changed from mlx version 2.01 is 300
  2209. D
  2210. "";G(142);G(8);:53281,1:53280,1
  2211. {CBM-C}E
  2212.  788,52: disable run/stop
  2213. {$ed}N
  2214. "                                       ";
  2215. $X
  2216. "         
  2217. f:c${CBM-R}G(31{CBM-N}119{CBM-D}f)
  2218. <
  2219. {CBM--}
  2220. s{CBM-W}256{CBM-A}(s{CBM-E}40960{CBM-P}s{CBM-W}49152){CBM-A}s{CBM-E}53247{CBM-M}3000:210
  2221. f
  2222. {$e1}
  2223. ::
  2224.  
  2225. {$e6}
  2226. "ending address?        ";:e:f{CBM-R}1{CBM-Q}f:c${CBM-R}G(31{CBM-N}119{CBM-D}f)
  2227. {SHIFT-@}
  2228. {$f0}
  2229. e{CBM-W}256{CBM-A}(e{CBM-E}40960{CBM-P}e{CBM-W}49152){CBM-A}e{CBM-E}53247{CBM-M}3000:230
  2230. {$e7}
  2231. {$fa}
  2232. e{CBM-W}s{CBM-M}c$;"ending < start  ":1000: 230
  2233. {$f1}
  2234. ::
  2235. ,""
  2236. {CBM-S}:"Display:From";f:,"To";:t
  2237. x{CBM-U}f{CBM-W}s{CBM-A}f{CBM-E}e{CBM-A}t{CBM-W}s{CBM-A}t{CBM-E}e{CBM-M}"At least";s;", not more than";e:430
  2238. Bi{CBM-R}f{CBM-@}t{SHIFT-POUND}6::I("0000"{CBM-N}J(D(i),2),5);":";
  2239. {CBM-E}Ck{CBM-R}0{CBM-@}5:n{CBM-R}B(i{CBM-N}k):I("00"{CBM-N}J(D(n),2),3);",";
  2240. IL{CBM-K}a$:a${CBM-E}""{CBM-M}::310
  2241. {$e4}Vk:G(20);:i:::310
  2242. {$f6} n{CBM-W}0 {CBM-M} :310d{CBM-R}ad{CBM-N}6: ad{CBM-W}e {CBM-M} 310
  2243. 0 710
  2244. :n{CBM-R}0:z{CBM-R}0
  2245. 'd"{CBM-POUND}";
  2246. :e{CBM-K}a$:a${CBM-R}""{CBM-M}581
  2247. fav{CBM-R}{CBM-Q}(a${CBM-R}"m"){CBM-Q}2{CBM-D}(a${CBM-R}","){CBM-Q}3{CBM-D}(a${CBM-R}"."){CBM-Q}4{CBM-D}(a${CBM-R}"j"){CBM-Q}5{CBM-D}(a${CBM-R}"k"){CBM-Q}6{CBM-D}(a${CBM-R}"l")
  2248. {CBM-C}gav{CBM-R}av{CBM-Q}7{CBM-D}(a${CBM-R}"u"){CBM-Q}8{CBM-D}(a${CBM-R}"i"){CBM-Q}9{CBM-D}(a${CBM-R}"o"):a${CBM-R}"h"{CBM-M}a${CBM-R}"0"
  2249. Rhav{CBM-E}0{CBM-M}a${CBM-R}G(48{CBM-N}av)
  2250. {$fa}iG(20);:a{CBM-R}F(a$):a{CBM-R}13{CBM-A}a{CBM-R}44{CBM-A}t{CBM-R}B(s%{CBM-Q}i)
  2251. {CBM-Y}t{CBM-W}{CBM-E}44{CBM-P}t{CBM-W}{CBM-E}58{CBM-M}s%{CBM-Q}i,32:
  2252. *{CBM-C}H("",i{CBM-Q}1);:
  2253. cF"*** Save ***"
  2254. SK"(Press RETURN alone to cancel save)"
  2255. Pf${CBM-R}"":" Filename";f$:f${CBM-R}""{CBM-M}::310
  2256. AZ:"Tape or Disk: (T/D)"
  2257. {$de}{$e4}{CBM-K}a$:a${CBM-W}{CBM-E}"t"{CBM-P}a${CBM-W}{CBM-E}"d"{CBM-M}740
  2258. {$ee}dv{CBM-R}1{CBM-Q}7{CBM-D}(a${CBM-R}
  2259. (B(783){CBM-P}1){CBM-A}(191{CBM-P}st){CBM-M}780
  2260. "Done.":310
  2261. j"Error on Save.  Try again.":dv{CBM-R}1{CBM-M}720
  2262. U
  2263. 15,8,15:15,e1$,e2$:e1$;e2$: 15:720
  2264. "*** Load ***"
  2265. {CBM-C}"(Press RETURN alone to cancel load)"
  2266. {$e6} f${CBM-R}"":" Filename";f$:f${CBM-R}""{CBM-M}:310
  2267. *191{CBM-P}st){CBM-M}870
  2268. A"Done.":310
  2269. 4F"Error on Load.  Try again.":dv{CBM-R}1{CBM-M}800
  2270. _P15,8,15:15,e1$,e2$:e1$;e2$: 15:800
  2271. L{$e8} buzzer
  2272. {$e9}54296,15:54277,45:54278,165
  2273. {CBM-A}{$ea}54276,33: 54273,6:54272,5
  2274. {SHIFT--}{$eb}t{CBM-R}1{CBM-@}200::54276,32:54273,0:54272,0:
  2275. {$ee}P be?
  2276.  
  2277.  lines changed from vic mlx version 2.00 are 581,582,765
  2278. vD
  2279. "";G(142);G(8);
  2280. WE
  2281.  788,194: disable run/stop
  2282. N
  2283. "              "
  2284. {CBM-N}X
  2285. " {CBM-*}{SHIFT-POUND}   {CBM-*}{CBM-*}{SHIFT-POUND}{SHIFT-POUND} "
  2286. E
  2287. "  {CBM-G}  {SHIFT-POUND}{SHIFT-POUND}{CBM-*}{CBM-*} "
  2288. {CBM--}
  2289. "              "
  2290. H
  2291. "machine language":"edi
  2292. {$f5}(J(a$,i))::198,i{CBM-Q}1
  2293.  
  2294. {CBM-I}
  2295. gR
  2296. 53281,14:"load";G(34);f$;G(34);",8"
  2297. {$7b}W
  2298. "       loading table of contents"
  2299. {CBM-@}X
  2300. "           one moment please"
  2301. {CBM-X}{$e6}
  2302. a${CBM-R}G(13){CBM-N}"run"{CBM-N}G(13)
  2303. {$e9}{$f0}
  2304. i{CBM-R}1{CBM-@}C(a$):630{CBM-N}i,F(J(a$,i))::198,i{CBM-Q}1
  2305. {$ef}{$fa}
  2306. {CBM-I}
  2307.  
  2308.  
  2309.  
  2310.  
  2311.  
  2312.  
  2313.  
  2314.  
  2315.  
  2316.  
  2317.  
  2318. ";G(14):ad{CBM-R}s
  2319. .6a{CBM-R}1:I("0000"{CBM-N}J(D(ad),2),5);":";
  2320. <; j{CBM-R}a {CBM-@} 6
  2321. v@570:n{CBM-R}{CBM-Q}1{CBM-M}j{CBM-R}j{CBM-N}n:320
  2322. Gn{CBM-R}{CBM-Q}211{CBM-M} 710
  2323. Xn{CBM-R}{CBM-Q}204{CBM-M} 790
  2324. n{CBM-R}{CBM-Q}206{CBM-M}:"Enter New Address";zz
  2325. Rn{CBM-R}{CBM-Q}206{CBM-M}zz{CBM-W}s{CBM-A}zz{CBM-E}e{CBM-M}"out of range":1000:410
  2326. {$eb}{CBM-K}n{CBM-R}{CBM-Q}206{CBM-M}ad{CBM-R}zz::310
  2327. ~{CBM-@} n{CBM-W}{CBM-E}{CBM-Q}196      {CBM-*}{SHIFT-POUND}   {CBM-*}{CBM-*}{SHIFT-POUND}{SHIFT-POUND}              ";
  2328. z
  2329. "               {CBM-G}  {SHIFT-POUND}{SHIFT-POUND}{CBM-*}{CBM-*}              ";
  2330.  
  2331. "                                         "
  2332. BH
  2333. " machine language editor version 2.02"
  2334. {$f0}R
  2335. "starting address?        ";
  2336.  
  2337. W
  2338. s:f{CBM-R}1{CBM-Q};G(14):ad{CBM-R}s
  2339. *6a{CBM-R}1:I("0000"{CBM-N}J(D(ad),2),5);":";
  2340. 5;j{CBM-R}a{CBM-@}6
  2341. o@570:n{CBM-R}{CBM-Q}1{CBM-M}j{CBM-R}j{CBM-N}n:320
  2342. {$60}n{CBM-R}{CBM-Q}211{CBM-M} 710
  2343. Qn{CBM-R}{CBM-Q}204{CBM-M} 790
  2344. n{CBM-R}{CBM-Q}206{CBM-M}:"Enter New Address";zz
  2345. Kn{CBM-R}{CBM-Q}206{CBM-M}zz{CBM-W}s{CBM-A}zz{CBM-E}e{CBM-M}"out of range":1000:410
  2346. {$e4}{CBM-K}n{CBM-R}{CBM-Q}206{CBM-M}ad{CBM-R}zz::310
  2347. {$f8}{CBM-@} n{CBM-W}{CBM-E}{CBM-Q}196 {CBM-M} 480
  2348.  
  2349. {$ea}a(j){CBM-R}n:j
  2350. ?
  2351. {$f4}cksum{CBM-R}ad{CBM-Q}{CBM-J}(ad{CBM-Z}256){CBM-D}256:i{CBM-R}1{CBM-@}6:cksum{CBM-R}(cksum{CBM-N}a(i)){CBM-P}255:
  2352. y
  2353. {$fe}G(18);:570:G(146);
  2354. L
  2355. ~n{CBM-R}{CBM-Q}1{CBM-M}a{CBM-R}6:315
  2356.  
  2357. G(20):n{CBM-R}cksum{CBM-M}530
  2358. {CBM-U}
  2359. :"Line Entered Wrong : Re-enter"::1000:310
  2360. B
  2361. 2000
  2362. {$ee}
  2363. i{CBM-R}1{CBM-@}6:ad{CBM-N}i{CBM-Q}1,a(i)::54272,0:54273,0
  2364. &aa{CBM-R}32{CBM-M}670
  2365. na{CBM-E}128{CBM-M}n{CBM-R}{CBM-Q}a:
  2366. xa{CBM-W}{CBM-E}20 {CBM-M} 630
  2367. cB690:i{CBM-R}1{CBM-P}t{CBM-R}44{CBM-M}n{CBM-R}{CBM-Q}1:" ";:690
  2368. lL570
  2369. _Va{CBM-W}48{CBM-A}a{CBM-E}57{CBM-M}580
  2370. Ta$;:n{CBM-R}n{CBM-D}10{CBM-N}a{CBM-Q}48
  2371. n{CBM-E}255 {CBM-M} a{CBM-R}20:1000:600
  2372. {CBM-@}z{CBM-R}z{CBM-N}1:z{CBM-W}3{CBM-M}580
  2373. {CBM-U}z{CBM-R}0{CBM-M}1000:570
  2374. D{CBM-POUND}",";:
  2375. {$e4}{CBM-R}s%{CBM-R}B(209){CBM-N}256{CBM-D}B(210){CBM-N}B(211)
  2376. {$f9}{CBM-W}i{CBM-R}1{CBM-@}3:"d"):dv{CBM-R}8{CBM-M}f${CBM-R}"0:"{CBM-N}f$:15,8,15,"s"{CBM-N}f$: 15
  2377. f{$f8}t${CBM-R}f$:zk{CBM-R}B(53){CBM-N}256{CBM-D}B(54){CBM-Q}C(t$):782,zk{CBM-Z}256
  2378. O{$fa}781,zk{CBM-Q}B(782){CBM-D}256:780,C(t$):65469
  2379. {$fb}780,1:781,dv:782,1:65466
  2380. {CBM-V}{$fd}k{CBM-R}s:254,k{CBM-Z}256:253,k{CBM-Q}B(254){CBM-D}256:780,253
  2381. {$ec}{$fe}k{CBM-R}e{CBM-N}1:782,k{CBM-Z}256:781,k{CBM-Q}B(782){CBM-D}256:65496:"Tape or Disk: (T/D)"
  2382. &4{CBM-K}a$:a${CBM-W}{CBM-E}"t"{CBM-P}a${CBM-W}{CBM-E}"d"{CBM-M}820
  2383. k>dv{CBM-R}1{CBM-Q}7{CBM-D}(a${CBM-R}"d"):dv{CBM-R}8{CBM-M}f${CBM-R}"0:"{CBM-N}f$
  2384. Zht${CBM-R}f$:zk{CBM-R}B(53){CBM-N}256{CBM-D}B(54){CBM-Q}C(t$):782,zk{CBM-Z}256
  2385. {CBM-T}i781,zk{CBM-Q}B(782){CBM-D}256:780,C(t$):65469
  2386. Dm780,1:781,dv:782,1:65466
  2387. Vr780,0:65493
  2388. {$f3}\(B(783){CBM-P}1){CBM-A}(
  2389. ll sound
  2390. Q54296,15:54277,0:54278,247
  2391. 2R 54276,17:54273,40:54272,0
  2392. mSt{CBM-R}1{CBM-@}100::54276,16:
  2393. S{CBM-U}c$;"not zero page or rom":1000
  2394.  
  2395.  
  2396.  
  2397. {CBM-T}i781,zk{CBM-Q}B(782){CBM-D}256:780,C(t$):65469
  2398. Dm780,1:781,dv:782,1:65466
  2399. Vr780,0:65493
  2400. {$f3}\(B(783){CBM-P}1){CBM-A}(tor ver 2.02"
  2401. dR
  2402. "starting address":s:f{CBM-R}1{CBM-Q}f:c${CBM-R}G(31{CBM-N}119{CBM-D}f)
  2403. B{CBM--}
  2404. s{CBM-W}256{CBM-A}s{CBM-E}32767{CBM-M}3000:210
  2405. N{$e1}
  2406. :::
  2407.  {$e6}
  2408. "ending address":e:f{CBM-R}1{CBM-Q}f:c${CBM-R}G(31{CBM-N}119{CBM-D}f)
  2409. {CBM-V}{$f0}
  2410. e{CBM-W}256{CBM-A}e{CBM-E}32767{CBM-M}3000:230
  2411. {$eb}{$fa}
  2412. e{CBM-W}s{CBM-M}c$;"ending < start  ":1000: 230
  2413. {$f5}::
  2414. ,"{CBM-M} 480
  2415. "{CBM-S}:"Display:From";f:,"To";:t
  2416. _{CBM-U}f{CBM-W}s{CBM-A}f{CBM-E}e{CBM-A}t{CBM-W}s{CBM-A}t{CBM-E}e{CBM-M}"At least";s;", not more than";e:430
  2417. Bi{CBM-R}f{CBM-@}t{SHIFT-POUND}6::I("0000"{CBM-N}J(D(i),2),5);":";
  2418. {CBM-N}Gk{CBM-R}0{CBM-@}5:n{CBM-R}B(i{CBM-N}k):k{CBM-R}3{CBM-M}{CBM-+}10);
  2419. HII("00"{CBM-N}J(D(n),2),3);",";
  2420.  L{CBM-K}a$:a${CBM-E}""{CBM-M}::310
  2421. {$fb}Vk:G(20);:i:::
  2422.  
  2423.  
  2424.  
  2425. {CBM-B}uuuuuuu{CBM-N}{CBM-N}{CBM-N}{CBM-N}{CBM-N}{CBM-N}{CBM-N}{CBM-N}~~~~~~~~C{$e7}{$e7}{$e7}~LX{CBM-A}N{SHIFT-+}
  2426.  
  2427. CW{$7f}KC
  2428. 3FL
  2429.  
  2430.  
  2431.  
  2432.  
  2433.  
  2434.  
  2435.  
  2436. {CBM-N}*%$$
  2437.  
  2438.  
  2439. {CBM-N}{CBM-POUND}x~~~~{CBM-N}u
  2440.  
  2441.  
  2442. E{$f6}5O<
  2443. E{$f6}5o
  2444. E{$f5}g=@abQ
  2445. {$f1}@abQQ@abQm{$f5}M^A]cM^Au]aM^A]g~~~{$ea}{$ea}{$e5}{$e4}{$e4}{$e4}{$e4}{$e5}{$ea}{$ea}~~~[{CBM-Q}{CBM-Q}~~~~~~{CBM-Q}{CBM-Q}[{$e4}{$e4}{$e4}{$e4}{$e4}{$e4}{$e4}{$e4}
  2446.  
  2447. u{CBM-N}{CBM-N}~~~~~~{CBM-N}{CBM-N}u
  2448.  
  2449.  p{$60}p\{$f3} p{$60}ptS p{$60}pp\S~>J{$f5}
  2450. l] Al]{CBM-G}{$fc}I{$f0}X{CBM-G}){$fb} 
  2451. {CBM-O}
  2452. P
  2453. {CBM-O}
  2454. Q
  2455. HP{$f1}{CBM-G}x 
  2456. {CBM-T}{CBM-@}{CBM-E}{$fb}I{CBM-I}&{CBM-@}
  2457. JP{$fa}JE{$fb}{CBM-T}{CBM-G}{$fc}E{CBM-@}{CBM-@}{CBM-E}{CBM-T}{$fb} {CBM-E}{CBM-T}{$e7}P{$f8}{SHIFT-POUND}{$fe}{SHIFT-POUND}X{$fc}{$fd}{$fb}{CBM-G}{CBM-T}I{CBM-T}P{$e6}{CBM-@}{CBM-I}
  2458.  TA{CBM-A} TA{CBM-A}{SHIFT-POUND}   TA&{CBM-J}P{$f8}{CBM-L}  TA&{CBM-L}P{$f8}{CBM-G}{CBM-J}{$fd}{CBM-G}{CBM-L}{$fb}{$e6}{$fd}P{$e6}{$fe}{$e6}{$fb}P{$e6}{$fc}{SHIFT-POUND}E{$fe}PB{SHIFT-POUND}{$e8}E{$fd}P{CBM-C}{$60}J0{CBM-H}{$60}h 
  2459. {CBM-E}{CBM-T}{CBM-H}{$e6}{CBM-T}P{$e6}{CBM-@}H{CBM-POUND}{CBM-I}P{$e6}{SHIFT-POUND}?{$fc}{SHIFT-POUND}~{$fb}{CBM-I}
  2460.  BA{CBM-A}{SHIFT-POUND}
  2461. {CBM-POUND}{$f0}  BA&{CBM-J}P{$f8}{CBM-G}{CBM-J}{$fb}{CBM-G}{$fb}8{$e9}{$fb}{CBM-A}{CBM-*}F
  2462.  
  2463.  
  2464.  
  2465.  
  2466.  
  2467. bpdp28:>p48:<p.8:>p28pbp0fp@p28:2j,8:46.8:2j*dp8p.8:8:08:8:48:8:48:@p4868:08:460<t0h.8:>p48:8:4:<bd8<>ln<@btv:b@np<^{$60}Hrdp\p4lDprp8pnp np6p<t<>8p686n684668i{$e9}~~{$ef}{$e9}{$e9}{$f1}~{$ef}{$e9}{$e9}{$fb}~{$ef}{$e9}{$e9}~~{$ef}{$e9}{$e9}{$eb}~{$ef}V
  2468.  
  2469.  
  2470. {$f2}VV
  2471.  
  2472. {$f2}VV
  2473.  
  2474.  
  2475. l]<{SHIFT-POUND}
  2476. ={CBM-I}f;E<JF=JP{$f3}h{$e8}{CBM-G}=lT[H;H{CBM-+}7{$f0}H=H {$fa}^{CBM-G}?{$e6}{CBM-I} {$fc}^{$e1}{CBM-I}?{SHIFT-POUND}
  2477. E;{$e5};8&=&?*JP{$f1}J{$60}{CBM-I}~9 {CBM-+};={CBM-I}
  2478. ;{CBM-N} {$fa}^I0{CBM-G}?{CBM-N}=P{$f0}{SHIFT-POUND} i~IhE;{CBM-G}{CBM-+}9h{CBM-G};lT[:{$e8}PA<H> 
  2479. D>{$f0}H{CBM-E}; R~{$f4}
  2480. {$f0}{SHIFT-POUND}  R~{CBM-@}:{SHIFT-*}.P{SHIFT-POUND}
  2481.  R~ L~l] R~{$f8}
  2482.   [; {$e4}~{CBM-@};hl&\{CBM-N} F~ O~hl#\H{$f0}${CBM-N} I~S
  2483. H{CBM-N}H{CBM-POUND}{$e8}PHH {CBM-X}~H{CBM-POUND}H{CBM-N}H
  2484. {$ef}{$f7}{CBM-Q}K{$ee}J{CBM-Z}S{CBM-S}{SHIFT--}N{$ef}#<{CBM-S}{$fd}s{CBM-S}{$ed}N{$ef}?\{CBM-N}W^{$e6}{$f7}G{$ee}wK{CBM-M}S;O{$e3}G*5{SHIFT-+}{CBM-O}{SHIFT--}{$e7}{$f1}{$e7}_{CBM-N}US{CBM-O}{$e7}{$f1}{$eb}z{$eb}{CBM--}{$de}{$f3}{$f8}{$fd}J{$ed}V{$f3}{$7f}{CBM-K}{$7d};{$eb}GF?t{$f3}G{CBM-K}{$7d};{$eb}GF9{CBM-O}P{$de}{$f5}{CBM-W}{CBM-W}{$fc}{CBM-*}{$e8}_n{$fa}YY{$fe}MT/{CBM-M}{$7d}M{$ec}~{$ea}MT#{CBM-M}{$7d}L{$ec}G6{$fa}S{CBM-V}{CBM-J}VC]M{$ef}{$ef}{CBM-C}{CBM-X}{$e8}~U=J{$ef}W{CBM-C}{CBM-X}{$e8}{$e7}{$f7}~E{$fe}x{$f4}oS{$7b}{$fb}{$e2}{$ef}/Z'{$fc}{$f1}{$7f}{CBM-X}{$fa}{CBM-M}{CBM-O}{CBM-X}{$fd}{$f1}W{CBM-X}{CBM--}{$fe}~{$f8}{CBM-F}K{$de}{$ee}O{CBM-P}{CBM-X}Y{$f1}{CBM-P}{CBM-@}{$fd}{$e7}{$f5}o{CBM-P}{$fb}{$f3}{$f1}{CBM-B}{CBM-+}{$fd}{$f7}W{$e8}{$f8}WR{$fe}{$f7}{$eb}{CBM-P}W{$7c}{$7f}{$e9}?Y{$f5}{$f7}{CBM-P}{$7e};{$f4}{CBM-P}{CBM-C}{$7e}{SHIFT-POUND}{$f5}G{SHIFT-@}{CBM-V}?{$f4}O{CBM-B}Z{$eb}{SHIFT--}_{$fa}_
  2485. [;lT[I
  2486. P*{SHIFT-POUND}~lT[{$f0}#{$f7}0{$f0}{$f3}0{$f1}{$ed}{CBM-A}J?H=HE?
  2487. P{$de}{CBM-G}=E;{$f0}{CBM-A}V{SHIFT-POUND}
  2488. lT[H{$f0}E;{$f0}JP{$f2}<H>H9H:HE>P{$e2}D>{$f0}{CBM-H}H{CBM-E};Q9{$f0}{$f5}PUH{CBM-+}7PhlT[{CBM-POUND}H{CBM-N}h
  2489. H;H{CBM-POUND}Hf7{CBM-N}{CBM-A}{CBM-G};hhl{CBM-M}]h{CBM-G};hhl]H;H<{CBM-+}7P{CBM-G};h{CBM-G}<lT[H{CBM-POUND}H{CBM-N}{CBM-G}<hQ<H{CBM-I}
  2490. ;lU[<{CBM-I}
  2491. {CBM-K};lT[{CBM-+}7{$f0}#PL;
  2492. < ]{CBM-I}
  2493. lU[{SHIFT-POUND}
  2494. {CBM-N}lT[  [hP{$ef}  [h  [h{CBM-I}lU[ 
  2495. {CBM-E}-h{CBM-N}{CBM-G}.h{CBM-G}-h{$e8}{$f0}E--
  2496. U{$e6}Ys3{$fc}{CBM-B}{$7e}Q=q7{CBM--}{CBM-B}{$7e}Q=q{CBM--}{CBM-Y}{$7e}Q57<O{CBM-P}Hww7{SHIFT--}{CBM-P}Hww7{$7d}{SHIFT--}{CBM-P}HwwO{$ea}){$e5}YFG{$ea}I{$e5}YFmG{$ea}){$e5}YF{$f3}{$fc}c{CBM-X}eQ{$f7}{CBM--}oc{CBM-X}eQS{CBM--}c{CBM-X}eQE3~{$fc}O{CBM-*}tdE{SHIFT--}{$7c}O{CBM-*}tde{CBM-*}{$f4}O{CBM-*}td]L{$f0}{$f0}LQUG]D{$f4}QlQUG]lP{$f0}LQUGG_3{$fc}{$fc}S{$7f}{SHIFT--}G]1{$f4}TQ{$7f}{SHIFT--}w_{CBM--}TS{$7f}{SHIFT--}U??{$f3}?S\U77{$e7}S\U7={$f3}?S\
  2497. A{$f1}{$f0}L{$7c}w
  2498. aQP{CBM--}{$7c}waQ{$f0}L{$7c}w
  2499. ~{CBM-N}{CBM-N}
  2500. ~{CBM-N}{CBM-N}
  2501. ~{CBM-N}{CBM-N}
  2502. ~{CBM-N}{CBM-N}
  2503. ~{CBM-N}{CBM-N}
  2504. ~{CBM-N}{CBM-N}
  2505.  
  2506.  
  2507. {CBM-N}{CBM-N}~
  2508. {CBM-N}
  2509.  
  2510.  
  2511. ~f 
  2512. $$
  2513.  
  2514.  
  2515.  
  2516. {$fb}l z){$fb}{$fb}{CBM-J}f
  2517. {$f0}8{CBM-G}{$fc}{$e9}{$fc}J{CBM-POUND}I{$fc}{$e6}${$f0}{SHIFT-POUND}~${$e6}{$fb}P{$e6}{$fc}{CBM-G}{$fc})P{$fc}{SHIFT-POUND}{$60}{$ea}JE--{$e6}. 
  2518. {CBM-E}-{$f0}
  2519. {$e6}-P{$e6}.{CBM-I}
  2520. {CBM-POUND}{$60}{CBM-@}{$f0}{$ed}{CBM-E}.{CBM-E}-l [
  2521. {CBM-N}{CBM-X}{$e1}_9{CBM-X}{$e2}_P{CBM-E}'9{CBM-E})8jjj{CBM-A}
  2522. ({CBM-A}I:{$60}E(:{$60}Io:({$60}H{CBM-O}0@h7  [{$ea}{SHIFT-*}~0[{SHIFT-*} 0{$ed} c[f8{CBM-A}f83{CBM-I}
  2523. {SHIFT-*}@H{CBM-@}7{$f0}0{CBM-POUND}H{CBM-A}f8{CBM-+}7PH;{SHIFT-POUND}
  2524. {$e8}L9
  2525. H;HE;L9
  2526.  o[D5{CBM-A}8{CBM-@}{CBM-G}-
  2527. uuuuu
  2528. ~~~~~~~~~{CBM-N}
  2529.  
  2530.  
  2531. {CBM-N}
  2532.  
  2533.  
  2534.  
  2535.  
  2536. ~
  2537.  
  2538.  
  2539. {CBM-N}
  2540. @{CBM-N}
  2541. {CBM-N}{CBM-B}{CBM-N}{CBM-N}
  2542.  
  2543. ~{$fc}Auuuu~{$f0}uuuuu
  2544. uuuuuuu~
  2545. uuuuuu~~
  2546. uuuuu~~~
  2547. uuuu~~~~
  2548. uuu~~~~~
  2549. uu~~~~~~
  2550. u~~~~~~~
  2551.  
  2552. ~{$f8}*UF{$fd}{$f8}*UF
  2553. ~{$f9}*UF
  2554.  
  2555.  
  2556.  
  2557.  
  2558.  
  2559. {CBM-N}~
  2560.  
  2561.  
  2562.  
  2563.  
  2564. {CBM-N}~~
  2565.  
  2566.  
  2567.  
  2568. {CBM-N}~~~
  2569.  
  2570.  
  2571. {CBM-N}~~~~
  2572.  
  2573. {CBM-N}~~~~~
  2574. {CBM-N}~~~~~~{CBM-N}~~~~~~~
  2575.  
  2576.  
  2577.  
  2578.  
  2579.  
  2580.  
  2581. {CBM-N}WO~{$fa}IUY5W{CBM-*}{$7f}{$fa}IUY5Wo{CBM-*}ZIUY5E3~{CBM-X}V{CBM-X}{$7d}E{SHIFT--}n{CBM-X}V{CBM-X}{$7d}e{$f7}{CBM-X}V
  2582. {$e6}{CBM-Y}{CBM-Y}{$e8}{$e9}{$ea}{CBM-Y}{CBM-Y}{$ec}{$ed}{$ee}{$ef}{CBM-Y}{$f0}{$f1}{$f2}{CBM-Y}{CBM-Y}{$f4}{$f5}{$f6}{$f7}{CBM-Y}{$f8}{$f9}{$fa}{$fb}{CBM-Y}{$e2}{$e3}{$fa}{$fb}{CBM-Y}{$fc}{$fd}{$fa}{$fb}{$f0}{$f3}{$f7}{$f3}{$f0}{$f0}{$f3}~{$f3}{$f0}~~~{$f3}~~{$f0}{$f3}~~~~~{$f3}{$f0}{$f0}{$f3}~{$f3}{$fc}{$fc}{$fc}{$ef}G{$e7}
  2583. {$f7}HO,O{$f7}O{$f7}~
  2584. {$f7}G
  2585.  
  2586. O Q(({$e7}
  2587. O~OF{$e7}
  2588. F~GG
  2589. IQ)
  2590. O
  2591.  
  2592.  
  2593. ~K{$f7}~~
  2594. {$e7}~{$f7}VVV{$f7}{$f6}FWV
  2595. ~
  2596. {$f7}~{$fe}{$f3}~{$e7}WW{$e6}^{$f7}~{$fe}{$f7}{$f6}{$fe}{$f7}{$f6}{$f7}{$f7}W{$fe}W{$fe}WqVVV{$f7}Vc{$f7}{$f6}{$f6}~{$f7}{$f7}{$fe}{$7e}{$f7}{CBM-*}~{$f7}{$fe}R~~~{$f6}W {$f6}{$ee}{CBM-*}V~{$fe}{$f6}~{$f7}
  2597. 9eVE{$f7}6J{$f5}9eVU{SHIFT--}6J{$f5}9eUE~{CBM-W}bba{$f7}{CBM-E}bba~{CBM-W}bba{$f3}O{CBM-V}M^MqQM{CBM-V}M^Mqt{$f1}O{CBM-V}M^Mq{$f3}{CBM-P}OsO\pS{CBM-P}OsO\p{$f7}MOsO\_q{$fc}{CBM-D}{CBM-POUND}twG{CBM--}\{CBM-D}{CBM-POUND}tww{CBM--}{CBM--}{CBM-D}{CBM-POUND}twG{SHIFT--}L?{$fe}N{$fd}NQ{CBM--}7{$fe}N{$fd}{$de}qD7{$de}N{$fd}NQ~~~{CBM-N}
  2598.  
  2599.  
  2600.  
  2601. ~~~~{CBM-N}
  2602.  
  2603.  
  2604. uuuuuuu
  2605. ~~~~~~~{CBM-N}~~~~~~{CBM-N}
  2606.  
  2607. ~~~{CBM-N}u
  2608.  
  2609. C{$f3}{CBM-C}OqL_cQ{CBM-X}MqL_gQOqL_qQ{$f1}{$fa}JU{$e6}YQQZJU{$e6}UU{$f5}ZJU{$e6}Y3FL
  2610.  
  2611.  
  2612.  
  2613.  
  2614. uuu~{CBM-N}u
  2615.  
  2616. uu
  2617. ({$fc}{CBM-G}{$fc}IPW{$60}J0{CBM-H}{$60}h{CBM-G}{CBM-S}8{$e9}{CBM-S}{CBM-A}F{CBM-P} 
  2618. {CBM-E}{CBM-S}{CBM-H}H{CBM-POUND}{CBM-I}P{$e1}{SHIFT-POUND}hh{SHIFT-POUND}JlT[{$60}(bp)
  2619. bSd@
  2620. /+
  2621. *!
  2622. '=dy(d*=)z"\
  2623. [s]*+
  2624. {$f2}{$7c}NOj{$7f}{CBM-T}{$7d}EMM{CBM-F}Fj{$7e}[VJUDVF{$fa}{$7c}{CBM-M}Ep{$7f} U EE{CBM-Q}G{CBM-*}FYFGUF{$f4}F{SHIFT-*}FEF{$fd}Fp{$7f}{SHIFT-+}F#ESF{$7d}XO^GM{$e4}{$7e}#MVJF7U{$f1}{$7d}JNUU{$7f}{$e2}MgU{$7e}{CBM-Z}MP{$7d}rMVO
  2625.  
  2626.  M4M{$ef}NM{SHIFT-@}UN{CBM-P}UaU{CBM-Z}{$7d}G{$7e}{$e3}GCC{CBM-P}{CBM-O}{CBM-B}{SHIFT-POUND}HMPP{$fb}l] E{$60}
  2627.  
  2628. {$f2}VV
  2629.  
  2630. {$f2}V
  2631.  
  2632.  
  2633. {$f2}VV
  2634.  
  2635. {$f6}TT{$fe}{$fe}
  2636. TT{$fe}{$fe}
  2637. XX
  2638.  
  2639. XX{$fa}ZZ
  2640. Z{$e2}
  2641. XX
  2642.  
  2643. XX{$fa}VV
  2644.  
  2645.  
  2646. {$de}{$de}
  2647. {CBM--}{CBM--}{$e8}{$e8}{$fa}  {$f6}{$f6}
  2648. {$f8}{$f8}{$f8}
  2649.  
  2650.  
  2651.  
  2652. {$de}{$de}{$de}
  2653.  
  2654. {$ee}{$ee}{$f4}
  2655.  
  2656. {$ee}{$ee}{$ee}{$ee}
  2657. {$e8}{$e8}{$ec}
  2658.  
  2659. XX
  2660. VV
  2661.  
  2662.  
  2663. VV
  2664.  
  2665.  
  2666. VV
  2667.  
  2668. {$de}{CBM-Y}{CBM-Y}{CBM-Y}{CBM-Y}{CBM-Y}{CBM-Y}G{CBM-Y}{CBM-Y} {CBM-K}{CBM-I}{CBM-T}{CBM-G}{CBM-Y}{CBM-+}{CBM-M}G{CBM-POUND}{SHIFT-POUND}{CBM-N}{CBM-Q}{$f3}{CBM-D}{CBM-Z}{CBM-S}{CBM-P}{$fe}{CBM-A}{CBM-E}{CBM-R}{CBM-W}~{CBM-H}{CBM-J}{CBM-L}{CBM-Y}{$eb}{CBM-U}{CBM-O}{SHIFT-@}{CBM-F}{$f3}{CBM-C}{CBM-X}{CBM-V}{CBM-B}~{SHIFT-*}ABC{$fe}DEF{CBM-Y}{$eb}HIJK{$f3}LMNO{$fe}PQRS~TUVW{$f3}XYZ{SHIFT-+}~{CBM--}{SHIFT--}{$de}{CBM-*}{$f3} {CBM-Y}{$e1}{CBM-Y}{CBM-Y}{$e4}{$e5}
  2669.  {SHIFT-@}~ {SHIFT-*}~l] C~ L~l]{CBM-G}aEdEe@{CBM-I}{CBM-J}?@JP{$f9}lT[{SHIFT-POUND}hh{SHIFT-POUND}JlT[{$60}(bp)
  2670. bSd@
  2671. /+
  2672. *!
  2673. '=dy(d*=)z"\
  2674. [s]*+
  2675. {$f2}{$7c}NOj{$7f}{CBM-T}{$7d}EMM{CBM-F}Fj{$7e}[VJUDVF{$fa}{$7c}{CBM-M}Ep{$7f} U EE{CBM-Q}G{CBM-*}FYFGUF{$f4}F{SHIFT-*}FEF{$fd}Fp{$7f}{SHIFT-+}F#ESF{$7d}XO^GM{$e4}{$7e}#MVJF7U{$f1}{$7d}JNUU{$7f}{$e2}MgU{$7e}{CBM-Z}MP{$7d}rMVO
  2676.  
  2677.  M4M{$ef}NM{SHIFT-@}UN{CBM-P}UaU{CBM-Z}{$7d}G{$7e}{$e3}GCC{CBM-P}{CBM-O}{CBM-B}{SHIFT-POUND}HMPP{$fb}l] E{$60}
  2678. {CBM-C}{CBM-*}{$7d}{$7d}{CBM-I}uuuuuuuuuR{CBM-S}{CBM-N}{CBM-N}{CBM-N}{CBM-N}{CBM-N}{CBM-N}{CBM-N}{CBM-N}{CBM-N}{CBM-S}suuuuuuuuuuP{$ea}{CBM-N}{CBM-N}{CBM-N}{CBM-N}{CBM-N}{CBM-N}{CBM-N}{CBM-N}{CBM-N}{CBM-O}=uuuuuuuuuv{CBM-N}{CBM-N}{CBM-N}{CBM-N}{CBM-N}{CBM-N}{CBM-N}{CBM-N}{CBM-N}{CBM-N}{$e7}Uu{$e3}J{CBM-P}uN:{CBM-Q}RUXZ{CBM-P}uPJ{CBM-H}-]{CBM-V}{CBM-Q}{CBM-L}UwK{CBM-N}{$ed}5]{CBM-S}KwC{CBM-Q}{CBM-U}U
  2679. ;{CBM-Q}bUuuuuuuwO{CBM-Q}{CBM-L}UZ{$ea}{$ed}6{CBM-N}{CBM-N}{CBM-N}{CBM-N}{CBM-N}{CBM-N}{CBM-N}{CBM-N}{CBM-N}{CBM-N}{CBM-N}{CBM-N}{CBM-N}{CBM-N}{CBM-N}{CBM-N}{CBM-N}{CBM-N}{CBM-N}{CBM-N}{CBM-N}{CBM-N}{CBM-N}{CBM-N}{CBM-N}{CBM-N}{CBM-N}{CBM-N}{CBM-N}{CBM-N}R{CBM-J}uuuuuuuuuyP{CBM-N}{CBM-N}{CBM-N}{CBM-N}{CBM-N}{CBM-N}{CBM-N}{CBM-N}{CBM-N}{CBM-N}{CBM-I}{CBM-Z}{$7f}_yZQ6{CBM-X}{CBM-P}{SHIFT--}{SHIFT-@}{$ee}{$f7}Z{CBM-C}{CBM-X}F{CBM-F}{$f5}m{SHIFT-@}.{$f1}Z{CBM-C}{CBM-B}{$e6}{CBM-R}{SHIFT--}7Y{CBM-X}f_{CBM-W}_N{CBM-Q}{CBM-X}^{CBM-P}/Y{CBM-D}{CBM-Y}{$7d}{CBM-*}{$ef}w{$ec}U{$fe}{SHIFT-POUND}{CBM-Y}U{CBM-*}{CBM-P}w{CBM--}T{SHIFT-+}{CBM-V}
  2680. {$e6}.{CBM-I}~lU[h  [Hi{CBM-POUND}Hi~8Ql]  [{SHIFT-POUND}
  2681. 8{$f1}lU[h  [{SHIFT-*}
  2682. 0{CBM-N}H{$f0}l]i{CBM-N}HPl]  [{CBM-N} [lU[{CBM-N}{$f0}  [lU[{CBM-N}{$f0}{$f7}  [
  2683. {CBM-POUND}{$e6}0{CBM-E}/-H{CBM-E}/.F0{SHIFT-@}0N
  2684.   [{CBM-N}  ^P{CBM-*} ^l]H{$f0}{CBM-X};  [{CBM-N}E;{CBM-Y}{CBM-+}; [PEh  [h{CBM-G};  ^lU[H{CBM-POUND}H;{CBM-E}{CBM-N}I{$e4};FFl]{CBM-G};hh ^HHl]{CBM-@}{CBM-E}.{CBM-E}-{$60}{CBM-@}{CBM-G}-H{CBM-G}.H{$60}{CBM-@}{CBM-E}hl]{CBM-@}H{$e6}
  2685.  
  2686. {CBM-N}{CBM-N}~
  2687. {CBM-N}
  2688.  
  2689.  
  2690. {CBM-N}{CBM-N}~
  2691. {CBM-N}u
  2692. ~WW
  2693. W
  2694. WW{$e8}{$7f}
  2695.  
  2696.  
  2697.  
  2698.  
  2699.  
  2700.  
  2701.  
  2702.  
  2703.  
  2704. {CBM-Z}R{CBM-N}{CBM-N}{CBM-N}{CBM-N}{CBM-N}{CBM-N}{CBM-N}{CBM-N}{CBM-N}{CBM-H}.uuuuuuuuuwgJ{CBM-N}{CBM-N}{CBM-N}{CBM-N}{CBM-N}{CBM-N}{CBM-N}{CBM-N}{CBM-N}{$e4}*{$e8}{CBM-POUND}ER?{CBM-A}{$e4}>{$e8}{CBM-POUND}ER2k{CBM-N}TtZ{CBM-O}{CBM-G}{$e5};{$ea}1\{CBM--}r{$e2}{CBM-S}g{$f6}r{$e2}{CBM-S}fb)QnJw#!{$f5}{$f8}{CBM-E}EMK{CBM-P}{$ed}5{$fb}{CBM-E}EMK{CBM-N}~X{CBM-R}KV{CBM-J}{$fd}{$7f}LyE{$eb}ez{$ea}{CBM-B}V){CBM-R}E{CBM-I}{CBM-Z}{$7b}{$fd}{CBM-+}{CBM-B}{$f6},{CBM-R}{$f5}{CBM-I}{CBM-Z}{$7f}_yZQ6{CBM-X}{CBM-P}{SHIFT--}{SHIFT-@}{$ee}{$f7}Z{CBM-C}{CBM-X}F{CBM-F}{$f5}m{SHIFT-@}.{$f1}Z{CBM-C}{CBM-B}{$e6}{CBM-R}{SHIFT--}7Y{CBM-X}f_{CBM-W}_N{CBM-Q}{CBM-X}^{CBM-P}/Y{CBM-D}{CBM-Y}{$7d}{CBM-*}{$ef}w{$ec}U{$fe}{SHIFT-POUND}{CBM-Y}U{CBM-*}{CBM-P}w{CBM--}T{SHIFT-+}{CBM-V}
  2705. H{CBM-G}.H{CBM-G}9-{CBM-G}:.lW[D6{CBM-A}D4{CBM-A}XD3{CBM-A}H{CBM-E}h{$e8}{CBM-E}lT[{CBM-E})h{CBM-E}'l{CBM-M}]{CBM-+}70{$f0}HJHQ+{$f0}{CBM-A}{CBM-POUND}{CBM-E}9lT[{CBM-I}
  2706. {CBM-K}9h{CBM-G}:h{CBM-G}9JlT[{SHIFT-POUND}~0{SHIFT-POUND}
  2707. h  [D4{CBM-A}D3H{CBM-+}7P{CBM-A}
  2708. {SHIFT-POUND}
  2709. H{CBM-A}Hl] o[H;{CBM-G}70{$f0}HHQ+{$f0}{CBM-A}K{CBM-POUND}{CBM-G};9l]h  [ o[{CBM-K}9{CBM-N}H<H>E>Q+{$f0}{CBM-A}{SHIFT-POUND} 
  2710. 9E99{$e6}:D>{$f0}PH{CBM-E};9{$f5}E;lT[<HE;{CBM-POUND}HE<hl{CBM-M}]H;H8{$e5};{CBM-+}7{$f0}{CBM-POUND}H{$e9}
  2711. hlT[%;lT[e;lT
  2712. {CBM-X}{$7d}ttssoo??~~~~~~{CBM-N}
  2713. ~~~~~~{CBM-N}
  2714. ~~~~~{CBM-N}
  2715.  
  2716. ~~~~~{CBM-N}
  2717.  
  2718. uuuuuu
  2719. ~~~{CBM-N}
  2720.  
  2721.  
  2722.  
  2723.  
  2724. ~{CBM-N}
  2725.  
  2726.  
  2727.  
  2728.  
  2729.  
  2730. O?{CBM-T}{$60}sO\G={CBM-T}{$60}sO\wo{$7f}{CBM-K}{$60}sO\A{$f1} wwGEQ{$60}wwEaQwww?{$fe}{$f2}M{$fe}]{$de}RM{$7e}]{$7d}{SHIFT--}{$f6}M{$fe}]F
  2731. {CBM-B}{CBM-D}_O]F{CBM-@}wO]e
  2732. {CBM-X}{CBM-Z}wO]\{$7f}~*ZU&YW{SHIFT--}JZU&U_{$f7})Zu&YpB{$f2}{$f1}>Q{SHIFT-*}qRV{$f5}>QPqFRQ>QA\{CBM-C}O_L_m]{CBM-H}G_L_e\GwL_]m:{$e6}U{$e6}Y
  2733. :{$e6}U{$e6}U:{$e6}
  2734. ~{$fe}~{CBM-B}V
  2735.  
  2736.  
  2737. {$f2}VV
  2738.  
  2739. {$f6}TT{$fe}{$fe}
  2740. TT{$fe}{$fe}
  2741. XX
  2742.  
  2743. XX{$fa}ZZ
  2744. Z{$e2}
  2745. XX
  2746.  
  2747. XX{$fa}VV
  2748.  
  2749.  
  2750. {$de}{$de}
  2751. {CBM--}{CBM--}{$e8}{$e8}{$fa}  {$f6}{$f6}
  2752. {$f8}{$f8}{$f8}
  2753.  
  2754.  
  2755.  
  2756. {$de}{$de}{$de}
  2757.  
  2758. {$ee}{$ee}{$f4}
  2759.  
  2760. {$ee}{$ee}{$ee}{$ee}
  2761. {$e8}{$e8}{$ec}
  2762.  
  2763. XX
  2764. VV
  2765.  
  2766.  
  2767. VV
  2768.  
  2769.  
  2770. VV
  2771.  
  2772. {$de}{CBM-Y}{CBM-Y}{CBM-Y}{CBM-Y}{CBM-Y}{CBM-Y}G{CBM-Y}{CBM-Y} {CBM-K}{CBM-I}{CBM-T}{CBM-G}{CBM-Y}{CBM-+}{CBM-M}G{CBM-POUND}{SHIFT-POUND}{CBM-N}{CBM-Q}{$f3}{CBM-D}{CBM-Z}{CBM-S}{CBM-P}{$fe}{CBM-A}{CBM-E}{CBM-R}{CBM-W}~{CBM-H}{CBM-J}{CBM-L}{CBM-Y}{$eb}{CBM-U}{CBM-O}{SHIFT-@}{CBM-F}{$f3}{CBM-C}{CBM-X}{CBM-V}{CBM-B}~{SHIFT-*}ABC{$fe}DEF{CBM-Y}{$eb}HIJK{$f3}LMNO{$fe}PQRS~TUVW{$f3}XYZ{SHIFT-+}~{CBM--}{SHIFT--}{$de}{CBM-*}{$f3} {CBM-Y}{$e1}{CBM-Y}{CBM-Y}{$e4}{$e5}
  2773.  
  2774. ~{CBM-N}u
  2775.  
  2776. u
  2777. ~~{CBM-N}u
  2778.  
  2779. {CBM-N}~~~~~{$f0}{CBM-N}~~{$fc}{$f1}uu{CBM-N}{$f0}Euuuuuuuuuuu{CBM-G}uuuuuuu
  2780. )uuuu
  2781.  
  2782.  
  2783. {CBM-G}uu
  2784.  
  2785.  
  2786.  
  2787.  
  2788.  
  2789. ){CBM-N} 
  2790.  
  2791.  
  2792.  
  2793.  
  2794.  
  2795. {CBM-N}{CBM-N}{CBM-POUND}
  2796.  
  2797.  
  2798.  
  2799.  
  2800. *{CBM-N}{CBM-N} 
  2801.  
  2802.  
  2803.  
  2804.  
  2805. {CBM-N}{CBM-N}~~~~~{CBM-N}
  2806. {CBM-N}~~~~~{CBM-N}{CBM-POUND}~~~~{$fc}Au7&"7&&7&d
  2807. {CBM-N}
  2808.  
  2809.  
  2810.  
  2811.  
  2812. {CBM-N} ~~~~~{CBM-N}
  2813. N{$fe}{CBM-X}{$7d}=S{$de}V{CBM-X}{$7d}=Scn{$de}{CBM-X}{$7d}=SO{CBM-B}O\Oq\g{CBM-Y}O\OqtmO\Oq]\{CBM-N}
  2814.  
  2815.  
  2816.  
  2817.  
  2818.  
  2819.  
  2820. uuuu{CBM-N}u
  2821.  
  2822.  
  2823. ZqF aZ$Z\={CBM-H}{CBM-H}<yq aZ$Zd[[%x]-5]x$={SHIFT-+}_qT{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}W;qY;qUZZZZZZZZZZZZZZVX;q;${SHIFT-+};_l={SHIFT-+}${SHIFT-+}\={CBM-H}${SHIFT-+}d[[%x]-5]x$={CBM--}{CBM-H}:yq  0.={SHIFT-+}${CBM--}a{SHIFT-+}jdq  =Z${SHIFT-+}{CBM-H}-[%x\]x$aZ$Z={SHIFT-+}q.a{SHIFT-+}${CBM--}a{SHIFT-+}${SHIFT-+}{CBM-J}d[[%x]-5]x$={SHIFT-+}_q bob beaman (usa)  8.90E/29'2D{CBM-G}%{CBM-I}{CBM-X}Kyq{CBM-POUND}{CBM-O}{SHIFT-+}xyJ{$f2}{$e8}mnkl !{SHIFT-POUND}hij{CBM-@}{CBM-O} P
  2824.  
  2825. E{CBM-POUND}{CBM-I}
  2826. {CBM-O}{$7b}{$f8}h
  2827. {CBM-N}{CBM-G}Y1Fp
  2828. P{CBM-G} P{CBM-G}"i~8YVPH{CBM-N}{$e8}H R{CBM-G}pjjjPliw{SHIFT-POUND}
  2829. # owH{CBM-POUND}H{CBM-N}H@{CBM-G}P{CBM-+}{$f0}1P0FP+{CBM-Z}T)I{CBM-+} {CBM-A}{CBM-I}'{$fe} {$fe}H{$fe}{$f0}{$fe}{$fe}@{$fe}H{$fe}J{$e8}{$e6}{$60}{CBM-I}'{$de} {$de}H{$de}{$f0}{$de}{$de}@{$de}H{$de}J{$e8}F{$60}{CBM-Z} G{CBM-Z} XGX{CBM-Z}H{$ef}{CBM-Z}HX{$ef}X{CBM-Z}{$f0}{CBM-Z}{$f0}XY{CBM-Z}'5!{$e1}{$fe}b(5! {$fe}b)5! {$fe}b*5!_~:y_${$ec};q
  2830. ;q use joystick port ={SHIFT-+}{CBM-*}-ca{SHIFT-+}q a{SHIFT-+}${SHIFT-+};_g
  2831. g&y_&y=&y1gggag
  2832. j@gg-q;${$e6}*+[-5x\]x$={SHIFT-+}${SHIFT-+};b{$fe}5!_${$ec};q;qjump #={SHIFT-+}b1P+ca{SHIFT-+}q: readya{SHIFT-+}g+qready={SHIFT-+}=gj7{$e4}z%{$e3}5=g*q; q  hi: ;${SHIFT-+}._%\'
  2833. ${SHIFT--};g${CBM--};${SHIFT-+};eHiy_
  2834. =gjF@@9b&=eI_q;${$ee};${$ed};{SHIFT-@}y
  2835. qdemo=UjJ$Z;qjump/;$U;gA$Uqdemo:f={CBM-U}$U=Zqjump/=U$ZaU_q ;${$ee};${$ed};$Z;q ;jEh{$f4}pkg{$e6}ig{$de}m{$f0}aDp{CBM-L}p{$f7}aTijb{CBM-I}pAipKbqmn{$f4}oi{SHIFT-+}i{$e2}pj{CBM-H}t(nSpp{SHIFT-*}b c#c{$7b}cjcMcf6g{$7d}qldXpeef{$e3}j
  2836. lVfCj{$7c}f]qXfh{CBM-F}qrp{CBM-Z}p{CBM-I}hhiOiii{CBM-G}icj    a{$e6}z(={CBM-*}{$f7}={$e1}{$f6}= )r*%\={CBM-E}=={$e8}g2qlj.xyz=Ug3{CBM-E}::f&z&y!g{CBM-E}:f:f&z&y!r*%\={CBM-E}=={$e8}qjumper.c=Ug3F{CBM-E}:
  2837. :f&z&y!g4g5z{$fe}b%5!{$fe}b&5!z!z!gz!z!z!~{$fe}b5!~{$fe}5!{$fe}b5!z!b{$fe}5!{$fe}b'5!{$fe}b(5!{$fe}b)5!{$fe}b*5!{$fe}b,5!{$fe}b-5!{$fe}b.5!b{CBM-@}{$fc}5!b{CBM-@}{$fc}5!b{$e7}{$fc}5!bK{$fe}5{CBM-Y}?b0-{CBM-Y}b0-
  2838. *+={CBM-Y}_qfile error #=Z{CBM-Y}laZ{CBM-Y}:{CBM-Y}bh79yqnew disk ready?=Z1{CBM-O}{CBM-Y}b>:yqfile not found=Z{CBM-Y}b?:yqreplace old copy?=Z{CBM-Y}bh:yqdisk is full=Z{CBM-Y}:yqdrive ready?=Z1{CBM-O}A_b{$fe}5!z{$fe}5!{$fe}5!q0:=Z$UaZq,p,waZAz$Z{$60}zbA!{CBM-L}bB!b{$f8}b{CBM-S}!{CBM-L}+b{CBM-P}!w3@w2@%ug[A{CBM-Y}3y_{CBM-U}yq-="/={CBM-Z}{CBM-Z}br7y=gb =g{CBM-Z}bf7y=g%\=O'=N{CBM-G}yg*
  2839. <yb#=gb =ggq;{CBM-Q}y g+{$e4}z%{$e3}5=Bt,%\={$e4}'={$e3}
  2840. =gg-={$e8}gb:b:9bs:9bl:9t"+@+@9e.z!gz!z{$fe}5!b{$fe}5!{$fe}5!{CBM-S}
  2841. z%!g/b{$fe}5!b:bs:9ygjb:tP+=PP7y0P=gg!w{$7f}u_z(0{$e4}0{$e3}0P)=_q;={CBM-E}rb?&={CBM-W}${$e9}=Ugy{$fe}5!{$fe}b!5!{$fe}5!z{$fe}b#5!bP{$fe}5!:yb?r&={CBM-R}y&=={CBM-R}{$fe}5!g/q  long jump loading ...;_q;zb{$fb}!
  2842. !
  2843. z%@={CBM-S}E0{CBM-R}0_({CBM-I}r={CBM-A})_f9y_!gzb:y=@y_i!<y_
  2844. =b=1{SHIFT-@}=_g2
  2845. =ggjaq   hes games - by 3-2-1 softwa5!z{$fe}5!{$fe}5!zbC!{CBM-L}bD!Az$U{$60}zb{CBM-O}!gn{CBM-Y}y{CBM-P}=jgo5@={$e1}b{$fe}5!5@= g5@=P{CBM-E}:z&{CBM-U}+{CBM-U}+:f&yz!gpz0{$e4}z0{$e3}=1{CBM-E}:f:f&z&y!jqt0q save: =Zgm{CBM-H}yg
  2846. j0!={$e8}0{CBM-E}({CBM-I}{CBM-I}*+{$e7}{CBM-I}5!){$e1}5! 5!P5!({CBM-I}{CBM-I}*+{$e6}{CBM-I}+5!)gsb{$fe}5!{CBM-Y}b?:etgu
  2847. :by:9e0qs:=T$UaTAq
  2848. {$60}#$T.{SHIFT--}xy{$f0}{$f6}q{$f6}q{CBM-O}{CBM--}x{$e8}{$60}{CBM-H}b
  2849. FEQRBATQb
  2850. {CBM-H}{CBM-W}{CBM-R}{CBM-E}{CBM-U}
  2851.  FEQRBATWb
  2852. b{CBM-Y}{CBM-L}{CBM-J}{CBM-H}{CBM-W}{CBM-R}{CBM-E}{CBM-U}
  2853.  FEQRBU{CBM-@}{CBM-+}{CBM-M}{CBM-POUND}{SHIFT-POUND}{CBM-N}{CBM-Q}{CBM-D}{CBM-Z}jb
  2854. &b{CBM-Y}{CBM-L}{CBM-J}{CBM-H}{CBM-W}{CBM-R}{CBM-E}{CBM-U} ,@{CBM-+}{CBM-M}{CBM-POUND}{SHIFT-POUND}{CBM-N}
  2855. >b{CBM-Y}f@
  2856. @jV{$7f}{$7e}
  2857. 9.0
  2858.  
  2859. .2
  2860. .4
  2861.  
  2862. .6
  2863. .8
  2864.  
  2865. .10
  2866.  
  2867. .12
  2868.  
  2869. .{CBM-X}=Z+oefgq olympic record  mexico city 1968={SHIFT-+}jhq   world record on oct. 18,1968  ={SHIFT-+}jhq    u.s. record on oct. 18,1968  ={SHIFT-+}gi${$ec};q ;$Z;q ;${$ec};q;${SHIFT-+};_${$ec};q)T{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}WXX;${$ec};q)YYUZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZV;_${$ec};q?{CBM-Z}Y?Y{CBM-Z}@G{CBM-Z}@YGY{CBM-Z}H{CBM-Z}HYY{CBM-Z}{CBM-Y}{CBM-Z}Y{CBM-Y}Y{CBM-I}
  2870. o{CBM-X}{CBM-K} {CBM-X}{CBM-K}X X{CBM-X}IH{CBM-X}IXHX{CBM-X}{$f1}{$f0}{CBM-X}{$f1}X{$f0}X{CBM-X}{CBM-X}YY{CBM-X}a@{CBM-X}aY@Y{CBM-X}IH{CBM-X}IYHY{CBM-X}{CBM-X}YY{$e8} '{CBM-M}{$60}Y{CBM-I}
  2871.  ExO Ex{$f7} Ex Exg ExO Ex Ex{CBM-B} Ex{$e7}{CBM-I}
  2872. {CBM-X}{SHIFT-POUND}{CBM-POUND}{CBM-X}QP{CBM-X}{$f9}{$f8}{CBM-X}! {CBM-X}ih{CBM-X}QP{CBM-X}{CBM-X}A{SHIFT-*}{$e8} 'K{$60}{CBM-H}qVyP{CBM-O}
  2873. 9yq       -      ={SHIFT-+}_5w{$e8}5=l=Z$Z\={CBM-H}$Zd[[%x]-5]x$={CBM--}$Z{CBM-H}-[-5x\]x$={SHIFT--}q  ={SHIFT-+}${SHIFT--}a{SHIFT-+}q.a{SHIFT-+}${CBM--}a{SHIFT-+}qE/a{SHIFT-+}'bD*b5=%\ybDz%5=b{$7f}"/="/={CBM-+}{CBM-+}*=%-%-={CBM-+}l=Z$Z\={CBM-H}$Z{CBM-H}-d[[%x]-5]x$={CBM--}${CBM--}a{SHIFT-+}q'a{SHIFT-+}l=Z$Z\={CBM-H}$Z{CBM-H}-d[[%x]-5]x$a{SHIFT-+}'bH*b>5=%\ybHz%5=b{$7f}"/=&yqDa{SHIFT-+}${SHIFT-+}={CBM-M}iClJjejFjElEl{CBM-R}l{$ef}lm;m_m{$7f}mPn[o{CBM-U}n{$fe}t#rCpTpp{CBM-Z}os{$e3}odu{CBM-A}qpprrnrLsxrWr{$eb}r{$7e}s
  2874. t]t?tLttQtYt{$f0}t{$e9}t&u,0{CBM-Z}PaX{CBM-I}({CBM-X}@J{$f8}{CBM--}J{SHIFT-POUND}
  2875.  
  2876. J0{$fa}{SHIFT-POUND}@S[l]{SHIFT-POUND}
  2877. #{CBM--}X{SHIFT-POUND}W{SHIFT-POUND}v{SHIFT-POUND}Px{SHIFT-POUND}P{$60}{CBM-Z}PP{CBM-@}#{CBM-O}h
  2878. P{CBM-O}Zz"P{$e6}#{CBM-O}WzP{SHIFT-*}{$f0}
  2879. lbw{CBM-G}o{$f0} {CBM-+}wliw {$7d}zP  SyP{CBM-G}Fh ~HEF{$f0}{SHIFT-POUND}~
  2880. {CBM--}{CBM-Z}{CBM--}i~{$f0}FF{$e6}
  2881.  {$7f}{$e6}!=:y{$e8}=_1g=i>y=<y=${$e6}*+[-5x\]x$q                  :t{CBM-R}fr{CBM-R}*%\9y_Q{$e8}{$e8}+bL:y_r{CBM-W}*%\fz&y
  2882. !_=gg=gg
  2883. &t9&yi>y=&yi<y=g
  2884. g:j8o;<gg
  2885. jg>g&t&yi>y=&yi<y=g>g
  2886. j=gg-g?_z{$fe}5!b=g{$e1}{$fe}breplace hes disk=Zb{$fe}5!0{SHIFT-@}({CBM-I}q ;${$ee};gq ;$Z;gg)_gB$U\={CBM-H}
  2887. :y_:fb:f&tC{CBM-H}eA$U{CBM-H}-[%x\]x$=Uq ;jA3:9b{$60}79tA$SaUi{CBM-H}$S;{CBM-H}<tA_0{CBM-C}q ={SHIFT--}qB={CBM--}gzy${SHIFT--};_i{CBM-I}{CBM-I}3tD{CBM-C}-={CBM-C}0{CBM-I}{CBM-C}y${CBM--};jD${SHIFT--};jD0{CBM-C}qy={SHIFT--}qC={CBM--}gD
  2888. :y_$S;jq ;jD${SHIFT-+}\={CBM-H}${$ee}{CBM-H}[%x\]x$={SHIFT--}${$ed}{CBM-H}[%x\]x$={CBM--}${CBM--};bl:ygjy{CBM-P}=ggb:yggg$gjb8!bt!~!z!br!z{$fe}b+5!b{$fe}5!=j{CBM-+}-!({CBM-A}{$f8}u)@-~&!_q         gre     tri             ={$e7}${$ee}b$[%x\]x$={$e6}q$demosthenhes (gre)                  a{$e6}q6d. jumpman (tri)                                      a{$e6}q              re ={SHIFT-+}q  event #3: long jump          =Zjh?c=S_b{$fe}5!z{$fe}5!Az$U{$60}b{CBM-O}!zb{CBM-P}!{$fe}5!zb!w1@w0@%5uqm-r=R{$e8}caRg[Aj\Aq
  2889. {$60}g^q
  2890. =Z0{CBM-O}{CBM-Y}7t_{CBM-E}:e{$60}Aq#{$60}q
  2891. {$60}${$ea}=Zq1 14aZ#$Z.q
  2892. .g^{CBM-Y}={$e8}{CBM-Y}-:{CBM-U}:y
  2893. ${$ee}=Zb?r&={CBM-R}$R=ZzcaZ#$Z.q
  2894. .?={$e8}${$ee}=Zbr+:f{CBM-U}:y{CBM-U}+{CBM-U}+i0{CBM-Y}Aj{$60}?q
  2895. .jr{CBM-O}e0gu
  2896. :by:9trj0bl={CBM-*}f{$fb}b05@~:&y1{SHIFT-@}j{CBM-*}{$fb}w05@~:&y1{SHIFT-@}j{SHIFT-@}ygv0{SHIFT-@}g
  2897. qinstant={SHIFT-+}yqclassic={SHIFT-+}${$ec};q;q replaya{SHIFT-+}g+yq;=g0=j({CBM-I}{CBM-I}*+{CBM-I}5@={$e7})_({CBM-I}{CBM-I}*+{CBM-I}+5@={$e6})_~({CBM-F})_z!z!_=z!@3txD_+@+@9t
  2898. z!z!0_~{$fb}b05!~{$fb}w05!_w{$7f}uw{$7f}!b{$7f}z%u_w{$7f}u_w{$7f}
  2899.  
  2900.  
  2901. 5R{CBM-T}{CBM-R}{CBM-B}{SHIFT-POUND}~{CBM-POUND}
  2902. {CBM--}{CBM-Z}
  2903. {CBM--}i~
  2904. {$f0}H{CBM-Z}{CBM--}i~{$f0}HH{$60}{SHIFT-POUND}MPP{$fb}{CBM-I}{CBM-G}{$f0}F"Ekk{$e6}"{CBM-G}FEll{$e6}JP{SHIFT--}{CBM-G}"E
  2905. {SHIFT-POUND}
  2906. {CBM-G}mEI{$e9}FiP{$f6}m{CBM-G}iI{CBM-A})i{$e6}o{CBM-G}nEEI{$e9}Fj{$e6} P{$f4}{$e6}!P{$f0}n{CBM-G}jI{CBM-A})j [x{$60}i{CBM-O}{$fa}{CBM-G}{$fc}){$f0}I{SHIFT-*}{$f0}{SHIFT-POUND}D{$fc} 0{$fb}{CBM-I}~${CBM-G}P{$60}{CBM-I}{CBM-H}0!{$ea}{$ea}{$ea}{$ea}{$ea}0b{CBM-E}{$fb}$$
  2907. jjjjf{$ea}l z)f{$ea}{$ea}l z{SHIFT-POUND}~
  2908. {CBM--}{CBM-X}
  2909. {CBM--}i;({CBM-I}$Q;$Q;q;)q ;q777666;_${$ec};q;({CBM-I}$Q;q;)_b:tr*%\={CBM-E}${$e7}*+[-5x\]x$=U={CBM-H}$Ud[[%x]-5]x$q :y$U{CBM-H}[%x\]x$=Ui4jjb{SHIFT-*}={CBM-L}{CBM-*}ybD={CBM-L}{CBM-L}z%==bs:{CBM-G}f&tkbl:eq load: =Zgm{CBM-H}yg
  2910. j={CBM-P}0z{CBM-P}{CBM-*}={CBM-*}z{CBM-*}+=b{$fe}
  2911. R60,93,32,32
  2912.  
  2913. 109,64,64,64,125,109,64,113
  2914. *64,125,109,64,64,64,64,125
  2915. j"109,64,64,64,64,125,32,109
  2916. J,64,125,32,32,109,64,125,32
  2917. 6109,64,64,64,64,125,32,32
  2918. {CBM-G}Pw{CBM-R}1{CBM-@}2000:{CBM-K}a$:a${CBM-R}""{CBM-M}w
  2919. {CBM-Q}{$e4}
  2920.  
  2921.  
  2922. ,93,160,160
  2923.  {CBM-H}160,93,93,254,160,236,32,115
  2924.  hes games demo boot
  2925. ?
  2926.  copyright 3-2-1 software 1984
  2927. i
  2928. a{CBM-R}a{CBM-N}1
  2929. {$60}
  2930.  
  2931.  a{CBM-R}2 {CBM-M}  "sg",8,1
  2932. W
  2933.  a{CBM-R}3 {CBM-M}  "sc",8,1
  2934.  
  2935.  a{CBM-R}4 {CBM-M} K
  2936. D
  2937.  
  2938. DN
  2939.  32534,96: 32512,96: 32515,96: 32518,96: 5632,0
  2940. NX
  2941. ""
  2942. {$e6}
  2943.  53280,5: 53281,7
  2944.  
  2945. "0,160,93,32,32
  2946. X93,160,32,32,115,93,160,32
  2947. 2160,93,107,32,254,160,236,93
  2948. v109,110,160,98,112,125,109,110
  2949. {$7b}160,112,125,109,110,160,112,125
  2950.  109,110,160,98,112,125,32,32
  2951. {CBM-V}{CBM-N}93,160,32,251,93,93,160,160
  2952.  {CBM-H}160,93,93,254,160,236,32,115
  2953. {$e3}";: 100
  2954.  
  2955. ""
  2956. + 
  2957. s${CBM-R}"lO"{CBM-N}G(34){CBM-N}"vm"{CBM-N}G(34){CBM-N}",8:"{CBM-N}G(131)
  2958. u!
  2959. i{CBM-R}1{CBM-@}C(s$):630{CBM-N}i,F(J(s$,i))::198,i
  2960. C"
  2961. 36879,24
  2962. {$7d}#
  2963. "reloading menu":
  2964. D
  2965. i{CBM-R}1{CBM-@}6000:{CBM-K}a$:a${CBM-W}{CBM-E}""{CBM-M}i{CBM-R}6000
  2966. {CBM-+}E
  2967. :
  2968. GH
  2969. i{CBM-R}1{CBM-@}2000:{CBM-K}a$:a${CBM-W}{CBM-E}""{CBM-M}i{CBM-R}2000
  2970. OI
  2971. :
  2972.  
  2973.  
  2974. :200::
  2975. 1
  2976. "provides sp32
  2977. X127,98,32,32,32,32,32,32
  2978. ){$e2}251,160,160,32,251,160,236,32
  2979. i{$ec}160,32,32,160,32,160,32,32
  2980. J{$f6}32,251,160,236,32,32,160,32
  2981.  
  2982. 32,160,160,32,160,32,32,32
  2983. {CBM-POUND}
  2984. 98,255,32,32,32,32,32,32
  2985. H112,64,64,64,110,112,64,64
  2986. {$e8}64,110,112,64,64,64,64copy        ";
  2987. <
  2988. H
  2989.  "to play:run by moving the joystick back"
  2990. L
  2991. J
  2992.  "  and forth;( left and right ).  run as"
  2993.  
  2994. L
  2995.  "  fast as you can.  at the board,  push"
  2996. K
  2997. N
  2998. "  the stick up to jump.  hold the stick"
  2999. {$f8}
  3000. O
  3001. "  to the right for a forward landing."
  3002. (2,32,32,32,32,32,32,32
  3003. b32,32,32,32,32,32,32,32
  3004. @l254,160,160,32,254,160,252,32
  3005. Bv252,32,32,254,32,160,160,252
  3006. {$60}32,160,32,160,32,160,160,160
  3007. {CBM-G}J32,160,160,32,160,32,160,32
  3008. BT32,32,32,32,32,32,32,32
  3009. {$e2}{$7e}160,32,32,32,160,32,160,32
  3010. Y
  3011.  "    W springboard diving"
  3012. 9Z
  3013.  "    W two hand snatch and"
  3014. J{SHIFT-+}
  3015.  "      clean & jerk weightlifting events"
  3016. {CBM--}
  3017.  "W 1-6 players can choose their country,"
  3018. I{$de}
  3019.  "  shirt color, sock color & their name.
  3020. {$f9}{CBM-*}
  3021.  "W displays u.s., olympic, world recor
  3022.  "lj.md",8,1
  3023.  
  3024.  
  3025. gboard diving"
  3026. 9Z
  3027.  "    W two hand snatch and"
  3028. J{SHIFT-+}
  3029.  "      clean & jerk weightlifting events"
  3030. {CBM--}
  3031.  "W 1-6 players can choose their country,"
  3032. I{$de}
  3033.  "  shirt color, sock color & their name.
  3034. {$f9}{CBM-*}
  3035.  "W displays u.s., olympic, world recor
  3036. @l0vluvl{$f3}y
  3037. ~
  3038.  
  3039.  
  3040.  
  3041.  
  3042.  
  3043. p
  3044.  
  3045.  
  3046.  
  3047.  
  3048.  
  3049.  
  3050. ?{CBM-H}?{$e5}?{CBM-J}axu.vNN{$f8}~
  3051.  
  3052.  
  3053. "{$fc}C2 {CBM-+}KECra {$7b}V
  3054. MQhd<4,{$fc}{$f4}{$ec}L;
  3055. {CBM-D}{CBM-T}{$7f}Ha{$fb}{$f4}{$ed}{$e5}{SHIFT--}{$e2}
  3056. {$f8}{$e8}
  3057.          
  3058.  
  3059.  
  3060.  
  3061.  
  3062.  
  3063.  
  3064.  
  3065.  
  3066.  
  3067.  
  3068.  
  3069.  
  3070.  
  3071.  
  3072.  
  3073.  
  3074. @@{$fc}{SHIFT-*}P* {CBM-@}{CBM-@}022((/ #&&
  3075.  
  3076.  
  3077.  
  3078.  
  3079.  
  3080.  
  3081. 66:<<<
  3082. {$f6}{$f8}
  3083.  
  3084.  
  3085. z+!g10g
  3086. g{CBM-*}+=+{CBM-*}-=g
  3087. @@9&t~:ybD=gjgbl:tb:tb:y=ggjb:yggj@&yg=g@&egggr*%\={CBM-*}+!z!Dz!==0=0 
  3088. ={CBM-K}z==b$({CBM-I}5={CBM-I}Y={CBM-I}Y-!::9yb'-=g!2~&=!!{$f8}u@&y+b?&=i:y=i{CBM-K}z!{CBM-K}>yi{CBM-@}{CBM-@}{CBM-@}{CBM-@}{CBM-@}{CBM-@}{CBM-@}{CBM-@}{CBM-@}{CBM-@}{CBM-@}{CBM-@}{CBM-@}{CBM-@}{CBM-@}{CBM-@}{CBM-@}{CBM-@}{CBM-@}{CBM-@}{CBM-@}{CBM-@}"
  3089. k 
  3090. "  hesgames/long jump  ";
  3091. {CBM-H}
  3092.  "            programmed by 3-2-1 software inc."
  3093. {CBM-N}{CBM-V}
  3094.  "           copyright 1984 hes"
  3095. {CBM-F}C
  3096. t{CBM-R}1{CBM-@}2000:t
  3097. LD
  3098. poke53280,0
  3099. VE
  3100. "";
  3101.  
  3102. F
  3103.  " hesgames/longjump : please 
  3104.  
  3105. {CBM-V}112,125,160,226,109,110,32,93
  3106. "H160,93,32,96,93,160,93,32
  3107. eR112,125,160,226,109,110,32,32
  3108. F{CBM--}93,251,160,236,93,93,160,32
  3109. {$e6}160,93,93,160,160,160,160,93
  3110. {SHIFT-POUND}{$f0}93,254,224,160,160,93,32,93
  3111. H{$fa}160,93,32,96,93,160,93,32
  3112. {$e9}93,254,160,160,1g={CBM-+}
  3113. >yg#={CBM-+}>yg#g$={CBM-+}>yg#={CBM-+}>yg#={CBM-+}>yg#={CBM-+}:>9yg#={CBM-+}z>yg#z!={CBM-+}g#{$f8}u
  3114. <y@-~&!@t%=g&@&e'@b+={CBM-M}@-={CBM-POUND}{CBM-POUND}-~&={SHIFT-POUND}{CBM-M}bh+{$fe}5!{CBM-M}bX+{$fe}5!{SHIFT-POUND}{$fe}
  3115. 5!{SHIFT-POUND}{$fe}5!b_{$fe}5!!
  3116. =g{CBM-M}b{CBM-POUND}-{CBM-POUND}-+={CBM-N}{CBM-N}{$fe}
  3117. 5!{CBM-G}+{CBM-G}+z({CBM-I}{CBM-POUND}{CBM-I}{$f4}+!{CBM-M}{CBM-I}{$f5}+!{CBM-I}+!{CBM-I}:yb{CBM-*}{$fe}5!=g&{CBM-I}:{CBM-G}f&y
  3118. ~{$fe}5!=g&{CBM-I}:y,110
  3119. (112,64,64,64,64,110,112,64
  3120. (264,64,110,112,64,64,64,110
  3121. g<112,64,64,64,64,110,32,32
  3122. If93,254,160,252,93,93,254,160
  3123. p252,93,93,160,160,160,160,93
  3124. {CBM-Z}z93,251,160,160,160,93,93,224
  3125. OD160,160,93,93,160,160,160,93
  3126. {$f0}N93,251,160,16P
  3127.  "        {CBM-@}{CBM-@}               {CBM-@}{CBM-@}{CBM-@}{CBM-@}{CBM-@}{CBM-@}{CBM-@}{CBM-@}{CBM-@}{CBM-@}{CBM-@}{CBM-@}{CBM-@}{CBM-@}"
  3128. \Q
  3129.  "W press f1 for a demo or instant replay"
  3130. XR
  3131.  "         {CBM-@}{CBM-@}{CBM-@}{CBM-@}{CBM-@}{CBM-@}{CBM-@}{CBM-@}  "
  3132. {CBM-T}T
  3133.  "the full hesgames also features:"
  3134. {SHIFT-*}U
  3135.  "    W 100 meter dash"
  3136.  V
  3137.  "    W 110 meter hurdles"
  3138. {$f6}X
  3139.  "    W archery"
  3140. 160,252,254,160,32,160,32,160
  3141. %32,160,32,160,32,32,160,32
  3142. e32,160,98,32,160,32,255,32
  3143. D{CBM-+}255,127,32,32,32,32,32,32
  3144. {CBM-A}160,32,32,32,160,32,160,32
  3145. {CBM-POUND}{SHIFT-@}160,251,236,160,32,160,160,236
  3146. HD32,160,32,160,32,32,160,32
  3147. {$e8}N32,160,226,32,226,32,32,ds"
  3148. +
  3149.  
  3150.  "W save your great performances and show"
  3151. q
  3152. {$e2}
  3153.  "  them to your friends later!"
  3154. Z
  3155. {$e4}
  3156.  "       {CBM-@}{CBM-@}{CBM-@}{CBM-@}{CBM-@}{CBM-@}{CBM-@}{CBM-@}{CBM-@}{CBM-@}{CBM-@}{CBM-@}{CBM-@}{CBM-@}{CBM-@}{CBM-@}{CBM-@}{CBM-@}{CBM-@}{CBM-@}{CBM-@}{CBM-@}{CBM-@}{CBM-@}{CBM-@}"
  3157. {CBM-G}
  3158. {$e6}
  3159.  "       get coupon at your dealer";
  3160. {CBM-E}
  3161. {$fa}
  3162. 198,10
  3163. V
  3164.  147,83,89,83,49,54,51,56,52,13
  3165. {$f0}
  3166. i{CBM-R}1{CBM-@}10:x:630{CBM-N}i,x:
  3167. {$fe}b+5!{CBM-POUND}{CBM-I}{$f4}+!{CBM-I}{$f3}=g)0{CBM-Q}j(@-={CBM-M}@+={CBM-POUND}{CBM-POUND}-~&={SHIFT-POUND}{CBM-M}bd+{$fe}5!{CBM-M}bT+{$fe}5!{SHIFT-POUND}{$fe}
  3168. 5!{SHIFT-POUND}{$fe}5!b{$fe}5!!
  3169. =g{CBM-M}b{CBM-POUND}-{CBM-POUND}-+={CBM-N}{CBM-N}{$fe}
  3170. 5!z({CBM-I}{CBM-POUND}{CBM-I}{$f1}+!{CBM-M}{CBM-I}{$f2}+!{CBM-I}{$f0}-!{CBM-I}:yb{CBM-*}{$fe}5!=gz!{CBM-I}:{CBM-G}f&y
  3171. ~{$fe}5!=g{CBM-I}{$ef}=g)1{CBM-Q}z!z+!+@={CBM-D}q   bad jump   ={SHIFT-+}
  3172. <y1{CBM-G}qlunar gravity!={SHIFT-+}{CBM-D}<y1{CBM-G}{CBM-G}yz=j){CBM-D}-z%@5{CBM-N}5=b!%
  3173. C
  3174. C
  3175.  {$e4}{$e2}{$e4}{$ea}{$fa}{$fc}
  3176. C
  3177. f
  3178. &                                      &#u1:3 0 3ljpath.c=zb!=g===0gqBBBBBBBBBBBBBBBBB=Qg{$f9}ugg=gg0=z!
  3179. {CBM-I}7yi@&y={CBM-I}j/=+@z%@5=Bt)0{CBM-T}{$f8}ui{CBM-T}@&t{CBM-T}3tz!z+!!b0b%({CBM-I}{CBM-I}Y-!@
  3180. /+~&!@b{$e1}7y={CBM-I}{$f8}ui{CBM-@}{CBM-@}bp3t bpi$)z{$fe}5!bH=gj"*"/{CBM-T}5=7={CBM-G}{CBM-G}yb-=
  3181. <>&y=@d+/!@b!7yb!!*'!~!b=g={CBM-+}g#={CBM-+}g#
  3182. ={CBM-+}:>9yg#={CBM-+}>yg#={CBM-+}>y
  3183. g#{CBM-G}y~!=
  3184.  
  3185. X{CBM-A}{$f0}{$f0}{$f0}{CBM-*}{CBM-A}{$f0}{$f0}{$f0}{$f0}{$f0}{$f0}{$f0}~{$f0}{CBM-A} 
  3186. ~
  3187.   
  3188. ~{$f0}{$60}{$f0}{$f0}{$ef}
  3189.  
  3190. {$f0}{CBM-B}{CBM-A}{CBM-P}
  3191. {$f0}{$f0}~{$f0}
  3192. {CBM-A} {CBM-P}{CBM-A}{CBM-A}~{CBM-A}{$60}
  3193. {$f0}{$f0}~
  3194.  {$ef}  {$f0} {$f0}
  3195. {$f0}
  3196. {$f0}~ {$f0}/~{CBM-P}{CBM-B}{$f0}{$f0}~ {SHIFT-*}~~{$f0} {CBM-A}p{$f0}~{$60} {SHIFT-*}
  3197. O  {$f0}{$60}
  3198. ~{$f0}{CBM-A}~{CBM-B}{$f0}P{CBM-P}O{$f0}~ {$f0}{$f0}{$f0}{$f0} {$f0}P{$f0}{CBM-P}{$60}~ ~{$f0}~ {$f0}~{CBM-P} {CBM-A}{CBM-A}{SHIFT-*}~{$f0}{$f0}{CBM-P}{CBM-P}P{SHIFT-*}{$f0}
  3199. ~{SHIFT-*}{CBM-*}P{$f0}{SHIFT-*}{$60}{$f0} {SHIFT-*} {CBM-A} {$60}{$f0}{$f0}P{$f0}{CBM-A}
  3200.  
  3201. {$f0}
  3202. {SHIFT-*}{CBM-A}
  3203.  {$60}{$f0}
  3204. {$f0}{$f0}  {SHIFT-*}{$f0}{$f0}f{$f6}{$f6}{$f6}{$f6}V{$f6}{$f6}{CBM-L}{$f6}{$f6}{$f6}{$f6}{CBM-+}{CBM-L}fVf{$f6}{CBM-+}{$f6}V{$f6}{$f6}{$f6}{CBM-+}{$f6}{$f6}F{CBM-L}F{$f6}{$f6}{$f6}{$f6}{$f6}{$f6}V&{CBM-L}
  3205. L    L   {$7b}       {$e1}  {$7b}  A{$e1}     A          {$ec}    {$ec} {$fb}        {$e1}     A{$e1}    A   B       {$fc}    {$fc} {$fe}   {$7c} {$7e}  {$e1} {$e2}{$7e}  {$fc}{$fe}    A   X   {$e2}  {$7c}    {$7c}   {$7e}   {$60}   {$e1}    {$7c}  {$7e}   A          @@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@t  
  3206.   
  3207. , -,                get up to 30 new programs and games for less than 15 cents each - every month incompute!  subscribe now and save up to  40% off the newsstand price on compute!                                         t     compute!  
  3208.  
  3209. "";:53280,15:53281,15
  3210. g
  3211.  
  3212. i{CBM-R}0{CBM-@}479:a:1024{CBM-N}i,a:55296{CBM-N}i,0:
  3213. {$7e}
  3214. "HERE'S HOW TO GET MORE FROM YOUR 64
  3215. {CBM-L}
  3216. "{CBM-A}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{CBM-S}
  3217.  (
  3218. "{SHIFT--}* More Fun: with such new game  {SHIFT--}"
  3219. 2
  3220. "{SHIFT--}  excitement as Martia{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{CBM-S}
  3221. c
  3222. N
  3223. "{SHIFT--}* More Challenge: Ready to      {SHIFT--}
  3224. L
  3225. X
  3226. "{SHIFT--}  tackle more advanced projects?{SHIFT--}
  3227.  
  3228.  
  3229. "{SHIFT--}  In COMPUTE!'s Gazette, you'll {SHIFT--}
  3230. {CBM-V}
  3231.  
  3232. "{SHIFT--}  learn How to Use Tape and Disk{SHIFT--}
  3233. {$e7}
  3234.  
  3235. "{SHIFT--}  Files, How To Program The     {SHIFT--}
  3236.  
  3237. "{SHIFT--}  Function     on the"
  3238. :
  3239. a${CBM-R}"   ":a$"{SHIFT-POUND}  {CBM-*}":a$"  ":a$" ":a$" "
  3240. P
  3241. "{CBM-*}{CBM-*}{SHIFT-POUND}{SHIFT-POUND}   ":"{CBM-*}{SHIFT-POUND} {CBM-*}  {SHIFT-POUND}"
  3242. {SHIFT-@}
  3243. "a step-by-step guide  to writing fast-actionarcade games in basic"
  3244. {$de}
  3245. "on the vic computer";:200::
  3246. 1
  3247. "provides sp
  3248. !Y
  3249. "{SHIFT--} *More Programs:from 64 Searcher{SHIFT--}
  3250. j{CBM--}
  3251. "{SHIFT--} to VIC/64 Program Lifesaver;   {SHIFT--}
  3252. S{$e6}
  3253. "{SHIFT--} from Quickfind to Disk Menu &  {SHIFT--}
  3254. {$f0}
  3255. "{SHIFT--} Automatic Proofreader and more.{SHIFT--}
  3256. E{$fa}
  3257. "{CBM-Z}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{CBM-X}
  3258. P~
  3259. i{CBM-R}1{CBM-@}5
  3260. {$fa}"                               ters, modems, and disk    {SHIFT--}
  3261. 8t"{SHIFT--}  drives.                       {SHIFT--}
  3262. C^"{CBM-Z}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{CBM-X}";
  3263. MH2000
  3264. {CBM-G}R"{CBM-A}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{CBM-S}
  3265. N{$7c}"{SHIFT--}SUBSCRIBE NOW TO COMPUTE'S      {SHIFT--}
  3266. {$f7}"{SHIFT--}GAZETTE AND START RECEIVING 
  3267. {$f1}{$f4}{$f4}{$f4}{CBM-H}{$f4}DD{$f4}{$f4}${CBM-H}{CBM-@}{$f4}{$f4}{$f4}{$f4}{$f4}{$f4}{$f4}{$f4}{$f4}{$f4}{$f4}{$f4}D{$f4}D{$f6}f{$f6}{$e6}{$f6}{$f6}{CBM-+}{CBM-I}R{$e2}{CBM-I}{CBM-R}{$e2}{$f2}{$f2}{$f2}{$f2}{$e2}{$e4}D{$f4}{CBM-H}{$f4}d{$f4}D{CBM-@}$D{$f4}{CBM-@}{$f4}{$f4}T{CBM-A}{CBM-A}p{$f0}{$f0}
  3268.  {$f0}{SHIFT-*}@{$f0}
  3269.  {$f0}{$f0}
  3270.  {$f0}@@{$f0}{$f0}{$f0}{$f0}
  3271. {$f0}{$f0}{$60}{CBM-A} {SHIFT-*}
  3272. {$f0}E{SHIFT-*}
  3273. {$f0}{$f0} 
  3274. {CBM-A} {$f0}{SHIFT-*}
  3275. {$f0}{$f0}{$f0}{$f0} {$f0}
  3276. {$f0} {$f0} {$f0} {$f0}{$f0}{$f0}{$f0}{$f0}P{CBM-A}{CBM-A}{SHIFT-*}{$f0}{$f0}{$f0}{$f0}{SHIFT-*}{CBM-A}{CBM-A} {CBM-A} {$f0}{CBM-A}{$f0}{$f0}{$f0} {$f0} {$f0} {$f0}{$f0}0{$60}{$f0}{$f0}{$f0} {SHIFT-*}P{$f0}{$60}{CBM-B}~
  3277. {$f0}{$f0}{$f0}{$f0}{$f0}p
  3278.  
  3279. {$f0}{CBM-A}{SHIFT-*}PP{$f0}{$f0}{$f0}{$f0}{$f0}{$60}{$f0}{$f0}{$f0}{$f0}{CBM-A}~o~~~~~~{CBM-P}~~~~~~{CBM-B}{CBM-*}{CBM-*}{CBM-B}O~2000:2000
  3280. 3L"{CBM-A}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{CBM-S}
  3281. \V"{SHIFT--}1 yr.(12 issues)-$24.00-Save $11{SHIFT--}
  3282.  "{SHIFT--}2 yr.(24 issues)-$45.00-Save $25{SHIFT--}
  3283. {CBM-S}{$ea}"{SHIFT--}3 yr.(36 issues)-$65.00-Save $41{SHIFT--}
  3284. W{$f4}"{SHIFT--}Single Sample Issue  $4.00      {SHIFT--}
  3285. {$fe}"{CBM-Z}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}F{$f6}{$f6}{CBM-+}{$f6}{$f6}{$f6}{$f6}{CBM-L}&{$f6}{$f6}{$f6}{$f6}{$f6}{$f6}&FV{$f6}{$f6}{$f6}{$f6}{$f6}{$f6}{CBM-+}{$f6}F{$f6}F{$e6}Ff{CBM-+}{$f6}{$f6}{$f6}{$f6}{CBM-+}6{$f6}{$f6}{$f6}{$f6}{$f6}{CBM-L}{$f6}{$f6}{CBM-+}F&FF{CBM-+}&{$f6}{$f6}{$f6}{$f6}{CBM-+}6{CBM-L}F{CBM-+}{$f6}{$f6}{$f6}{$f6}{CBM-+}{CBM-L}{$f6}{$f6}{$f6}ff{$f6}{$f6}VFf{$f6}F{$f6}{$f6}{$f6}{$f6}{$f6}{$f6}F{$f6}FV{$f6}{CBM-L}{CBM-L}{CBM-L}{$f6}F{$f6}{CBM-L}F{CBM-+}F{CBM-+}{$f6}{$f6}F{$f6}V{$f6}V{$f6}{CBM-+}V{CBM-+}{$f6}{$f6}{CBM-L}{$e6}F{$f6}{CBM-L}{CBM-+}{$f6}{$e6}{CBM-L}{$f6}{$f6}&{$f6}{$f6}{$f6}6{$f6}{CBM-+}{$f6}{$f6}&{$f6}F{$f6}{$f6}{CBM-L}{CBM-L}{$f6}{CBM-L}F{$f6}{$f6}{$f6}V{$f6}{$f6}{$f6}{$f6}VF{$f6}{$f6}{$f6}{$f6}{$f6}{$f6}{$f6}{$f6}{$f6}F{$e6}f{CBM-L}{$f6}{$f6}{$f6}&~{CBM-*}o~~~~~{CBM-P}~~o~{CBM-B}O~~~~~{CBM-B}{CBM-*}{CBM-*}{CBM-B}O~ 
  3286.   
  3287.           
  3288. -     c
  3289.  
  3290.  vic-20 & 64, a, a, ti-99/4a, r s c c
  3291. , ibm pc  pc
  3292. .                                  
  3293. {$f1}    
  3294.  ,  toll-  free 800-334-0868 (n.c. 919-275-9809)   1 y (12 )    $24.00 (32% )  2 y (24 )    $45.00 (36% )  3 y (36 )    $65.00 (40% )  s s
  3295.  i   $ 4.00                          n Prison- {SHIFT--}
  3296. 2<
  3297. "{SHIFT--}  er, The Viper, Sky Diver,     {SHIFT--}
  3298. [f
  3299. "{SHIFT--}  Snake Escape, and Demon Star  {SHIFT--}
  3300. p
  3301. "{CBM-Z}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{CBM-X}
  3302. {CBM-S}u
  3303. "                                  "
  3304. Xw
  3305. "                                  "
  3306. {$e2}z
  3307. 2000
  3308.  
  3309. D
  3310. "{CBM-A}{SHIFT-*}{SHIFT-*}{SHIFT-*}Keys.  Writing Trans-{SHIFT--}
  3311. 9{CBM-N}
  3312. "{SHIFT--}  portable BASIC.  New Ways to  {SHIFT--}
  3313. B{CBM-H}
  3314. "{SHIFT--}  Enliven With Sound.  How to   {SHIFT--}
  3315. {CBM-V}
  3316. "{SHIFT--}  Use Machine Language.         {SHIFT--}
  3317. {CBM-L}H
  3318. "{CBM-Z}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{CBM-X}";
  3319. {SHIFT-*}R
  3320. 2000
  3321. {$f8}W
  3322. "{CBM-A}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{CBM-S}ecific     approaches to:":"-animation":"-collision checks"
  3323.  
  3324. "-custom characters":"-using screen and":"  color memory":"  and much more"
  3325. J
  3326. "includes four ready-  to-run games and many game utilities"
  3327. {$f8}
  3328. "isbn 0-942386-25-6":" $12.95   "
  3329.  
  3330.  
  3331.  
  3332.  
  3333.  
  3334. 2000
  3335. b
  3336. "{CBM-A}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{CBM-S}
  3337. K
  3338. ""{SHIFT--}* More Buying Guidance: You'll  {SHIFT--}
  3339.  
  3340. ,"{SHIFT--}  profit from comprehensive     {SHIFT--}
  3341. {CBM-X}
  3342. 6"{SHIFT--}  reviews of everything from    {SHIFT--}
  3343. {$e6}
  3344. @"{SHIFT--}  games to word processors to   {SHIFT--}
  3345. j"{SHIFT--}  prin    {SHIFT--}
  3346.  "{SHIFT--}EVERY INFORMATION-PACKED ISSUE! {SHIFT--}
  3347. i"{SHIFT--}To order your subscription or a {SHIFT--}
  3348. R{CBM-@}"{SHIFT--}sample issue, call TOLL-FREE    {SHIFT--}
  3349. {CBM-S}"{SHIFT--}800-334-0868 (in N.C. call      {SHIFT--}
  3350. D{CBM-U}"{SHIFT--}919-275-9809.)                  {SHIFT--}
  3351. {$fb}B"{CBM-Z}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{CBM-X}";:,160,153,143
  3352. {$f2}149,160,132,143,142,167,148,160
  3353. b{$fc}129,140,146,133,129,132,153,160
  3354. G147,149,130,147,131,146,137,130
  3355. 133,160,148,143,160,160,160,160
  3356. {SHIFT-POUND}32,32,32,32,32,32,32,32
  3357. F$32,32,32,32,32,32,32,32
  3358. {$e3}.32,32,32,32,32,32,32,32
  3359.  
  3360. 83{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{CBM-X}"
  3361. ;i{CBM-R}1{CBM-@}3:"                                   "::2000
  3362. d""
  3363. Ns${CBM-R}"lO"{CBM-N}G(34){CBM-N}"mn"{CBM-N}G(34){CBM-N}",8:"{CBM-N}G(131)
  3364. i{CBM-R}1{CBM-@}C(s$):630{CBM-N}i,F(J(s$,i))::198,i
  3365. {CBM-A}53281,14:53280,14
  3366. S"reloading menu program":
  3367. {$f8}{$e8}160,160,160,201,134~~~{CBM-*}{CBM-P}O{CBM-B}~{CBM-B}~OO{$f8}{$f8}{$f8}{$f8}{$f8}{CBM-POUND}X{$f8}{CBM-POUND}H{$f8}H(X{CBM-POUND}{$f8}{$e8}({$f8}{$f8}{$f8}{$f8}{CBM-POUND}H{$f8}H{$f8}{$f8}{$f8}{$f8}{$f8}{$f8}{CBM-POUND}{CBM-U}{$f8}X{$f8}H{$f8}{$f8}(HHH({$f8}h{$f8}{$f8}{$f8}h{CBM-POUND}X{$f8}X{$f8}{CBM-POUND}{CBM-POUND}{$f8}{$f8}{$f8}{$f8}{$f8}X8{$f8}{CBM-U}{CBM-U}H{$f8}{$f8}{$f8}H{$f8}H{$f5}{CBM-G}{$f5}%{$f5}{$f5}{CBM-G}E{CBM-G}{$f5}{$f5}{CBM-J}{CBM-J}{$f5}{$f5}{$f5}{$f5}{$f5}EE{CBM-J}{CBM-G}e{$f5}{$f5}{$f5}e%{$f5}{CBM-G}{CBM-J}E5EE{$f5}{$f5}{$f5}{$f5}{$f5}{CBM-J}{$f5}{CBM-G}{$f5}{$f5}{$e5}{$f5}{$f5}{$f5} {$f0}{$f0}{CBM-A}
  3368.  {$f0}~~~~/~{$ef}{CBM-B}{CBM-P}Oo{CBM-P}~{CBM-B}{CBM-B}{CBM-B}~{CBM-*}~~{$ef}~~~~~{CBM-*}~{CBM-P}O{CBM-B}{CBM-P}{CBM-B}~{$f4}{$f4}{$f4}{$f4}D{$f4}{$f4}D{CBM-@}{$f4}{$f4}{$f4}T{$f4}d{$f4}d{$f4}{$f4}{CBM-@}{CBM-@}{CBM-@}D{CBM-@}{$f4}{$f4}D{$f4}
  3369.  
  3370. D
  3371. f${CBM-R}"vm"
  3372. 4E
  3373.  65517: B(781){CBM-R}40 {CBM-M} f${CBM-R}"mn":210
  3374. lN
  3375. 36879,24:36865,24
  3376. RO
  3377. "load";G(34);f$;G(34);",8"
  3378. {CBM-Z}S
  3379. "       loading":"  table of contents"
  3380. MT
  3381. "  one moment please"
  3382. {$e6}
  3383. a${CBM-R}G(13){CBM-N}"run"{CBM-N}G(13)
  3384.  
  3385. i{CBM-R}1{CBM-@}C(a$):630{CBM-N}i,F
  3386.  
  3387. 36879,25:G(14);
  3388. 8D
  3389. "       COMPUTE!       "
  3390. rN
  3391. "GET UP TO 30 NEW
  3392. KX
  3393. "PROGRAMS AND GAMES
  3394.  
  3395. "FOR LESS THAN 15 CENTSEACH --
  3396. {CBM-@}
  3397. "EVERY MONTH IN
  3398. {CBM-W}
  3399. "COMPUTE!
  3400. {$e6} 
  3401. "To order your sub-    scription to COMPUTE!
  3402. {CBM-N}
  3403. "or to order a samal computing
  3404. ; "provides intermediate and advanced coverage
  3405. {$7e} "for a wide range of affordable personal computers including
  3406. {SHIFT-*} "the Commodore VIC-20 and 64, Atari, Apple, TI-99/4A, Radio
  3407. {$ef}" "Shack Color Computer, IBM PC and PCjr."
  3408. ' ". .
  3409. r"
  3410. %Hi${CBM-R}"run":i{CBM-R}1{CBM-@}C(i$):631{CBM-N}i,F(J(i$,i)):
  3411. fR198,i{CBM-N}1:631,13:631{CBM-N}i,13:
  3412.  
  3413.  
  3414.  range of affordable personal computers including
  3415. {SHIFT-*} "the Commodore VIC-20 and 64, Atari, Apple, TI-99/4A, Radio
  3416. {$ef}" "Shack Color Computer, IBM PC and PCjr."
  3417. ' ". .
  3418.  
  3419. 36879,25
  3420. 5D
  3421. G(14)"  COMPUTE!'s GAZETTE  "
  3422. qN
  3423. "If you don't already
  3424. X
  3425. "subscribe to          COMPUTE!'s Gazette,
  3426. {CBM-H}
  3427. "here's how to get moreout of your Commodore:
  3428. R
  3429. "{SHIFT-@} More fun: with such
  3430. {$ee}
  3431. "  game excitement as
  3432.  
  3433. "  Martia
  3434.  
  3435. "Files. How to Program
  3436. 4
  3437. "The Function Keys.
  3438. r
  3439. "Writing Transportable
  3440. I
  3441. ""BASIC. New Ways
  3442.  
  3443. ,"to Enliven With Sound."
  3444. {CBM-A}
  3445. 6"How to Use Machine    Language."
  3446. {SHIFT-@}
  3447. @2000
  3448. R
  3449. j"{SHIFT-@} More Programs:
  3450. {$f0}
  3451. t"from 64 Searcher to
  3452. ^"P word
  3453. L"processors, from
  3454. /V"printers to modems
  3455. h "and disk drives."
  3456. r{$ea}2000
  3457. {$f4}"SUBSCRIBE NOW TO      COMPUTE!'S GAZETTE
  3458. C{$fe}"AND START RECEIVING   EVERY INFORMATION-    PACKED ISSUE"
  3459.  
  3460. "To order your sub-    scription or a sampl
  3461. {$7b}131)
  3462. "{$e8}i{CBM-R}1{CBM-@}C(s$):630{CBM-N}i,F(J(s$,i))::198,i
  3463. 0{$e9}36879,24
  3464. j{$ea}"reloading menu":
  3465. EPi{CBM-R}1{CBM-@}2000:{CBM-K}a$:a${CBM-R}""{CBM-M}
  3466. KZ
  3467.  
  3468.  
  3469. OMPUTE!'S GAZETTE
  3470. C{$fe}"AND START RECEIVING   EVERY INFORMATION-    PACKED ISSUE"
  3471.  
  3472. "To order your sub-    scription or a sampl#
  3473.  
  3474. a{CBM-R}0{CBM-M}a{CBM-R}1:"computescreen",8,1
  3475. d
  3476. a{CBM-R}1{CBM-M}a{CBM-R}2:"computecolor",8,1
  3477. B
  3478. "";:53280,15:53281,15
  3479. S(
  3480. i{CBM-R}1{CBM-@}22000:
  3481. {$7c}-
  3482. ""
  3483. {CBM-+}2
  3484. s${CBM-R}"lO"{CBM-N}G(34){CBM-N}"mn"{CBM-N}G(34){CBM-N}",8:"{CBM-N}G(131)
  3485. P<
  3486. i{CBM-R}1{CBM-@}C(s$):630{CBM-N}i,F(J(s$,i))::198,i
  3487. {$e8}=
  3488. 53281,14:53280,14
  3489. >
  3490. "RELOADING MENk
  3491.  36879,25:a${CBM-R}"   ":""a$"{SHIFT-POUND}  {CBM-*}":a$"  ":a$" ":a$" "
  3492. {CBM-T}
  3493. "{CBM-*}{CBM-*}{SHIFT-POUND}{SHIFT-POUND}   ":"{CBM-*}{SHIFT-POUND} {CBM-*}  {SHIFT-POUND}":a${CBM-R}"":a$"{SHIFT-POUND} {CBM-*}":a$"  "
  3494. {$fa}
  3495. a$"{SHIFT-POUND}{SHIFT-POUND}":a$"{CBM-*}{CBM-*}":a$"  ":a$"{CBM-*} {SHIFT-POUND}":a${CBM-R}"   ":""a$:""a$:""a$:""a$
  3496. ustom characters"
  3497. H
  3498. "-memory saving tricks":"-four games":"a useful source of    ideas for programmers"
  3499. {SHIFT-@}
  3500. "of all levels":"isbn 0-942386-43-4":" $12.95";:100:36879,127:a${CBM-R}""
  3501.  
  3502.  
  3503. ""a$"             ":a$"{CBM-Y}{CBM-Y}{CBM-Y}{CBM-Y}{CBM-Y}{CBM-Y}{CBM-Y}{CBM-Y}{CBM-Y}{CBM-Y}{CBM-Y}{CBM-Y}{CBM-Y}":a$"{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}{CBM-U}ple
  3504. {CBM-H}
  3505. "issue, call TOLL-FREE
  3506. m{CBM-V}
  3507. "800-334-0868 (N.C.    call 919-275-9809)"
  3508. KH
  3509. "12 issues $24 32% off
  3510. R
  3511. "24 issues $45 36% off
  3512. {CBM-T}{CBM--}
  3513. "36 issues $65 40% off
  3514. {CBM-F}{$e6}
  3515. "Sample issue $4";
  3516. {$fa}
  3517.  "The leading magazine of home, educational, and recreation . . . . . . . . . . . . . . . .
  3518. &6a$:k{CBM-R}1
  3519. =@"";J(a$,k,21)
  3520. lew{CBM-R}1{CBM-@}100:
  3521. Hgk{CBM-R}k{CBM-N}1:k{CBM-W}(C(a$){CBM-Q}20){CBM-M}340
  3522. {$7d}jz{CBM-R}z{CBM-N}1:z{CBM-R}6{CBM-M}z{CBM-R}0:
  3523. ob$:a${CBM-R}J(a$,k){CBM-N}" "{CBM-N}b$:k{CBM-R}1
  3524. {CBM-S}t{CBM-K}z$:z${CBM-R}""{CBM-M}320
  3525. {CBM-C}^36879,24
  3526.  _"load"G(34)"vm"G(34)",8"
  3527. {$f9}{$60}"RELOADING MENU"   mapping the vic
  3528. t
  3529. "allows programmers to quickly find the peek or poke they need":
  3530.  
  3531. "contains an entry for each memory location  telling what it does"
  3532. {$e5}
  3533. "and how to use it":"for intermediate to   advanced programmers"
  3534.  
  3535. "isbn 0-942n Prisoner,
  3536. '{CBM-N}
  3537. "  The Viper,Sky Diver,
  3538. a{CBM-H}
  3539. "  Snake Escape, and
  3540. w{CBM-V}
  3541. "  Demon Star."
  3542. AH
  3543. 2000
  3544. {$7b}R
  3545. "{SHIFT-@} More Challenge:
  3546. {CBM--}
  3547. "Ready to tackle more
  3548. {CBM-A}{$e6}
  3549. "advanced projects?
  3550. {$e3}{$f0}
  3551. "In COMPUTE!'s Gazette,you'll learn How To
  3552. {$fc}{$fa}
  3553. "Use Tape and Diskrogram Lifesaver;
  3554. 'H"from Quickfind to
  3555. >R"Disk Menu and
  3556. \{$7c}"Automatic Proofreader
  3557. N"AND MORE"
  3558. X2000
  3559. "{SHIFT-@} More Buying Guidance
  3560. {CBM-E}{CBM-@}"You'll profit from
  3561. N{CBM-S}"comprehensive reviews
  3562. {$e8}{CBM-U}"of everything from
  3563. {$fd}B"games toe issue, call TOLL
  3564. "
  3565. "FREE 800-334-0868
  3566. a
  3567. "(NC call 919-275-9809)
  3568. {$60}
  3569. &"12 issues $24 Save $11"
  3570. {$7f}
  3571. 0"24 issues $45 Save $25"
  3572.  
  3573. :"36 issues $65 Save $41"
  3574. {CBM-O}
  3575. d"Sample issue $4.00"
  3576. I
  3577. n2000:2000
  3578. {$f8}
  3579. {$e7}"":s${CBM-R}"lO"{CBM-N}G(34){CBM-N}"vm"{CBM-N}G(34){CBM-N}",8:"{CBM-N}G(386-24-8     $14.95":100
  3580. :
  3581. a${CBM-R}"":36879,25:"      creating"
  3582.  
  3583. a$"{CBM-D}{CBM-F}{CBM-D}{CBM-F}{CBM-D}{CBM-F}{CBM-D}{CBM-F}{CBM-D}{CBM-*}{CBM-D}{CBM-I}":a$"{CBM-C}{CBM-V}{CBM-C}{CBM-V}{CBM-K}{CBM-C}{CBM-V}{CBM-K} {CBM-C}{CBM-I}":a$"{CBM-K}{CBM-K}{CBM-K}{CBM-B}{CBM-C}{CBM-V}{CBM-K}{CBM-K}{CBM-C}{SHIFT-POUND}{CBM-C}{CBM-I}"
  3584. {$ea}
  3585. a${CBM-R}a${CBM-N}"":a$"{CBM-D}{CBM-F}{CBM-D}{CBM-F}{CBM-*}{SHIFT-POUND}{CBM-D}{CBM-I}{CBM-D}{CBM-F}":a$"{CBM-K}{CBM-O}{CBM-C}{CBM-V}{CBM-D}{CBM-F}{CBM-C}{CBM-I}{CBM-C}{CBM-I}":a$"{CBM-C}{CBM-V}{CBM-K}{CBM-K}{CBM-K}{CBM-K}{CBM-C}{CBM-I}{CBM-I}{CBM-V}"
  3586.  
  3587.  
  3588. "   
  3589. U PROGRAM":
  3590.  
  3591.  
  3592.    
  3593.  
  3594.  
  3595.  
  3596.  
  3597.  
  3598.  
  3599.  
  3600.  
  3601.  
  3602.  
  3603.  
  3604. compute!/vic    
  3605.  
  3606.  
  3607.  
  3608.  
  3609.  
  3610.  
  3611.  
  3612.  
  3613.  
  3614.  
  3615.  
  3616. gazette/vic     
  3617.  
  3618.  
  3619.  
  3620.  
  3621.  
  3622.  
  3623.  
  3624.  
  3625.  
  3626.  
  3627.  
  3628.  
  3629. compute!        
  3630.  
  3631.  
  3632.  
  3633.  
  3634.  
  3635.  
  3636.  
  3637.  
  3638.  
  3639.  
  3640.  
  3641. vic books       
  3642.  
  3643.  
  3644.  
  3645.  
  3646.  
  3647.  
  3648.  
  3649.  
  3650.  
  3651.  
  3652.  
  3653.  
  3654. 64 books        
  3655.  
  3656.  
  3657.  
  3658.  
  3659.  
  3660.  
  3661.  
  3662.  
  3663.  
  3664.  
  3665.  
  3666. vm              
  3667.  
  3668.  
  3669.  
  3670.  
  3671.  
  3672.  
  3673.  
  3674.  
  3675.  
  3676.  
  3677.  
  3678. mn              
  3679.  
  3680.  
  3681.  
  3682.  
  3683.  
  3684.  
  3685.  
  3686.  
  3687.  
  3688.  
  3689.  
  3690. ""a$:""a$" compute's third":a${CBM-R}"":a$"book of vic":a$"applications,"
  3691.  
  3692. a$"utilities,":a$"games, and more":200:" some of the fine"
  3693. {CBM-Y}
  3694. "programs and chapters:"
  3695.  
  3696. "-graph plotter":"-music composition":"-budget planner":"-cu
  3697. {CBM-U}{CBM-U}{CBM-U}":a$"{CBM-I}{CBM-I}{CBM-I}{CBM-I}{CBM-I}{CBM-I}{CBM-I}{CBM-I}{CBM-I}{CBM-I}{CBM-I}{CBM-I}{CBM-I}"
  3698. D
  3699. a$"{CBM-O}{CBM-O}{CBM-O}{CBM-O}{CBM-O}{CBM-O}{CBM-O}{CBM-O}{CBM-O}{CBM-O}{CBM-O}{CBM-O}{CBM-O}":a$" mapping the":a${CBM-R}"   ":a$"{SHIFT-POUND}  {CBM-*}":a$"  "
  3700. {CBM-B}
  3701. a$" ":a$" ":"{CBM-*}{CBM-*}{SHIFT-POUND}{SHIFT-POUND}   ":"{CBM-*}{SHIFT-POUND} {CBM-*}  {SHIFT-POUND}":" the comprehensive
  3702.  
  3703.  
  3704.  
  3705. "memory guide to the  vic-20 home computer":200:a
  3706. ~~~~~~~~
  3707.  
  3708.  
  3709.  
  3710.  
  3711.  
  3712.  
  3713.  
  3714.  
  3715.  
  3716.  
  3717.  
  3718.  
  3719.  
  3720.  
  3721.  
  3722.  
  3723.  
  3724.  
  3725.  
  3726.  
  3727.  
  3728.  
  3729.  
  3730.  
  3731.  
  3732.  
  3733.  
  3734.  
  3735.  
  3736.  
  3737.  
  3738.  
  3739.  
  3740.  
  3741.  
  3742.  
  3743.  
  3744.  
  3745.  
  3746.  
  3747.  
  3748.  
  3749.  
  3750.  
  3751.  
  3752.  
  3753.  
  3754.  
  3755. L{SHIFT-+}
  3756.  
  3757.  
  3758.  
  3759.  
  3760.  
  3761.  
  3762.  
  3763.  
  3764.  
  3765.  
  3766.  
  3767.  
  3768.  
  3769.  
  3770.  
  3771.  
  3772.  
  3773.  
  3774.  
  3775.  
  3776.  
  3777.  
  3778.  
  3779.  
  3780.  
  3781.  
  3782.  
  3783.  
  3784.  
  3785.  
  3786.  
  3787.  
  3788.  
  3789.  
  3790.  
  3791.  
  3792.  
  3793.  
  3794.  
  3795.  
  3796.  
  3797.  
  3798.  
  3799.  
  3800.  
  3801.  
  3802.  
  3803. {$7f}~~~~~~~~~nov 84 gazette    B{CBM-B} 2a    
  3804.  
  3805.  
  3806.  
  3807.  
  3808.  
  3809.  
  3810.  
  3811.  
  3812.  
  3813.  
  3814.  
  3815.  
  3816.  
  3817.  
  3818.  
  3819.  
  3820.  
  3821.  
  3822.  
  3823.  
  3824.  
  3825.  
  3826.  
  3827.  
  3828.  
  3829.  
  3830.  
  3831.  
  3832.  
  3833.  
  3834.  
  3835.  
  3836.  
  3837.  
  3838.  
  3839.  
  3840.  
  3841.  
  3842.  
  3843.  
  3844.  
  3845.  
  3846.  
  3847.  
  3848.  
  3849.  
  3850.  
  3851.  
  3852.  
  3853.  
  3854.  
  3855.  
  3856.  
  3857.  
  3858.  
  3859.  
  3860.  
  3861.  
  3862.  
  3863.  
  3864.  
  3865.  
  3866.  
  3867.  
  3868.  
  3869.  
  3870.  
  3871.  
  3872.  
  3873.  
  3874.  
  3875.  
  3876.  
  3877.  
  3878.  
  3879.  
  3880.  
  3881.  
  3882.  
  3883.  
  3884.  
  3885.  
  3886.  
  3887.  
  3888.  
  3889. menu            
  3890.  
  3891.  
  3892.  
  3893.  
  3894.  
  3895.  
  3896.  
  3897.  
  3898.  
  3899.  
  3900.  
  3901. compute!/vic    
  3902.  
  3903.  
  3904.  
  3905.  
  3906.  
  3907.  
  3908.  
  3909.  
  3910.  
  3911.  
  3912.  
  3913. gazette/vic     
  3914.  
  3915.  
  3916.  
  3917.  
  3918.  
  3919.  
  3920.  
  3921.  
  3922.  
  3923.  
  3924.  
  3925. compute!        
  3926.  
  3927.  
  3928.  
  3929.  
  3930.  
  3931.  
  3932.  
  3933.  
  3934.  
  3935.  
  3936.  
  3937. vic books       
  3938.  
  3939.  
  3940.  
  3941.  
  3942.  
  3943.  
  3944.  
  3945.  
  3946.  
  3947.  
  3948.  
  3949.  
  3950. 64 books        
  3951.  
  3952.  
  3953.  
  3954.  
  3955.  
  3956.  
  3957.  
  3958.  
  3959.  
  3960.  
  3961.  
  3962. vm              
  3963.  
  3964.  
  3965.  
  3966.  
  3967.  
  3968.  
  3969.  
  3970.  
  3971.  
  3972.  
  3973.  
  3974. mn              
  3975.  
  3976.  
  3977.  
  3978.  
  3979.  
  3980.  
  3981.  
  3982.  
  3983.  
  3984. kk
  3985. computecolor    
  3986.  
  3987.  
  3988.  
  3989.  
  3990.  
  3991.  
  3992.  
  3993.  
  3994.  
  3995.  
  3996.  
  3997. computescreen   
  3998.  
  3999.  
  4000.  
  4001.  
  4002.  
  4003.  
  4004.  
  4005.  
  4006.  
  4007.  
  4008.  
  4009. gazette         
  4010.  
  4011.  
  4012.  
  4013.  
  4014.  
  4015.  
  4016.  
  4017.  
  4018.  
  4019.  
  4020.  
  4021. ml beg          
  4022.  
  4023.  
  4024.  
  4025.  
  4026.  
  4027.  
  4028.  
  4029.  
  4030.  
  4031.  
  4032.  
  4033. hesgames        
  4034.  
  4035.  
  4036.  
  4037.  
  4038.  
  4039.  
  4040.  
  4041.  
  4042.  
  4043.  
  4044.  
  4045. lj.md           
  4046.  
  4047.  
  4048.  
  4049.  
  4050.  
  4051.  
  4052.  
  4053.  
  4054. #
  4055.  
  4056.  
  4057. sg              
  4058.  
  4059.  
  4060.  
  4061.  
  4062.  
  4063.  
  4064.  
  4065.  
  4066.  
  4067.  
  4068.  
  4069.  
  4070. sc              
  4071.  
  4072.  
  4073.  
  4074.  
  4075.  
  4076.  
  4077.  
  4078.  
  4079.  
  4080. kk
  4081.  
  4082.  
  4083. ljpath.c        
  4084.  
  4085.  
  4086.  
  4087.  
  4088.  
  4089.  
  4090.  
  4091.  
  4092.  
  4093.  
  4094.  
  4095.  
  4096. lj.xyz          
  4097.  
  4098.  
  4099.  
  4100.  
  4101.  
  4102.  
  4103.  
  4104.  
  4105.  
  4106.  
  4107.  
  4108.  
  4109. jump/demo       
  4110.  
  4111.  
  4112.  
  4113.  
  4114.  
  4115.  
  4116.  
  4117.  
  4118.  
  4119.  
  4120.  
  4121. jumper.c        
  4122.  
  4123.  
  4124.  
  4125.  
  4126.  
  4127.  
  4128.  
  4129.  
  4130.  
  4131.  
  4132.  
  4133.  
  4134. 64 contents     
  4135.  
  4136.  
  4137.  
  4138.  
  4139.  
  4140.  
  4141.  
  4142.  
  4143.  
  4144.  
  4145.  
  4146. vicontents      
  4147.  
  4148.  
  4149.  
  4150.  
  4151.  
  4152.  
  4153.  
  4154.  
  4155.  
  4156.  
  4157.  
  4158. mlx/64          
  4159.  
  4160.  
  4161.  
  4162.  
  4163.  
  4164.  
  4165.  
  4166.  
  4167.  
  4168.  
  4169.  
  4170. mlx/vic         
  4171.  
  4172.  
  4173.  
  4174.  
  4175.  
  4176.  
  4177.  
  4178.  
  4179.  
  4180. kk
  4181.  
  4182. bagdad/64       
  4183.  
  4184.  
  4185.  
  4186.  
  4187.  
  4188.  
  4189.  
  4190.  
  4191.  
  4192.  
  4193.  
  4194.  
  4195. bagdad/vic      
  4196.  
  4197.  
  4198.  
  4199.  
  4200.  
  4201.  
  4202.  
  4203.  
  4204.  
  4205.  
  4206.  
  4207. b               
  4208.  
  4209.  
  4210.  
  4211.  
  4212.  
  4213.  
  4214.  
  4215.  
  4216.  
  4217.  
  4218.  
  4219. c               
  4220.  
  4221.  
  4222.  
  4223.  
  4224.  
  4225.  
  4226.  
  4227.  
  4228.  
  4229.  
  4230.  
  4231. c/g term        
  4232.  
  4233.  
  4234.  
  4235.  
  4236.  
  4237.  
  4238.  
  4239.  
  4240.  
  4241.  
  4242.  
  4243.  
  4244.  
  4245. c/g term/vic    
  4246.  
  4247.  
  4248.  
  4249.  
  4250.  
  4251.  
  4252.  
  4253.  
  4254.  
  4255.  
  4256.  
  4257. disk autoload   
  4258.  
  4259.  
  4260.  
  4261.  
  4262.  
  4263.  
  4264.  
  4265.  
  4266.  
  4267.  
  4268.  
  4269. jump/64         
  4270.  
  4271.  
  4272.  
  4273.  
  4274.  
  4275.  
  4276.  
  4277.  
  4278.  
  4279. kk
  4280. jump/vic        
  4281.  
  4282.  
  4283.  
  4284.  
  4285.  
  4286.  
  4287.  
  4288.  
  4289.  
  4290.  
  4291.  
  4292.  
  4293. budgeteer/64    
  4294.  
  4295.  
  4296.  
  4297.  
  4298.  
  4299.  
  4300.  
  4301.  
  4302.  
  4303.  
  4304.  
  4305. budgeteer/v1    
  4306.  
  4307.  
  4308.  
  4309.  
  4310.  
  4311.  
  4312.  
  4313.  
  4314.  
  4315.  
  4316.  
  4317. b2              
  4318.  
  4319.  
  4320.  
  4321.  
  4322.  
  4323.  
  4324.  
  4325.  
  4326.  
  4327.  
  4328.  
  4329. function key/64 
  4330.  
  4331.  
  4332.  
  4333.  
  4334.  
  4335.  
  4336.  
  4337.  
  4338.  
  4339.  
  4340.  
  4341.  
  4342. supertank       
  4343.  
  4344.  
  4345.  
  4346.  
  4347.  
  4348.  
  4349.  
  4350.  
  4351.  
  4352.  
  4353.  
  4354. kaylon/vic      
  4355.  
  4356.  
  4357.  
  4358.  
  4359.  
  4360.  
  4361.  
  4362.  
  4363.  
  4364.  
  4365.  
  4366. kaylon/64       
  4367.  
  4368.  
  4369.  
  4370.  
  4371.  
  4372.  
  4373.  
  4374.  
  4375.  
  4376.  
  4377. kk
  4378. ~function key    
  4379.  
  4380.  
  4381.  
  4382.  
  4383.  
  4384.  
  4385.  
  4386.  
  4387.  
  4388.  
  4389.  
  4390.  
  4391.  
  4392. c/g term/64     
  4393.  
  4394.  
  4395.  
  4396.  
  4397.  
  4398.  
  4399.  
  4400.  
  4401.  
  4402.  
  4403.  
  4404. power basic     
  4405.  
  4406.  
  4407.  
  4408.  
  4409.  
  4410.  
  4411.  
  4412.  
  4413.  
  4414.  
  4415.  
  4416. ml beg/vic      
  4417.  
  4418.  
  4419.  
  4420.  
  4421.  
  4422.  
  4423.  
  4424.  
  4425.  
  4426.  
  4427.  
  4428. ml beg/64       
  4429.  
  4430.  
  4431.  
  4432.  
  4433.  
  4434.  
  4435.  
  4436.  
  4437.  
  4438.  
  4439.  
  4440.  
  4441.  
  4442.  
  4443.  
  4444.  
  4445.  
  4446.  
  4447.  
  4448.  
  4449.  
  4450.  
  4451.  
  4452.  
  4453.  
  4454.  
  4455.  
  4456.  
  4457.  
  4458.  
  4459.  
  4460.  
  4461.  
  4462.  
  4463.  
  4464.  
  4465.  
  4466.  
  4467.  
  4468.  
  4469.  
  4470.  
  4471.  
  4472.  
  4473.  
  4474.  
  4475.  
  4476.  
  4477.  
  4478.  
  4479.  
  4480.  
  4481.  
  4482.  
  4483.  
  4484.  
  4485.  
  4486.  
  4487.  
  4488.  
  4489.  
  4490.  
  4491.  
  4492.  
  4493.  
  4494.  
  4495.  
  4496.  
  4497.  
  4498.  
  4499.  
  4500.  
  4501.  
  4502.  
  4503.  
  4504.  
  4505.  
  4506.  
  4507.  
  4508.  
  4509.  
  4510.  
  4511.  
  4512.  
  4513.  
  4514.  
  4515.  
  4516.  
  4517.  
  4518.  
  4519.  
  4520.  
  4521.  
  4522.  
  4523.  
  4524.  
  4525.  
  4526.  
  4527.  
  4528.  
  4529.  
  4530.  
  4531.  
  4532.  
  4533.  
  4534. kk
  4535. )D
  4536. 53280,0:53281,0:53282,6:53284,6
  4537. i"53265,B(53265){CBM-A}64:G(142);
  4538. '53283,3:"     a comprehensive memory guide "
  4539. {CBM-S}("for beginning and advanced programmers"
  4540. {CBM--})"of the commodore 64 personal computer."
  4541. ,"            complete drstand
  4542. 0
  4543. R"            explanations of advanced
  4544. ]
  4545. {$7c}"            programming techniques.
  4546. R
  4547. "           
  4548. {CBM-K}
  4549. "            programmers using machine
  4550. R
  4551. "            language will find a wealth
  4552. ~
  4553. {$e5}"            of useful location                 each chapter intro-
  4554. i"                   duces a basic
  4555. {$7b}"{CBM-A}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{CBM-S} programming concept,
  4556. {CBM-M}&"{SHIFT--}NM l l          {SHIFT--} explaining and
  4557. W0"N{CBM-T}{CBM-T}M b o u t     {SHIFT--} suggesting ways to
  4558.  
  4559. :"                 {SHIFT--} u
  4560.    {CBM-C}{CBM-K}{CBM-I}{CBM-K}        {SHIFT--} logical operators,
  4561. k"{CBM-Z}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{CBM-X} program control,
  4562. Z"v.o.l.u.m.e. o.n.e string variables,
  4563. {CBM-D}{CBM-POUND}"                   subroutines, arrays,
  4564. XP"                   and much more.
  4565. {$e4}"a must for beginn     a complete tutorial on
  4566. <h"               commodore 64 graphics.
  4567. tr"   COMMODORE  "
  4568. \"               explains how to program
  4569. {CBM-R}F"               multicolored screens,
  4570. {SHIFT--}P"               custom characters,
  4571.  
  4572. Z"         
  4573.  
  4574.  
  4575. 100
  4576. /
  4577. G(14)" Before attempting to"
  4578. i
  4579.  
  4580. " run any programs"
  4581. F
  4582. " please refer to the"
  4583.  
  4584. " instructions in the"
  4585.  
  4586. " COMPUTE!'s Gazette"
  4587. {CBM-X}
  4588. " Magazine issue dated"
  4589. X
  4590. " the same month as"
  4591. {$ec}
  4592. " this disk."
  4593.  
  4594. "PRESS x){CBM-N}a${CBM-N}sp$,22):a$;
  4595. )D
  4596. "  (c) 1984 compute!"
  4597. hH
  4598. "  publications, inc.  ";
  4599. G{$fa}
  4600. s{CBM-R}cp{CBM-D}8:e{CBM-R}cp{CBM-D}8{CBM-N}7:e{CBM-E}it{CBM-M}e{CBM-R}it
  4601. i{CBM-R}s{CBM-@}e:"f";G(49{CBM-N}i{CBM-Q}cp{CBM-D}8);"";
  4602. {CBM-Q}a${CBM-R}n$(i):k{CBM-R}C(a$):k{CBM-W}19{CBM-M}268
  4603. Ca${CBM-R}n$(i):k{CBM-R}19{CBM-@}1{SHIFT-POUND}{CBM-Q}1
  4604. {CBM--}
  4605. J(a$,k,1){CBM-W}{CBM-E}" "{CBM-M}k:
  4606. {$e6}k{CBM-R}k{CBM-Q}1
  4607. H(a$,k):"   ":cp{CBM-E}np{CBM-M}cp{CBM-R}0
  4608. Ca${CBM-R}G(13){CBM-M}175
  4609. <Hfv{CBM-R}(F(a$){CBM-Q}133){CBM-D}2{CBM-N}1:fv{CBM-R}fv{CBM-N}7{CBM-D}(fv{CBM-E}8)
  4610. vMc{CBM-R}fv{CBM-N}cp{CBM-D}8{CBM-Q}1:c{CBM-E}it{CBM-M}340
  4611. V36879,27:"load";G(34);f$(c);G(34);",8":i${CBM-R}"run"
  4612. {CBM-U} i{CBM-R}1{CBM-@}C(i$):631{CBM-N}i,F(J(i$,i)):
  4613. M{$e1}"";
  4614. {CBM-*}{$e2}{CBM-T}7)"loading"
  4615. {$e3}""{CBM-T}10{CBM-Q}C(f$(c)){CBM-Z}2Can't read Table of   Contents"
  4616. 0G"Disk Error:":en;em$
  4617. ?L"Check:"
  4618. uV"1)Proper disk?
  4619. Q"2)Drive door closed?
  4620. "3)All cables attached?"
  4621. R"Remove, then re-insertdisk, press any  key  to try again."
  4622. {$e5}{CBM-K}a$:a${CBM-R}""{CBM-M}670
  4623. {$eb}{CBM-POUND}
  4624.  i
  4625.  
  4626.  
  4627. 110
  4628.  
  4629. 53265,27
  4630. t
  4631.  
  4632. G(14)" Before attempting to run any programs"
  4633.  
  4634. " please refer to the instructions in"
  4635. {CBM-A}
  4636. " the COMPUTE!'s Gazette Magazine issue"
  4637. {CBM--}
  4638. " dated the same month as this disk."
  4639.  
  4640.  
  4641. "       PRESS ANY KEetails on the
  4642. 76"            functions of pointers,
  4643. G@"  mapping   the stack,rom and kernal
  4644. j"    the     routines, and more.
  4645. {SHIFT-POUND}t" commodore 
  4646. U^"            basic programmers will
  4647.  
  4648. H"            find easy-to-undes and
  4649. *{$e6}"            ideas for programming.
  4650. q{$e9}"isbn 0-942386-23-x    $14.95"
  4651. ]{$f2} 10000
  4652. {$f4}53265,B(53265){CBM-P}191:53281,11:53280,11
  4653. {CBM-C}{$fe}"everything you need to know about basic";
  4654. {$ed}" to effectively program your commodore 64"
  4655. "  se it in programs.
  4656. #
  4657. d"   t h e         {SHIFT--}
  4658. u
  4659. x"N{CBM-Y}M              {SHIFT--} teaches how to print
  4660.  
  4661. B"{CBM-H}  o m m o d o r e and poke, how to use
  4662. {CBM-Y}
  4663. L"M{CBM-P}N              {SHIFT--} built-in and user-
  4664. {$e9}
  4665. V"{SHIFT--}    {CBM-C}{CBM-F}{CBM-K}{CBM-K}        {SHIFT--} defined functions,
  4666. "{SHIFT--} ing to intermediate
  4667. {$e9}"programmers."
  4668. ?{$ea}"isbn 0-942386-40-x   $12.95";
  4669. k{$ee} 10000
  4670.  53280,15:53281,15:53265,B(53265){CBM-A}64:53283,3:53284,6
  4671. {CBM-L}*"      compute!'s reference guide to"
  4672. {$de}4"          commodore 64 graphics"
  4673.  
  4674. >"                sprites, animation, and
  4675. +"               more.
  4676. b"              "
  4677. R"               beginners will like the
  4678. {CBM-T}{CBM-I}"   graphics    clear example programs,
  4679. L{CBM-D}"               and step-by-step
  4680. {$f2}{CBM-L}"               instrucANY KEY FOR MENU"
  4681. #
  4682. {CBM-K}mt$:mt${CBM-R}""{CBM-M}22
  4683. )
  4684.  
  4685. fD
  4686. 36879,24:36865,24:800
  4687. oX
  4688. 500
  4689. P
  4690. sp${CBM-R}"                      "
  4691. {CBM-D}
  4692. np{CBM-R}{CBM-J}(it{CBM-Z}8):cp{CBM-R}0
  4693. {CBM-Z}
  4694. 12
  4695. {CBM-P}
  4696. G(142);
  4697. {CBM-+}{CBM-H}
  4698. 36867,0
  4699. J{CBM-O}
  4700. "{SHIFT-POUND} compute!'s gazette {CBM-*}";
  4701. {SHIFT--}{CBM-V}
  4702. a${CBM-R}mo${CBM-N}" 1984"
  4703. C
  4704. cx{CBM-R}11{CBM-Q}C(a$){CBM-Z}2:a${CBM-R}H(H(sp$,cJ(a$,k{CBM-N}2,18)
  4705.  
  4706. ,i
  4707. 06"    page #";cp{CBM-N}1;"of";np{CBM-N}1
  4708. x@"{CBM-*} next page:return{SHIFT-POUND} ";
  4709. Ie(e{CBM-Q}s){CBM-E}6{CBM-M}337
  4710. j"";:i{CBM-R}1{CBM-@}(7{CBM-Q}(e{CBM-Q}s)){CBM-D}2{CBM-Q}1:"";sp$;:
  4711. {CBM-POUND}oH(sp$,21)" ";
  4712. {CBM-L}q36867,46
  4713. {$e2}t828:{CBM-K}a$:a${CBM-W}{CBM-E}G(13){CBM-P}(a${CBM-W}""{CBM-A}a${CBM-E}""){CBM-M}340
  4714. ^a${CBM-R}G(13){CBM-M}cp{CBM-R}cp{CBM-N}1)G(34)f$(c)G(34)
  4715. ${$e4}"   please stand by"
  4716. e{$ea}631{CBM-N}i,13:631,13:198,i{CBM-N}1:
  4717. k{$f3}
  4718. ]{$f4}15,8,15,"i0"
  4719. {$fe}1,8,8,"0:vicontents,s,r":15,en,em$: en{CBM-E}0 {CBM-M} 600
  4720. {CBM-W}1,mo$:1,it:n$(it),f$(it)
  4721. Si{CBM-R}0{CBM-@}it:1,n$(i):1,f$(i):
  4722.   1: 15:
  4723. {$eb}x 1: 15
  4724. B"Y FOR THE MENU"
  4725. !
  4726. {CBM-K}mt$:mt${CBM-R}""{CBM-M}22
  4727. '
  4728.  
  4729. gN
  4730. 53282,8:53283,15:53284,2
  4731. pX
  4732. 500
  4733.  
  4734. sp${CBM-R}"                                      "
  4735. {CBM-F}
  4736. a${CBM-R}"table of contents for "{CBM-N}mo${CBM-N}" 1984":cx{CBM-R}20{CBM-Q}C(a$){CBM-Z}2
  4737. {$e1}
  4738. z${CBM-R}"":a${CBM-R}H(sp$,cx){CBM-N}a${CBM-N}sp$:i{CBM-R}1{CBM-@}40
  4739. ~
  4740. z${CBM-R}z${CBM-N}G(F(J(a$,i)){CBM-N}128
  4741. (i$,i)):
  4742.  
  4743. {$e1}53280,6:"";
  4744. o
  4745. {$e2}{CBM-T}18{CBM-Q}C(f$(c)){CBM-Z}2{CBM-Q}4)"loading ";G(34)f$(c)G(34)
  4746. T
  4747. {$e3}"           please stand by"
  4748.  
  4749. {$ea}631{CBM-N}i,13:631,13:198,i{CBM-N}1:
  4750.  
  4751. {$f3}
  4752. {CBM-Z}
  4753. {$f4}15,8,15,"i0"
  4754. {$e4}
  4755. {$fe}1,8,8,"0:64 contents,s,r":15,en,em$: en{CBM-E}0 {CBM-M} 600
  4756. 1,mo$:1,i%
  4757. "":65517:B(781){CBM-R}40{CBM-M}"":10
  4758. .
  4759. ""
  4760. y
  4761.  
  4762. h{CBM-R}0: if h = 1 then assembly is in hex
  4763. 2
  4764. he${CBM-R}"0123456789abcdef":sz{CBM-R}1:zo${CBM-R}"000"
  4765. {CBM-S}D
  4766. " simple assembler":" conventions:"
  4767. HN
  4768. m$(56),ty(56),op(56)
  4769. {SHIFT-+}X
  4770. i{CBM-R}1{CBM-@}56:m$(i)
  4771. ~Z
  4772. rop${CBM-R}J(m$(i),4,1):ty(i){CBM-R}E(rop$da 15x
  4773. {CBM-W}
  4774. "zero page y   ldx 15y
  4775. <{CBM-H}
  4776. "absolute x    lda 1500x
  4777. z{CBM-O}
  4778. "absolute y    lda 1500y
  4779. {$7e}{CBM-X}
  4780. :"enter all numbers     in ";
  4781. {CBM-V}
  4782. h{CBM-R}1 {CBM-M}"hex":200
  4783. {CBM-T}C
  4784. "decimal"
  4785. {CBM-*}H
  4786. :"please input starting address for ml program": sa$
  4787.  
  4788. R
  4789. h{CBM-R}1{CBM-M}h${CBM-R}sa$:5000:sa{CBM-R}d
  4790. {CBM-N}1,fr{CBM-Q}2:"  ok":230
  4791. m{$f4}
  4792. I(mn$,4){CBM-R}"poke"{CBM-M}"addr,number(dec)";:adr,num:adr,num:230
  4793. {$fa}
  4794. mn${CBM-R}"end"{CBM-M}:"      program is from"ta"to"sa:
  4795. l{CBM-R}C(mn$):l${CBM-R}H(mn$,3)
  4796. {CBM-H}i{CBM-R}1{CBM-@}56:l${CBM-R}m$(i){CBM-M}300
  4797. {CBM-F}i
  4798. D"850
  4799. {$e4}, primary opcode categories
  4800. {$fa}-ty{CBM-R}ty(i):op{CBM-R}otn{CBM-R}E(r$):tn{CBM-E}255{CBM-M}430
  4801. ,ty{CBM-R}1{CBM-A}ty{CBM-R}3{CBM-A}ty{CBM-R}4{CBM-A}ty{CBM-R}5{CBM-M}op{CBM-R}op{CBM-N}4
  4802. 6{CBM-@}2000
  4803. I{CBM-S}h%{CBM-R}tn{CBM-Z}256:l%{CBM-R}tn{CBM-Q}256{CBM-D}h%:ty{CBM-R}2{CBM-A}ty{CBM-R}7{CBM-M}op{CBM-R}op{CBM-N}8:470
  4804. {CBM-U}ty{CBM-R}1{CBM-A}ty{CBM-R}3{CBM-A}ty{CBM-R}4{CBM-A}ty{CBM-R}5{CBM-M}op{CBM-R}op{CBM-N}12:470
  4805. {CBM-T}Bty{CBM-R}6{CBM-A}ty{CBM-R}9{CBM-M}470
  4806. {CBM-D}L850
  4807. {CBM-L}V3000
  4808. K tn{CBM-R}E(I(r$,ll{CBM-Q}1))
  4809. {$e3}{$ea}ty{CBM-R}1{CBM-M}op{CBM-R}op{CBM-N}8:2000
  4810. {$f8}{$f4}ty{CBM-R}4{CBM-A}ty{CBM-R}5VI(r$,2){CBM-R}")y"{CBM-M}540
  4811. I(r$,1){CBM-R}"x"{CBM-M}720
  4812. ' *zero y
  4813. htn{CBM-R}E(H(r$,ll{CBM-Q}1)):tn{CBM-E}255{CBM-M}680
  4814. [ty{CBM-R}2{CBM-A}ty{CBM-R}5{CBM-M}730
  4815. I{CBM-T}ty{CBM-R}1{CBM-M}760
  4816. {CBM-POUND}770:ty{CBM-R}1{CBM-M}op{CBM-R}op{CBM-N}24:710
  4817. {CBM-R}ty{CBM-R}5{CBM-M}op{CBM-R}op{CBM-N}28:710
  4818. {CBM-M}{CBM-C}850
  4819. {CBM-E}F3000
  4820. XPtn{CBM-R}E(H(r$,ll{CBM-Q}1)):tn{CBM-E}255{CBM-M}770:780
  4821. {$f0}Zty{CBM-R}2{CBM-M}op{CBM-R}op{CBM-N}16:7sa{CBM-N}1:h{CBM-R}1{CBM-M} 1030
  4822. {$fc}op:230
  4823. #de {CBM-R} op:4000:h$:230
  4824. =P 2 byte instructions
  4825. YUtn{CBM-E}256{CBM-M}" incorrect argument. (#5 in hex is #05)":230
  4826. Zsa,op:sa{CBM-N}1,tn:sa{CBM-R}sa{CBM-N}2:h{CBM-R}1{CBM-M}2030
  4827. {CBM-P}{$e4}op;tn:230
  4828. I{$ee}de {CBM-R} op:4000:h$" ";
  4829. {$e4}{$f8}de {CBM-R} tn:4000:h$:230
  4830. {$fe}{CBM-U}
  4831. ["Remove, then re-insert disk, press any  key to try again."
  4832. c{CBM-K}a$:a${CBM-R}""{CBM-M}670
  4833. i{CBM-POUND}
  4834.  
  4835.  
  4836. T
  4837. {$e3}"           please stand by"
  4838.  
  4839. {$ea}631{CBM-N}i,13:631,13:198,i{CBM-N}1:
  4840.  
  4841. {$f3}
  4842. {CBM-Z}
  4843. {$f4}15,8,15,"i0"
  4844. {$e4}
  4845. {$fe}1,8,8,"0:64 contents,s,r":15,en,em$: en{CBM-E}0 {CBM-M} 600
  4846. 1,mo$:1,i):
  4847.  
  4848. {CBM-D}
  4849. np{CBM-R}{CBM-J}(it{CBM-Z}8):cp{CBM-R}0
  4850.  
  4851. {CBM-Z}
  4852. 12
  4853. 2
  4854. {CBM-P}
  4855. 53265,B(53265){CBM-A}64
  4856. j
  4857. {CBM-A}
  4858. 53280,14:53281,14
  4859. {$7e}
  4860. {CBM-E}
  4861. "----------------------------------------";
  4862. {CBM-H}
  4863. {CBM-H}
  4864. "   COMPUTE{CBM-M}S GAZETTE FOR VIC{CBM-Z}{CBM-R}{CBM-A} AND {CBM-L}{CBM-H}  ";z$;
  4865. {$e6}
  4866. H
  4867. "  {CBM-POUND}C{SHIFT-POUND} {CBM-E}{CBM-O}{CBM-U}{CBM-H} COMPUTE{CBM-K} PUBLICATIONS{CBM-D} INC{CBM-S}  "
  4868. {$f5}
  4869. "----------
  4870.  for next page"
  4871. .t{CBM-K}a$:a${CBM-W}{CBM-E}G(13){CBM-P}(a${CBM-W}""{CBM-A}a${CBM-E}""){CBM-M}340
  4872. p^a${CBM-R}G(13){CBM-M}cp{CBM-R}cp{CBM-N}1:cp{CBM-E}np{CBM-M}cp{CBM-R}0
  4873. BCa${CBM-R}G(13){CBM-M}175
  4874. Hfv{CBM-R}(F(a$){CBM-Q}133){CBM-D}2{CBM-N}1:fv{CBM-R}fv{CBM-N}7{CBM-D}(fv{CBM-E}8)
  4875. {CBM-I}Mc{CBM-R}fv{CBM-N}cp{CBM-D}8{CBM-Q}1:c{CBM-E}it{CBM-M}340
  4876. {CBM--}V65409:"load";G(34);f$(c);G(34);",8":i${CBM-R}"run"
  4877. ~ i{CBM-R}1{CBM-@}C(i$):631{CBM-N}i,F(Jt:n$(it),f$(it)
  4878. $i{CBM-R}0{CBM-@}it:1,n$(i):1,f$(i):
  4879. 1 1: 15:
  4880. <x 1: 15
  4881. CB"Can't read Table of Contents"
  4882. {$7e}G"Disk Error:";en;em$
  4883. L"Check:"
  4884. {CBM-S}V"1) Correct disk inserted?
  4885. N"2) Is drive door closed?
  4886. {$ee}"3) All cables attached?"
  4887. 0)
  4888. {$7c}
  4889. op${CBM-R}I(m$(i),3):op(i){CBM-R}E(op$)
  4890. 4{$7e}
  4891. m$(i){CBM-R}H(m$(i),3)
  4892. >
  4893. i: 
  4894. z
  4895. "immediate     lda #15
  4896. W
  4897. "absolute      lda 1500
  4898.  
  4899. "zero page     lda 15
  4900. {CBM-N}{CBM-G}
  4901. "accumulator   asl
  4902. H{CBM-N}
  4903. "indirect x    lda (15x)
  4904. {$e6}{CBM-P}
  4905. "indirect y    lda (15)y
  4906. {CBM-E}
  4907. "zero page x   le:220
  4908. W
  4909. sa{CBM-R}E(sa$)
  4910. 0{CBM--}
  4911. ta{CBM-R}sa:"": clear the screen
  4912. t{$e6}
  4913. h{CBM-R}1{CBM-M}de{CBM-R}sa:sz{CBM-R}3:4000:h$;:240
  4914. {$60}{$eb}
  4915. sa" ";
  4916. {$f0}
  4917. mn$:""{CBM-+}30);: go up one line and over 10 spaces
  4918. {CBM-J}{$f1}
  4919.  add new pseudo-ops here
  4920. S{$f2}
  4921. I(mn$,7){CBM-R}"forward"{CBM-M}fb{CBM-R}sa
  4922. {$f3}
  4923. I(mn$,7){CBM-R}"resolve"{CBM-M}fr{CBM-R}sa{CBM-Q}fb:fbp(i)
  4924. 1fb{CBM-R}sa{CBM-M}tn{CBM-R}0:2010
  4925.  6ty{CBM-R}0{CBM-M}1000
  4926. b@ty{CBM-R}3{CBM-M}ty{CBM-R}1:l{CBM-R}3{CBM-M}op{CBM-R}op{CBM-N}8:1000
  4927. _jr${CBM-R}I(mn$,l{CBM-Q}4):h{CBM-R}1{CBM-M}6000
  4928. tlr${CBM-R}H(r$,1):ll{CBM-R}C(r$):lr${CBM-R}"#"{CBM-M}480
  4929. ^lr${CBM-R}"("{CBM-M}520
  4930. {CBM-@}Hty{CBM-R}8{CBM-M}600
  4931. {CBM-C}Rty{CBM-R}3{CBM-M}op{CBM-R}op{CBM-N}8:1000
  4932. {SHIFT--}{$7c}I(r$,1){CBM-R}"x"{CBM-A}I(r$,1){CBM-R}"y"{CBM-M}630
  4933. {$f2}H(l$,1){CBM-R}"j"{CBM-M}820
  4934. {CBM-M}2000
  4935. {$fe}850
  4936. I(r$,2){CBM-R}")y"{CBM-M}540
  4937. -I(r$,2){CBM-R}"x)"{CBM-M}570
  4938. dtn{CBM-R}E(J(r$,2,ll{CBM-Q}3))
  4939. ]&ty{CBM-R}1{CBM-M}op{CBM-R}op{CBM-N}16:2000
  4940. F0850
  4941. {$7d}:tn{CBM-R}E(J(r$,2,ll{CBM-Q}3))
  4942. dty{CBM-R}1{CBM-M}2000
  4943. n850
  4944. Pxtn{CBM-R}E(r$):tn{CBM-R}tn{CBM-Q}sa{CBM-Q}2:tn{CBM-W}{CBM-Q}128{CBM-A}tn{CBM-E}127{CBM-M}"too far ";:850
  4945. {$e4}Btn{CBM-W}0{CBM-M}tn{CBM-R}tn{CBM-N}256
  4946. {$ee}L2000
  4947. 60
  4948. {$e4}ty{CBM-R}1{CBM-A}ty{CBM-R}3{CBM-A}ty{CBM-R}5{CBM-M}op{CBM-R}op{CBM-N}20:760
  4949. {$ee}850
  4950. %{$f8}2000
  4951. bh%{CBM-R}tn{CBM-Z}256:l%{CBM-R}tn{CBM-Q}256{CBM-D}h%:
  4952. zty{CBM-R}2{CBM-M}op{CBM-R}op{CBM-N}24:810
  4953. {$7c}ty{CBM-R}1{CBM-A}ty{CBM-R}3{CBM-A}ty{CBM-R}5{CBM-M}op{CBM-R}op{CBM-N}28:810
  4954.  850
  4955. *3000
  4956. 4tn{CBM-R}E(r$)
  4957. {CBM-G}>770
  4958. {CBM-S}h710
  4959. Cr" error ":230
  4960. {SHIFT--}{$e8} 1 byte instructions
  4961. {$fb}{$f2}sa,op:sa{CBM-R} 3 byte instructions
  4962. -Bsa,op:sa{CBM-N}1,l%:sa{CBM-N}2,h%:sa{CBM-R}sa{CBM-N}3:h{CBM-R}1{CBM-M}3030
  4963. @Lop;l%;h%:230
  4964. zVde {CBM-R} op:4000:h$" ";
  4965. T de {CBM-R} l%:4000:h$" ";
  4966. {$ea}de {CBM-R} h%:4000:h$:230
  4967. {CBM-A}   decimal to hex (de to h$)
  4968. {$f4}{CBM-N}h${CBM-R}"":m{CBM-R}sz{CBM-@}0{SHIFT-POUND}{CBM-Q}1:n%{CBM-R}de{CBM-Z}(16{CBM-S}m):de{CBM-R}de{CBM-Q}n%{CBM-D}16{CBM-S}m:h${CBM-R}h${CBM-N}J
  4969. {CBM-R}828{CBM-@}858:a:i,a::
  4970. x 120,173,4,144,205,96,3,240,248,141,96,3,41,248,10,9,8,141,15,144,32,159,255
  4971. {$7b} 165,197,201,64,240,228,88,96
  4972.  
  4973.  
  4974. ,em$: en{CBM-E}0 {CBM-M} 600
  4975. {CBM-W}1,mo$:1,it:n$(it),f$(it)
  4976. Si{CBM-R}0{CBM-@}it:1,n$(i):1,f$(i):
  4977.   1: 15:
  4978. {$eb}x 1: 15
  4979. B"------------------------------";
  4980. 9{$fa}
  4981. s{CBM-R}cp{CBM-D}8:e{CBM-R}cp{CBM-D}8{CBM-N}7:e{CBM-E}it{CBM-M}e{CBM-R}it
  4982. Gi{CBM-R}s{CBM-@}e:" F";G(177{CBM-N}i{CBM-Q}cp{CBM-D}8);" ";n$(i);
  4983. H(sp$,35{CBM-Q}C(n$(i)));
  4984. {CBM-W}"----------------------------------------";
  4985. {CBM-O},
  4986. {$e1}6:"this is page #";cp{CBM-N}1;"of";np{CBM-N}1
  4987. @"press RETURN
  4988. "             64.
  4989. r"            "
  4990. >\"             just the book for pro-
  4991. SF"             grammers who want to learn
  4992. {CBM-M}P"             how to write fast, exciting";
  4993. KZ"             arcade games.
  4994. ~ "
  4995. '
  4996.  
  4997.  
  4998.             64.
  4999. r"            "
  5000. >\"             just the book for pro-
  5001. SF"             grammers who want to learn
  5002. {CBM-M}P"             how to write fast, exciting";
  5003. KZ"             arcade games.
  5004. ~ "
  5005. {$7f}lLl{$de}lc~~
  5006.  
  5007. ~~
  5008.  
  5009. ~~
  5010.  
  5011. l#
  5012. ~~
  5013.  
  5014. ~~
  5015.  
  5016. ~~
  5017.  
  5018. ~~
  5019.  
  5020. ~~
  5021.  
  5022. ~~shift16{CBM-D}{SHIFT-*}h? edg)Ua f{CBM-C}h{$f5}gHhDe]
  5023. NOffPeh{$7d}3shift16x{CBM-D}0{$7f}?{CBM-U}edg)UaRf{CBM-C}h{$f5}gHhDe]
  5024. NOff{$e8}eh{$7d}3 {CBM-POUND}{$7f} P{$f9}H{CBM-A}J{CBM-X}{CBM-Q}I
  5025. P{CBM-X}{CBM-E}I
  5026. {$f0}{CBM-Q}{CBM-O}{CBM-X}
  5027. TV{CBM-O}{CBM-V}TWl{$eb}{$7f}{CBM-O}{CBM-X}YV
  5028. TV{CBM-O}{CBM-V}YWTW{$de}{CBM-Q}8{$e9}{CBM-POUND}{$60}{CBM-Z}AH{CBM-A}{$ea}{$ea}{$ea}{$ea}
  5029. TZ{$ee}{CBM-D}{CBM-D}{CBM-E}X{$ee}E{$7f}{CBM-I}
  5030. {$60} P){CBM-N}{CBM-Z}H){$fe}HT{$e1}{$ee}{CBM-D}{CBM-D}{CBM-E}Z{$ee}E{$7f}{CBM-I}{$60}lJ{CBM-N}{CBM-Z}O){$fe}OT{$e8}{$ee}{CBM-D}{CBM-D}{CBM-E}{$7c}{$ee}E{$7f}{CBM-I}{$60}E{$7f}{$e3}{CBM-A}I )
  5031. {CBM-POUND}{CBM-O}{CBM-G}H{CBM-O}{CBM-+}L{CBM-G}l{CBM-P}){CBM-Z}U){$f0}MUT{$ee}{CBM-S}{$fe}J{$60}MJ{CBM-A}{CBM-X}{CBM-Y}I
  5032. {$f0}{$de}{CBM-Y}lZ{CBM-X}{SHIFT-@}I
  5033. P{CBM-O}A){$fe}ATZ{$60}TMI{CBM-A}{CBM-D}{CBM-E}XIPlV{CBM-POUND}{CBM-X}y{CBM-Y}{CBM-C}{SHIFT-@}tions.
  5034. {SHIFT-*}"              "
  5035. 8J"               advanced programmers can
  5036. IT"build up their tool kits with the sprite";
  5037. {$de}"editors, screen design program, and
  5038. {CBM-U}{$e8}"other useful utility programs.
  5039. {$ec}{$f2} "isbn 0-942386-29-9                $12.95MMODORE   can type in and run.
  5040. "            "
  5041. ^"             "G(34)"stargazer"G(34)" displays the
  5042. "             constellations of the night";
  5043. {CBM-Y}{CBM-+}"             sky.
  5044. R{CBM-A}"            "
  5045. {SHIFT-@}"         "             of drawings.
  5046. 0
  5047. "an instant library of educational soft-
  5048. \
  5049. "ware, with levels clearly identified.
  5050. "isbn 0-942386-37-x               $12.95";
  5051. {SHIFT-+} 10000
  5052. N{CBM--}53280,10: 53281,10:53283,2:53284,7:53282,1
  5053. ~{$e6}"games,applver
  5054. "    book     before published.
  5055. """     of     "
  5056. s6" COMMODORE   arcade and text adventure
  5057. @"             games in both basic and
  5058. {CBM-L}j"             machine language, a com-
  5059. {$eb}t"             mercial sofand graphics.
  5060. "clear information about such topics as
  5061. e"saving, copying, and retrieving files,
  5062. L{CBM-@}"using arrays, and function keys.
  5063. {CBM-S}"isbn 0-942386-44-2               $12.95";
  5064. {SHIFT-POUND}{CBM-U}10000
  5065. TP53280,14: 53281,14:53283,6:53284,7
  5066. Z
  5067. "   games     includes general programs
  5068. 9 "   on the    for using the screen, cus-
  5069. K*" COMMODORE   tom characters, animation,
  5070. 4"             sprites, sound, and music,
  5071. R>"             and other features of the
  5072. {$f2}hisbn 0-942386-36-1               $14.95";
  5073.  10000
  5074. #53265,B(53265){CBM-P}191
  5075. ,""
  5076. vs${CBM-R}"lO"{CBM-N}G(34){CBM-N}"mn"{CBM-N}G(34){CBM-N}",8:"{CBM-N}G(131)
  5077. i{CBM-R}1{CBM-@}C(s$):630{CBM-N}i,F(J(s$,i))::198,i
  5078. 53280,14:53281,14
  5079. {CBM-W}"reloading menu":
  5080. N'i{CBM-R}1{CBM-@}6000:{CBM-K}a$:a${CBM-R}""{CBM-M}
  5081. TT{$e1}{$ee}{CBM-D}{CBM-D}{CBM-E}Z{$ee}E{$7f}{CBM-I}{$60}V{CBM-A}{CBM-D}{CBM-E}{$7c}IPlV{CBM-POUND}{CBM-X}y{CBM-Y}{CBM-C}{SHIFT-@}{SHIFT-*}
  5082. {$f0}{$de}{SHIFT-@}{CBM-N}lj{CBM-N}{CBM-Z}O){$fe}OT{$e8} M{CBM-POUND}{SHIFT-*}
  5083. {$f0}NNlq{CBM-Z}{$f1}
  5084.  [lO {CBM-Z}KT{$e4}{CBM-Z}LT{$e5}{CBM-Z}OOT{$e8}{$ee}{CBM-D}{CBM-D}{CBM-E}{$7c}{$ee}E{$7f}{CBM-I}{$60}){$fb}{CBM-N}{CBM-X}{CBM-A} 
  5085. Pl{$e2} Pl{$7d}lLllA{CBM-Z}jjrJ{CBM-A} {CBM-O}
  5086. I{$f0}gI{CBM-A}{CBM-N}{CBM-X}Tl{$f5}){$fb}{CBM-N}{CBM-X}Ti{$ea}{$ea}{$ea}{$ea}{$ea}{$ea}{$ea}{$ea}{$ea}{$ea}{$ea}{$ea}{$ea}{$ea}{$ea}{$ea}{$ea}{$ea}{$ea}{$ea}{$ea}{$ea}{$ea}{$ea}
  5087. {$60} P){$f1}{$7f}{CBM-A}j{CBM-D}{CBM-M}{CBM-D}{CBM-POUND}{CBM-POUND}{SHIFT-*}
  5088. {$f0}N{CBM-POUND}N{CBM-M}l-{CBM-Z}M{CBM-M}{CBM-Z}M{CBM-POUND}{$60}{$e8}{$ee}{CBM-D}{CBM-A}j{CBM-D}{CBM-M}{CBM-D}{CBM-POUND}{CBM-POUND}{SHIFT-*}
  5089. {$f0}N{CBM-POUND}N{CBM-M}lJ{CBM-Z}8{$ed}{CBM-M}{CBM-Z}{$ed}{CBM-POUND}{$60}l{CBM-P}){CBM-Q}H{CBM-A}{CBM-I}  {CBM-POUND}{$7f} P{$f9}{$60}{CBM-S}{$fe}J{$60}{CBM-A}{CBM-I}  {CBM-POUND}{$7f} 
  5090. P{$f9}{$60}{CBM-Y}lZ{CBM-X}{SHIFT-@}I{CBM-G}{CBM-A})
  5091. {CBM-POUND}{CBM-O}]{CBM-O}^jjjj{$60}{CBM-E}XIPI{CBM-A} 
  5092. P&{CBM-N}{CBM-Z}A){$fe}A{SHIFT-*}
  5093. {$f0}{$de}{SHIFT-@}{CBM-N}l{CBM-N}{CBM-Z}A){$fe}ATZ M{CBM-POUND}{SHIFT-*}
  5094. {$f0}NNl{CBM-Z}{$ef}
  5095.  [l9 {CBM-Z}{CBM-X}
  5096. TV{CBM-Z}{CBM-V}TW{CBM-Z}AATZ{$ee}{CBM-D}{CBM-D}{CBM-E}X{$ee}E{$7f}{CBM-I}
  5097. {$60}T{SHIFT-+}{CBM-A}{CBM-D}{CBM-E}ZIPlV{CBM-POUND}{CBM-X}y{CBM-Y}{CBM-C}{SHIFT-@}{SHIFT-*}
  5098. {$f0}{$de}{SHIFT-@}{CBM-N}l{CBM-P}{CBM-N}{CBM-Z}H){$fe}HT{$e1} M{CBM-POUND}{SHIFT-*}
  5099. {$f0}NNl{CBM-L}{CBM-Z}{$f0}
  5100.  [lT {CBM-Z}DT{SHIFT--}{CBM-Z}ET{$de}{CBM-Z}HH";
  5101. {$f8}{$fc} 10000
  5102. *l53280,0: 53281,0:53283,5:53284,9:53282,7
  5103. zv" turn your commodore 64 into a teacher
  5104. {$60}"  and entertainer for all ages, from
  5105. {CBM-D}J"       preschool to high school.
  5106. {CBM--}T"             thirty game programs you
  5107. {$7e}" CO    "G(34)"movers and shakers"G(34)" tests
  5108. aD"             knowledge of historical
  5109. AN"   games     figures.
  5110. WX"  for kids  "
  5111. {CBM-A}{$e2}"             "G(34)"hidden pictures"G(34)" lets
  5112.  {$ec}"             children uncover a series
  5113.  
  5114. {$f6}ications,utilities,tutorials"
  5115. ){$f0}"   and information for users of the
  5116. p{$f5}"      commodore 64 home computer
  5117. {$fa}"             some of the best programs
  5118. {CBM-L}" compute!'s  and articles from compute!,";
  5119. {$e3}"   second    many revised or netware-quality
  5120. ^"             word processor, a program
  5121. vH"             which adds 41 new commands
  5122. R"             to basic, an electronic
  5123. {CBM-O}{$7c}"             spreadsheet, and tutorials
  5124. {$e9}"             about sound "   a step-by-step guide to creating"
  5125. .{$e4}"  an arcade game on the 64, plus six
  5126. \{$ee}" finished games to learn from and play.
  5127. {$f8}"             develops and explains the
  5128. {SHIFT-*}"  creating   principles of game design.
  5129. V"   arcade   "
  5130.  
  5131.  
  5132. 5{CBM-Q}^{$ed}S{$ed}S{$ed}S{$ed}S{$ed}S{$ed}S{CBM-H}O
  5133.  
  5134. A{$e8}
  5135.  
  5136. V
  5137.  
  5138.  
  5139.  
  5140. {CBM-O}
  5141.  
  5142.  
  5143.  
  5144.  
  5145.  
  5146.  
  5147.  
  5148. q
  5149.  
  5150. ERv
  5151.  
  5152.  
  5153.  
  5154. O{$f0}A
  5155.  
  5156.  
  5157.  
  5158.  
  5159.  
  5160. {CBM-+}Y
  5161.  
  5162. L
  5163.  
  5164.  
  5165.  
  5166. {CBM-K}
  5167.  
  5168.  
  5169.  
  5170. {CBM-Y}
  5171.  
  5172.  {CBM-V}
  5173.  
  5174. ;
  5175.  
  5176. {CBM-S}
  5177.  
  5178.  
  5179.  
  5180. {CBM-*}
  5181.  
  5182.  
  5183.  
  5184. @
  5185.  
  5186. 5 sl@Fz{$60}YH
  5187.  
  5188.  
  5189.  
  5190. S
  5191.  
  5192.  
  5193.  
  5194. {SHIFT-@}6
  5195.  
  5196.  
  5197.  
  5198.  
  5199.  
  5200.  
  5201.  
  5202.  
  5203.  
  5204. 1{CBM-POUND}x
  5205.  
  5206.  
  5207.  
  5208.  
  5209.  
  5210.  
  5211.  
  5212.  
  5213.  
  5214.  
  5215.  
  5216.  
  5217.  
  5218.  
  5219.  
  5220.  
  5221.  
  5222.  
  5223.  
  5224.  
  5225.  
  5226.  
  5227.  
  5228. ?
  5229.  
  5230.  
  5231.  
  5232.  
  5233.  
  5234. ~{SHIFT-POUND}
  5235. {CBM-O}{CBM-N} 
  5236. {$f0}NNJl{CBM-Z}Y{CBM-X}
  5237. TV{CBM-Z}Y{CBM-V}TW{SHIFT-*}{$f0}I{CBM-POUND}{CBM-M} 
  5238. \{CBM-O}
  5239. I{$f0}kI{CBM-A}{CBM-N}{CBM-X}Tls){$fb}{CBM-N}{CBM-X}Ti~{SHIFT-POUND}
  5240. {CBM-O}{CBM-S}\{$7d}{$e9}){CBM-N} 
  5241. {$f0}NNJlI{CBM-Z}Y{CBM-X}
  5242. T{CBM-Z}Y{CBM-V}T{SHIFT-*}{$f0}
  5243. {$ee}\I{CBM-POUND}  {CBM-O}
  5244. I{$f0}lI{CBM-A}{CBM-N}{CBM-X}Tl{CBM-J}){$fb}{CBM-N}{CBM-X}Ti~{SHIFT-POUND}
  5245. {CBM-O}{CBM-N} 
  5246. {$f0}NNJlA{CBM-Z}jjjjjY{CBM-X}
  5247. TV{CBM-Z}Y{CBM-V}TW {CBM-W}{$60}
  5248. {CBM-N}Y{SHIFT-POUND}
  5249. X{CBM-S}J{$60}j{CBM-POUND}{SHIFT-POUND}{CBM-*}{CBM-A} D{CBM-POUND}
  5250. {CBM-N}X{CBM-S} D{CBM-POUND}
  5251. {CBM-N}Y{SHIFT-POUND}
  5252. {CBM-S}{$60} {$f8}
  5253. {CBM-A} D{$ef}{$fe}J{$60}J{$60}({CBM-A} D{CBM-C}{CBM-B}TX D{CBM-C}{SHIFT-*}TY{$fe}J{$60}R={CBM-A} D
  5254.  
  5255.  
  5256.  
  5257. {CBM-Z}T)MTT{$ed}{$fe}J{$60}
  5258.  DI{CBM-A} D{CBM-H}{CBM-S}{$fe}J{$60}{CBM-A} D{CBM-A} D{CBM-E}{CBM-Q}{$fe}J{$60}J{$60}D{CBM-N}{CBM-A} Dy{$fe}J{$60}{$fe}JA{CBM-A} D{SHIFT-@}{$fe}J{$60}{$fe}
  5259. {$fe}{$fe} D{CBM-C}
  5260. {$7e}{CBM-X}I{CBM-POUND}
  5261. {CBM-N}UX{$e8}{CBM-J}X{CBM-S}{CBM-C}HH
  5262. {$7e}{CBM-Z}
  5263. {$7e}{$fe}J{$60}{$7e}X{CBM-S}{$de}{CBM-A}{CBM-G}{$7f}{$fe}{$ec}{CBM-A}{$60}{CBM-D}&{CBM-A}{CBM-POUND}{CBM-I}
  5264. {CBM-O}I
  5265. {$f0}o /,2{$fe}{$fe}{$fe}{CBM-C}
  5266. {$7e}{CBM-X}
  5267. {CBM-N}{CBM-J}XM{$7e}{CBM-J}Y{$7e}{CBM-D}j{CBM-N}
  5268. {CBM-N}{CBM-O}
  5269. X{CBM-O}Yj{CBM-N}{SHIFT-POUND}
  5270.  {$f0}{$e8}HHlq{CBM-S}J{$60}
  5271. {CBM-N}{CBM-O}@{CBM-A}{SHIFT-POUND} D{$fe}lk /{CBM-L}{CBM-A}{SHIFT-POUND}
  5272.  D{$fe}lk~
  5273.  
  5274.  
  5275.  
  5276. W2{CBM-A} Y {CBM-I}
  5277. {$e6}{$7f}{CBM-C} {CBM-U}{CBM-G}{$7f}{SHIFT--}P {CBM-J}l{CBM-S}{$e8} P{$e2}{$60}r.all{$e5}{CBM-A}Xhhh{CBM-Z}{$f3}I
  5278. P {$f0}H{CBM-POUND}H{CBM-N}H{$60}~~
  5279.  
  5280. ~{CBM-A}{SHIFT-POUND}{$f3}{SHIFT-POUND}
  5281. {CBM-Z}{$7f}
  5282.  
  5283. M k {$f0}{SHIFT-POUND}
  5284. {$f3}{$60}
  5285. ~~9{CBM-A}{SHIFT-POUND}{$f3}{SHIFT-POUND}
  5286. {CBM-V}EL 
  5287. {CBM-Q}H{SHIFT-*}P{$f8} 
  5288. {CBM-O}{CBM-X}
  5289. TVH{SHIFT-*}P{$f2}{SHIFT-POUND}
  5290. {$7f}{SHIFT-POUND}
  5291. {SHIFT-POUND}
  5292. {SHIFT-POUND}t{SHIFT-POUND}{CBM-POUND}{SHIFT-POUND}
  5293.  k{CBM-Z}{$7f}
  5294.  
  5295. M k{CBM-+}{$7f}{$e8} {$f0} {$f0}{SHIFT-POUND}
  5296. {$f3}{$60}
  5297.  
  5298. D{CBM-A}{SHIFT-POUND}({$7f}lL
  5299.  
  5300. ~~
  5301.  
  5302. ~~
  5303.  
  5304. ~~
  5305.  
  5306. ~~
  5307.  
  5308. ~~
  5309. a~~
  5310. ~~ 8k@Iw HY =x@g< iX 3{CBM-T} ,jM(
  5311. {$e9} v w8i'y K U{$7d}@@U{$7d}ym;IHzYj\ 0
  5312. @
  5313. {CBM-O} 
  5314.  
  5315.  {$7e} {$7d}I@m {$e7}{SHIFT--}
  5316.  P{$de}@Q8@FK@{CBM-M}@{$fd}{CBM-B}
  5317. {$f0}
  5318. pV -{SHIFT-POUND} {$7b}9@v {CBM-O}K {SHIFT-POUND}I@
  5319. {$e9} 
  5320. {CBM-U}
  5321. {CBM-POUND} 5{CBM-T}{$60}{$ec}{$60}{CBM-X}@
  5322. @\ {CBM-Z}\@)
  5323.  {$de}
  5324.  23 {SHIFT-@}T'h a
  5325. U {CBM-Y}p
  5326.  W
  5327.  
  5328.  
  5329.  
  5330.  
  5331.  
  5332.  
  5333.  
  5334.  
  5335.  
  5336. "
  5337. ,H
  5338.  
  5339. !
  5340.  
  5341.  
  5342.  
  5343.  
  5344.  
  5345.  
  5346.  
  5347.  
  5348.  
  5349.  
  5350.  
  5351.  
  5352.  
  5353.  
  5354.  
  5355.  
  5356.  
  5357.  
  5358.  
  5359.  
  5360.  
  5361.  
  5362.  
  5363.  
  5364.  
  5365.  
  5366.  
  5367.  
  5368.  
  5369.  
  5370.  
  5371. Iw HY =x@g< iX 3{CBM-T} ,jM(
  5372. {$e9} v w8i'y K U{$7d}@@U{$7d}ym;IHzYj\ 0
  5373. @
  5374. {CBM-O} 
  5375.  
  5376.  {$7e} {$7d}I@m {$e7}{SHIFT--}
  5377.  P{$de}@Q8@FK@{CBM-M}@{$fd}{CBM-B}
  5378. {$f0}
  5379. pV -{SHIFT-POUND} {$7b}9@v {CBM-O}K {SHIFT-POUND}I@
  5380. {$e9} 
  5381. {CBM-U}
  5382. {CBM-POUND} 5{CBM-T}{$60}{$ec}{$60}{CBM-X}@
  5383. @\ {CBM-Z}\@)
  5384.  {$de}
  5385.  23 {SHIFT-@}T'h a
  5386. U {CBM-Y}p
  5387.  W
  5388.  
  5389.  
  5390.  
  5391.  
  5392.  
  5393.  
  5394.  
  5395.  
  5396.  
  5397. "
  5398. ,H
  5399. {$e7}{$f0}~~{CBM-*} 6{$e9}{$eb}{$ea}{$ea}{CBM-U}{$e9}X{$eb}{$ec}
  5400. {$e4} {$eb}0~{CBM-*}{$ea}{$ea}{$ea}{CBM-U}{$e9}X{$ec}
  5401. {$ea}7{$e4}{$ea}w <{$eb}i{$eb}{$60}~{$ea}7{$ec}{$ea}{$ea}{CBM-U}{$e9}X{$e4}{$ef} bg{$eb}p~{$ec}
  5402. {$ea}7 <{$eb}i{$eb}{$60}~{$ec}
  5403. {$ea}7 <{$eb}i{$eb}{$60}~{$ec}
  5404. {$ea}7 <{$eb}i{$eb}{$60}~{$ea}7{$e9}X{$e9}{CBM-U} {SHIFT-+}W{$e4}
  5405. {$ea}{$ec}{$7b}tt
  5406. ttttt
  5407. ttVtUt
  5408. t
  5409. TttSttRtt
  5410. Qttt
  5411. {$eb}{$60}~{$e9}X{$ea}7{$e9}{CBM-U} {SHIFT-+}Z{$e4}
  5412. {$ea}{$ec}{$7b}t{SHIFT-+}t
  5413. {CBM--}t{SHIFT--}t{CBM-*}t{$f3}ttttt{$f5}t
  5414. {SHIFT--}t{SHIFT-+}t
  5415. tYtXtWtV{$e4}{$ec}
  5416. {CBM-P}{$ea}{$f0}t
  5417. TttSttRtt
  5418. Qttt
  5419. {$eb}{$60}~{$ea}7{$e9}X{$e9}{CBM-U} {SHIFT-+}W{$e4}
  5420. {$ea}{$ec}{$7b}{$f3}uuuuu
  5421. u{$f5}Vu
  5422. Uu
  5423. uuTu{$f3}~uu
  5424. u{$f5}~{$ea}7{$e9}X{$e9}{CBM-U} {SHIFT-+}W{$e4}
  5425. {$ea}{$ec}{$7b}uXuYu{SHIFT-+}u{SHIFT--}u{CBM-*}u
  5426. {$f3}uuuuu
  5427. u{$f5}{SHIFT--}uu{SHIFT-+}uuYuXuuWuVu
  5428. UuTuSu{$f3}~uuu
  5429. u{$f5}~{$ea}7{$e9}X{$e9}{CBM-U} {SHIFT-+}V{$e4}{$ea}{$ec}K{$f3}ss
  5430. ssss{$f5}UsTs{$f3}~ss
  5431. ss{$f5}~{$e9}X{$ea}7{$e9}{CBM-U} {SHIFT-+}X{$e4}
  5432. {$ea}{$ec}KsYs
  5433. {$ea}7{$ea}w{$ec}
  5434. {$7d}{$ef}{$f0}~~ ${$e7}{$60}{$eb};{$eb}~U{$ef}{$ed} '{$ec}{$e4}{$e7}4${$eb}$~ R{$ec}w{$e4}{$ea}{$ea}7{$ea}w{$ea}W{$e9}{CBM-U}{$e9}X{$ea}2D{$eb}~{CBM-*} R{$ec}w{$e4}
  5435. {$ea}{$ea}7{$ea}w{$ea}{$e9}{CBM-U}{$e9}X{$ea}2D{$eb}~{$ee} {CBM-G}U@{$eb}~{$ee} {CBM-G}Ub{$eb}~ {CBM-POUND}{CBM-A}{$60}{$eb}{$60}~ {$ec}{$e4}
  5436. {SHIFT-+}{$eb}6{$eb}{$e7}666{$e7}6864{$e7}{$fa}602{$eb}2{$eb}2{$eb}0
  5437. {$eb}
  5438. 2{$eb}4{$eb}6D{$eb}({$f3}~{$e9}w{$f3} {CBM-S}v{$eb}{$f3} {CBM-Y}1{$eb}{$f5} {CBM-S}q{$eb}{$f3} {CBM-Y}1{$eb}{$f5}{$f5}{$eb}{$60}{$eb}{$60} *{$eb}*{$eb}*{$eb}{$f3}*
  5439.  
  5440.  
  5441.  
  5442. ~{$ea}7 h{$eb}8{$eb}0~{$ef} 9(
  5443. {$eb}~{$eb}~{$ea}{$ea}X{$ec}
  5444.   {$f3}#$ {$ea} {$eb}{$e9}X{$eb}{$ec}{$7b}{$eb}{$60}~{$ea}{$ea}X{$ec} {$ea}$ {CBM-H} !{$eb}{$e9}X{$eb}{$ec}{$7b}{$eb}{$60}~{$ef}{CBM-*} 9{$ea}{$ea}{$ea}{CBM-U}{$e9}X(
  5445. {$eb}~{$ef}{CBM-*} 9{$ea}{$ea}{$ea}{CBM-U}{$e9}X({$eb}~{$ef}{CBM-*} 9{$ea}{$ea}{$ea}{CBM-U}{$e9}X({$eb}~X{$ea}{$e4}
  5446. {$ea}{$e9}X{$ec}
  5447. z {$e4}{$ea}{CBM-U}*{$eb}~X{$ec}w{$e4}
  5448. {$ea}{$ea}{CBM-U}{$e9}X {$e4}({$eb}~{$eb}~ Up"{$eb}~ Up${$eb}~{$ee} {CBM-G}g-{$eb}~{$ee} {CBM-G}i-{$eb}~{$e9}{$ed} k{$f3}0{$f5}{$ed}{$eb}{$60}~{$e9}{$ea}7{$ea}w {$eb}&{$eb}
  5449. {CBM-N}L{CBM-A}{CBM-G}{$7f} Y{CBM-Z}E{$7f}{$f0}{$f6} {CBM-I}
  5450. {CBM-C} {CBM-U}{CBM-G}{$7f}{SHIFT--}P {CBM-J}{$e8} P{$eb} Y{CBM-G}EI@{$f0}N{CBM-+}lWDG9{$60}J{$60}J{$60}({CBM-A} D{CBM-J}J{CBM-A}{$fe}  {CBM-D}{CBM-E}X {CBM-N} 
  5451. {CBM-X}
  5452. ATZ{$e8}H{SHIFT-*}P{$ee}l{CBM-R}P {CBM-D}{CBM-E}Z{CBM-K}{CBM-N} 
  5453. {CBM-X}
  5454. HT{$e1}{$e8}H{SHIFT-*}P{$ee}l{CBM-R}{CBM-D}{CBM-E}{$7c}{CBM-I}{CBM-N} 
  5455. {CBM-X}
  5456. OT{$e8}{$e8}H{SHIFT-*}P{$ee}{CBM-S}{$fe}J{$60}{$fe}J!K{CBM-A}{$fe}{CBM-C} 
  5457. P{CBM-E}Xl{$de} P{CBM-E}Zl{$de}{CBM-E}{$7c}{$60} D{SHIFT-@}dK{CBM-A} D{CBM-POUND}{SHIFT-POUND}
  5458. {$fe} V{CBM-A} Djjjjj{CBM-POUND}{SHIFT-POUND}{SHIFT-*}
  5459. {$f0}
  5460. l{CBM-Z}){CBM-POUND}{CBM-O}{CBM-X}{$60}
  5461. {$7e}{$fe}J{$ec}{CBM-A} {$f8}
  5462. m{CBM-X}
  5463. TV{$fe}J{$60}{CBM-D}{CBM-A} {$f8}
  5464. {CBM-X}
  5465. TV{$fe}J{$60}{$fe}@{CBM-A} DRT{$eb} DST{$ec}{$fe}J{$60}{$7e}{CBM-J}Y_{CBM-A} D{CBM-C}
  5466.  D{CBM-C}{$fe}J{$60} {CBM-A} D{CBM-C} D{CBM-C}{$fe}J{$60}D{$fe}{CBM-@}{CBM-A} D D{$fe}J{$60}mrepeaT K{CBM-A}{$fe}WM{CBM-A}{CBM-C}{CBM-O}
  5467. {$7e}I
  5468. P{$de}{$de}{$de}{$fe}J{$60}l/I~{$f0}8{$e9}
  5469. {$7e}{SHIFT-POUND}
  5470.  
  5471. {CBM-N}H{CBM-O}
  5472. {$7e}X{$e8}H{CBM-O}
  5473. {$7e}X{CBM-S}J{$60} {$f0}H{$e4}{CBM-A} D D{CBM-D}{CBM-O}{CBM-O}M
  5474. {CBM-N}
  5475. {CBM-POUND}{CBM-O}X
  5476. X{CBM-O}Y
  5477. Y{CBM-S}J{$60}{$f3}{SHIFT-POUND}
  5478. /{CBM-A} D{CBM-POUND}{CBM-I}
  5479. {CBM-O}I
  5480. {$f0}l{CBM-C}{CBM-O}
  5481. {$7e}*{CBM-A}{$de}{$de}{$de}l{SHIFT-POUND}~Y
  5482. {$7e}P{$de}{$de}{$de}l{SHIFT-POUND}
  5483.  
  5484. {CBM-N}{CBM-O}{$7e}X{CBM-O}{$7e}Yj{CBM-N}{$de}{$de}{$de} / {$f0}{CBM-D}{$e8}HHl{CBM-S}J{$60}~~
  5485.  
  5486. W{$ee} {$de}lW
  5487. ~~
  5488. aL{CBM-A}{$60}copyright 1984 bob landwehr.all rights reserved.
  5489.  
  5490. ~~
  5491.  
  5492. ~~
  5493.  
  5494. ~~
  5495.  
  5496. ~~
  5497.  
  5498. ~~
  5499.  
  5500. ~~
  5501.  
  5502. ~~
  5503.  
  5504. ~~
  5505.  
  5506. ~~
  5507.  
  5508. ~~
  5509.  
  5510. ~~
  5511.  ~~
  5512.  
  5513. ~~
  5514.  
  5515. ~~
  5516.  
  5517. ~~
  5518.  
  5519. ~~
  5520.  
  5521. ~~
  5522.  
  5523. ~~
  5524. q~~v
  5525. ~~ 
  5526. ~~
  5527.  
  5528. ~~
  5529.  
  5530. ~~
  5531.  
  5532. ~~
  5533.  
  5534. ~~
  5535.  
  5536. ~~
  5537.  
  5538. ~~
  5539.  
  5540. ~~
  5541.  
  5542. ~~
  5543.  
  5544. ~~
  5545.  
  5546. ~~
  5547.  
  5548. ~~
  5549.  
  5550. ~~
  5551.  
  5552. ~~
  5553.  
  5554. ~~
  5555.  
  5556. ~~
  5557.  
  5558. ~~
  5559.  
  5560. ~~
  5561.  
  5562. ~~
  5563.  
  5564. ~~
  5565.  
  5566. ~~
  5567.  
  5568. ~~
  5569.  
  5570. ~~
  5571.  
  5572. ~~
  5573.  
  5574. ~~u
  5575. %
  5576. x
  5577. )+;*)@
  5578. Y 
  5579. I
  5580. y
  5581. l{$fe}2fS{CBM-W}K{$e1})k{$ed}G{CBM-Z}M{$ea}V{CBM-B}{$ea}W{$f0}8{$de}{$fe}{$fe}{$fe}{$fe}{$fe}{$fe}{$fe}{$fe}
  5582. {$7e}{$fa}{CBM-POUND}{CBM-W}{CBM-D}{CBM-X}{$f3}H{$e6}T{$e1}{$f8}{$ee}.{$fd}
  5583.  
  5584.  
  5585.  
  5586.  
  5587.  
  5588.  
  5589.  
  5590.  
  5591.  
  5592.  
  5593.  
  5594.  
  5595.  
  5596.  
  5597.  
  5598.  
  5599. t{CBM-POUND}
  5600.  
  5601.  
  5602.  
  5603.  
  5604.  
  5605.  
  5606.  
  5607.  
  5608.  
  5609.  
  5610.  
  5611.  
  5612.  
  5613.  
  5614.  
  5615.  
  5616.  
  5617.  
  5618.  
  5619.  
  5620.  
  5621.  
  5622.  
  5623.  
  5624.  
  5625.  
  5626.  
  5627. {$7f}
  5628.  
  5629.  
  5630.  
  5631.  
  5632.  
  5633.  
  5634.  
  5635.  
  5636.  
  5637.  
  5638.  
  5639.  
  5640.  
  5641.  
  5642.  
  5643.  
  5644.  
  5645.  
  5646.  
  5647.  
  5648.  
  5649.  
  5650.  
  5651.  
  5652.  
  5653.  
  5654.  
  5655.  
  5656.  
  5657.  
  5658.  
  5659.  
  5660.  
  5661.  
  5662.  
  5663.  
  5664.  
  5665.  
  5666.  
  5667.  
  5668.  
  5669.  
  5670.  
  5671.  
  5672.  
  5673.  
  5674.  
  5675.  
  5676.  
  5677.  
  5678.  
  5679.  
  5680. {$eb}({$eb}{$eb}{$f5} {$f0}~{$ee}{$ea}{CBM-U}{$ea}{$ea}X{$e4} {CBM-G}r#{$eb}~ {$ea}X{$e9}{CBM-U}{$e9}{$eb}!{$eb}{$e7}!!!{$e7}{$fa}!{$eb};{$eb}!{$eb}#{$eb}!0{$f3}9{$eb}{$f5}9{$eb}7
  5681. {$eb}
  5682. 9{$eb};{$eb}!D{$eb}({$f3}~{$eb}0{$e9}7{$eb}0 {CBM-Q}{$eb}{$60}{$eb}{$60}{$eb}{$60}{$eb}{$eb}{$eb}{$eb}+{$eb}{$eb}{$eb}{$eb}{$eb}{$eb}+{$eb}+{$eb}{$eb}*({$eb}&{$eb}${$eb}&${$eb}&{$eb}!h{$eb}$+{$eb}{$eb}{$eb}{$eb}{$eb}{$eb}+{$eb}+{$eb}{$eb}*({$eb}tUt
  5683. {$f0}~~ ?{$e7}{$eb}{$e4}
  5684.  Y"V U"T S"R {$eb}~Y{$ea}w e{$eb}
  5685. h{$e4}
  5686. {$eb}{$e4}{$eb}{$e4}
  5687. {$eb}{$e4}{$eb}{$e4}
  5688. {$eb}{$e4}~ ?{$e4}{$ea}w{$e7}{$eb}{$e4}
  5689.  X"U"T S"R {$eb}~ ?{$e4}{$ea}w{$e7}{$eb}{$e4}
  5690.  Y"X W"V U"T {$eb}~ ?{$e4}{$ea}w{$e7}{$eb} {$e4}
  5691.  {SHIFT-+}"Y X"W V"U {$eb}~{$ea}w{$ea}{$e9}X{$e9}{CBM-U}{$ec}V {$e7}{$e4}d
  5692. {$eb}
  5693. ~{$ea}w{$ea}{$e9}X{$e9}{CBM-U}{$ec}P {$e7}{$e4}a{$eb}{$e4}
  5694. {$ec}[~{$ea}w{$e9}X{$e9}{CBM-U}{$ea}{$ec}
  5695. N{$e4} {$e1}{$de}a{$eb}~Y{$ea}7{$ea}w{$e9}X{$e9}{CBM-U}{$ef}{$ed}{SHIFT-+}ss
  5696. ss{$f0}~sssssssssYss
  5697. ssssWs
  5698. ssVssss
  5699. Uss{$f3}~ss
  5700. ss{$f5}~{$e9}X{$ea}7{$e9}{CBM-U} {SHIFT-+}Y{$e4}{$ea}{$ec}Ks{SHIFT-+}s
  5701. {SHIFT--}ss{CBM-*}s
  5702. sssssssssssss
  5703. ssrss
  5704. {CBM--}ss
  5705. sssssssssssYss
  5706. ssssWs
  5707. ssVss{$f3}~ss
  5708. ss{$f5}~{$ed} ${$e7}{$60}{$eb};{$eb}~{$eb}~{$ea}{$ea}7{$ea}w{$ec}
  5709. {$7d}{$ef}{$ee}{$ea}{CBM-U}{$ea}{$ea}X{$e4} {CBM-G}p({$eb}~{$ea}
  5710.  
  5711. Ddemo
  5712.  
  5713. {$fd}
  5714. {$fd}
  5715. {$fd}
  5716. a. longhopper     {$fd}
  5717. {$fd}
  5718. {$fd}
  5719. {$fd}
  5720. {$fd}
  5721. {$fc}
  5722. {$fd}
  5723. F{$60}dd@dd
  5724. d@@dd
  5725. @dd
  5726. @@d
  5727. @
  5728. @
  5729. d
  5730. @d
  5731. @d
  5732. dd@dd@d
  5733. @
  5734. d
  5735. @
  5736. d
  5737. @
  5738.  
  5739.  
  5740.  
  5741.  
  5742. dd@dd@e
  5743.  
  5744.  
  5745.  
  5746.  
  5747.  
  5748.  
  5749.  
  5750.  
  5751.  
  5752.  
  5753.  
  5754.  
  5755.  
  5756.  
  5757.  
  5758.  
  5759.  
  5760.  
  5761.  
  5762.  
  5763.  
  5764.  
  5765.  
  5766.  
  5767.  
  5768.  
  5769. ru{CBM-V}{$7c}]{$ef}!P{$fb}A\Z Z ~{CBM-POUND}{CBM-V}{CBM-N}v{$f0}+~{$f9}{$7f} {CBM-T}\a**
  5770.  
  5771.  
  5772.  
  5773.  
  5774.  
  5775.  
  5776.  
  5777.  
  5778.  
  5779.  
  5780.  
  5781.  
  5782. (\{SHIFT-*}
  5783.  
  5784.  
  5785.  
  5786.  
  5787.  
  5788.  
  5789. {CBM-POUND}EX 
  5790. P!lLDbq{$7c}*CN a BP"{$eb}[!Z
  5791. {CBM-S}E({SHIFT-*}
  5792. DH )bd@
  5793.  
  5794.  
  5795.  
  5796.  
  5797.  
  5798. {CBM-U}-k
  5799.  
  5800.  
  5801.  
  5802. @
  5803.  
  5804.  
  5805.  
  5806. P!LN j@8@+O1N(P
  5807.  B0&{CBM-U}
  5808. D
  5809. c y{$f2}R@{SHIFT-*}@ 01{$e1}@2p
  5810.  
  5811.  
  5812.  
  5813.  
  5814.  
  5815.  
  5816.  
  5817.  
  5818.  
  5819.  
  5820.  
  5821. pl#S PP{$60}{$f3})
  5822.  
  5823.  
  5824. @P!0A
  5825. !N Ql.{CBM-@}!YHo{$f9}{$7b}< H*a
  5826.  
  5827.  
  5828.  
  5829. {$7f}~{$fb}J{$7c}{$fe}C'0@
  5830. e
  5831.  
  5832.  
  5833.  
  5834.  
  5835.  
  5836.  
  5837.  
  5838. pl#ASyBR{SHIFT-*}U{SHIFT-*}:
  5839.  
  5840.  
  5841.  
  5842. P!0aO ZqB8c"*X{$f9}{SHIFT-*}{$60} 
  5843.  
  5844.  
  5845.  
  5846. 2[{SHIFT-*}>P$
  5847.  
  5848.  
  5849.  
  5850.  
  5851.  
  5852. pl#lA{CBM--}oAcPF*
  5853.  
  5854.  
  5855. @P!l0{$60}PB{$f0}#{CBM-@} {$f9}Io?{$f9}{$fb}o#P
  5856. P{$f8}GcT{CBM-I}6%
  5857.  
  5858.  
  5859.  
  5860. P)l
  5861. N0QB0{CBM-P}{$f7}8{CBM-POUND}{SHIFT-*}a8{SHIFT-*}AR A@ 
  5862.  
  5863.  
  5864.  
  5865. 8{SHIFT-*}>8{$f0}d{$f0}!@h 
  5866.  
  5867.  
  5868.  
  5869.  
  5870.  
  5871.  
  5872. P{CBM-M}{SHIFT-*}
  5873. {$e1}XQG{$e6}@{CBM-K}$
  5874.  
  5875.  
  5876.  B0!{CBM-A}1DMn0G{$f8}c{SHIFT-*}0B84{CBM-S}{$f7}8{SHIFT-*}&l0aoR#{$7c}ap
  5877.  
  5878.  
  5879.  
  5880.  
  5881. 8{CBM-S}{SHIFT-*}a>P{$f0}" 
  5882.  
  5883.  
  5884.  
  5885.  
  5886.  
  5887.  
  5888. {CBM-POUND}!d'Il{$7e}:{$f7}9LJ tC!q*
  5889.  
  5890.  
  5891. w<{$e9}IP{SHIFT-*}F{CBM-Y}{CBM-F}A*Bg>{$fc}AGH>C{CBM-Y}{SHIFT-*}Y(@{CBM-N}$d
  5892.  
  5893.  
  5894. R&{$e8}Il{SHIFT-*}("p
  5895.  
  5896.  
  5897.  
  5898. {$f2}{$fc}{$f7}XU{CBM-P}{$f2}X{$f5}{$7f}A{CBM-B}?{$eb}~{$7f}{$f8}~{CBM-Y}~{CBM-B}{$fd}{$7c}{$ed}{$e7}J>us{SHIFT-POUND}jU{CBM-N}{CBM-+}p{CBM-J}uu{CBM-D}{CBM-N}Bup{$7c}0{$7c} PP?{CBM-X}{$e7}{$ef}=P 
  5899. H
  5900. {SHIFT-*}P{$e5}{$ef}{$7f}~~C7{CBM-V}{SHIFT-*}={$ee}!D {$fd}{$7c}H{$f1}~{$7f}~s*@
  5901.  
  5902.  
  5903.  
  5904. u{$fe}{CBM-P}{$7f}{$e1}{$7b}{CBM--}kx
  5905. z@{CBM-POUND}@"
  5906.  
  5907.  
  5908.  
  5909.  
  5910.  
  5911. cHPdB{$e4}I{$e6}S{SHIFT-*}G2S={$e2}1tJpTp*
  5912. {$60}{$e2}
  5913. ]{$f8}CDN{$f8}PY @@BHm{$f8}BD&L/>{$7c}{CBM-L}{$f9}
  5914.  
  5915.  
  5916. {CBM-F}{CBM-*}d{$fe}{$f0}4{$f0}9C{CBM-Z}{$7c}{CBM-N} @$d
  5917.  
  5918.  
  5919. @
  5920. g2E @{SHIFT-*}
  5921.  p
  5922.  
  5923.  
  5924. yC@"P{$f1}{$fc}{$e8}!{$7b}C8{$f6}{SHIFT-*}.5P{CBM-POUND}{$e1}+MS {$e8}*{$f8}wA{CBM-B}{SHIFT-*}{$fe}{$f0}'l{SHIFT-*}l{$60}n{CBM-W}!&cG{$e3}{$de}@{CBM-R}P!
  5925. 2d{SHIFT-*}w8{$7c}XB{$e7}A 
  5926. 4 p 
  5927.  
  5928.  
  5929.  
  5930. CP@ :$8p D
  5931.  
  5932.  
  5933.  
  5934.  
  5935. {SHIFT-*}@2{CBM-A} 2{CBM-C}{$e8}!d ?{$f8}S@{$fa}{$f4}P6{SHIFT-POUND}&{$eb}${$eb}&${$eb}{$f0}~&&&{$e7}&$&({$e7}{$fa}&{$fc}{$eb}( {$f3}~{$eb}{$60} {CBM-Q}{$eb}{$60}{$eb}{$60}{$eb}{$60}!{$eb}!{$eb}!{$eb}!{$eb};{$eb}!#{$eb}${$eb}&{$eb}$#{$eb}!{$eb};{$eb}!;{$eb}!{$eb}:8{$eb}6{$eb}4{$eb}64{$eb}6{$eb}1h{$eb}!$;{$eb}!#{$eb}${$eb}&{$eb}$#{$eb}!{$eb};{$eb}!;{$eb}!{$eb}:8{$eb}6{$eb}4{$eb}64{$eb}8{$eb}{$f3}6h41{$eb}4{$eb}8{$eb}{$f5} {$f3}!{$eb}!{$eb}!{$eb}{$f3}!#{$eb};{$eb}~~~~~~~~~~~~~~~~~~~~~~{$eb}{$f5}&{$eb}${$eb}&{$eb}({$eb}&{CBM--}{$eb}({$eb}{$60}{$eb}{$60}{$f5}~ U{$ed}{$ee}{$e5}
  5936. {$e3}{$e2}{$e7}{$f0}{$eb}~{$eb}{$f1}~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~G{$f7}~~~~~~~~~~~~~~~,~~~~~{$ef}~~{$ef}~~~~~~~~h~~~{$f7}~~8~~~~~~~~~{$f7}~~~~~~{$f7}~~{$f7}~~{$f7}{$f7}~G~{$f7}~{$f7}~~~W~~
  5937. ~{$f7}~~{SHIFT-+}~
  5938.  
  5939. ~~~~~~~~~~~~~~~~
  5940. {$f7}~~~~~~~~~~~{CBM-*}~~
  5941. ~)~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~,~~~~~{$ef}~~{$ef}~~~~~~~~h~~~{$f7}~~8~~~~~~~~~{$f7}~~~~~~{$f7}~~{$f7}~~{$f7}{$f7}~G~{$f7}~{$f7}~~~W~~
  5942. ~{$f7}~~{SHIFT-+}~
  5943.  
  5944. ~~~~~~~~~~~~~~~~
  5945. {$f7}~~~~~~~~~~~{CBM-*}~~
  5946. {$fd}
  5947.  
  5948.  
  5949.  
  5950.  
  5951.  
  5952.  
  5953.  
  5954.  
  5955.  
  5956.  
  5957.  
  5958.  
  5959.  
  5960.  
  5961.  
  5962.  
  5963.  
  5964.  
  5965.  
  5966.  
  5967.  
  5968.  
  5969.  
  5970.  
  5971.  
  5972.  
  5973.  
  5974.  
  5975.  
  5976.  
  5977.  
  5978.  
  5979.  
  5980.  
  5981.  
  5982.  
  5983.  
  5984.  
  5985.  
  5986.  
  5987.  
  5988.  
  5989.  
  5990.  
  5991.  
  5992.  
  5993.  
  5994.  
  5995.  
  5996.  
  5997.  
  5998.  
  5999.  
  6000.  
  6001.  
  6002.  
  6003.  
  6004.  
  6005.  
  6006.  
  6007.  
  6008.  
  6009.  
  6010.  
  6011.  
  6012.  
  6013.  
  6014.  
  6015.  
  6016.  
  6017.  
  6018.  
  6019.  
  6020.  
  6021.  
  6022.  
  6023.  
  6024.  
  6025.  
  6026.  
  6027.  
  6028.  
  6029.  
  6030.  
  6031.  
  6032.  
  6033.  
  6034.  
  6035.  
  6036.  
  6037.  
  6038.  
  6039.  
  6040.  
  6041.  
  6042.  
  6043.  
  6044.  
  6045.  
  6046.  
  6047.  
  6048.  
  6049.  
  6050.  
  6051.  
  6052.  
  6053.  
  6054.  
  6055.  
  6056.  
  6057.  
  6058.  
  6059.  
  6060.  
  6061.  
  6062.  
  6063.  
  6064.  
  6065.  
  6066.  
  6067.  
  6068.  
  6069.  
  6070.  
  6071.  
  6072.  
  6073.  
  6074.  
  6075.  
  6076.  
  6077.  
  6078.  
  6079.  
  6080.  
  6081.  
  6082.  
  6083.  
  6084.  
  6085.  
  6086.  
  6087.  
  6088.  
  6089.  
  6090.  
  6091.  
  6092.  
  6093.  
  6094.  
  6095.  
  6096.  
  6097.  
  6098.  
  6099.  
  6100.  
  6101.  
  6102.  
  6103.  
  6104.  
  6105.  
  6106.  
  6107.  
  6108.  
  6109.  
  6110.  
  6111.  
  6112.  
  6113.  
  6114.  
  6115.  
  6116.  
  6117.  
  6118.  
  6119.  
  6120.  
  6121.  
  6122.  
  6123.  
  6124.  
  6125.  
  6126.  
  6127.  
  6128.  
  6129.  
  6130. {$fd}
  6131. {$fd}
  6132. {$fd}
  6133. {$fc}
  6134. {$fd}
  6135. {$fd}
  6136. ~
  6137. ~
  6138. ~
  6139. ~
  6140. ~
  6141. ~
  6142. ~
  6143. ~
  6144. ~
  6145. ~
  6146. ~
  6147. ~
  6148. ~
  6149. ~
  6150. ~
  6151. ~
  6152. ~
  6153. ~
  6154. ~
  6155. ~
  6156. ~
  6157. ~
  6158. ~
  6159. ~
  6160. ~
  6161. ~
  6162. ~
  6163. ~
  6164.  
  6165.  
  6166.  
  6167.  
  6168.  
  6169.  
  6170. P!CO pBl(PCA d@ BP"P M J{CBM-K}P(C
  6171. {$e4}!d 
  6172.  
  6173.  
  6174.  
  6175.  
  6176.  
  6177.  
  6178.  
  6179.  
  6180. b0
  6181.  
  6182.  
  6183.  
  6184.  
  6185. {CBM-@} {$f2}{CBM-D}7p=u{SHIFT-POUND}(E{$f8}{$7c}{$e2}@ 
  6186.  
  6187. u{$e1}KW{$f8}{CBM--} F<P~t{$f8}{$f2}{SHIFT-*}
  6188. {$7c} pU"
  6189.  
  6190.  
  6191.  
  6192.  
  6193.  
  6194. d 
  6195.  
  6196.  
  6197.  
  6198.  
  6199.  
  6200.  
  6201.  
  6202.  
  6203.  
  6204.  
  6205. pH{SHIFT-*}{CBM-P}{$de}{$f0}{CBM-P}{$fc}{$f9}{$f4}O{CBM-M}{$7e}>{$7d}{$f3}{$f9}{$f8}o{$fe}t^*{CBM-Q}
  6206. X{CBM-U}~{SHIFT-*}{$fd}{$ee}!P?{$fb}O"{$7c}A
  6207. e
  6208.  
  6209.  
  6210.  
  6211.  
  6212.  
  6213.  
  6214.  
  6215.  
  6216.  
  6217.  
  6218.  
  6219.  
  6220.  
  6221.  
  6222.  
  6223.  
  6224.  
  6225.  
  6226.  
  6227.  
  6228.  
  6229. p
  6230.  
  6231.  
  6232.  
  6233. u~{CBM-M}{$fa}8{$f0}{$f0}{CBM-H}{$60}je
  6234.  
  6235.  
  6236.  
  6237.  
  6238.  
  6239.  
  6240.  
  6241.  
  6242. M({CBM-I}]D{CBM-Q}x;Bq 
  6243.  
  6244.  
  6245.  
  6246.  
  6247. p{CBM-N}{CBM-Q}{SHIFT-*}U{$ef}+P?
  6248. {$7c}X {$7e}{SHIFT-*}{$f7}?{$e8}{CBM-M}{SHIFT-*}{CBM-*}{$f0}{CBM-V}v*v5{CBM-A}{CBM-N}F{$fc}{CBM-Z}N{$f5}'P 
  6249.  
  6250.  
  6251.  
  6252.  
  6253. {$7c}{$f9}Oo B>{$fc}{$e1}nr{CBM-N}
  6254.  
  6255.  
  6256.  
  6257.  
  6258.  
  6259.  
  6260.  
  6261. P!c{SHIFT-*}A~{$e1}hQlP{$60}S*
  6262.  
  6263.  
  6264.  B0'{CBM-A}ABM{$7e}0{$60}#{CBM-V}2{CBM-K}
  6265. {CBM-O}$!a
  6266. d@
  6267.  
  6268.  
  6269.  
  6270. 8{CBM-+}27 1! d 
  6271.  
  6272.  
  6273.  
  6274.  
  6275.  
  6276. pl#c<{$f3}{$e1} {SHIFT-*}'TA {CBM-N}vu{$f5}{CBM-B}~={$fc}O{$7f}{$7e}{$fc}J? Kz{CBM-T}
  6277. t
  6278.  
  6279.  
  6280.  
  6281.  
  6282.  
  6283.  
  6284.  
  6285.  
  6286.  
  6287.  
  6288.  
  6289.  
  6290.  {CBM-POUND}8d{SHIFT-*}'NPF2{$f7}S9{$ec}j t&T0qE{$ea}c
  6291.  
  6292.  
  6293. {$fe}e:{$f2}L{$60}{CBM-R}%{$f0}[X
  6294. C$&A({$e8}@{CBM-N}b{SHIFT-POUND}L&P0{$7c} P 
  6295.  
  6296.  
  6297. 1xp{SHIFT-*}{$60}>P0!cL
  6298. p
  6299.  
  6300.  
  6301.  
  6302. BA{$e6}d0{$e2}IWc{$e7}{SHIFT-@}=P sJt?Z {CBM-N}p{CBM-G}*lX{SHIFT-*}{$e4}
  6303. 8]{$f0}{$f9}BHX4P{CBM-K}.
  6304. \  <{SHIFT-*}{$fb}6S ,
  6305. l& {CBM-N}vu{CBM-J}{CBM-N}{CBM-N}O{$fd}{$ef}{$e1}{$7f}{$e7}{$f3}{CBM-*}B~_C{CBM-Y}{$f8}f{SHIFT-*}P{CBM-POUND}@"
  6306.  
  6307.  
  6308.  
  6309.  
  6310.  
  6311.  
  6312.  
  6313. {$60}I{SHIFT-*}{CBM-Z}H!qD{CBM-POUND}"c\
  6314. s{$f8}B{$f8}c{$e6}{SHIFT-*}Y{SHIFT-@}s<*At
  6315. {CBM-+}J0qCT{$60}r*0(A{CBM-I}_Z{CBM-U}8L{SHIFT--}4{$fc}{CBM-G}{$e1}g 0l {CBM-POUND}bb&{$fe}4{$f1}9 C 
  6316. > a
  6317.  
  6318. Bf{$e6}08 OA@ 
  6319. {SHIFT-*}h(r
  6320.  
  6321.  
  6322. {$e2}@{$e2}Jt2D{$e6}cX{$f0}{$7f}{$f2}>{CBM--}!.Mtm&Jq@P*
  6323.  
  6324. \%{$60}{$f8}){$f1},{$fc}~!u{$fe}L/{$fe}Y{$f1}?S{$60}B0 1hgZ8Xc{SHIFT-*}'{$ef}{$f0}{$60}1Lal
  6325.  
  6326.  
  6327.  
  6328.  
  6329. {$60} P#"@* 
  6330.  
  6331.  
  6332.  
  6333.  
  6334.  
  6335. lc$(@!$ 
  6336.  
  6337.  
  6338. {CBM-N}B{SHIFT-POUND}{$f0}{$ee}{CBM-P}P?P0AJ"Cu{CBM-F}:{$e1}E{$f9}L'{$f2}{$ee}{$e7}l
  6339.  
  6340. @ 0&XAh{$7e}A{$f3};"C2T!DT
  6341.  
  6342.  
  6343. {SHIFT-*}{SHIFT-*}{$e1}
  6344. 9{$f0}lb{CBM-N}@
  6345.  
  6346.  
  6347.  
  6348. {SHIFT-*}N48Ahdb{CBM-@}"{$e1}{$f5}S{CBM-N}{$7f}+{$7c}
  6349. {SHIFT-+}{$e2}C{$f6}g3{CBM-P}{$7e}8E~3'{$fe}YP#{$eb}{$f5}{$f5} &{$eb}{$f3}&{$f0}~({$eb}&h{$eb}{$eb}h;8{$eb};{$eb}#{$eb}!h;8{$eb};{$eb}#{$eb}{$eb}0{$ea}7{$ea}w{$eb}0 {$f3}&{$eb}&{$eb}&{$eb}{$f3}&({$eb}${$eb}({$eb}{$f5}{$f5} !{$eb}{$f3}!{$eb}{$f5}!{$eb};{$eb}!{$eb}#{$eb}!${$f3}9{$eb}{$f5}9{$eb}7{$eb}9
  6350. {$eb}
  6351. ;{$eb}!D{$eb}({$eb}{$60}{$eb}{$60}{$f5}~ U{$ed}{$ee}{$e5}
  6352. {$e3} {$e6}
  6353. {$e2}{$e7}{$f0}{$eb}~{$ed}~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~6{$eb}{$f3}6{$eb}{$f5}6{$eb}8{$eb}6{$eb}4{$eb}6$2{$eb}2{$eb}2{$eb}0{$eb}2
  6354. {$eb}
  6355. 4{$eb}6D{$eb}({$eb}{$60}{$eb}{$60}{$f5}~ U{$e9}{$f8}{$ed}{$ef}{$ee}{$e5}
  6356. {$e2}{$e7}{$f0}{$e3}{$e8}{$eb}~{$ed}{$ef}~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~{$f7}~~~~{$f7}~G{$f7}~~~~~~8~~~~<~~~~~,~~~~~~~~{$ef}~~~~~~~~h~~~{$f7}~~8~~~~~~~~~{$f7}(~~~~~~{$f7}~~{$f7}~~{$f7}{$f7}~G~{$f7}~{$f7}~~~{$f7}~~
  6357. ~{$f7}~{CBM-X}~{SHIFT-+}~
  6358.  
  6359. ~~~~~~~~~~~~~{CBM-B}~~~~~~~~~~~~~~~~~
  6360.  
  6361.  
  6362. 2061
  6363.  
  6364.  
  6365. lb
  6366. -
  6367.  
  6368.  
  6369.  
  6370.  
  6371.  
  6372.  
  6373.  
  6374. {$fc}
  6375.  
  6376.  
  6377.  
  6378.  
  6379.  
  6380.  
  6381.  
  6382.  
  6383.  
  6384.  
  6385.  
  6386.  
  6387.  
  6388.  
  6389.  
  6390. {$f9}
  6391.  
  6392.  
  6393. {SHIFT-POUND}
  6394. ?@a{SHIFT-POUND} R~{SHIFT-POUND} R~X{CBM-G}){$fb}{SHIFT-POUND}0{$fc}{SHIFT-POUND}
  6395. {$fb}{$fd}{SHIFT-POUND}P{$fe} 
  6396. {CBM-E}{$fd}{$fb}HP{$f9}{$e6}{$fc}{$e6}{$fe}{CBM-G}{$fc}I8P{$ef}{CBM-G}x{CBM-Z}P){$f0}P{SHIFT-POUND}{$fc}{SHIFT-POUND}1{$fb} 
  6397. {$fd}{SHIFT-POUND}0{$fe}{CBM-E}{$fb}{$fd}HP{$f9}{$e6}{$fc}{$e6}{$fe}{CBM-E}{$fb}{$fd}H{SHIFT-*}pP{$f7} {SHIFT-*}{SHIFT-POUND} R~{SHIFT-POUND}
  6398. !P P{SHIFT-POUND}{SHIFT-POUND}
  6399. .{SHIFT-POUND}p-{SHIFT-POUND}(P)P*P+P{SHIFT-POUND}'P{SHIFT-POUND},P-P{SHIFT-POUND}.P 
  6400. {SHIFT-POUND}g{$fb}{SHIFT-POUND}{$fc}
  6401. {CBM-POUND}{CBM-O}0{SHIFT-POUND}{$ee}l
  6402. {SHIFT-POUND}{$ee}lG
  6403.  
  6404. {CBM-POUND}8{CBM-O}{$ed}{CBM-O}{$ed}
  6405. {SHIFT-POUND}{$ee}l7
  6406. {SHIFT-POUND}{$ee}lG
  6407.  
  6408. {CBM-POUND}8{CBM-O}{$ed}{CBM-O}{$ed}
  6409. {CBM-A}{SHIFT-POUND}{$ee}l_
  6410. {SHIFT-POUND}{$ee}lG
  6411. {SHIFT-POUND}
  6412. {$ee}{CBM-Z}{$ee}{$f8}{CBM-G}{CBM-K}M{$ef}{$f0}{$ef}{CBM-Z}T{$f0}{CBM-Z}TI{$f0}{CBM-X}{$f0}0!
  6413. {CBM-POUND}{CBM-O}M{SHIFT-POUND}
  6414. {$ee}{$ee}l{CBM-U}
  6415. {SHIFT-POUND}
  6416. {$ee}{$ee}l{CBM-U}
  6417.  
  6418. {CBM-POUND}{CBM-O}M{CBM-*}l
  6419. {CBM-Z}{$ee}){$e4} {CBM-J}{CBM-S}{$e4}{$e8}{$ec}S{$f0}l{CBM-O}  H Z T{CBM-Z}{$e5}I{$f0}2{CBM-Z}$0'{CBM-Z}TIP{SHIFT-POUND}
  6420. {$e5}{SHIFT-POUND}
  6421. 8{$fd}//{SHIFT-POUND}{$e6}{SHIFT-POUND}lw
  6422. {SHIFT-POUND}j{CBM-POUND}{CBM-X}8{$ed}{CBM-O}{$e9}
  6423. 8{CBM-Z}{$e9}{CBM-Z}{$e9}
  6424.  
  6425. {CBM-A}
  6426. {SHIFT-POUND}{SHIFT-POUND}?{CBM-Z}{CBM-Z}lw
  6427. {SHIFT-POUND}j{CBM-POUND}{CBM-X}M{CBM-O}I
  6428. 8{CBM-Z}{$e9}@{CBM-Z}{$e9}
  6429.  
  6430. {SHIFT-POUND}
  6431. {SHIFT-POUND}{CBM-Z}{CBM-Z}lw
  6432.  Yj{CBM-POUND}{CBM-O}TPl
  6433. {$60} {$f6}l Yj{CBM-POUND}{CBM-O}TP{$ee}l2
  6434.  {$f6}l{CBM-H} Y{CBM-X}{$f0}xli
  6435. {$60} {$f6}lH{CBM-X}/I{$f8}{$f0}{$de}/{CBM-X}/8{SHIFT-POUND}
  6436. {$fd}/jjlN
  6437. {CBM-J}lE
  6438. {CBM-N}{CBM-X}M{CBM-A}l{SHIFT-POUND}T{SHIFT-POUND}{$f8}{CBM-O}%
  6439. {CBM-POUND}{SHIFT-POUND}
  6440. /{CBM-Z}
  6441. {CBM-POUND}{CBM-S}{CBM-Z}!0{SHIFT-POUND}
  6442. 8{$f9}{SHIFT-POUND}
  6443. 8{$fd}lE"{CBM-Z}j{CBM-POUND}{CBM-O}TP{CBM-D}"{SHIFT-POUND}
  6444. 8{$fd}//{SHIFT-POUND}
  6445. 8{$f9}//{CBM-S}{CBM-Z}I{$f0}I{$f0}I{$f0}
  6446. I{$f0}lNl{$ef}ll[{$60}I
  6447. {$f0}I{CBM-Z}{CBM-N}j{CBM-POUND}{CBM-O}TP{SHIFT-POUND}
  6448. 8{$fd}//lE{SHIFT-POUND}
  6449. {CBM-I}{CBM-G}{CBM-I}IP{$fa}{$60}JDRJ
  6450. {CBM-N}J1
  6451. {CBM-A}{CBM-V}JJJJJ
  6452.  
  6453. {SHIFT-POUND}8{$ed}{$e5}{CBM-N} 
  6454. P{$fd}JP{$fa}{$60}{CBM-I}{CBM-X}{SHIFT--}?{$f0}{CBM-A}l{CBM-A}{$ee}${SHIFT-POUND}
  6455. {CBM-S}$ {$f8}{CBM-Z}-Ip-{CBM-Z}.I
  6456. .Xx{CBM-I}
  6457.  {CBM-S}{$60}{CBM-Z}jjjjI{CBM-A}G{CBM-Z})I{CBM-A}H{CBM-Z}jjjjI{CBM-A}I{CBM-Z})I{CBM-A}J{CBM-Z}jjjjI{CBM-A}K{CBM-Z})I{CBM-A}L{$60} 
  6458. {CBM-Z}jLPl
  6459. {CBM-N}{CBM-O}TIPl{CBM-X}P{CBM-X}R{CBM-O}Q{CBM-Z}{CBM-N}j{CBM-POUND}8{CBM-Z}P{$fd}{CBM-Z}Q{$f9}
  6460. {CBM-A}8{CBM-X}{$ed}PP{CBM-O}{$ed}QQlZ8{CBM-Z}P{$fd}P{CBM-Z}Q{$f9}Q8{CBM-Z}P{$e9}{CBM-Z}Q{$e9}
  6461.  
  6462. {CBM-A}(>l{$e2}IOD{$60}@{CBM-POUND}p"@$ @9*P!\L@y2{$f9}qC9{$e4}!l0ABH
  6463. (
  6464.  
  6465.  
  6466.  
  6467. {$7c}{$fe}{$f3}{CBM-B}{SHIFT-*}{SHIFT-*}
  6468.  
  6469.  
  6470.  
  6471.  
  6472. P{CBM-I}{CBM-+}4
  6473.  
  6474.  
  6475.   )haZ{CBM-POUND}{CBM-*}{$7f}~{$fd}{$fb}{$7f}{CBM-U}{$7c}~o{CBM-N}{$f9}{CBM-Q}{$7e}
  6476. _{$f5}{$7f}{$f9}{CBM-Q}~K~{$fd}?{$fe}w{$fe}{$f5}~B{$ef}{$f9}{$e8}O{CBM-N} u{CBM-N}
  6477. Uu {SHIFT-@}C{$f7}{CBM-U}~{SHIFT-*}{$f1}G?{$fb}{$7c}~{$e1}~~{$fc}{$e7}S{$f9}{CBM-F}{$e7}{CBM--}={$e4}N {$7b}{CBM-E}c{CBM-I}Rpu
  6478. *
  6479. @a *B{$f7}{CBM-B}{$f0}={$e4}{CBM-P}{$e1}o{$7f}{$f2}G~{$f0}~Z?W{CBM-POUND}{$f5}{CBM-POUND}f5*qie
  6480. p{CBM-N}@V{$fa}{CBM-B};P{$fd}{$f2}{$ec}'{$7f}{$fc}{$fd}~{$ef}~7P~{CBM-C}{$e9}mH{$60}AW*{CBM-V}{$e6}oQ{$7f}~{$7c}H{CBM-*}k xza{CBM-N}t
  6481.  
  6482.  
  6483.  
  6484.  
  6485.  P0 HA
  6486.  
  6487.  
  6488. p* \U{CBM-E}{CBM-Q}F{$f5}X{$f8}k{$f7}{CBM-N}P{SHIFT-*}{$e1}C&P{$f8}ABD{$e7}{SHIFT-*}{$fc}2>{SHIFT-*} 4{$e1}{SHIFT-@}M!k b8@{$f8}L&P0CDc98
  6489.  
  6490.  
  6491. r{CBM-@} Al{$e2}s@A{SHIFT-@}t{SHIFT-*}
  6492.  
  6493.  
  6494. @"<{CBM-C}(p@A
  6495. r{SHIFT-*}
  6496.  
  6497. @ P{SHIFT-POUND}
  6498. \{$f5}H {CBM-POUND}{$f1}[MJ{$f9}{$f3}9{$f0}{$f9}LANG{$f8}P{$fe}@<{$e2}8l{$f0}K
  6499. @{$ea}"{$e3}k{$60}^N4P&P<{$e1}O
  6500. {$f8}mu
  6501. @{CBM-N}{$f4}{CBM-M};~{$e1}{$7c}{SHIFT-*}{$fc}C{CBM-+}7U{CBM-C}G{CBM-N}{$e6}{$f9}s{$f5}o{CBM-N}{$7f}Bw{$fd}8Jpc{CBM-N}r{CBM-N}n7P{CBM-U}C
  6502. {$e8}{$e1}@G8CDP !A@{CBM-I}d@p{SHIFT-*}{$7c}{$e4}9=H@<{$e2}9CD!a"bxP
  6503. !oAB{CBM-W} AD&c 2D8{$e1}C<>==L{$ec}j{SHIFT-*}t{CBM-+}{CBM-POUND}$"<AB"cB{$ec}I{$e6}e0C2{$e4}{$e7}@029{$f0}!{$f0}.{$60}#{CBM-@}*
  6504.  
  6505.  
  6506.  
  6507.  {$60}{$7b}V!{CBM-I}
  6508.  
  6509.  
  6510.  
  6511.  
  6512.  
  6513. y{CBM-K}#X
  6514.  
  6515. 4P&P<{$e1}Ol{SHIFT-POUND}-{SHIFT-POUND}{CBM-+}l{SHIFT-POUND}{CBM-P}{SHIFT-POUND}{$de}hh CHH{CBM-N}H{CBM-POUND}{CBM-Z}h(
  6516. {SHIFT-POUND}
  6517. HH 
  6518. {$f0}{CBM-Z}T0{SHIFT-POUND}l?{SHIFT-POUND}{$f1}{SHIFT-POUND}/H{$60}{CBM-Z}
  6519. {CBM--})P{$f9}{SHIFT-POUND} R~ 9{$60} 
  6520. {CBM-O}{$7d}{$f0}
  6521. TH{CBM-O}{$7d}TH{CBM-O}{$7d}{CBM-N} {CBM-G}Hl[
  6522. TT{$60}{CBM-H}gg{CBM-H}
  6523. {CBM-H}gg{CBM-H}
  6524. h0{CBM-I}
  6525.    H TN0P{$ed}H{CBM-POUND}{$60}{SHIFT-POUND}T{SHIFT-POUND}T{SHIFT-POUND}{$f0}T{SHIFT-POUND}
  6526.  
  6527. TT{SHIFT-POUND}!T{$60}{CBM-I}~T 
  6528. HP{$fd}JP00 high score: 000000 @@    
  6529.  
  6530. ()*+pqrs
  6531. (pX H{$f0}@H{CBM-U} 0x{CBM-POUND}P{$f8} hP{SHIFT-*}ij  kl  mn  op  kl  op
  6532. qr  st  uv  wx  st  wx
  6533. yz  [\  ]^  _!  [\  _!
  6534. "#  $%  &'  ()  $%  ()
  6535.  
  6536. f
  6537. 2
  6538.  
  6539.  
  6540.  
  6541.  
  6542.  
  6543.  
  6544. {$fe}{$fd}{$fb}{$f7}{$ef}{CBM-*}{CBM-B}{$7f}{CBM-E}{$fb}{$f0}
  6545.  R~HP{$f6}{$e6}{$fc}P{$f2} 9{CBM-I}
  6546.  
  6547. P{$e8} P{$f8}{SHIFT-POUND} {$e7}{SHIFT-POUND}{$e7}{SHIFT-+}{SHIFT-POUND}{SHIFT-POUND}
  6548. jS{$e5}{SHIFT-POUND}
  6549. /#{SHIFT-POUND}$ i{CBM-I}
  6550. ln{CBM-I}{SHIFT-POUND}
  6551. {$f8}{SHIFT-POUND}
  6552. T{$e8} P{$eb}{SHIFT-POUND}
  6553. {CBM-I}~OJ P{$f5}{SHIFT-POUND}~P{SHIFT-POUND}~T{SHIFT-POUND}T{CBM-I}
  6554. {CBM-X}1@{$e8} {SHIFT-*}P{$f5}{CBM-I}
  6555. {CBM-X}{$f1}{SHIFT-*}{$e8} @P{$f5}{CBM-I}/{$e8} P{$f8}{CBM-Z}#{$f0} ?{CBM-I}l{CBM-O}{CBM-I}
  6556.  {$e8}{CBM-X}TI{$f0}I{$f0}lO{SHIFT-POUND}l{CBM-X}
  6557. lF
  6558. {CBM-G}{CBM-I}){$f0}{CBM-X}{$f8}{$ee}lM
  6559. {CBM-Z}TIPl:
  6560. {CBM-Z}TIaIIAclB
  6561. {CBM-Z})P{$f9} {$e1}~{$f0}l{CBM-+}{SHIFT-POUND}
  6562. P{$60} {$e4}l{CBM-Y}{$ee}
  6563. {CBM-Z}
  6564. I{SHIFT-POUND}jS{CBM-I}  {$f0}~{CBM-I}
  6565. {CBM-X}{$7d}{$f0} R~{$e8}P{$f5}{SHIFT-POUND}
  6566. {CBM-S}
  6567. JJJ M{CBM-X}{SHIFT-POUND}2{$f8} y{CBM-I}
  6568.    H TN{$f8}P{$ed}{CBM-I}  {$f0}~{CBM-I}
  6569. {CBM-X}{$f0} R~{$e8}P{$f5}{CBM-Z}S{$e5}llwave 
  6570. efefefef
  6571. {CBM-X}
  6572. {CBM--})R{CBM-X}
  6573. {CBM--})P{CBM-Z}Rl{CBM-D}{CBM-Z}RR{SHIFT-POUND}8{$ed}R {$7f}
  6574. {CBM-POUND}
  6575. {CBM-N}{CBM-X}{$f0}{CBM-O}{CBM-W}h{CBM-O}{CBM-R}h{$60}lS{CBM-X}8{$ed}I2{CBM-A}{SHIFT-POUND}
  6576. 8{$fd}//{SHIFT-POUND}2{SHIFT-POUND}lw
  6577. {CBM-X}MI{CBM-X}/I{$f0}{$fe}/{CBM-X}/0{$e3}{CBM-X}/jjl{$ef}j{CBM-POUND}{SHIFT-POUND}
  6578. {$f8}{CBM-X}I{$f0}{$fe}{CBM-X}0"{CBM-X}jjlj{CBM-POUND}{SHIFT-POUND}{$f8}{CBM-X}I{$f0}{$f0}{$de}{CBM-X}{$de}{SHIFT-POUND}
  6579. 8{$fd}jjlvj{CBM-POUND}{CBM-O}TIP{$60}{CBM-X}8{$e9}{CBM-O}{$e9}
  6580. nNnn{CBM-X}8{$e9}/jjj{CBM-Z}
  6581. {CBM-POUND}{CBM-O}M{$fb}{CBM-O}I
  6582. {$fc}{CBM-I}
  6583. {CBM-X}{CBM-POUND}{CBM-E}{$fb}I P{$e8} P{$f1} C{CBM-A}{CBM-S}{$60}l{CBM-D}{$f0}{CBM-D}Pw{CBM-D}lS
  6584. {CBM-D}{CBM-O}TIPlEIP{SHIFT-POUND}T{CBM-O}{CBM--}-PPN{$e5} J0l{$e6}{CBM-I}
  6585. {CBM-X}?{$e8} P{$f5}{$60}{CBM-I}
  6586. {CBM-X}
  6587. P{$e8} P{$f5}{$60}{SHIFT-POUND}T{SHIFT-POUND}
  6588. {SHIFT-POUND}2#N$0{CBM-S}${$e8}{SHIFT-POUND}   {SHIFT--}{CBM-S}{$60}{CBM-Z}
  6589. {CBM--}){$f0}{$ee}'PN#{$f0}{CBM-I}
  6590.  {$7f}{$60}{SHIFT-POUND}'P{SHIFT-POUND}
  6591. #T/{$60}{CBM-I}{SHIFT-POUND}
  6592. J0
  6593. lLP{$60}{CBM-I}
  6594. {CBM-X}I
  6595. {$f0}+{$de}P&{CBM-X}{$f8}IP{SHIFT-POUND}
  6596. {$f8}{SHIFT-POUND}
  6597. T
  6598. {CBM-POUND}{SHIFT-POUND}l{CBM-S}{SHIFT-POUND}{$f8}{SHIFT-POUND}D{$e8}{$ec}SPH{$60}{SHIFT-POUND}
  6599. X{$f8}{CBM-Z}Ip{CBM-Z}I{CBM-Z}I
  6600. X8{CBM-Z}{$ed}-/{CBM-Z}{$ed}.
  6601. /%{CBM-Z}$I{CBM-X}MR{CBM-A}
  6602. 8{CBM-Z}R{$fd}Rl8{CBM-X}{$ed}RR{CBM-Z}RI{$f0}{CBM-D}HLS{$f0}lL{$60}{CBM-Z}PMR{CBM-A}{SHIFT-POUND}!8{$60}{SHIFT-POUND}
  6603. !8{$60} 
  6604. {SHIFT-POUND}{$ee}{$fb}{SHIFT-POUND}{$fc}{CBM-E}{$fb}{$f0}
  6605.  R~HP{$f6}{$e6}{$fc}P{$f2}{CBM-Z}?{CBM-Z}@{CBM-Z}a{CBM-I} {SHIFT-POUND}
  6606. {CBM-I}
  6607.  {$60}h
  6608. {CBM-POUND}{CBM-O}{$f0}lg 
  6609. {$f0}O{CBM-G}{CBM-I})@M Pl/ {CBM-Z}T)II{$f0}'I{$f0}0I{$f0}>{SHIFT-POUND}({SHIFT-POUND}{CBM-+}{SHIFT-POUND}l{SHIFT-POUND}{CBM-P}{SHIFT-POUND}Vl{SHIFT-POUND}-{SHIFT-POUND}nl{SHIFT-POUND}({SHIFT-POUND}n{SHIFT-POUND}5{$60}{CBM-N}s
  6610. Jts "u{CBM-C}* W{$fb}{$f8}n~{$fc}~{$f8}~{$f7}{SHIFT-*}{$f9}{CBM-P}>w{$fd}{$f0}{CBM-O}{$ea}u~{CBM-POUND}{$fa}!U{SHIFT-POUND}{$7c}({$e5}c{$7f}/8
  6611.  
  6612. t{CBM-POUND} 
  6613. 6{CBM-C}A
  6614. {$fe}{$fb}~_?~?{$fa}{$e7}{$7c}P~{CBM-P}{$fe}O{$f3}5~_{$f9}?{$fc}~{$e1}w{$f8}{CBM-P}xu@
  6615.  
  6616.  
  6617.  
  6618.  #{$f8}_E{$ea}{SHIFT-POUND}ju@ 
  6619. D{CBM-POUND}*
  6620.  
  6621.  
  6622.  
  6623. A) PK {$60}
  6624. u{CBM-POUND}{SHIFT-*}{CBM-@}{$fa}4{$f0}Q{$ef}?F7S{CBM-Q}{$f8}P{$f0}>{$7c}{SHIFT-*}{$7f}BN>PX
  6625. "0{$7c}) {$7b}8{$f0}{$e1}{SHIFT-*}{$e1}8{$e6}{SHIFT-*}18l{SHIFT-*}A
  6626. u{CBM-D}{CBM-N}Bu{CBM-Q}*xu{SHIFT-*}~{$fc}D8&c2m0
  6627.  
  6628. t{CBM-A}{CBM-N}u{CBM-D}Jw{$7e}2T{$fe}{$f6}'{CBM-N}t{CBM-@} p
  6629.  
  6630.  
  6631.  
  6632.  
  6633. {CBM-K}QD"Q
  6634.  
  6635. @@
  6636. 2D {$f4}{$ef}{CBM-B}~~{$7d}>{CBM-S}'{$fd}<{CBM-N}{$e6})p5o{CBM-N}{$7f}vtK{CBM-W}Bu
  6637. p{CBM-N}@u{CBM-N};p{$fd}{$ea}O{$7f}{$fe}{$f6}{CBM-L}~{CBM-C}{$f9}{$e6}m5o{CBM-N}{$7f}b{$fd}{$e8}{SHIFT-*}T P{CBM-O}2$H{$e1}@{$e6}>G8P8CYN SHc$!${$60}@
  6638. {SHIFT-*}<H!c{$e1}{CBM-K}O
  6639. cABc"{CBM-@}"a
  6640.  
  6641. @a*{$f2}{$fc}{$e4}{CBM-K}{CBM-T}={$7c}M{$fc}{$e1}J{$fe}?u~{$e4}{SHIFT-POUND}{$fa}!{$7f}U{$e1}{CBM-Q}f5{CBM-N}q
  6642. (2<fpY
  6643. +{CBM-K}
  6644.  
  6645.  
  6646.  
  6647.  
  6648.  
  6649.  
  6650.  
  6651.  
  6652.  
  6653.  
  6654.  
  6655.  
  6656. Y2<{$de}
  6657.  
  6658.  
  6659.  
  6660.  
  6661.  
  6662.  
  6663.  
  6664.  
  6665.  
  6666.  
  6667.  
  6668.  
  6669.  
  6670.  
  6671.  
  6672. 8
  6673.  
  6674.  
  6675.  
  6676.  
  6677. @
  6678.  
  6679.  
  6680.  
  6681. XXXXXzzfp
  6682. {SHIFT-*}
  6683.  
  6684.  
  6685.  
  6686.  
  6687.  
  6688.  
  6689.  
  6690.  
  6691.  
  6692.  
  6693. {$f0}
  6694. {$f8}
  6695. {$f8}
  6696. {$f8}
  6697. {$f0}{SHIFT-*}{$fe}{SHIFT-*}C~{SHIFT-*}?~{SHIFT-*}
  6698. {SHIFT-*}
  6699. {SHIFT-*}
  6700. {SHIFT-*}9~{CBM--}a~B~Ag{$e2}8{$e7}
  6701.  
  6702.  
  6703. {CBM-U}
  6704.  
  6705.  
  6706.  
  6707.  
  6708.  
  6709.  
  6710.  
  6711.  
  6712.  
  6713. {SHIFT-*}
  6714. {SHIFT-*}
  6715.  
  6716. {$f0}
  6717.  {$60} {$7f}~C~{$fc} 
  6718.  
  6719.  
  6720. ;~c~~g{$e2}8{$e7}
  6721.  
  6722.  
  6723. {CBM-U}
  6724.  
  6725.  
  6726.  
  6727.  
  6728.  
  6729.  
  6730.  
  6731.  
  6732.  
  6733. {$7f}
  6734.  
  6735. >
  6736.  
  6737.  
  6738.  
  6739.  
  6740.  
  6741.  
  6742.  
  6743.  
  6744.  
  6745. >
  6746.  
  6747. >
  6748.  
  6749. {$7f}
  6750.  
  6751. {$7f}
  6752.  
  6753. ~~{SHIFT-*}~ ~{$f5}T{$60}
  6754.  
  6755.  
  6756.  
  6757.  
  6758.  
  6759. fefefefababefefefehghghghcdcdghghghgabefefefefefab
  6760. cdghghghghghcd
  6761.  
  6762.  
  6763.  
  6764.  
  6765. fefefefababefefefehghghghcdcdghghghg
  6766.  
  6767.  
  6768.  
  6769.  
  6770. score: 0000
  6771. {CBM-K}
  6772.  
  6773.  
  6774.  
  6775.  
  6776.  
  6777.  
  6778.  
  6779.                                  P        
  6780.  
  6781.  
  6782.  
  6783.  
  6784.  
  6785.  
  6786.  
  6787.      ?@{$f0}      @     ?@{$f0}     ?@ 
  6788.  
  6789.  
  6790. {$f0}
  6791.  {$60} {$7f}~C~{$fc} 
  6792.  
  6793.  
  6794. ;~c~~g{$e2}8{$e7}
  6795.  
  6796.  
  6797. {CBM-U}
  6798.  
  6799.  
  6800.  
  6801.  
  6802.  
  6803.  
  6804.  
  6805.  
  6806.  
  6807. {$7f}
  6808.  
  6809. >
  6810.  
  6811.  
  6812.  
  6813.  
  6814.  
  6815.  
  6816.  
  6817.  
  6818.  
  6819. >
  6820.  
  6821. >
  6822.  
  6823. {$7f}
  6824.  
  6825. {$7f}
  6826.  
  6827. ~~{SHIFT-*}~ ~
  6828. I{CBM-A}"{CBM-X}E{$e1}{CBM-A}{SHIFT-POUND}P{SHIFT-POUND}
  6829. E{$e5}P{CBM-G}{CBM-H}I{CBM-X}P{CBM-G}{$e5}i I{$fa}{CBM-X}il{$f7}IP{CBM-X}Il{$ea}IPi{CBM-X} 
  6830. {SHIFT--}{$ea}  
  6831. {CBM-X}0 {SHIFT-POUND}8{$fd}{CBM-A}{CBM-X}I
  6832. P
  6833. {SHIFT-POUND}~{$fe}l{$f7}0E{CBM-A}l{$f7}E{CBM-A}O{CBM-G}il{$f7}IPB{SHIFT-POUND}~{SHIFT-POUND}{CBM-X}E{$e2}P{SHIFT-POUND}
  6834. {SHIFT-POUND}P{SHIFT-POUND}
  6835. Pa{CBM-X}8{$e5}{$e1}i~II0{SHIFT-POUND}
  6836. l{$f7}
  6837. 8{$e9}i~I{$f0}{$60}
  6838.  
  6839.  
  6840. {SHIFT-POUND}
  6841. l
  6842. I{CBM-A}F{$e6}{$60}
  6843.  
  6844. {$de}
  6845. Ps P{SHIFT-POUND}8{$e5}{$f0}{$ea}{$ea}{$ea}{$ea}{$ea}{CBM-X}I0{CBM-X}il {CBM-X}{$f1}{CBM-X}{$f2} {CBM-G}A{$f1}{CBM-G}B{$f2}{CBM-X}{$f3}{CBM-G}{CBM-H}jj{CBM-POUND}{CBM-O}{CBM-U}
  6846. {$f4} lC
  6847.  
  6848.  
  6849.  
  6850.  
  6851. {CBM-O}
  6852. IP(D{$f0}${CBM-O}8{$e5}Ai~II{CBM-A}{CBM-O}8{$e5}Bi~II{CBM-A}8{$60}I{CBM-POUND}{SHIFT-*}{SHIFT-*}PH{$60}{CBM-G} P{CBM-V}{$ea}{$ea}{CBM-G}{$e1}8{$e5}Ai~II{CBM-A}{CBM-D}{CBM-G}{$e2}8{$e5}Bi~II{CBM-A}{CBM-G}{$e2}EBP{SHIFT-POUND} 8{$60} {$f0}HHlC{SHIFT-POUND}~ {CBM-G}{$e1}{$f1}{CBM-G}{$e2}{$f2} {SHIFT-POUND} F{$e9}{$ea}{$ea} ?8{$60}
  6853.  
  6854.  
  6855.  
  6856.  
  6857.  
  6858.  
  6859.  
  6860. {$fe}
  6861. {CBM-X}{$f1}
  6862. 'I{CBM-A}A{$f3}{$7f}{SHIFT-*}{SHIFT-*}_F
  6863.  
  6864.  
  6865.  
  6866.  {$60}
  6867.  
  6868.  
  6869.  
  6870.  
  6871.  
  6872.  
  6873.  
  6874. X{$7c}<88{$f8}{$f8}8
  6875.  
  6876.  
  6877.  
  6878. {$f8}{$fa}F
  6879.  
  6880.  
  6881.  
  6882.  
  6883.  
  6884.  
  6885.  
  6886.  
  6887.  
  6888.  
  6889.  
  6890. {SHIFT-*}{SHIFT-*}{$f3}{$7f}_F {$60}
  6891.  
  6892.  
  6893.  
  6894.  
  6895.  
  6896.  
  6897.  
  6898.  
  6899.  
  6900.  
  6901. X{$7c}<8
  6902. 8{$f8}{$f8}8{$f8}{$fa}F><
  6903.  
  6904.  
  6905. {$f0} 
  6906. _F
  6907.  
  6908.  
  6909.  
  6910.  {$60}
  6911.  
  6912.  
  6913.  
  6914.   {SHIFT-*}HO{$f9}{$fe}{SHIFT-*}
  6915.  
  6916.  
  6917.  
  6918. {$f8}{$fa}F
  6919.  
  6920.  
  6921.  
  6922.  
  6923.  
  6924.  
  6925.  
  6926. ><
  6927.  
  6928.  
  6929.  
  6930.  
  6931.  
  6932.  
  6933. _F{$f0} 
  6934.  {$60}
  6935.  
  6936.  
  6937.  
  6938.  
  6939.  
  6940.  
  6941.  
  6942.   {SHIFT-*}H~~~~~~~~~~~~~~ 234535 678979               
  6943.  
  6944. {$e9}{SHIFT-POUND} 
  6945.  
  6946. {SHIFT-POUND}
  6947.  
  6948. P{$ed}{SHIFT-POUND}={$f7}{SHIFT-POUND}>{$f6}{SHIFT-POUND}?{$f8} {SHIFT-+} ? {CBM-O}
  6949. {CBM-Y}{CBM-O}M{CBM-O}{$f5}{CBM-O}{$fc}P{$e5}{SHIFT-POUND} x{CBM-A}P{$fa}l{CBM-I} {CBM-R}){$f0}{$f9}{SHIFT-POUND}{$e9}{SHIFT-POUND}{$eb}{SHIFT-POUND}{CBM-V}{SHIFT-POUND}{SHIFT-POUND}{$fb}{SHIFT-POUND}{SHIFT-POUND} x{SHIFT-POUND} {CBM-A}P{$fa}{SHIFT-POUND}
  6950. {$ed}{$ef}{SHIFT-POUND}  ?{SHIFT-POUND}{$fe}{$ea}{CBM-I}~{CBM-G}{$fb}{$fc}
  6951.  
  6952.  
  6953.  
  6954. {CBM-A}{CBM-I}
  6955. {SHIFT-POUND}
  6956. {$e8}{$e4}{CBM-A}P{$f8}{SHIFT-POUND}
  6957.  
  6958. {$e8} AP{$f8}{SHIFT-POUND}
  6959. {CBM-R}{CBM-X}{SHIFT-POUND}{CBM-W} {$f5} {CBM-G}{$e9}l{CBM-G}{$fc}P{$ef}{$f8}{CBM-G}
  6960. {CBM-G}{$fd}l
  6961.  
  6962.  {$f3} {CBM-+}{$60}535 678979               
  6963.  
  6964. {$e9}{SHIFT-POUND} 
  6965.  
  6966. {SHIFT-POUND}
  6967.  
  6968. P{$ed}{SHIFT-POUND}={$f7}{SHIFT-POUND}>{$f6}{SHIFT-POUND}?{$f8} {SHIFT-+} ? {CBM-O}
  6969. {CBM-Y}{CBM-O}M{CBM-O}{$f5}{CBM-O}{$fc}P{$e5}{SHIFT-POUND} x{CBM-A}P{$fa}l{CBM-I} {CBM-R}){$f0}{$f9}{SHIFT-POUND}{$e9}{SHIFT-POUND}{$eb}{SHIFT-POUND}{CBM-V}{SHIFT-POUND}{SHIFT-POUND}{$fb}{SHIFT-POUND}{SHIFT-POUND} x{SHIFT-POUND} {CBM-A}P{$fa}{SHIFT-POUND}
  6970. {$ed}{$ef}{SHIFT-POUND}  ?{SHIFT-POUND}{$fe}{$ea}{CBM-I}~{CBM-G}{$fb}{$fc}
  6971.  
  6972.  
  6973.  
  6974. {CBM-A}{CBM-I}
  6975. {SHIFT-POUND}
  6976. {$e8}{$e4}{CBM-A}P{$f8}{SHIFT-POUND}
  6977.  
  6978. {$e8} AP{$f8}{SHIFT-POUND}
  6979. {CBM-R}{CBM-X}{SHIFT-POUND}{CBM-W} {$f5} {CBM-G}{$e9}l{CBM-G}{$fc}P{$ef}{$f8}{CBM-G}
  6980.  
  6981. 4621
  6982.  
  6983.  
  6984.  {$e7}~{CBM-I}
  6985. ~+{SHIFT-POUND}
  6986. {$fb}{SHIFT-POUND},{$fc}{CBM-D}~+{SHIFT-POUND}
  6987. {$fb} {$fb}{CBM-S}~+ LP{$ef}{CBM-+}{$fc} .{$e9}{CBM-I}
  6988. ~+ N){SHIFT-POUND}{CBM-Z}{$ef}+IP{SHIFT-POUND} lu{SHIFT-POUND} {SHIFT--}{SHIFT-POUND}{CBM-I} ~ {SHIFT-@}~{SHIFT-POUND}{CBM-I}  {CBM-X}~ {SHIFT-*}~ {$f6}( L~{SHIFT-POUND}{CBM-T}B'{SHIFT-POUND}+C' v'{SHIFT-POUND}
  6989. , L~ ){CBM-S}, 
  6990. P
  6991.  L~ {$e4}~I
  6992. {$f0}{$e4},{CBM-Z},IP l)l{CBM-S}{$ef}+ P{CBM-Z}l{CBM-O}{CBM-Z}{SHIFT--})I
  6993. P{$ea}{CBM-Z}{$ef}+, {$f6} V{CBM-Z},IP{SHIFT-POUND}1+l{$e5}IPl{$e5}IPZ L~ {$e4}~I
  6994. P{$f6}{CBM-Z}{$ef}+, {$f6} l)l{$ea}{$ea}{$ea}{$ea}{$ea}{SHIFT-POUND}
  6995. ,l%IP{$ea}{$ea}{$ea}{$ea}{$ea}{$ea}{SHIFT-POUND}
  6996. ,IP
  6997. {CBM-I}R,{SHIFT-POUND}
  6998. ,  {CBM-Z},I
  6999. Pl{CBM-Z}F,IP L~{CBM-I} I~{CBM-Z}, R~ {$ee}{CBM-S}{CBM-X}, 
  7000. P{$f0}{CBM-S}1+ {$f0}*{CBM-Z},IP{CBM-S}F, 
  7001. P{SHIFT-POUND}
  7002. ,lM L~{CBM-Z}, R~{CBM-Z},I"P{SHIFT-POUND}
  7003. T{$ea}{$ea}{$ea}{$ea}{$ea}{$ea}{CBM-S}U, 
  7004. {$f0}{CBM-I}
  7005. U, L~{SHIFT-POUND} R~l{CBM-V}{CBM-S}, 
  7006. {$f0}{CBM-I}
  7007. , 
  7008. l{$7e}#{CBM-S}R, 
  7009. {$f0} 
  7010. l{$fc}l{CBM-G}Q{$f3}{CBM-G}RM{$f0}+{$f4}{CBM-@}S{CBM-E}QiQ{CBM-E}{$f3}{CBM-B},{CBM-Z}{$f3}{$60}{CBM-@}S{CBM-E}QiQ{CBM-Z}{CBM-B},{$f3}{$60} {CBM-Y}~){CBM-X},{$60} {CBM-Y}
  7011. {$f0}~{$f0}~{$f0}~ 
  7012. ~
  7013.  
  7014.  
  7015.  
  7016.  
  7017.  
  7018.  
  7019.  
  7020.  
  7021.  
  7022.  
  7023.  
  7024.  
  7025.  
  7026.  
  7027.  
  7028.  
  7029.  
  7030.  
  7031.  
  7032.  
  7033.  
  7034. >
  7035.  
  7036. >
  7037.  
  7038. {$7f}
  7039.  
  7040. {$7f}
  7041.  
  7042. ~~{SHIFT-*}~ ~{$f0}~{$f0}~{$f0}~ 
  7043. ~
  7044. GC{$e3}{$e7}G{$e7}e{$7f}~~~ {$f8}{$fe}~~~{$f8}      {$f8}{$f8}~~{$fc}{$f0}  {SHIFT-*}{SHIFT-*}~~?~~@?     {$f0}
  7045. @@@@@ @?     {$f0}
  7046.  
  7047.  
  7048.  
  7049.  
  7050. @?     
  7051.  
  7052.         ? {SHIFT-*}  ?     {$f0}        
  7053. {CBM-Y}~ L~{CBM-I} I~{CBM-Z}, R~ {$ee}{CBM-S}{CBM-X}, 
  7054. P{$e5}{$60}{CBM-Z},IP%{CBM-S}1+ 
  7055. P{CBM-S}F, 
  7056. {$f0}D{CBM-I},{SHIFT-POUND},l%{CBM-S}F, {$f0}pl{$7e}#{CBM-S}F, {$f0}fIPl{$fb}IP
  7057. {CBM-S}1+ P4lA(IP{CBM-S}1+ P L~lMl{SHIFT-+}IP
  7058. {CBM-S}1+ PlI
  7059. P {$f6}({SHIFT-POUND}
  7060. ,l{CBM-I}
  7061. F,{SHIFT-POUND}
  7062. ,lR V{CBM-Z},I0P{CBM-S}{$ef}+ P !*lE *lE{CBM-S}{$ef}+ P **lE * V{CBM-S}{$ef}+ P W)l{SHIFT--}{CBM-Z},) P V{CBM-S}{$ef}+ P {$e3})l{$f5}{CBM-Z},)!P L~l L~{SHIFT-POUND} R~ 9({CBM-I}
  7063. , {$e4}~{$f0}{$fb}IP{CBM-S},{$f0}{$f2}N, R~lI
  7064. {$f0}jI {$f0}I0{SHIFT--}I:{CBM-A}# R~{CBM-S}{CBM-V}, 
  7065. {$f0}l{CBM-W}{CBM-S},,{$ee},{CBM-S}, P{CBM-C} *l{$fb}Ia{CBM-R}I[UIA{CBM-N}I{$7b}MIA{CBM-I}I{SHIFT-+}El R~{CBM-S}{CBM-V}, 
  7066. {$f0}lL{CBM-S},{SHIFT-POUND},{$ee},{CBM-I}
  7067. ,{CBM-S},{SHIFT-POUND},{$ee},{CBM-S},{SHIFT-POUND}
  7068. , d) g({CBM-I}
  7069. ,{CBM-I}{CBM-V},l{CBM-S},m,{$ee},{CBM-S},  {$f0}l :'l{CBM-T}{CBM-S},{SHIFT-POUND}m,{$ee},{CBM-S},{SHIFT-POUND}
  7070. m,{CBM-N}{CBM-V}, h'{SHIFT-POUND}cB'{SHIFT-POUND}*C' v'{CBM-X}I{$f0}F{CBM-X} {SHIFT-*}
  7071.   E5{CBM-G}{CBM-X}E{CBM-V}/ 
  7072. {$e6}{CBM-X}{CBM-G}{CBM-H}
  7073.  
  7074. {CBM-A}{CBM-Y} {CBM-@}{CBM-Y}E{CBM-A}{CBM-A} {CBM-X}I{CBM-A}{SHIFT-POUND}PI{CBM-A}{SHIFT-POUND}P{SHIFT-POUND}${$ea}{CBM-X}A{CBM-X}B{$de}P\{CBM-X} )IP{$fe} {CBM-C}A{CBM-G}CiIC{SHIFT-POUND} {CBM-@}P
  7075. {CBM-G}CEFC{SHIFT-POUND}
  7076. {SHIFT-*}P
  7077. {CBM-G}CE{CBM-A}{$e6}C{SHIFT-POUND}{CBM-G}C P{SHIFT-POUND}8{$e5}{$f0}{$ea}{$ea}{$ea}{$ea}{$ea}{$de}Pm{CBM-X}  {CBM-X}B{CBM-G}DiID{CBM-@}P{SHIFT-POUND}8{$e5}{CBM-H}jED{CBM-A}FDl{$f8}{SHIFT-POUND}"E{CBM-H}jED{$e6}D{CBM-G}D{CBM-X}{$f2}I {SHIFT-POUND} {CBM-X}PF{CBM-X}{SHIFT-POUND}{SHIFT-POUND}
  7078. {SHIFT-POUND}{$e4}{SHIFT-POUND}{$60}
  7079.  
  7080.  
  7081.  
  7082.  
  7083.  
  7084.  
  7085. {CBM-X}){$fe}8{$e5}{$e1}ElI
  7086. {$f0}I~P{$f2}8{CBM-A}{$ef}
  7087.  
  7088.  
  7089. {$de}{$f0}8{$60}{$fe}{CBM-X}A{CBM-X}8{$e9}BlpF{$fc}lC
  7090. {CBM-I}
  7091.  {$f5})I)I{SHIFT-POUND}
  7092.  
  7093. {$e8} (P{$de}{SHIFT-POUND}:{$f7}{SHIFT-POUND};{$f6}{SHIFT-POUND}<{$f8}{CBM-G}{$fd} 
  7094. {CBM-I}
  7095.  {$f5}{SHIFT-POUND}
  7096.  
  7097. JP{$ef}{SHIFT-POUND} {$f6}{$f7}{$f8} {$f5}l{$e2}
  7098.  
  7099. {CBM-N}{CBM-G}{$e2}{SHIFT--}P{SHIFT-POUND} {CBM-G}{$e3}iI{$e3}l{CBM-X} {$f0}l{CBM-X} Kl{CBM-X})O{$f9}{$fe}{SHIFT-*}{$f8}{$fa}F
  7100.  
  7101.  
  7102.  
  7103.  
  7104.  
  7105.  
  7106.  
  7107. <<{$7e}~~{$7e}
  7108.  
  7109.  
  7110.  
  7111. <<{$7e}~~{$7e}
  7112.  
  7113.  
  7114.  
  7115. ={$7e}~~{$7e}GC{$e3}{$e7}G{$e7}e~yw]s~~~W{CBM-Y}W9~~C{CBM-X}{CBM-O}{CBM-G}{CBM-X}C~{$f7}{$e7}W{$f7}{$f7}{$f7}A~C{CBM-X}{$fd}{$f3}O{CBM-B}~C{CBM-X}{$fd}{$e3}{$fd}{CBM-X}C~{$fb}{$f3}{$eb}{SHIFT-+}{$fb}{$fb}~{CBM-B}{$fb}{$fd}{CBM-F}G~{$e3}{CBM-*}{CBM-B}{CBM-X}{CBM-X}C~{CBM-X}{$fb}{$f7}{$ef}{$ef}{$ef}~C{CBM-X}{CBM-X}C{CBM-X}{CBM-X}C~C{CBM-X}{CBM-X}A{$fd}{$fb}G~XhhhhhX(((((dd{$7c}@@@@@pXdbbbbbdddddd{$7c}{$7c}ddddddnddddd{$7c}bbbbbdX8{$7c}{$fe}{$fe}{$fe}{$7c}8888888~~{$e7}CC~~~{$fe}I{$fe}X){$f0}IP
  7116. {CBM-G}{$fe}I{CBM-A}F{$e6}{CBM-I}
  7117. {SHIFT-POUND}
  7118. M 
  7119. {CBM-O}T{CBM-U}{SHIFT-POUND}{CBM-U}H{SHIFT-*}P{$f0}{CBM-X}{CBM-V}{CBM-G}{$fe}I)I{CBM-A}{CBM-V}{CBM-G}{$fe}jjjjI{CBM-A}{CBM-X}{SHIFT-POUND}@,{$f0}{$fb}{CBM-Z}{SHIFT-POUND}{$60} {$f3}{CBM-+}{CBM-X}{SHIFT-*}{SHIFT-POUND}
  7120.  
  7121. FMP {$e8} P{SHIFT-POUND}
  7122.  {SHIFT-POUND} {CBM-Y}P{$fa}{SHIFT-POUND}
  7123. PQ{CBM-G}{$fb}II{$fb}I08{$e9}{CBM-V}l{CBM-A}
  7124.  
  7125. {SHIFT-POUND}pM FMP{$f9}lQ
  7126.  
  7127.  
  7128.  
  7129.  
  7130.  
  7131.  
  7132.  
  7133.  
  7134.  
  7135.  
  7136.  
  7137.  
  7138.  
  7139.  
  7140.  
  7141. {$e3}{$e4}{$e7}{$e8}{$e8}{$e7}{$e7}{$e4}{$e4}{$e3}{$e4}{$e7}{$e8}{$ed}{$e7}{$e8}{$e4}
  7142.  
  7143.  
  7144.  
  7145.  
  7146.  
  7147.  
  7148.  
  7149. l{$ec}
  7150. {SHIFT-POUND}
  7151.  
  7152.  
  7153. {SHIFT-POUND} y# y# y# {$f6}({CBM-S}R, 
  7154. {$f0}
  7155. {SHIFT-POUND}{SHIFT-+}B'{SHIFT-POUND}+C' v' A{SHIFT-POUND}
  7156. , L~ ){CBM-S}, 
  7157. P
  7158.  L~ {$e4}~I
  7159. {$f0}{$e4},{CBM-Z},I{$f0}ZIP{CBM-Z}R,I
  7160.  
  7161. {$f0} {$f6} {$f6}( ]){SHIFT-POUND}
  7162. ,R,l{$fe}IP{SHIFT-POUND},lLIP{SHIFT-POUND}S,lLIP{CBM-S}{$ef}+ P {CBM-P})lL{$ee} PlLIP{CBM-S}{$ef}+ P H)lL{$ee}!PlLIP{SHIFT-POUND}{CBM-C},lLIP{SHIFT-POUND}U,lLIPlLIP{SHIFT-POUND},  {CBM-Z}, R~{CBM-@}VL{$fa}+FV{SHIFT-POUND}
  7163.  R~{CBM-S}S, 
  7164. {$f0}{CBM-I}
  7165. S,{CBM-S}R {$f6}( L~{CBM-S}V, 
  7166. {$f0}{SHIFT-POUND}B'{SHIFT-POUND},C' v'{CBM-I}
  7167. V, A{CBM-I}
  7168. F,, L~ ){CBM-S}, 
  7169. P
  7170.  {$e4}~,I
  7171. {$f0}3{CBM-I}F,{CBM-Z},I{CBM-A}$I
  7172. {$f0} I{$f0}I 
  7173. lI{CBM-A}I{$f0}
  7174. I{$f0} 
  7175. ll L~{CBM-I} F~ {$e4}~I
  7176. {$f0}, {$ee}{CBM-S}{CBM-X}, 
  7177. P{$e4} L~ld{CBM-Z},IP{SHIFT-POUND}
  7178. ,l%{CBM-S}F, 
  7179. {$f0}{$7b}{CBM-Z},IP{CBM-S}{$ef}+ P {CBM-P})lA{$ee} P{SHIFT-POUND}
  7180. ,l%IP{CBM-S}{$ef}+ P H)l{SHIFT--}{$ee}!P{SHIFT-POUND}
  7181. ,l%IP
  7182. {SHIFT-POUND}U,{SHIFT-POUND}
  7183. ,l%IP{$ea}~)@{CBM-X},{$60} L~{SHIFT-POUND} R~ L~{$60}{CBM-Z},I:)I
  7184.  
  7185.  
  7186.  
  7187. ,l+)
  7188.  
  7189.  
  7190.  
  7191. ,{$60}{SHIFT-POUND} C~ L~{SHIFT-POUND}
  7192.  ~{SHIFT-POUND} ~{SHIFT-POUND}{CBM-I} 
  7193.  {SHIFT-@}~{SHIFT-POUND}{CBM-I} + {CBM-X}~{SHIFT-POUND}
  7194. {CBM-I}< - U~ '{CBM-S}V, 
  7195. {$f0}{$60}{CBM-I}
  7196. , L~{CBM-S},{CBM-X}<-Ib{$f0}
  7197. {$ee},{CBM-S}, 
  7198. P{$ec}lL{$ee},{CBM-S},{CBM-X}<-Il{$f0}{$ee},lLN,N,N,{CBM-S},{CBM-X}<-
  7199. ,{$ee},{CBM-S},{CBM-X}<-,{$60}{CBM-Z},I:)I,lL),{CBM-Z},
  7200. ,,{$60} {CBM-Y}~ L~{CBM-I} F~ O~I
  7201. {$f0}{$f9}, {$ee}{CBM-S}{CBM-X}, 
  7202. P{$e1}{$60} 
  7203. IP{$e7} V{CBM-Z},IP{$f6}lRl{$ee}~+{CBM-S}~+ 
  7204. P{$e6}{$fc}{$60}{CBM-S},{SHIFT-POUND}rI*lm!{CBM-I}
  7205.  
  7206.  {$f0}~ L~{CBM-I} F~ O~,I0P{CBM-S}{$ef}+ P !*lt *ltI2PW{CBM-S}{$ef}+ P **lt * L~{CBM-I} F~ O~,{CBM-S}{$ef}+ P W)lW{CBM-Z},) P L~{CBM-I} F~ O~,{CBM-S}{$ef}+ P {$e3})l{CBM-Z},)!P L~{CBM-I} F~ O~,I{$f0} L~{CBM-Z}, R~l L~{SHIFT-POUND} C~{CBM-I}
  7207. ,{SHIFT-POUND}
  7208.  R~l y#{SHIFT-POUND}, {$f6}l{$ef} V{CBM-Z},I{$f0}
  7209. L~{SHIFT-POUND}{$ee}B'{SHIFT-POUND}*C' v' f#{CBM-I}
  7210. , L~ {$e4}~I
  7211. P{$f6} L~{SHIFT-POUND}
  7212. , ){CBM-S}, 
  7213. P
  7214.  L~ {$e4}~I
  7215. {$f0}{$e4},{CBM-Z},IP{CBM-S}, 
  7216. {$f0}S R~N,l IPd L~{SHIFT-POUND}^ R~{SHIFT-POUND}C R~{CBM-Z}, {$f6} L~ ]){CBM-S}, P{CBM-I}
  7217. ,l{CBM-S}, 
  7218. P
  7219. {CBM-S}{CBM-C}, 
  7220. Pl{CBM-I}
  7221. ,{CBM-C},lI
  7222. P
  7223. {CBM-S}, 
  7224. Pl l{$f0} I {CBM-A}l {CBM-Z},I {$f0}6I.{$f0}2I0{CBM-A}l I:'Ia{CBM-A}l I[IA{CBM-A}l I{$7b}{CBM-A}l IA{CBM-A}l I{SHIFT-+}l {CBM-Z}, R~{CBM-S},{CBM-Z}, R~l"IP y# L~{SHIFT-POUND} C~{SHIFT-POUND}, {$f6} L~ l)lIPl# V{CBM-Z}, R~{CBM-S},{CBM-Z},{$ef},{$ee},{CBM-Z},I
  7225. P{$e4}8{CBM-Z},{$e9},,{CBM-S},{CBM-X}{$ef},, {$ee},{CBM-S},{CBM-X}{$ef},, {CBM-J}{CBM-Z},,{$ee},{CBM-S},{CBM-X}{$ef},, {$ee},{CBM-S},{CBM-X}{$ef},, {CBM-J}{CBM-Z},,{CBM-I}
  7226. ,,,{CBM-S},{CBM-X}{$ef},,M,,{CBM-Z},I
  7227. ,{$ee},{CBM-S},{$ec},{SHIFT--}{CBM-Z},M,Pd{CBM-Z},M,P<{CBM-I}
  7228. ,{CBM-S},{CBM-X}{$ef},, {$ee},{CBM-S},{CBM-X}{$ef},, {CBM-J} L~
  7229. ~{CBM-S},{CBM-X}G*+{$ee},{CBM-S},{$ec},{$ec}{SHIFT-POUND}
  7230.  ~{SHIFT-POUND} ~{SHIFT-POUND}{CBM-I} 
  7231.  {SHIFT-@}~{CBM-S},{$e8}{CBM-I} + {CBM-X}~{SHIFT-POUND}
  7232. {CBM-I}< - U~{CBM-Z}V,I
  7233. {$f0}{SHIFT-POUND}, {$f6}l{$fe}{CBM-I} ,{CBM-X}<-
  7234. ,{$ee},{CBM-S},{CBM-X}<-,{$ee},{CBM-S},{CBM-X}<-I"P{$f3}{$ee},{CBM-S},{CBM-X}<-I"P{$f3}{$ee},{CBM-S},{CBM-X}<-I {$f0}{$f3}
  7235. , L~{CBM-Z}
  7236. ,,Ip{$f0}
  7237. 8{CBM-Z},{$e9}{CBM-N}{CBM-Z},I*{CBM-Z}
  7238. ,, ('{CBM-Z},,{CBM-Z}
  7239. ,){CBM-N}{CBM-X}{$de}*,{CBM-Z},, ('{CBM-Z},,{CBM-Z},){CBM-N}{CBM-X}{$de}*,{CBM-I},{SHIFT-POUND}, {$f6}{CBM-S},{CBM-X},, {$f6}{$ee},{CBM-S} 
  7240. ,{CBM-D},{CBM-O}I,,{$ee},{CBM-S},{$ec},0 ('{CBM-Z},{CBM-S},{$ef},,{$ee}, '{CBM-Z},){CBM-N}{CBM-X}{$de}*{CBM-S},{$ef},,{$ee}, 'l{CBM--}%{CBM-Z},, ('{CBM-Z},{CBM-S},{$ef},{$ee},{CBM-Z},){CBM-N}{CBM-X}{$de}*{CBM-S},{$ef},{$ee},{CBM-Z},, ('{CBM-Z},{CBM-S},{$ef},{$ee},{CBM-Z},){CBM-N}{CBM-X}{$de}*{CBM-S},{$ef},{$ee},{SHIFT-POUND}
  7241. {CBM-S},{$ef},{CBM-I}
  7242. ,{CBM-S},{CBM-X}{$ef},,{$ee}, L~{CBM-Z}, R~{CBM-Z}, {$f6}{CBM-Z},I
  7243. P{$de} V{CBM-Z},IP
  7244. {CBM-S}, {$f0}-l%IPs{CBM-I}
  7245. , L~{SHIFT-POUND}B'{SHIFT-POUND}+C' v' ]) L~{SHIFT-POUND} C~,W, L~ ({CBM-S},{CBM-X},I,{$f0} R~{$ee},l{$de}'{CBM-S}W, 
  7246. P R~{CBM-I}W,l{$eb}' L~{CBM-S}{$f9}+JJ 
  7247.  {$f0}~{$60}{CBM-S}{$f9}+ 
  7248.  {$f0}~{CBM-I}
  7249. ,{SHIFT-POUND}  R~{$ee},{CBM-S}, {$f1}{CBM-S}{$f9}+ 
  7250.  {$f0}~{$60}{SHIFT-POUND}{SHIFT-@}B'{SHIFT-POUND}*C' v'{$60}{SHIFT-POUND}{CBM-V}B'{SHIFT-POUND}*C' v'{$60}{CBM-I}
  7251. ,{$e8} P{$f8}{$60} L~{SHIFT-POUND} R~ 9( R'{CBM-I},{CBM-I}
  7252. , {$e4}~I
  7253. {$f0}{$f9}I1P{$f5}, R~ {$e4}~I
  7254. {$f0}{$f9}IP{CBM-S}, {$f0}{$ee} R~N,l(I
  7255. P R~lD(I0WI:{CBM-A}S{CBM-S}, {CBM-A} {SHIFT-+}(l({SHIFT-POUND} {$de}({SHIFT-POUND} {$de}({SHIFT-POUND}
  7256.  , 
  7257. P 
  7258. le{CBM-S}{CBM-C}, 
  7259. {$f0} 
  7260. l{CBM-*}{CBM-S}U, 
  7261. {$f0}
  7262. {CBM-I}
  7263. U,{SHIFT-POUND} R~l{CBM-S}, 
  7264. {$f0}{CBM-I}
  7265. ,R, 
  7266.  l)l{CBM-S}, 
  7267. {$f0} 
  7268. l{CBM-*}l 
  7269. {SHIFT-POUND}
  7270.  
  7271. ,{$fb}{CBM-Z}{$f2}+{$fc}{CBM-Z}{$f3}+,{CBM-D},{CBM-E}{$fb}I PjN,{CBM-S}, ~P{$ed}F{$fc}{CBM-+}{$fc}{$ec}{$f1}+P{$e4} {$f6}({SHIFT-POUND}KB'{SHIFT-POUND}*C' v'{CBM-S}{CBM-C}, 
  7272. {$f0}l L~{CBM-I} I~{SHIFT-POUND} R~ {$ee}{CBM-S}{CBM-X}, 
  7273. P{$e9} ])l{$fe}{CBM-S}{$f3}+{$e8}X,{CBM-Z}{$f2}+Y, ( {$e8}( y# y# ({CBM-Z}{$f4}+{$7b},{SHIFT-POUND}
  7274. ,,~+Z,{CBM-S}{$ef}+ P{SHIFT-POUND}
  7275. {$fd}{SHIFT-POUND}{$fe}l{$f7}{CBM-E}{$fb}I {$f0}*{SHIFT-POUND}
  7276. ,{SHIFT-POUND}
  7277. ,{CBM-Z}Z,M{$f6}+Z,{CBM-Z}{$7b},I
  7278. {$7b},{CBM-Z}{$f7}+,{SHIFT-POUND}~,l{SHIFT-POUND}
  7279. ,{CBM-D},{CBM-E}{$fb}I P9{$ee},{CBM-Z},M{$f6}+P{$ec}{SHIFT-POUND}
  7280. ,{CBM-Z}Z,M{$f6}+Z,{CBM-Z}{$7b},I
  7281. {$7b},{CBM-Z}{$7d},{$fb}{CBM-Z}{$7e},{$fc}{CBM-D}~+{SHIFT-POUND}
  7282. {$fb} {$fb}l{CBM-K}{CBM-D}{$f8}+,{CBM-D},{CBM-E}{$fb}I PN,lJ{$ee},{CBM-Z},,{SHIFT-POUND}~,{CBM-Z}Z,M{$f6}+Z,{CBM-Z}{$7b},I
  7283. {$7b},{SHIFT-POUND}
  7284. ,{CBM-D},{CBM-E}{$fd}),{$ee},{CBM-Z},M,{$f0}#M{$7c},{$f0}{CBM-N}{CBM-X}3*{$7c},{CBM-S}{$7d},{$fb}{CBM-S}{$7e},{$fc}{CBM-D}~+{$fb} {$fb}{CBM-G}{$fc}{$7e},{CBM-D},L,P{CBM-Z}{$7d},{$fb}{CBM-Z}{$7e},{$fc}{SHIFT-POUND}
  7285. {CBM-D}
  7286. {$fb}{CBM-I}.{$fc}{CBM-D}~+{CBM-E}{$fb}, L~{CBM-I} I~{CBM-Z}, R~ {$fb}{CBM-Z},IP  L~{CBM-I} I~{SHIFT-POUND}
  7287.  R~ R~ R~ L~{SHIFT-POUND} C~{CBM-I}
  7288. {CBM-C},{CBM-I}
  7289.  
  7290.  {$f0}~l{CBM-S}{$ef}+ P,{CBM-Z}{CBM-C},I
  7291. P%{CBM-Z}
  7292. ,I
  7293. {$f0}{CBM-Z}{$7d},{$fb}{CBM-Z}{$7e},{$fc}{CBM-D}~+{SHIFT-POUND}{$fb} {$fb}{CBM-I}
  7294.  
  7295. ,{CBM-G}{$fc}{$7e},{SHIFT-POUND}
  7296. ,,{CBM-G}{$fd}M{$f6}+{$fd}{CBM-G}{$fe}I
  7297. {$fe}{CBM-Z}{$7f},M{$f6}+{$7f},{CBM-Z},I
  7298. ,l {CBM-D}~+{CBM-S}{$7d},{$fb}{CBM-S}{$7e},{$fc}{SHIFT-POUND}{$fb} {$fb}{CBM-D}~+{SHIFT-POUND}{$fb}{SHIFT-POUND}, {$f6} V{CBM-Z},IP{$f6}{CBM-I}L{$fb}{CBM-I}.{$fc}{CBM-I}
  7299. ~+{CBM-D}~+{CBM-E}{$fb}, {$f6} {$fb}{CBM-Z},I{$f0}
  7300. {$60}{CBM-Z}){$f8}
  7301. ,{$60}{CBM-Z},
  7302.  
  7303.  
  7304.  
  7305. ,{CBM-Z})
  7306. ,{$60}{CBM-Z}),{$60}{CBM-Z}){$f0}jjjj,{$60}{CBM-Z}P){$fd}P{$60}{CBM-Z}PP{$60}{CBM-Z}){$fd}{$60}{CBM-Z}{$60}
  7307. when screen clears 
  7308. enter your message
  7309. *screen empty*
  7310.  
  7311.  id #
  7312.  
  7313. thank you.
  7314.  
  7315. entry is invalid.
  7316.  
  7317. one moment, please...
  7318. to 
  7319. subject 
  7320. 0:
  7321.  
  7322.  
  7323.  
  7324. IP{$f2} ])l V{CBM-Z},, V{CBM-Z},, V{CBM-Z},, V{CBM-Z},, V{CBM-Z},,IpPl0Is{$f0} L~ ])l{CBM-K}{CBM-Z},, {CBM-Z},, {CBM-J}{CBM-Z},,{CBM-Z},, {CBM-Z},, {CBM-J}{CBM-Z},, ,{CBM-Z}V,I
  7325. {$f0}{SHIFT-POUND}, {$f6} {$fe}{CBM-Z},M,rP{CBM-Z},M
  7326. ,h L~{SHIFT-POUND}^ R~{SHIFT-POUND}C R~{SHIFT-POUND}lB'{SHIFT-POUND}+C' v'{SHIFT-POUND}, {$f6}{CBM-S}1+ 
  7327. P{CBM-I}
  7328. ,{CBM-S},{CBM-X}l+{$f0}{CBM-Z}, {$f6}{$ee},l{CBM-J} l)l L~{SHIFT-POUND}_B'{SHIFT-POUND}+C' v' ( I*{$ee},{CBM-S}, {$f0}l {CBM-S},{SHIFT-POUND},I*{CBM-S},,{$ee},{CBM-S}, 
  7329. P{CBM-S}{CBM-C}, 
  7330. {$f0}{SHIFT-POUND}pl!{CBM-Z},{CBM-S},I*{$ee},{CBM-S},{SHIFT-POUND},I*{$ee},{CBM-S},
  7331. ,{CBM-S}, Pl{CBM-S}, 
  7332. {$f0}l{CBM-W}#{CBM-S},{SHIFT-POUND}wI*{$ee},{SHIFT-POUND}{CBM-I}  {SHIFT-@}~{$ee},{$ee},{CBM-Z},{CBM-I}G * {CBM-X}~ {SHIFT-*}~ '{CBM-S}V, P5 L~{SHIFT-POUND} C~{CBM-S}, 
  7333. {$f0}l!{CBM-S}{CBM-C}, 
  7334. {$f0}{CBM-I}
  7335. ,{CBM-C},V,l{SHIFT-POUND}, {$f6} ])l{$fe}{CBM-S}, 
  7336. {$f0}l{CBM-S}{CBM-C}, 
  7337. {$f0}le d){CBM-I}
  7338. ,Q,{SHIFT-POUND}, {$f6} V{CBM-Z},I:P L~{CBM-I} I~{CBM-Z}, R~{$ee},{CBM-S},{$ec},LlB! L~ d){SHIFT-POUND}^ R~{SHIFT-POUND}R R~{$ee}Q,{CBM-S}Q, {CBM-A}
  7339. {CBM-I}
  7340. ,{SHIFT-POUND},lO!{SHIFT-POUND}B'{SHIFT-POUND}+C' v' ]) L~{SHIFT-POUND} C~{SHIFT-POUND}, {$f6} L~ l)l{SHIFT-POUND}> R~{$60}{CBM-S}, 
  7341. PF{$fc}N,{$60} 
  7342. {CBM-I}
  7343. ,{$e8} 
  7344. P{$fb}H{SHIFT-*}
  7345. P{$f6}{$ee},,{CBM-D},{SHIFT-*}{$f0}{CBM-D},l{$60}#{$60} L~{SHIFT-POUND}{$f8}B'{SHIFT-POUND}*C' v'{CBM-S}{$f9}+ 
  7346.  ({SHIFT-POUND}{$ee}B'{SHIFT-POUND}*C' v' f#{CBM-I},{CBM-I}
  7347. ,l{$fa}{CBM-I}
  7348. ,{CBM-S},{SHIFT-POUND}rI*{$ee},{CBM-S},, h'{CBM-I}
  7349. ,{CBM-S},{$e8}{$e8}, L, {$ea}{CBM-Z},, {$f6}{CBM-S}1+ 
  7350. {$f0}+{CBM-I}
  7351. ,{CBM-S},J
  7352. ,{CBM-S},{CBM-X}G*, {$f6}{$ee},{CBM-S},{$ec}
  7353. ,{$e9}{SHIFT-POUND}
  7354. , {$f6} V{CBM-Z},I{$f0}IP{$f2} L~ ]) y# y#{CBM-I}
  7355. V,l{$fe} L~{SHIFT-POUND}{CBM-I}  {SHIFT-@}~{CBM-S},{$e8}{$e8}{CBM-I}G * {CBM-X}~ {SHIFT-*}~ '{CBM-S}V, P{SHIFT-POUND} C~ L~{SHIFT-POUND}, {$f6} ]) y# y#l{$fe}{CBM-I} F~{CBM-I}
  7356. ,,,, y# L~{CBM-I} F~{SHIFT-POUND}:{$ef},{CBM-I}
  7357. , L~{CBM-I} F~ O~{CBM-S},I,{$ee}, {$f7}{CBM-Z}{CBM-X},I
  7358. {$f0}{CBM-I},lR%{CBM-S}, $PS{SHIFT-POUND}, l)l{SHIFT-POUND}, {$f6}{CBM-I}
  7359. , L~{SHIFT-POUND} C~ V{CBM-Z},IP{$f6} L~ l){CBM-I}
  7360. ,lIP y#lV&l&{CBM-Z},M,,{CBM-Z},I
  7361. ,{$60}{CBM-Z},){$f0}jjjj{CBM-N}{CBM-X}{$de}*,{$60}{SHIFT-POUND}B'{SHIFT-POUND}*C' v'{$60}{SHIFT-POUND}B'{SHIFT-POUND}*C' v'{$60}{CBM-I}
  7362. , L~{CBM-S},{CBM-X}*I
  7363. {$f0} R~{$ee},l^'{$60}{SHIFT-POUND}{$7b}B'{SHIFT-POUND}*C' v'{$60}{CBM-I}
  7364. V,, L~{CBM-I} F~ {$e4}~{CBM-D},,{$ee},I
  7365. P{$f0}{SHIFT-POUND}
  7366. {CBM-D},,{CBM-Z},I2tI4I6l{CBM-I}V,{CBM-S}, 
  7367. {$f0}lP'{CBM-S}{CBM-C}, 
  7368. Pl({CBM-I}
  7369. {$de}({SHIFT-POUND}
  7370.  R~l{CBM-T} R~{CBM-S},,{$ee},{$60}{SHIFT-POUND}{CBM-@}B'{SHIFT-POUND}*C' v'{$60} L~{SHIFT-POUND} R~{SHIFT-POUND},{CBM-S}{$ef}+ P W)l){CBM-Z}, P{SHIFT-POUND},{CBM-S}{$ef}+ P {$e3})l.){CBM-Z},!P{CBM-S}{$ef}+ P **l>) *{SHIFT-POUND} R~{$60}h{SHIFT-POUND}
  7371.  R~H{$60} {$f6}({SHIFT-POUND}ZB'{SHIFT-POUND}+C' v'{$60} {$f6}({SHIFT-POUND}2B'{SHIFT-POUND}+C' v'{$60}{SHIFT-POUND}{CBM-I}  {SHIFT-@}~{SHIFT-POUND}
  7372.  {CBM-X}~ {SHIFT-*}~{$60}{CBM-S}{$ef}+ P ){$60}{CBM-S} P{CBM-+}E "{$f0} 3P
  7373. {SHIFT-POUND},l{SHIFT-POUND}){SHIFT-POUND},{CBM-I}
  7374. JP{$fd}{$60}{CBM-Z}C,)IC,{CBM-Z}){$f8}
  7375. C,{$60}{CBM-Z}I{SHIFT-POUND}
  7376. {$fd}{SHIFT-POUND}X{$fe}{SHIFT-POUND}L{$7d},{SHIFT-POUND}.{$7e},{SHIFT-POUND}
  7377. {$7f},{CBM-Z}{$f4}+,{CBM-S}{$7d},{$fb}{CBM-S}{$7e},{$fc}{CBM-Z}{$ef}+IP{CBM-Z}l&{CBM-Z}P)I
  7378. P{SHIFT-POUND}0l3{SHIFT-POUND}2{CBM-D}~+{$fb} {$fb}{CBM-Z}{$ef}+IP {$f9})lp{CBM-Z} P),{CBM-Z},0{CBM-D}~+{$fb} {$fb}{CBM-Z}{$ef}+IP *lR{CBM-Z}!P),{CBM-Z},0{CBM-D}~+{$fb} {$fb}{CBM-S}{CBM-C}, {$f0}:{CBM-I}
  7379. ,{CBM-S},{CBM-X},I
  7380. {$f0}{CBM-D}~+{$fb} {$fb}{$ee},l{CBM-I}
  7381. ,{CBM-S},{CBM-X}m,I
  7382. {$f0}{CBM-D}~+{$fb} {$fb}{$ee},l{CBM-POUND}{CBM-Z}{$ef}+IP *{CBM-Z},lU{CBM-Z}!P){$7c},,{SHIFT-POUND}
  7383. ,{CBM-Z}{$7f},{$fb}{CBM-Z},{$fc}{CBM-D}{$f5}+~+{$fb} {$fb}{CBM-G}{$fc}{$7e},l{CBM-K}{CBM-Z}{$7f},{$fb}{CBM-Z},{$fc}{CBM-D},{CBM-E}{$fb}E,){$7f}D,{CBM-Z}E,
  7384. #{CBM-Z},I
  7385. P<{CBM-Z}{$7d},{$fb}{CBM-Z}{$7e},{$fc}{SHIFT-POUND}{CBM-D}~+{$fb} {$fb}{SHIFT-POUND},l[{CBM-D},{SHIFT-*}
  7386. {$f0} 
  7387. ,{CBM-Z}{$7d},{$fb}{CBM-Z}{$7e},{$fc}{SHIFT-POUND}{CBM-D}~+{$fb} {$fb}{$ee},{CBM-Z},M,Pl{CBM-K}{CBM-Z}{$7d},{$fb}{CBM-Z}{$7e},{$fc}{CBM-U}{CBM-Z}D,B,)?B,,B,P@IP{SHIFT-POUND} {CBM-D}~+{$fb} {$fb}{CBM-G}{$fc}{$7e},l{CBM-Z}Z,MX,{CBM-A}l:{CBM-Z}{$7b},MY,{CBM-A}l:{CBM-S}{CBM-C}, 
  7388. Pl 
  7389. {CBM-D}~+{CBM-S}{$7d},{$fb}{CBM-S}{$7e},{$fc}{SHIFT-POUND}{$fb} {$fb}{CBM-D}~+{SHIFT-POUND}{$fb}{CBM-I}
  7390. ~+ L~{CBM-I}L
  7391.  
  7392.  
  7393.  
  7394.  
  7395.  
  7396.  
  7397.  
  7398.  
  7399.  
  7400.  
  7401.  
  7402.  
  7403.  
  7404.  
  7405.  
  7406.  
  7407.  
  7408. 0123456789abcdeffilename 
  7409. UPLOAD 
  7410.  CTRL-C to cancel 
  7411.  
  7412. $0:@!%!$
  7413.  
  7414.  
  7415.  
  7416.  
  7417.  
  7418.  
  7419.  
  7420.  
  7421.  
  7422.  
  7423.  
  7424.  
  7425.  
  7426.  
  7427.  
  7428.  
  7429.  
  7430.  
  7431.  
  7432.  
  7433.  
  7434.  
  7435. *operation*
  7436. *cancelled*
  7437.  
  7438.  
  7439. *file won't fit*
  7440.  
  7441. DOWNLOAD
  7442. CTRL-C to cancel
  7443.  
  7444.  
  7445. OK continue
  7446.  
  7447.  
  7448. *transmission*
  7449. *garbled*
  7450.  
  7451. Press any key
  7452. to start, or
  7453.  
  7454. CTRL-C to
  7455. byD
  7456. 1160
  7457. 'N
  7458. :s{CBM-R}54272:lo{CBM-R}54296:940
  7459. =X
  7460. c{CBM-R}B(197):d{CBM-R}B(653)
  7461. {$60}{$7d}
  7462. q${CBM-R}D(q2){CBM-N}"  ":q2{CBM-W}{CBM-R}0{CBM-M}q${CBM-R}"0   "
  7463.  
  7464. "   sc = ";l;"  lives = ";ww;"    en = ";q$
  7465. {CBM-I}
  7466. q2{CBM-R}{CBM-W}0{CBM-M}749
  7467. {CBM-B}
  7468. (c{CBM-R}20){CBM-P}(a{CBM-N}2{CBM-N}2{CBM-D}d{CBM-W}40){CBM-M}280
  7469. {CBM--} 
  7470. (c{CBM-R}12){CBM-P}(a{CBM-Q}2{CBM-Q}2{CBM-D}d{CBM-E}{CBM-Q}1){CBM-M}300
  7471. {$fd}{CBM-N}
  7472. c{CBM-R}23{CBM-A}c{CBM-R}1{CBM-A}c{CBM-R}60{CBM-M}q2{CBM-R}q2{CBM-Q}20:530
  7473. 120
  7474.  
  7475.  move base ship
  7476. #
  7477.  d{CBM-W}{CBM-E}0{CBM-M}390
  7478. ;
  7479. "a{CBM-R}a{CBM-N}2:b1{CBM-R}bx{CBM-N}16:320
  7480. j
  7481. , d{CBM-W}{CBM-E}0{CBM-M}460
  7482. ]
  7483. 6a{CBM-R}a{CBM-Q}2:b1{CBM-R}bx{CBM-Q}16
  7484.  
  7485. @q2{CBM-R}q2{CBM-Q}5:t1{CBM-R}{CBM-H}(b1{CBM-Q}bx):t1{CBM-R}1{CBM-M}a1{CBM-R}bx:a2{CBM-R}b1:340
  7486.  
  7487. ja1{CBM-R}b1:a2{CBM-R}bx
  7488. {CBM-S}
  7489. ti{CBM-R}a1{CBM-@}a2{SHIFT-POUND}t1{CBM-D}4
  7490. {$e2}
  7491. ^ i{CBM-W}256 {CBM-M} v{CBM-N}16,B(v{CBM-N}16){CBM-P}253:v{CBM-N}2,i::bx{CBM-R}b1:370
  7492. Hv{CBM-N}16,B(v{CBM-N}16){CBM-A}2:v{CBM-N}
  7493.  {CBM-M} v{CBM-N}16,B(v{CBM-N}16){CBM-P}253:v{CBM-N}2,i:v{CBM-N}3,y::450
  7494. i{CBM-U}v{CBM-N}16,B(v{CBM-N}16){CBM-A}2:v{CBM-N}2,i{CBM-Q}256:v{CBM-N}3,y:
  7495. XBbx{CBM-R}bx{CBM-N}32: B(1904{CBM-N}a){CBM-W}{CBM-E}32{CBM-P}B(1905{CBM-N}a){CBM-W}{CBM-E}32{CBM-M}180
  7496. G 731: 120
  7497. J jump left
  7498. {CBM-Y}La{CBM-R}a{CBM-Q}4:i{CBM-R}bx{CBM-@}bx{CBM-Q}16{SHIFT-POUND}{CBM-Q}2:y{CBM-R}y{CBM-Q}2
  7499. {$ec}V i{CBM-W}256 {CBM-M} v{CBM-N}16,B(v{CBM-N}16){CBM-P}253:v{CBM-N}2,i:v{CBM-N}3,y::490
  7500.  
  7501.  v{CBM-N}164{SHIFT-POUND}{CBM-Q}40:i{CBM-N}a,a1:i{CBM-N}a{CBM-N}s,1:s{CBM-N}1,ii:ii{CBM-R}ii{CBM-N}3
  7502. 6&B(v{CBM-N}31){CBM-R}1{CBM-M} cr{CBM-R}1::570
  7503. <0
  7504. \:s{CBM-N}4,32: a1{CBM-R}32{CBM-P}cr{CBM-W}{CBM-E}1 {CBM-M} 180
  7505. Ud cr{CBM-R}1 {CBM-P} a1{CBM-R}32 {CBM-M} 600
  7506. na1{CBM-R}32:cr{CBM-R}0:540
  7507. {CBM-G}xv{CBM-N}21,2:t1{CBM-R}{CBM-J}((az{CBM-Q}bx){CBM-Z}8)
  7508. WBi{CBM-R}1104{CBM-N}a{CBM-N}t1{CBM-@}1104{CBM-N}a{CBM-N}t1{CBM-N}3:i,42:i{CBM-N}s,2:i:740
  7509. Gi{CBM-R}1104{CBM-N}a{CBM-N}t1{CBM-@}1104{CBM-N}a{CBM-N}t1~{CBM-POUND}a1{CBM-R}32: 640
  7510. {CBM-R} cr{CBM-R}1 {CBM-M} 731:120
  7511. @Fw{CBM-R}B(1904{CBM-N}t1):w{CBM-R}102{CBM-M}1904{CBM-N}t1,230:120
  7512. NKw{CBM-R}B(1904{CBM-N}t1):w{CBM-R}230{CBM-M}1904{CBM-N}t1,32:740:120
  7513. Pw{CBM-R}B(1944{CBM-N}t1):w{CBM-R}102{CBM-M}1944{CBM-N}t1,32:740:120
  7514. {CBM-+}Z 800
  7515. {CBM-F}{SHIFT-+} base destroyed
  7516. {$f5}{SHIFT--}v{CBM-N}21,1:1864{CBM-N}a,42:1865{CBM-N}a,42:1864{CBM-N}a{CBM-N}s,2:186128:
  7517. ,{$ed}"out of energy !!":x{CBM-R}1{CBM-@}2500:
  7518. 5{$ee}""
  7519. ?{$f8}s4,0
  7520. S 53269,0:"               game over"
  7521. *i{CBM-R}1{CBM-@}1500:
  7522. 4""
  7523. E>v{CBM-N}21,0:"":b${CBM-R}"     battle again ?":b1${CBM-R}"   (y/n)"
  7524. {$e3}hi{CBM-R}1{CBM-@}C(b$):""{CBM-T}8)H(b$,i)
  7525. {$f4}rk"
  7526. {$f7}J"3-pro"
  7527. T"4-expert"
  7528. {$de}"5-random"
  7529. .{$e3}" choose 1-5"
  7530. 7{$e8}{CBM-K}p1$
  7531. N{$fc}p1${CBM-W}{CBM-E}"1"{CBM-P}p1${CBM-W}{CBM-E}"2"{CBM-P}p1${CBM-W}{CBM-E}"3"{CBM-P}p1${CBM-W}{CBM-E}"4"{CBM-P}p1${CBM-W}{CBM-E}"5"{CBM-M}1000
  7532. p1${CBM-R}"5"{CBM-M}p1{CBM-R}{CBM-F}(0){CBM-D}6
  7533. p1{CBM-R}E(p1$)
  7534. {CBM-B}$i{CBM-R}s{CBM-@}lo:i,0:i:lo,15:s{CBM-N}5,130:s{CBM-N}6,72
  7535. {$ee}.v{CBM-R}53248:v{CBM-N}21,7:2040,13:2041,14:Tv{CBM-N}16,0:v,az:v{CBM-N}1,60:v{CBM-N}2,bx:v{CBM-N}3,205
  7536. {$7e}
  7537. >53281,0:53280,0:a${CBM-R}"j   u   m   p "
  7538. v{CBM-A}:"        j";
  7539. P{SHIFT-@}k{CBM-R}0{CBM-@}42:q:832{CBM-N}k,q:
  7540. D"      u";:k{CBM-R}43{CBM-@}85:q:832{CBM-N}k,q:
  7541. JN"      m";:k{CBM-R}86{CBM-@}127:q:832{CBM-N}k,q::"      p"
  7542. {$f0}{$e2}"           re
  7543. ady to battle"
  7544. {$ec}"               y / n"
  7545. $
  7546. {CBM-K}y$:y${CBM-R}""{CBM-M}1280
  7547. 2
  7548. y${CBM-R}"n"{CBM-M}
  7549. 8
  7550. ]000,000,000,000,000,000,000,000
  7551. (000,000,000,000,001,085,064,006
  7552. {CBM-M}2190,144,026,190,164,085,085,085
  7553. L<085,085,085,080,020,005,085,085
  7554. {$f1}f085,085,085,08
  7555. 5pass handshake
  7556.  
  7557. *message mode*
  7558.  
  7559. {$ea}{$ea}{$ea}{$ea}T{CBM-B}'()&{$ea}{$ea}{$ea}{$ea}){$f0}jjjj,{$60}{CBM-Z}P){$fd}P{$60}{CBM-Z}PP{$60}{CBM-Z}){$fd}{$60}{CBM-Z}{$60}
  7560. when screen clears 
  7561. enter your message
  7562. *screen empty*
  7563.  
  7564.  id #
  7565.  
  7566. thank you.
  7567.  
  7568. entry is invalid.
  7569.  
  7570. one moment, please...
  7571. to 
  7572. subject 
  7573. 0:
  7574.  
  7575.  
  7576.  
  7577. !{CBM-H}
  7578. bz{CBM-R}az{CBM-N}{CBM-J}(55{CBM-D}{CBM-F}(0)){CBM-Q}30:t1{CBM-R}{CBM-H}(bz{CBM-Q}az)
  7579. ?H
  7580.  (az{CBM-Q}bz) {CBM-E} (29{CBM-Q}p1) {CBM-M} 630
  7581. xR
  7582.  bz{CBM-W}30{CBM-A}bz{CBM-E}310 {CBM-M} 180
  7583. T{CBM--}
  7584.  t1{CBM-R}1{CBM-M}a1{CBM-R}az:a2{CBM-R}bz:240
  7585. {$e6}
  7586. a1{CBM-R}bz:a2{CBM-R}az
  7587. {$f0}
  7588. i{CBM-R}a1{CBM-@}a2{SHIFT-POUND}t1{CBM-D}6
  7589. H{$fa}
  7590.  i{CBM-W}256 {CBM-M} v{CBM-N}16,B(v{CBM-N}16){CBM-P}254:v,i::az{CBM-R}bz:120
  7591. {$f2}v{CBM-N}16,B(v{CBM-N}16){CBM-A}1:v,i{CBM-Q}256::az{CBM-R}bz:120
  7592. ~m{CBM-R}5:2,i{CBM-Q}256::bx{CBM-R}b1
  7593. /R B(1904{CBM-N}a){CBM-W}{CBM-E}32{CBM-P}B(1905{CBM-N}a){CBM-W}{CBM-E}32{CBM-M}180
  7594. e{$7c}w{CBM-R}w{CBM-Q}1: 733: 120
  7595. v jump right
  7596. Ta{CBM-R}a{CBM-N}4:i{CBM-R}bx{CBM-@}bx{CBM-N}16{SHIFT-POUND}2:y{CBM-R}y{CBM-Q}2
  7597. {SHIFT-POUND} i{CBM-W}256 {CBM-M} v{CBM-N}16,B(v{CBM-N}16){CBM-P}253:v{CBM-N}2,i:v{CBM-N}3,y::420
  7598. Qv{CBM-N}16,B(v{CBM-N}16){CBM-A}2:v{CBM-N}2,i{CBM-Q}256:v{CBM-N}3,y:
  7599. {$ec}{CBM-@}i{CBM-R}bx{CBM-N}16{CBM-@}bx{CBM-N}32{SHIFT-POUND}2:y{CBM-R}y{CBM-N}2
  7600. !{CBM-S} i{CBM-W}256,B(v{CBM-N}16){CBM-A}2:v{CBM-N}2,i{CBM-Q}256:v{CBM-N}3,y:
  7601. 0
  7602. {$ea}i{CBM-R}bx{CBM-Q}16{CBM-@}bx{CBM-Q}32{SHIFT-POUND}{CBM-Q}2:y{CBM-R}y{CBM-N}2
  7603. E
  7604. {$f4} i{CBM-W}256 {CBM-M} v{CBM-N}16,B(v{CBM-N}16){CBM-P}253:v{CBM-N}2,i:v{CBM-N}3,y::520
  7605.  
  7606. {$fe}v{CBM-N}16,B(v{CBM-N}16){CBM-A}2:v{CBM-N}2,i{CBM-Q}256:v{CBM-N}3,y:
  7607. {CBM-C}
  7608. bx{CBM-R}bx{CBM-Q}32: B(1904{CBM-N}a){CBM-W}{CBM-E}32{CBM-P}B(1905{CBM-N}a){CBM-W}{CBM-E}32{CBM-M}180
  7609. L
  7610.  
  7611.  731: 120
  7612. {CBM-*}
  7613. a1{CBM-R}106:s{CBM-N}4,33
  7614. ii{CBM-R}0:i{CBM-R}1784{CBM-@}114{CBM-N}3:i,32:i{CBM-N}s,2:i:cr{CBM-R}0
  7615. cLl{CBM-R}l{CBM-N}50:q2{CBM-R}q2{CBM-N}45:v{CBM-N}21,3:az{CBM-R}{CBM-J}({CBM-F}(1){CBM-D}200){CBM-N}40:v,az: 120
  7616. wQ shoot at base
  7617. {$7e}Vs{CBM-N}4,33:ii{CBM-R}120:a1{CBM-R}106:t1{CBM-R}{CBM-J}(az{CBM-Z}8){CBM-Q}2
  7618. {CBM-J}i{CBM-R}1144{CBM-@}1864{SHIFT-POUND}40:i{CBM-N}t1,a1:i{CBM-N}s{CBM-N}t1,1:s{CBM-N}1,ii:ii{CBM-R}ii{CBM-Q}3
  7619. Q B(v{CBM-N}31){CBM-R}2{CBM-M}cr{CBM-R}1::670
  7620. W
  7621. {$ef}s{CBM-N}4,32:a1{CBM-R}32{CBM-M} 690
  7622. 5{CBM-N}a{CBM-N}s,2
  7623.  
  7624. {$de}s{CBM-N}4,129:s{CBM-N}1,90
  7625. /{CBM-*}i{CBM-R}1{CBM-@}300::s{CBM-N}4,128: ww{CBM-R}1 {CBM-M} 800
  7626. ^ ww{CBM-R}ww{CBM-Q}1:1864{CBM-N}a,32:1865{CBM-N}a,32:v{CBM-N}31,0:cr{CBM-R}0
  7627. {$e1}a{CBM-R}0:v{CBM-N}16,B(v{CBM-N}16){CBM-P}253:v{CBM-N}21,3
  7628. {CBM-A}{$e2}a{CBM-R}0{CBM-@}32{SHIFT-POUND}2:B(1904{CBM-N}a){CBM-W}{CBM-E}102{CBM-A}B(1905{CBM-N}a){CBM-W}{CBM-E}102{CBM-M}a
  7629. H{$e3}bx{CBM-R}a{CBM-D}8{CBM-N}24:v{CBM-N}2,bx:
  7630. {$f1}{$e4}s{CBM-N}4,129:s1,30:i{CBM-R}1{CBM-@}50::s{CBM-N}4,{CBM-R}1{CBM-@}125::
  7631. {$fe}\::
  7632. Fb1${CBM-R}"        (y/n)"
  7633. 7Pi{CBM-R}1{CBM-@}C(b1$):"";{CBM-T}8)H(b1$,i)
  7634. hZk{CBM-R}1{CBM-@}125::
  7635. zv{CBM-R}1{CBM-@}10:{CBM-K}a$:
  7636. O{CBM-K}yn$:yn${CBM-R}""{CBM-M}910
  7637. {$7e}yn${CBM-R}"n"{CBM-M}
  7638. {CBM-I}110
  7639. E{CBM-D}"difficulty levels{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}"
  7640. X{CBM-L}"1-beginner"
  7641. {$e9}{SHIFT-*}"2-rookie2042,14
  7642. {$fa}8v{CBM-N}39,3
  7643. 0b v{CBM-N}28,1:v{CBM-N}37,1:v{CBM-N}38,5:v{CBM-N}39,2:v{CBM-N}40,1:v{CBM-N}4,150
  7644. ol53280,0:53281,0:w{CBM-R}3:""
  7645. va{CBM-R}0:bx{CBM-R}24:b{CBM-R}a:m{CBM-R}1:ac{CBM-R}1:a1{CBM-R}1232:a2{CBM-R}1235:q2{CBM-R}1000:co{CBM-R}v:az{CBM-R}200:b1{CBM-R}bx:y{CBM-R}205
  7646. A{$60}ww{CBM-R}3:x{CBM-R}1904{CBM-@}1983:x,102:x{CBM-N}s,5:x
  7647. {$e1}Jx{CBM-R}1984{CBM-@}2023:x,99:x{CBM-N}s,1:
  7648.  
  7649. 5,031,235,244,007
  7650. p235,208,001,085,064,005,000,080
  7651. ;z020,000,020,080,000,005,000,000
  7652. {$60}D000,000,000,000,000,000,000,254
  7653. FN
  7654. X000,000,000,001,000,000,001,000
  7655. {CBM-A}000,001,000,000,003,128,000,003
  7656. U128,000,003,128,000,007,192,000
  7657. {$fa}015)
  7658.  
  7659. t${CBM-R}"   *  BUDGETEER  * "
  7660. 8
  7661. G(14)t$:
  7662. Z
  7663. " Use the program to   record your checkbook balance and its
  7664. {SHIFT-@}
  7665. "allocation into one toten accounts showing  intended use.
  7666. {$e2}
  7667. :" Increase balance withdeposits.
  7668.  
  7669.  
  7670. :" Write checks again" 3.INSU-rance
  7671. %(
  7672. " 4.BANK:pmt or svgs
  7673. >*
  7674. " 5.MC/V:bank cards
  7675. q,
  7676. " 6.VACA-tion
  7677. C.
  7678. " 7.MEDI-cal
  7679. {$7f}0
  7680. " 8.BOOK:entertainment
  7681. 2
  7682. " 9.CHGE:store accts
  7683. {CBM-H}4
  7684. "10.MISC-ellaneous":
  7685. S6
  7686. "11.CHBK:total/balance":
  7687. 8
  7688. "For the DATE, use any format wit
  7689. st   slip-ups.":
  7690. nx
  7691. "Negative balances are allowed for temporary convenience.":500
  7692. D
  7693. "When you have complet-ed all your transact- ions, you write new
  7694. {CBM-D}F
  7695. "file balances.":
  7696. {SHIFT--}J
  7697. "Happy checkbook and   budget balancing!":
  7698. {$e5}L
  7699. :
  7700. {$f7}M
  7701. "
  7702. W{$f4}:"More?...press any key
  7703. g{$f6}36878,15:36875,240:m{CBM-R}1{CBM-@}300::36878,0:36875,0
  7704. z{$f8}{CBM-K}a$:a${CBM-R}""{CBM-M}504
  7705. G{$fa}""t$:
  7706.  
  7707.  
  7708. all your transact- ions, you write new
  7709. {CBM-D}F
  7710. "file balances.":
  7711. {SHIFT--}J
  7712. "Happy checkbook and   budget balancing!":
  7713. {$e5}L
  7714. :
  7715. {$f7}M
  7716. "0
  7717. x{CBM-R}1: make x=0 for tape,or x=1 to use disk
  7718. R
  7719. t${CBM-R}"   *  BUDGETEER  * ":G(14);:36878,15:s{CBM-R}36874
  7720. {CBM-Q}
  7721. a$(11),a(11),b%(11): {CBM-G}r(x){CBM-R}{CBM-J}(x{CBM-D}100{CBM-N}.5){CBM-Z}100:t$::
  7722. M
  7723. ::"Today's Date";dd$::20
  7724. {$ef}
  7725. t$:"Date:"d$:"Last Amt:$"a
  7726. $
  7727. 12::r{CBM-R}1){CBM-W}1{CBM-M}b%(r){CBM-R}15
  7728.  
  7729. :
  7730. %
  7731. r{CBM-R}1{CBM-@}11:a$(r):
  7732. m
  7733. "HOUS","UTIL","INSU","BANK","MC/V"
  7734. {$7c}
  7735. "VACA","MEDI","BOOK","CHGE","MISC","CHBK"
  7736.  
  7737. 250
  7738. {CBM-Z}
  7739.  x {CBM-M} 1,8,2,"0:chbkfile,read": 37
  7740. {$e9}
  7741. "Insert data cassette  and rewind to read    balances.
  7742.  
  7743. s,240:m{CBM-R}1{CBM-@}${CBM-R}"y"{CBM-M}70
  7744. 6
  7745. a${CBM-R}"n"{CBM-M}180
  7746. 7
  7747. 10:r{CBM-R}1{CBM-@}3
  7748. m8
  7749. ""{CBM-+}14)"   ":m{CBM-R}1{CBM-@}300:
  7750. {$7b}:
  7751. ""{CBM-+}14)"Y/N":m{CBM-R}1{CBM-@}300:
  7752. ;
  7753. :52
  7754. f
  7755. t{CBM-R}t{CBM-N}1:t{CBM-R}1{CBM-M}d${CBM-R}dd$
  7756. Ig
  7757. "Menu: T=acct Transfer
  7758.  h
  7759. {CBM-+}6)"C=write Check
  7760. {$f8}i
  7761. {CBM-+}6)"D=make DeposE
  7762. l{CBM-E}10{CBM-A}l{CBM-W}1{CBM-A}l{CBM-Q}{CBM-J}(l){CBM-E}0{CBM-M}10:"";:100
  7763. dF
  7764. a(11){CBM-R}{CBM-G}r(a(11){CBM-Q}a):a(l){CBM-R}{CBM-G}r(a(l){CBM-Q}a):122
  7765. ^X
  7766. "Amt of Deposit:":a
  7767. Y
  7768. l{CBM-R}10:a(11){CBM-R}{CBM-G}r(a(11){CBM-N}a):a(l){CBM-R}{CBM-G}r(a(l){CBM-N}a)
  7769. Z
  7770. 6:e{CBM-R}l:f{CBM-R}12:160
  7771. {CBM-B}
  7772. "Amt,from #,to #:":a,a1,a2
  7773. {$fa}
  7774. xh{CBM-R}0:a1{CBM-E}10{CBM-A}a2{CBM-E}10{CBM-A}a1{CBM-W}1{CBM-A}a2{CBM-W}1{CBM-A}a1{CBM-Q}{CBM-J}(a1){CBM-E}0{CBM-A}a2{CBM-Q}{CBM-J}(a2){CBM-E}0{CBM-M}xh{CBM-R}1
  7775.  
  7776. xh{CBM-R}1{CBM-M}10:"";:140
  7777. <
  7778. a(a1){CBM-R}{CBM-G}r(a(a1){CBM-Q}a):a(a2){CBM-R}{CBM-G}r(a(a2){CBM-N}a)
  7779. m
  7780. 6:e{CBM-R}a1:f{CBM-R}a2
  7781. U 
  7782. e{CBM-E}7{CBM-M}""{CBM-+}100){CBM-+}86{CBM-N}e{CBM-D}22{CBM-Q}100)"*":162
  7783. {CBM-K}
  7784. ""{CBM-+}86{CBM-N}e{CBM-D}22)"*"
  7785. {CBM-R}{CBM-I}
  7786. f{CBM-E}7{CBM-M}""{CBM-+}100){CBM-+}86{CBM-N}f{CBM-D}22{CBM-Q}100)"*":164
  7787. G{CBM-T}
  7788. ""{CBM-+}86{CBM-N}f{CBM-D}22)"*"
  7789. {$ed}{CBM-@}
  7790. s,232:m{CBM-R}1{CBM-@}200::s,0:m{CBM-R}1{CBM-@}100:
  7791.  
  7792. {CBM-H},224,000,031,240,000,127,252
  7793.  000,227,142,000,227,142,000,127
  7794. d{CBM-N}252,000,063,248,000,096,012,000
  7795. I{CBM-H}220,118,000,159,242,000,220,118
  7796. {CBM-V}000,096,012,000,063,248,000,255
  7797.  
  7798.  
  7799. 90,164,085,085,085
  7800. L<085,085,085,080,020,005,085,085
  7801. {$f1}f085,085,085,08st any account.
  7802. h
  7803. :" Transfer funds from  one account to any    other.
  7804. D
  7805. ""
  7806. {$7d}
  7807. "Instructions?  Y/N
  7808.  
  7809. {CBM-K}a$:a${CBM-R}""{CBM-M}26
  7810.  
  7811. a${CBM-R}"n"{CBM-M}118
  7812. {CBM-P}
  7813. a${CBM-W}{CBM-E}"y"{CBM-M}23
  7814. Q 
  7815. t$:" Available accounts:":
  7816. {$e3}"
  7817. " 1.HOUS-ing
  7818. {$f7}$
  7819. " 2.UTIL-ities
  7820. &
  7821. hout commas.":500
  7822. wp
  7823. "Deposits are added to the checkbook balance and the MISC account.":
  7824. {CBM-I}r
  7825. "Leave them in MISC or transfer them to otheraccounts as you wish.":
  7826. Jt
  7827. "You get prompts along the way.":
  7828. v
  7829. "You are protected mostof the time again"
  7830. *N
  7831. "Would you like to re- peat the instructions?
  7832. =P
  7833. {CBM-K}a$:a${CBM-R}""{CBM-M}112
  7834. lR
  7835. a${CBM-R}"y"{CBM-M}32
  7836. {$60}T
  7837. a${CBM-W}{CBM-E}"n"{CBM-M}:109
  7838. V
  7839. s${CBM-R}"lO"{CBM-N}G(34){CBM-N}"b2"{CBM-N}G(34){CBM-N}",8:"{CBM-N}G(131)
  7840. GX
  7841.  change 8 to 1 in line 118 if you areusing a datassette
  7842. {$f3}Z
  7843. i{CBM-R}1{CBM-@}C(s$):630{CBM-N}i,F(J(s$,i))::198,i:
  7844. {CBM-G}
  7845. s,232:m{CBM-R}1{CBM-@}150::s,0
  7846. 0{CBM-+}
  7847. m{CBM-R}1{CBM-@}750::"":50
  7848. ={CBM-H}
  7849. t{CBM-R}0{CBM-M}200
  7850. x{CBM-J}
  7851. z{CBM-R}0:r{CBM-R}1{CBM-@}10:z{CBM-R}z{CBM-N}a(r):
  7852. Q{CBM-L}
  7853. {CBM-L}(z{CBM-Q}a(11)){CBM-R}{CBM-E}.01{CBM-M}220
  7854. {CBM-Y}
  7855.  6:"Acct Bal=Chbk Bal": 250
  7856. {CBM-V}{CBM-U}
  7857.  x {CBM-M} 1,8,2,"@0:chbkfile,write":191
  7858. {$fd}{CBM-O}
  7859. "Rewind cassete to    write file.":s,240:{CBM-@}9:""r".."a$(r)"..$"{CBM-T}b%(r))a(r):
  7860. m
  7861. "10.."a$(10)"..$"{CBM-T}b%(10))a(10):
  7862. W
  7863. "11.."a$(11)".$"{CBM-T}b%(11))a(11)::
  7864.  
  7865.  
  7866. s,212:m{CBM-R}1{CBM-@}150::s,0:m{CBM-R}1{CBM-@}100:
  7867. {SHIFT-@}
  7868. s,201:m{CBM-R}1{CBM-@}200::s,0:
  7869. F
  7870. r{CBM-R}1{CBM-@}11
  7871. {$f0}
  7872.  
  7873. {CBM-L}(a(r)){CBM-R}{CBM-E}1{CBM-M}b%(r){CBM-R}16{CBM-Q}C(D({CBM-J}({CBM-L}(a(r)))))
  7874.  
  7875. {CBM-L}(a(r)300::s,0
  7876.  
  7877. :"Ready?...Press Y
  7878. /!
  7879. {CBM-K}a$:a${CBM-R}""{CBM-M}33
  7880. ="
  7881. a${CBM-R}"n"{CBM-M}
  7882. m#
  7883. a${CBM-W}{CBM-E}"y"{CBM-M}30
  7884. C$
  7885. 1,1,0,"chbkfile"
  7886. %
  7887. r{CBM-R}1{CBM-@}11:1,a(r)::1,d$: 1
  7888. (
  7889. 6
  7890. {CBM-H}2
  7891. "Transaction?  Y/N":s,245:m{CBM-R}1{CBM-@}200:
  7892. {CBM-*}3
  7893. s,0:m{CBM-R}1{CBM-@}100::s,235:m{CBM-R}1{CBM-@}200::s,0
  7894. {$f1}4
  7895. {CBM-K}a$:a${CBM-R}""{CBM-M}52
  7896.  
  7897. 5
  7898. ait
  7899.  
  7900. p
  7901. {CBM-K}a$:a${CBM-R}""{CBM-M}80
  7902. q
  7903. a${CBM-R}"c"{CBM-M}100
  7904. *r
  7905. a${CBM-R}"d"{CBM-M}120
  7906. :s
  7907. a${CBM-R}"t"{CBM-M}140
  7908. it
  7909. 10:r{CBM-R}1{CBM-@}3
  7910. Iu
  7911. ""{CBM-+}6)" "
  7912. v
  7913. {CBM-+}6)" ":{CBM-+}6)" ":m{CBM-R}1{CBM-@}300:
  7914. {CBM-POUND}x
  7915. ""{CBM-+}6)"T"
  7916. Gy
  7917. {CBM-+}6)"C":{CBM-+}6)"D":m{CBM-R}1{CBM-@}300:
  7918. Qz
  7919. :80
  7920. {$f2}D
  7921. "Amt of Check,Acct #:":a,l
  7922.  
  7923. 7
  7924.  
  7925. ""::v{CBM-R}53248:v{CBM-N}32,0:v{CBM-N}33,1:v{CBM-N}17,B(v{CBM-N}17){CBM-P}247
  7926. _
  7927. {CBM-T}53)"w*e*l*c*o*m*e!":{CBM-T}59)"to"
  7928. Y
  7929. {CBM-T}55)"supertank!":
  7930.  
  7931. q{CBM-R}1{CBM-@}4:{CBM-T}14)"{CBM-N}":
  7932. K
  7933. {CBM-T}14)"{CBM-N}{SHIFT-POUND}        {CBM-*}":{CBM-T}14)"{SHIFT-POUND} Q Q  QQQ {CBM-*}{CBM-I}{CBM-I}{CBM-O}{CBM-O}{CBM-O}{CBM-O}{CBM-O}{CBM-O}{CBM-O}{CBM-O}{CBM-I}{CBM-I}{CBM-I}"
  7934. {$f3}
  7935. {CBM-T}13)"{SHIFT-POUND}  Q Q   M   {CBM-U}{CBM-U}{CBM-Y}{CBM-Y}{CBM-Y}{CBM-Y}{CBM-Y}{CBM-Y}{CBM-Y}{CBM-Y}{CBM-U}{CBM-U}{CBM-U}"
  7936.  
  7937. {CBM-T}13)" Q   Q   Q   Q N{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}"
  7938. z
  7939. &
  7940. "{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}M{CBM-*} {SHIFT-POUND}W{CBM-*} {SHIFT-POUND}W{CBM-*} {SHIFT-POUND}W{CBM-*} {SHIFT-POUND}W{CBM-*} {SHIFT-POUND}W{CBM-*} {SHIFT-POUND}W{CBM-*} {SHIFT-POUND}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}"
  7941.  
  7942. (
  7943. "{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-Y}{CBM-Y}{CBM-Y}{CBM-Y}{CBM-Y}{CBM-Y}{CBM-Y}{CBM-Y}{CBM-Y}{CBM-Y}{CBM-Y}{CBM-Y}{CBM-Y}{CBM-Y}{CBM-Y}{CBM-Y}{CBM-Y}{CBM-Y}{CBM-Y}{CBM-Y}{CBM-Y}{CBM-Y}{CBM-Y}{CBM-Y}{CBM-Y}{CBM-Y}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}"
  7944. C
  7945. *
  7946. q{CBM-R}1{CBM-@}2:"{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}":
  7947. L
  7948. +
  7949. 800
  7950. {$e9}
  7951. 0
  7952. s{CBM-R}54272:l{CBM-R}s{CBM-@}s{CBM-N}24:l,0:
  7953. 2
  7954. "":v{CBM-N}32speed    armor":{CBM-T}120)
  7955. gf
  7956. :"   which tank do you choose";ta
  7957. yh
  7958. ta{CBM-W}1{CBM-A}ta{CBM-E}3{CBM-M}80
  7959. n
  7960. "             get ready !":q{CBM-R}1{CBM-@}500{SHIFT-POUND}.5::85
  7961. Qp
  7962. "          you can't do that!    ":1300:70
  7963. {$e3}u
  7964. v{CBM-R}53248:1100
  7965. {$fd}z
  7966. "":v{CBM-N}32,0:
  7967. {CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}":
  7968. aN
  7969. "{CBM-Q}CCCCCCCCC{CBM-W}{SHIFT-POUND}             {CBM-*}{CBM-Q}CCCCCCCCC{CBM-W}"
  7970. RP
  7971. "{CBM-Q}CCCCCCCCC{CBM-W}                 {CBM-Q}CCCCCCCCC{CBM-W}"
  7972. {$7b}R
  7973. 420
  7974. X
  7975. cb{CBM-R}1:ti${CBM-R}"000000"
  7976. P
  7977. v{CBM-N}21,15:2040,13:v{CBM-N}39,0:v,170:v{CBM-N}1,150:y{CBM-R}170:x{CBM-R}150:sh{CBM-R}0
  7978.  
  7979. 2042,193:v{CBM-N}41,11:rf{CBM-R}0:ut{CBM-R}11,x
  7980. R
  7981. j{CBM-R}{CBM-POUND}B(56321){CBM-P}16:j{CBM-R}16{CBM-M}245
  7982. '{$e6}
  7983. bo{CBM-R}bo{CBM-N}.5:310:180
  7984. i{$f5}
  7985. sh{CBM-R}sh{CBM-N}1:x1{CBM-R}x:mr{CBM-R}y:hh{CBM-R}y{CBM-Z}2:400
  7986. P{$f7}
  7987. dd{CBM-R}dd{CBM-@}hh{SHIFT-POUND}5:v{CBM-N}2,dd:v{CBM-N}3,x1:330:
  7988.  {$fa}
  7989. 2041,15:dd{CBM-R}dd{CBM-@}mr{SHIFT-POUND}5:v{CBM-N}2,dd:v{CBM-N}3,x1:330:
  7990. G{$fb}
  7991. (B(v{CBM-N}30){CBM-P}4){CBM-E}0{CBM-M}(B(v{CBM-N}30){CBM-P}4){CBM-E}0{CBM-M}253
  7992. {$f5}{$fc}
  7993. x1{CBM-R}0:dd{CBM-R}0:y1{CBM-R}0:v{CBM-N}2,x1:v{CBM-N}3,mr:20m{CBM-R}1{CBM-@}300::s,0
  7994. {SHIFT-@}
  7995. :"Ready?...press Y
  7996. ){CBM-F}
  7997. {CBM-K}a$:a${CBM-R}""{CBM-M}187
  7998. 9{CBM-C}
  7999. a${CBM-R}"n"{CBM-M}210
  8000. j{CBM-X}
  8001. a${CBM-W}{CBM-E}"y"{CBM-M}184
  8002. {$60}{CBM-V}
  8003. 1,1,1,"chbkfile"
  8004. {CBM-B}
  8005. r${CBM-R}G(13):r{CBM-R}1{CBM-@}11:1,a(r);r$;:
  8006. {SHIFT-*}
  8007. 1,d$;r$;: 1
  8008. {CBM-F}A
  8009. t$:"Date:"d$:"Had"t" trans.":7
  8010. {CBM--}B
  8011. "New file done.":36878,0:
  8012. H
  8013. 6:"No tra
  8014. a$:a${CBM-R}""{CBM-M}222
  8015. {CBM-*}
  8016. a${CBM-R}"n"{CBM-M}
  8017.  
  8018. a${CBM-W}{CBM-E}"y"{CBM-M}220
  8019. {$e1}
  8020. 40
  8021. q{$fa}
  8022. "Insert data disk or   tape. Ready?(any key)"
  8023. D{$fb}
  8024. {CBM-K}a$:a${CBM-R}""{CBM-M}251
  8025. J{$fd}
  8026.  
  8027.  
  8028.  
  8029. 1{CBM-@}11:1,a(r);r$;:
  8030. {SHIFT-*}
  8031. 1,d$;r$;: 1
  8032. {CBM-F}A
  8033. t$:"Date:"d$:"Had"t" trans.":7
  8034. {CBM--}B
  8035. "New file done.":36878,0:
  8036. H
  8037. 6:"No tra5,ut:
  8038. trf{CBM-R}0:ut{CBM-R}110:rs{CBM-R}{CBM-J}({CBM-F}(0){CBM-D}60):ut{CBM-R}ut{CBM-N}rs:330
  8039. m^f1{CBM-R}rf:f2{CBM-R}ut:2042,194:v{CBM-N}6,f1:v{CBM-N}7,f2:400
  8040. Cq{CBM-R}f2{CBM-@}150{SHIFT-POUND}.4:v{CBM-N}7,q::v{CBM-N}29,8:v{CBM-N}23,8:v{CBM-N}6,f1{CBM-Q}12
  8041. {CBM-POUND}Hf2{CBM-R}150:q{CBM-R}f2{CBM-@}230{SHIFT-POUND}.6:v{CBM-N}7,q::410
  8042. {SHIFT--}v{CBM-N}6,0:v{CBM-N}7,0:v{CBM-N}4,0:v{CBM-N}5,0:rf{CBM-R}0:v{CBM-N}23,0:v{CBM-N}29,0
  8043. {$f0}2042,19
  8044. {$ef}sc{CBM-R}sc{CBM-N}10:cb{CBM-R}0:rn{CBM-R}{CBM-J}({CBM-F}(0){CBM-D}15):cb{CBM-R}cb{CBM-N}rn:500
  8045. #{$f3}ar{CBM-R}ar{CBM-Q}1
  8046. e{$f4}v{CBM-R}53248:"":v{CBM-N}32,0:v{CBM-N}33,cb
  8047. W{$f5}rf{CBM-R}0:ut{CBM-R}110:rs{CBM-R}{CBM-J}({CBM-F}(0){CBM-D}60):ut{CBM-R}ut{CBM-N}rs:rf{CBM-R}rf{CBM-N}1.5:
  8048. {CBM-Z}{$f6}{CBM-T}7)"{SHIFT-POUND}{CBM-*}    {SHIFT-POUND}{CBM-*}       {SHIFT-POUND}{CBM-*}    {SHIFT-POUND}{CBM-*}    score"
  8049. {$e5}{$f8}"  {SHIFT-POUND}{CBM-*}  {SHIFT-POUND}     {SHIFT-POUND}  {CBM-*}     {SHIFT-POUND}  {CBM-*}  {SHIFT-POUND}  {CBM-*}  ";sc
  8050. {$fa}" {SHIFT-POUND}  {CBM-*}{SHIFT-POUND}   {CBM-*}      {CBM-*}  {SHIFT-POUND}      {SHIFT-POUND}    {CBM-*}  armor"
  8051. o{$fc}"{SHIFT-POUND}         {CBM-*}{SHIFT-POUND}     {CBM-*}{SHIFT-POUND}      {SHIFT-POUND}      {CBM-*}";ar
  8052. ]{$fd}ar{CBM-R}0{CBM-M}549
  8053. C{$fe}
  8054. Y%ll{CBM-R}18:bl{CBM-R}12:bb{CBM-R}15
  8055. &"":v{CBM-N}32,0:v{CBM-N}33,1
  8056. {CBM-P}.q{CBM-R}5{CBM-@}7:{CBM-T}q)"M"{CBM-+}10)"M":
  8057. J0{CBM-T}7)"N"{CBM-+}11)"M"{CBM-+}4)"NM"
  8058. {$e9}1{CBM-T}6)"N"{CBM-+}13)"M"{CBM-+}2)"N"{CBM-+}   QQQ  QQQ  "
  8059. ;
  8060. "   {SHIFT-POUND}                              {CBM-*}"
  8061. I
  8062. "  {SHIFT-POUND}                                {CBM-*}"
  8063.  
  8064. "{CBM-+}{CBM-+}                                  {CBM-+}{CBM-+}{CBM-+}"
  8065. {CBM--}"
  8066. "{CBM-+}{CBM-+}{CBM-+}M W{SHIFT-POUND} {CBM-*}W{SHIFT-POUND} {CBM-*}W{SHIFT-POUND} {CBM-*}W{SHIFT-POUND} {CBM-*}W{SHIFT-POUND} {CBM-*}W{SHIFT-POUND} {CBM-*}W{SHIFT-POUND} {CBM-*}WN{CBM-+}{CBM-+}{CBM-+}{CBM-+}"
  8067.  
  8068. $
  8069. "{CBM-+}{CBM-+}{CBM-+}{CBM-+}M  Q   Q   Q  ,1:v{CBM-N}33,0:{CBM-T}120)
  8070. 4
  8071. 1000
  8072. ;<
  8073. "":{CBM-T}90)"tank specifications"
  8074. K>
  8075. {CBM-T}49)" strong     medium    weak "
  8076. @
  8077. {CBM-T}40)"1.tiger    armor     fire     speed"
  8078. Sb
  8079. {CBM-T}40)"2.t-34     speed     armor    fire"
  8080. d
  8081. {CBM-T}40)"3.sherman  fire      v{CBM-N}33,1
  8082. 3
  8083. \
  8084. {CBM-T}7)"{SHIFT-POUND}{CBM-*}    {SHIFT-POUND}{CBM-*}       {SHIFT-POUND}{CBM-*}    {SHIFT-POUND}{CBM-*}    score"
  8085. K
  8086. ^
  8087. "  {SHIFT-POUND}{CBM-*}  {SHIFT-POUND}     {SHIFT-POUND}  {CBM-*}     {SHIFT-POUND}  {CBM-*}  {SHIFT-POUND}  {CBM-*}  ";sc
  8088. {CBM-G}
  8089. {$60}
  8090. " {SHIFT-POUND}  {CBM-*}{SHIFT-POUND}   {CBM-*}      {CBM-*}  {SHIFT-POUND}      {SHIFT-POUND}    {CBM-*}  armor"
  8091. U
  8092. B
  8093. "{SHIFT-POUND}         {CBM-*}{SHIFT-POUND}     {CBM-*}{SHIFT-POUND}      {SHIFT-POUND}      {CBM-*}";ar
  8094. D
  8095. q{CBM-R}1{CBM-@}17:"{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}{CBM-+}0:v{CBM-N}42,0:2043,195
  8096. *
  8097. 2041,14:v{CBM-N}40,0:v{CBM-N}2,x1:v{CBM-N}3,y1
  8098. _{CBM-H}
  8099. s{CBM-R}{CBM-POUND}B(56321){CBM-P}15:u{CBM-R}s{CBM-P}1:d{CBM-R}s{CBM-P}2:l{CBM-R}s{CBM-P}4:r{CBM-R}s{CBM-P}8:y1{CBM-R}0:x1{CBM-R}0
  8100. S{CBM-L}
  8101. v{CBM-N}23,0:v{CBM-N}29,0
  8102. {CBM-O}
  8103. u{CBM-M}x{CBM-R}x{CBM-Q}m1:x{CBM-W}110{CBM-M}x{CBM-R}x{CBM-N}m1
  8104. {CBM-Q}{CBM-F}
  8105. d{CBM-M}x{CBM-R}x{CBM-N}m1:x{CBM-E}180{CBM-M}x{CBM-R}x{CBM-Q}m1
  8106. G{CBM-X}
  8107. r{CBM-M}y{CBM-R}y{CBM-N}m1:y{CBM-E}245{CBM-M}y{CBM-R}y{CBM-Q}m1
  8108. {$e2}{CBM-B}
  8109. l{CBM-M}y{CBM-R}y{CBM-Q}m1:y{CBM-W}90{CBM-M}y{CBM-R}y{CBM-N}m1
  8110. {$f2}H
  8111. v,y:v{CBM-N}141,14:
  8112. {$fd}
  8113. 2041,192:v{CBM-N}23,2:v{CBM-N}29,2
  8114. 7{$fe}
  8115. v{CBM-N}3,x1{CBM-Q}10:v{CBM-N}2,dd{CBM-Q}12:410:495
  8116. wre{CBM-R}1{CBM-@}500::v{CBM-N}23,0:v{CBM-N}29,0
  8117. x1{CBM-R}0:dd{CBM-R}0:y1{CBM-R}0:v{CBM-N}2,x1:v{CBM-N}3,mr:2041,14:
  8118. 6rf{CBM-R}rf{CBM-N}5:rf{CBM-E}215{CBM-M}350
  8119. {CBM-W};v{CBM-N}4,rf:v{CBM-N}5,ut:
  8120. Njrf{CBM-R}rf{CBM-N}1.8:rf{CBM-E}215{CBM-M}rf{CBM-R}0
  8121. {CBM--}mrf{CBM-R}0{CBM-M}340
  8122. {$f2}ov{CBM-N}4,rf:v{CBM-N}nsactions.":"File not changed.":
  8123. /R
  8124. 6:"Balances have changed."
  8125. fS
  8126. "Write new file?"
  8127. yT
  8128. {CBM-K}a$:a${CBM-R}""{CBM-M}212
  8129. GU
  8130. a${CBM-R}"n"{CBM-M}
  8131. XV
  8132. a${CBM-W}{CBM-E}"y"{CBM-M}210
  8133. W
  8134. 40
  8135. B{CBM--}
  8136. 6:"Error - No balance.":"Acct Sum="z:"Chbk Balance="a(11)
  8137. {$e4}{SHIFT--}
  8138. "Do you wish to":"continue?
  8139. {$f7}{$de}
  8140. {CBM-K}2)"M"
  8141. 2{CBM-T}5)"N"{CBM-+}15)"MN"{CBM-+}4)"M"
  8142. 3{CBM-T}5)"M"{CBM-+}21)"N"{CBM-+}3)"NM"
  8143. e4{CBM-T}6)"M"{CBM-+}6)"NM"{CBM-+}11)"N"{CBM-+}3)"N"{CBM-+}2)"M"
  8144. P5{CBM-T}7)"M"{CBM-+}4)"N"{CBM-+}2)"M"{CBM-+}10)"M"{CBM-+}2)"N"{CBM-+}4)"M"
  8145. 6{CBM-T}8)"M"{CBM-+}2)"N"{CBM-+}4)"M"{CBM-+}10)"MN"{CBM-+}6)"M"
  8146. {CBM-A}7{CBM-T}9)"MN"{CBM-+}6)"M"{CBM-+}17)"N"
  8147. {$e6}8{CBM-T}18)"M"{CBM-+}15)"N":lb{CBM-R}1{CBM-@}6:{CBM-T}ll)"N"{CBM-+}14)"N":ll{CBM-R}ll3:499
  8148. %s{CBM-R}54272:l{CBM-R}s{CBM-@}s{CBM-N}24:l,0::s{CBM-N}5,9:s{CBM-N}6,16:s{CBM-N}24,15
  8149. bs{CBM-N}4,129:s{CBM-N}1,34:s,75:
  8150. Xs{CBM-R}54272:l{CBM-R}s{CBM-@}s{CBM-N}24:l,0::s{CBM-N}5,11:s{CBM-N}6,16:s{CBM-N}24,15
  8151. s{CBM-N}4,129:s{CBM-N}1,54:s,111:
  8152. L{CBM-@}s{CBM-R}54272:l{CBM-R}s{CBM-@}s{CBM-N}24:l,0::s{CBM-N}5,11:s{CBM-N}6,56:s{CBM-N}24,15
  8153. {$e9}{SHIFT-POUND}s{CBM-N}4,129:s{CBM-N}1,51:s,97:
  8154. 00,16,195,200,15,210,200,14,24,200,15,210,512,22,96,512
  8155. y,16,195,1024,11,48,1024,15,210,512,14,24,200,12,143,200,11,48,200
  8156. -10,143,200,11,48,200,12,143,200,11,48,512,16,195,512,14,239,512
  8157. {$e2}.11,48,512,15,210,200,15,210,200,14,24,200,12,143,200,112,14,24,200,12,143,200,11,48,200
  8158. >310,143,200,11,48,200,12,143,200,11,48,512,16,195,512,14,239,512
  8159. 411,48,512,15,210,200,15,210,200,14,24,200,12,143,200,11,48,200
  8160. C510,143,200,11,48,200,12,143,200,11,48,512,11,48,1024,-1,0,0
  8161.  
  8162. 255,255,255,1255,192,96,255
  8163. -240,196,127,252,206,127,255,206,127,255,196,127,252,96,255,240,49,255
  8164. ]192,31,254,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  8165. {CBM-M}0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,63,240,0,103,252,0,195,255
  8166. {$f3}0,219,255,192,195,255,0,103,252,0,63,
  8167. ,0,0,0,64,0,0,64,0,0,64,0,0,64,0,0,126,0,0,255,255,0
  8168. n {CBM-W}255,0,63,255,252,127,255,254,255,255,255,100,68,70,37,85,84,20,68,72
  8169. P {CBM-L}15,255,240,0,0,0,0,0,0,0,0,0
  8170. {CBM-F} {CBM-F}0,2,0,0,2,0,0,2,0,0,2,0,0,58,0,0,70,0,0,186,0,0,130,0,0,254,0,1,255,0
  8171. !{SHIFT-*}3,255,128,7,2:a1,q1:
  8172. {$f2}!{$f2}a2{CBM-R}896{CBM-@}958:q2:a2,q2:
  8173. "{$f7}a3{CBM-R}960{CBM-@}1022:q3:a3,q3:
  8174. 1"{$fc}a4{CBM-R}12288{CBM-@}12350:q4:a4,q4:
  8175. r"a5{CBM-R}12352{CBM-@}12414:q5:a5,q5:
  8176. S"a6{CBM-R}12416{CBM-@}12478:q6:a6,q6:
  8177. "a7{CBM-R}12480{CBM-@}12542:q7:a7,q7:
  8178. "b
  8179. {CBM-H}"lta{CBM-R}1{CBM-M}ar{CBM-R}5:ta{CBM-R}1{CBM-M}m1{CBM-R}1
  8180. N"qta{CBM-R}2{CBM-M}ar{CBM-R}3:ta{CBM-R}2{CBM-M}
  8181. Esc{CBM-E}801{CBM-P}sc{CBM-W}1001{CBM-M}b${CBM-R}"* general *"
  8182. ${CBM-V}sc{CBM-E}1001{CBM-M}b${CBM-R}"** marshal **"
  8183. ${SHIFT-*}
  8184. $P500
  8185. )$i{CBM-R}1{CBM-@}1500::
  8186.  
  8187.  
  8188.  
  8189. r"a5{CBM-R}12352{CBM-@}12414:q5:a5,q5:
  8190. S"a6{CBM-R}12416{CBM-@}12478:q6:a6,q6:
  8191. "a7{CBM-R}12480{CBM-@}12542:q7:a7,q7:
  8192. "b
  8193. {CBM-H}"lta{CBM-R}1{CBM-M}ar{CBM-R}5:ta{CBM-R}1{CBM-M}m1{CBM-R}1
  8194. N"qta{CBM-R}2{CBM-M}ar{CBM-R}3:ta{CBM-R}2{CBM-M}2):5000:r${CBM-R}"#"{CBM-N}D(de):
  8195. 4ls{CBM-R}C(r$):az${CBM-R}H(r$,1):za${CBM-R}J(r$,ls,1):az${CBM-W}{CBM-E}"("{CBM-M}6050
  8196. Mza${CBM-R}"y"{CBM-M}h${CBM-R}"00"{CBM-N}J(r$,2,2):5000:r${CBM-R}"("{CBM-N}D(de){CBM-N}")y":
  8197. {CBM-+}za${CBM-R}")"{CBM-M}h${CBM-R}"00"{CBM-N}J(r$,2,2):5000:r${CBM-R}"("{CBM-N}D(de){CBM-N}"x)":
  8198. {SHIFT-*}{CBM-I}za${CBM-R}"x"{CBM-A}za${CBM-R}"y"{CBM-M}6070
  8199. {$e7}{CBM-D}h${CBM-R}H(za$,4{CBM-Q}ls){CBM-N}r$:5000:r${CBM-R}D(de{CBM-Q}1:
  8200. :q{CBM-R}1{CBM-@}5:{CBM-T}bl)"N"{CBM-+}bb)"M":bl{CBM-R}bl{CBM-Q}1:bb{CBM-R}bb{CBM-N}2:
  8201. dd:v{CBM-N}23,0:v{CBM-N}29,0:v{CBM-N}21,0:420:q{CBM-R}1{CBM-@}500{SHIFT-POUND}.1:
  8202. Gis{CBM-R}54272:l{CBM-R}s{CBM-@}s{CBM-N}24:l,0::1200
  8203. lv{CBM-R}53248: bo{CBM-R}bo{CBM-Z}10:xx{CBM-R}{CBM-J}(bo):sc{CBM-R}sc{CBM-N}xx:sc{CBM-E}hs{CBM-M}hs{CBM-R}sc
  8204. {CBM-B}m"":v{CBM-N}32,0:v{CBM-N}33,1:53281,1
  8205. {$fd}n{CBM-T}85)"b*o*n*u*s ";xx;{CBM-+}3)"
  8206. 5
  8207. wsh{CBM-R}0:sc{CBM-R}0:bo{CBM-R}0:xx{CBM-R}0:v{CBM-N}32,1:v{CBM-N}33,0:60
  8208. ? s{CBM-R}54272:l{CBM-R}s{CBM-@}s{CBM-N}24:l,0::s{CBM-N}5,9:s{CBM-N}6,0:s{CBM-N}24,15
  8209. v!hf,lf,dr:hf{CBM-R}{CBM-Q}1{CBM-M}
  8210. $s{CBM-N}1,hf:s,lf:s{CBM-N}4,33:t{CBM-R}1{CBM-@}dr::s{CBM-N}4,32:801
  8211. N*18,209,1024,15,210,512,18,209,512,16,195,1024,14,24,512,11,48,512
  8212. +18,209,2(he$,n%{CBM-N}1,1)
  8213. {CBM-H}:sz{CBM-R}1:
  8214. "  hex to decimal (h$ to de)
  8215. zd{CBM-R}0:q{CBM-R}3:m{CBM-R}1{CBM-@}4:w{CBM-R}0{CBM-@}15:J(h$,m,1){CBM-R}J(he$,w{CBM-N}1,1){CBM-M}5030
  8216. Aw
  8217. {CBM-+}d1{CBM-R}w{CBM-D}(16{CBM-S}(q)):d{CBM-R}d{CBM-N}d1:q{CBM-R}q{CBM-Q}1:m:de{CBM-R}{CBM-J}(d):
  8218. GP accept hex opcode input and translate it to decimal
  8219. {$fd}ZH(r$,1){CBM-R}"#"{CBM-M}h${CBM-R}"00"{CBM-N}I(r$,1,48,200
  8220. '/10,143,200,11,48,200,12,143,200,11,48,512,16,195,1024,22,96,512
  8221. N018,209,1024,15,210,512,18,209,512,16,195,1024,14,24,512,11,48,512
  8222. {CBM-W}118,209,200,16,195,200,15,210,200,14,24,200,15,210,512,22,96,512
  8223. {$f9}216,195,1024,11,48,1024,15,210,528,24,1,128,24,1,128,24,1,128,24,1,128,24,1,128,24,1
  8224. u128,24,1,128,36,1,128,66,1,255,129,255,128,66,1,128,36,1,128,24,1,128
  8225. 24,1,128,24,1,128,24,1,128,24,1,128,24,1,128,24,1,255,255,255
  8226. {$e2}0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,31,254,0,49,240,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  8227.  0,0,0,0,0,0,0,0
  8228. t{CBM-I}0,0,2,34,128,4,0,64,2,146,128,16,0,16,10,73,32,64,0,4,17,140,96,64,0,4
  8229. {CBM-K}{CBM-M}17,17,16,64,0,4,8,136,136,64,0,4,17,17,16,32,0,8,8,136,128,16,0,16,2,72
  8230. {CBM-Y}{CBM-D}128,4,0,64,0,0,0
  8231.  {CBM-E}0,0,0,0,0,0,0,0,0,055,192,0,124,0,15,187,224,8,186,32,15,187,224,8,130,32,15
  8232. &!E131,224,0,0,0,0,0,0,0,0,0
  8233. P!J0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,60,0,0,126,0,0,255,0,0,255,0,0
  8234. {CBM-U}!O126,0,0,60,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  8235. U!{$e8}a1{CBM-R}832{CBM-@}894:q1m1{CBM-R}2
  8236. {$e8}"vta{CBM-R}3{CBM-M}ar{CBM-R}1:ta{CBM-R}3{CBM-M}m1{CBM-R}3
  8237. {$ee}"{$7e}
  8238. #{CBM-A}sc{CBM-R}0{CBM-M}b${CBM-R}"traitor"
  8239. "#{CBM-E}sc{CBM-E}0{CBM-P}sc{CBM-W}51{CBM-M}b${CBM-R}"soldier"
  8240. b#{CBM-R}sc{CBM-E}52{CBM-P}sc{CBM-W}101{CBM-M}b${CBM-R}"sergeant"
  8241. E#{CBM-H}sc{CBM-E}101{CBM-P}sc{CBM-W}201{CBM-M}b${CBM-R}"lieutenant"
  8242. #{CBM-L}sc{CBM-E}201{CBM-P}sc{CBM-W}401{CBM-M}b${CBM-R}"captain"
  8243. {CBM-T}#{CBM-U}sc{CBM-E}401{CBM-P}sc{CBM-W}601{CBM-M}b${CBM-R}"major"
  8244. C#{SHIFT-@}sc{CBM-E}601{CBM-P}sc{CBM-W}801{CBM-M}b${CBM-R}"colonel"
  8245. {$e8}#{CBM-C}2198,dex0202,dey0136,eor1065
  8246. c!>ninc2230,inx0232,iny0200,jmp6076,jsr9032,lda1161,ldx5162,ldy5160
  8247. !hnlsr3066,nop0234,ora1001,pha0072,php0008,pla0104,plp0040,rol3034
  8248. M!rnror3098,rti0064,rts0096,sbc1225,sec0056,sed0248,sei0120,sta1129
  8249. "\nstx2134,sty21):
  8250.  {CBM-L}ls{CBM-R}5{CBM-M}h${CBM-R}H(r$,4):6090
  8251.  {SHIFT-*}h${CBM-R}"00"{CBM-N}H(r$,2)
  8252. / J5000:r${CBM-R}D(de){CBM-N}za$:
  8253. T  nadc1097,and1033,asl3002,bcc8144,bcs8176,beq8240,bit7036,bmi8048
  8254. {CBM-O} *nbne8208,bpl8016,brk0000,bvc8080,bvs8112,clc0024,cld0216,cli0088
  8255. {$fe} 4nclv0184,cmp1193,cpx4224,cpy4192,decshots fired";sh:{CBM-T}45)"your";
  8256. =o" score";sc;{CBM-+}3)"high score ";hs:{CBM-T}49)"your rank is ";b$
  8257. Ip{CBM-T}43)"your total surviving time ";ti$
  8258. q{CBM-T}86)"want to play again? (y/n)"
  8259. {CBM-I}s{CBM-K}c$:c${CBM-R}""{CBM-M}595
  8260. {CBM-X}tsc{CBM-R}0:b${CBM-R}"":c${CBM-R}"y"{CBM-M}599
  8261. Puc${CBM-R}"n"{CBM-M}64738
  8262. {CBM-*}vc${CBM-R}"":59
  8263. 15,208,233,169,0
  8264. #
  8265. A 153,-1,-256,160,107,32
  8266. <
  8267. A 47,241,108,2,3,108
  8268. \
  8269.  A -144,-257,208,251,232,189
  8270. U
  8271. &A 0,2,201,61,208,202
  8272.  
  8273. ,A 232,138,72,160,0,189
  8274. {CBM-M}
  8275. 2A 0,2,201,44,240,8
  8276. D
  8277. 8A 232,200,192,15,208,243
  8278. {$de}
  8279. >A 240,182,192,0,208,4
  8280. {$fa}
  8281. dA 162,8,208,176,22):5000:r${CBM-R}"#"{CBM-N}D(de):
  8282. 4ls{CBM-R}C(r$):az${CBM-R}H(r$,1):za${CBM-R}J(r$,ls,1):az${CBM-W}{CBM-E}"("{CBM-M}6050
  8283. Mza${CBM-R}"y"{CBM-M}h${CBM-R}"00"{CBM-N}J(r$,2,2):5000:r${CBM-R}"("{CBM-N}D(de){CBM-N}")y":
  8284. {CBM-+}za${CBM-R}")"{CBM-M}h${CBM-R}"00"{CBM-N}J(r$,2,2):5000:r${CBM-R}"("{CBM-N}D(de){CBM-N}"x)":
  8285. {SHIFT-*}{CBM-I}za${CBM-R}"x"{CBM-A}za${CBM-R}"y"{CBM-M}6070
  8286. {$e7}{CBM-D}h${CBM-R}H(za$,4{CBM-Q}ls){CBM-N}r$:5000:r${CBM-R}D(de3
  8287. A 32,210,255,76,116,164
  8288. %A 0,1,65,17,81,33
  8289. @A 97,49,113,124,165,49
  8290. [A 234,162,-256,173,5,3
  8291. ZA 201,-256,240,17,141,-145
  8292. A -257,173,4,3,141,-144
  8293. {CBM-R}{CBM-@}A -257,169,-211,141,4,3
  8294. I{CBM-N}A 142,5,3,173,21,3
  8295. {$e8}{CBM-A}A 201,-256,240,19,141,-147
  8296. {CBM-L}A -
  8297. 2198,dex0202,dey0136,eor1065
  8298. c>ninc2230,inx0232,iny0200,jmp6076,jsr9032,lda1161,ldx5162,ldy5160
  8299. hnlsr3066,nop0234,ora1001,pha0072,php0008,pla0104,plp0040,rol3034
  8300. Mrnror3098,rti0064,rts0096,sbc1225,sec0056,sed0248,sei0120,sta1129
  8301. \nstx2134,sty21kkk
  8302. 632,tax0170,tay0168,tsx0186,txa0138,txs0154,tya0152
  8303.  
  8304.  
  8305. J5000:r${CBM-R}D(de){CBM-N}za$:
  8306. T  nadc1097,and1033,asl3002,bcc8144,bcs8176,beq8240,bit7036,bmi8048
  8307. {CBM-O} *nbne8208,bpl8016,brk0000,bvc8080,bvs8112,clc0024,cld0216,cli0088
  8308. {$fe} 4nclv0184,cmp1193,cpx4224,cpy4192,dec(he$,n%{CBM-N}1,1)
  8309. {CBM-H}:sz{CBM-R}1:
  8310. "  hex to decimal (h$ to de)
  8311. zd{CBM-R}0:q{CBM-R}3:m{CBM-R}1{CBM-@}4:w{CBM-R}0{CBM-@}15:J(h$,m,1){CBM-R}J(he$,w{CBM-N}1,1){CBM-M}5030
  8312. Aw
  8313. {CBM-+}d1{CBM-R}w{CBM-D}(16{CBM-S}(q)):d{CBM-R}d{CBM-N}d1:q{CBM-R}q{CBM-Q}1:m:de{CBM-R}{CBM-J}(d):
  8314. GP accept hex opcode input and translate it to decimal
  8315. {$fd}ZH(r$,1){CBM-R}"#"{CBM-M}h${CBM-R}"00"{CBM-N}I(r$,k32,189
  8316. jA 0,2,201,49,240,8
  8317. *pA 201,56,240,4,162,9
  8318. fvA 208,160,41,15,170,152
  8319. {$60}\A 72,160,0,138,32,186
  8320. {$7e}BA 255,104,168,104,170,152
  8321. HA 160,2,32,189,255,162
  8322. {CBM-Y}NA -1,134,251,169,-256,133
  8323. VTA 252,160,-257,169,251,162
  8324. {$f3}ZA -227,32,216,255,169,1):
  8325. {CBM-L}ls{CBM-R}5{CBM-M}h${CBM-R}H(r$,4):6090
  8326. {SHIFT-*}h${CBM-R}"00"{CBM-N}H(r$,2)
  8327. /J5000:r${CBM-R}D(de){CBM-N}za$:
  8328. T nadc1097,and1033,asl3002,bcc8144,bcs8176,beq8240,bit7036,bmi8048
  8329. {CBM-O}*nbne8208,bpl8016,brk0000,bvc8080,bvs8112,clc0024,cld0216,cli0088
  8330. {$fe}4nclv0184,cmp1193,cpx4224,cpy4192,dec
  8331. U257,173,20,3,141,-146
  8332. ${CBM-C}A -257,169,-130,120,141,20
  8333. <BA 3,142,21,3,88,173
  8334. xHA 144,2,201,-256,240,19
  8335. VNA 141,-170,-256,173,143,2
  8336. TA 141,-169,-256,169,-168,120
  8337. {CBM-E}ZA 141,143,2,142,144,2
  8338. A A 88,96,256
  8339.  
  8340.  
  8341. 57,169,251,162
  8342. {$f3}ZA -227,32,216,255,169,1
  8343. 632,tax0170,tay0168,tsx0186,txa0138,txs0154,tya0152
  8344.  
  8345.  
  8346. J5000:r${CBM-R}D(de){CBM-N}za$:
  8347. T nadc1097,and1033,asl3002,bcc8144,bcs8176,beq8240,bit7036,bmi8048
  8348. {CBM-O}*nbne8208,bpl8016,brk0000,bvc8080,bvs8112,clc0024,cld0216,cli0088
  8349. {$fe}4nclv0184,cmp1193,cpx4224,cpy4192,deckkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkk