Run Magazine ReRun 1991 March & April

home *** CD-ROM | disk | FTP | other *** search

/ Run Magazine ReRun 1991 March & April / rerun-1991-03-04.d64

Wrap

Commodore Disk Image | 1991-01-01 | 170.8 KB

Cbm menu 128 {CBM-I} l{CBM-G}{CBM-P}run"menu 128 f20 ; 7dff054e4f2044415441*20494e204d454d4f5259*9b110d006086fa84fe20 o; c72ca2008e270a86fb20*e4ffc914f01ec90df023*c960b0f1c91bf069c920 ; 90e9a6fbe4faf0e3e6fb*202dc74c7628a6fbf0d7*c6fb4c9528ee270aa4ec Y; b1e0297f91e0a5fb8586*18a6fca4fd20f0ff 16a00820f0ff20*7dff9b3a9d00a9a98581*a92d8582a23f868fae8a m4 2dbdf32c8dc82daaa000*20682890034c1e24a686*8eca2d18a218a00f20f0 4 ff207dff9b5345415243*48494e4700a9cf858ba9*2d858ca2008ecd2d8ece W4 2d8689868aae892da580*38fdf32ccad0f9858485*8538adc72de d*1d1d1d00aef32c8683a2 ? 008684a683bdf32caa86*85a484206828b01818a5*84658585843820f0ffe8 z? e8a0081820f0ffc683d0*da1860a584a8a27f20a2*02202dc7c8c6fad0f318 ?{CBM-N} a584658585846018a218*a00820f0ff207dff9b50*52455353205245545552 {$e4}?{CBM-H} 4e20544f20434f4e54 2dcecd 8 2da93f8d00ffa000b18b*8589c8b18b858aa9008d*00ff201d2920682918a2 x8 17a00220f0ff207dff9b*55534520435552534f52*204b45595320544f204d 8{CBM-+} 4f5645205448524f5547*48204c49535420202020*20202020202020202020 {$e2}8{CBM-A} 50524553532005455343*9b20544f20455 ffa903aaa00020baffa9*0020bdff20c0ffa20320 c, c6ffa20086fb20e4ff9d*772de6fba6fbe4fad0f2*20ccffa90320c3ffa200 Ec6 8e7b2d8e7c2d20502cbd*772d38e930186d7b2d8d*7b2dad7c2d69008d7c2d {CBM-N}c@ e8e486d0e3adff03cd7c*2df00590154c292cadfe*03cd7b2d900aad7b2dd0 {$ef}cj 00000000000000000*00000000000000004152 f 5449434c45203a415554*484f5220203a49535355*452020203a5041474520 \f{CBM-@} 2020203a434f4d505554*45523a53454354494f4e*203a43415445474f5259 {CBM-K}f{CBM-S} 3a20202020202020203a*00000000000000000000*00000000000000000000 {$e6}f{CBM-U} 00 a903*aaa00020baffa90020bd <( ff20c0ffa20320c6ffa2*0086fb20e4ffa4fea68f*20af02e6fee6fba6fbe4 C<2 fad0ec20ccffa90320c3*ff1860ee270a3860a901*85f16085fa84fb86fca0 {CBM-POUND}<< 00b1fa20d2ffc8c4fcd0*f660a48088a920a27f20*af028810f860a68aa489 {$ed}<f d001ca88a58085f dc92d1869 5$ 018583a585858420812c*90034c3526201d29a900*85faa484a27f20a202a6 A5. fadd8b2dd011c8e6faa5*facdc92dd0eaa9018dcb*2dd010c683d008a9008d {CBM-+}58 cb2d4c0026e684d0cda5*fff00a3060adcb2df0a7*4c6b26adcb2df09fa000 {$eb}5b a589918bc8a58a918be6*8bd002e68c 49*4e5545200020f728a900*8d270a20e4ffc90df004 )@{CBM-V} c91bd0f548ee270a207d*ff1b500068c91b60186d*1a2d85fa38a928e5fa4a N@H 18a84cf0ffa9028581a9*2d8582a20aa000a90085*8f4c6828a90fa8a20820 {CBM-W}@R baffa90020bdff20c0ff*a20f20c6ffa90085fb20*cfffc90df009a6fb9d63 {$f8}@ 8495400*20e4ffc91df00bc99df0 '9{SHIFT-@} 2dc91bd0f14c2a1cadcd*2dc58dd00aadce2dc58e*d0034c7327e68dd002e6 L9D 8ee68bd002e68ce68bd0*02e68c4c0627a58dd007*a58ed0034c7327a58dd0 {CBM-E}9N 02c68ec68da58bd002c6*8cc68bd002c68cc68b4c*0627a90085fc85878588 {$f6}9X a9fb85fde687 20ad7c2dd01b18a6fca4*fd20f0ff207dff202020*20209d9d9d9d9d119b00 4dt 4c652b18600d7b2d85fe*ad7c2d85ffd005a5fed0*016006fe26ff06fe26ff Yd^ 18ad7b2d65fe8d7b2dad*7c2d65ff8d7c2d0e7b2d*2e7c2d60e689d002e68a {CBM-V}dH a58acdff03d007adfe03*c589900218603860e689*d002 O00000000000024303a*494e44582e2a00000000*00000000000000000000 +gB 00000000000000000000*00000000000000000000*00000000000000000000 LgL 00000000000000000000*00000000000000000000*0000000000000000 UgV -1 503060f1e0000494e Re 44582e00000000000000*000 a84fb*86fd18a900a2086a66fa*90031865fbca10f585fb 2=p a58085fc18a900a2086a*66fc90031865fdca10f5*85fd18a5fb65fc8582a5 W=z fa858118a58269048582*6018a203a00e20f0ff20*7dff5245434f52442023 {CBM-C}=D 200500a689a58a20328e*a920202dc7207dff1111*9b0d00a9008584adf32c e68bd002e6*8ceecd2dd003eece2d4c 06l a225adce2dd025adcd2d*d02018a217a00d20f0ff*207dff05534541524348 U6v 204641494c4544002054*2a4c2a1ca589a58a4cc9*26adcb2dd0a8ae8a2da5 {SHIFT-@}6{$60} 8038fdf32ccad0f98584*858538adc82dedca2d18*69018583a5858584a900 ~6J 85faa484a {CBM--} 2de6fbd0f020ccffa90f*20c3ff38a5fbed1a2da2*17209b2a20f728a6fba9 =a{$e6} 63a02d20fc284c542aa9*0faa2068ffa90fa8a208*20baffa90020bdff20c0 a{$f0} ffa20f20c9ffa95320d2*ffa93a20d2ffad1a2d18*6905aaa9fda02c20fc28 Ga{$fa} 20ccffa90f4cc3ff207d*ff202d20454e54455220*5 d002e688*38a5fce58085fca5fde9*0085fdd0eba5fcc580b0 ;:{$e2} e560aefe03adff034c32*8e38a587edfe03aaa588*edff034c328eadfe03d0 :{$ec} 03adff0360eefe03d003*eeff03adff03c588d007*a587cdfe039002182438 E:{$f6} 60adfe03d003ceff03ce*fe03200f28f002182438*6018a215a00b20f0f e68aa58acdff03d0 eR 07adfe03c58990021860*4cb22ca589d002c68ac6*89a58ad007a589d0034c he{$7c} 992c1860207dff1d119b*00a6faa9a3202dc7cad0*faa991202dc7a99da6fa e 202dc7cad0fa3820f0ff*86fc84fd4cf728480701*0c0503060f1e0000494e Re 44582e00000000000000*000 >N 8583a91b85fda92d85fe*a209a5fda4fe20fc2818*a5fd690985fda5fe6900 f>X 85fe20f728a683bdf32c*858585fa203c2a207dff*119b0d00c683d0d0ae7d > 2df00160a27f868f18a2*18a00b20f0ff207dff50*5245535320054553439b P> 20544f20455849541311*11111111111d1d1d1d1 27f20a202a6*fadda92dd011c8e6faa5*facdca2dd0eaa9018dcc d7T 2dd010c683d008a9008d*cc2d4cbe26e684d0cdad*cc2dd0034ca2254c1326 7{$7e} 207dff059300a905a200*209b2aae1a2da902a02d*20fc28207dff9b2d4649 N7 4e4400ee7d2da900858d*858ea9cf858ba92d858c*adcd2dd003cece 245434f524420232020 b 2020209d9d9d9d9d1100*ae882d86fa20ce2ca200*8e270a86fb20e4ffc914 qb f01ec90df028c91bf01f*c93090edc93ab0e9a6fb*e4faf0e3e6fb202dc74c b 742ba6fbf0d7c6fb4c93*2bee270a3860a5fb8586*f0f5ee270aa4ecb1e029 {SHIFT-+}b" 7f91e018a6fca4fd20f0*c4c*20424520455241534544 i&{$fe} 202a2a2a00207dff0d11*9b454e5445522046494c*454e414d453a00a90e85 & 81a92d858220b42ab0a3*a686f09f8e1a2d205623*a20fa9012068ffa900a8 S& a20820baffad1a2d1869*05a2fda02c20bdffa900*a2fea00320d5ff20bf2a ' ad632dc930d00aad20202020 g{$fa} 49204e20442045205820*452052202056312e3020*20202020202020202020 20202020204d41484d4f*4f44204d45524348414e*54202841554755535420 Q 31393930292020202020*9211110d09099d9d9d9d*5245434f524453204652 45453a0500200028207d*ff0d9b09091c*2a1cae1a2dd009204628*20542a4c5e1d207dff0d t* 1105434f52524543549b*0020452b90034c5e1dad*7b2d8589ad7c2d858a20 * 7dff059300a908a20020*9b2aae1a2da902a02d20*fc28207dff9b2d434f52 {$de}*{CBM-POUND} 5245435400ee7d2da27f*868f201d2920682918a2*18a00c20f0ff207dff9b #+{CBM-R}20f0ff*207dff054e4f204d4f52 r# 45205245434f52442053*504143450020542a2032*284c2a1c203228201828 # b0f2adfe038589adff03*858a201d29207dff0593*00a904a200209b2aae1a {CBM--}#{CBM-@} 2da902a02d20fc28207d*ff9b2d41444400200f29*20682990c62032284c5a !${CBM-S} 1e4c2a1c20462 902a18a217a00a20f0ff*207dff054e4f204d4f52*45205245434f52442053 _.* 504143450020542a2032*284c5e1d38adfe03e589*8583adff03e58a8584a9 {CBM-@}.4 858db902adfe038589ad*ff03858a201d29a68186*85a682868620b22c201d {$e9}.> 29a48088a27f20a202a2*7f20af028810f3a583d0*02c684ffc91bf01ec94190*f5c944b0f1ee270a202d*c7c941f012c943d003c6 v1 ff2ce6ff4c2424ee270a*4c2a1cadf32c85831869*31858ba91b8584a20086 1{CBM-I} 89a92d8585207dff1111*119b00a5894849018589*68d00b207dff0d111220 1{CBM-D} 004c5f24207dff090912*200038a58be583202dc7*207dff20642d*c930d0034c111fa2008e*1a2d4c031cae1a2dd009 ]'& 20462820542a4c5e1d20*7dff0d1105564945579b*0020452b90034c5e1dad {CBM-I}'0 7b2d8589ad7c2d858a20*7dff059300a905a20020*9b2aae1a2da902a02d20 {$e7}': fc28207dff9b2d564945*5700ee7d2d201d292068*2918a217a00220f0ff20 d1d1d1d55*5345443a050020f72720 [ " 7dff0d11119b12204c20*92202d204c4f41440909*1220462092202d204649 , 4e44110d00ae882dd00c*bde104e8c920d0f8ca8e*882d207dff1220412092 {$e5} 6 202d2041444409091220*432092202d20434f5252*454354110d1220452092 *!@ 202d204552 50524553532005455343*9b20544f204558495400*aef32c8683a000848418 H+{CBM-C} a20420f0ffa483b9f32c*858585fa85fba58485fe*3820f0ffe8e88686a008 {CBM-Z}+F 20f0ff20c72c18a58569*08a8a68620f0ffa4ecb1*e0c920d006c6ecc6fbd0 {$f2}+P f2e6eca2008e270a2076*28b00b18a58465858584*c68207dff*9b544f20435245415445*20412046494c4520454e F${CBM-U} 544552204e414d453a00*20ac2ab03ba5868d1a2d*f0344c1a1eae1a2dd009 {CBM-Q}$B 20462820542a4c5e1da9*07a214209b2a207dff9b*534156494e47200500ae {$f0}$L 1a2da902a02d20fc2820*542a90034c5e1d200a2b*a20fa9012068ffa9004c683d0d5a584d0 ./h d1a9818db902200f2920*7dff059300a907a20020*9b2aae1a2da902a02d20 S/r fc28207dff9b2d494e53*455254004c4c21a20bbd*0e2d9d022dca10f760ae {CBM-U}/\ 1a2dd00920462820542a*4c5e1d207dff059300a9*05a200209b2aae1a2da9 {$fd}/F 02a02d20fc28207dff9b*2d4692202d2000a2 %2{CBM-L} 08a584a48520fc2818a5*8469098584a585690085*85c683d0b8a202868618 J2{SHIFT-*} a210a00020f0ff18adf3*2c69318582207dff0d9b*11454e5445520d0020f7 {CBM-P}2J 28a2008e270a20e4ffc9*1bf01ec93190f5c582b0*f138e931aa858138adf3 {$f4}2T 2ce5818581a900ee270a*4cdb244,(d 7dff9b55534520435552*534f52204b4559532054*4f204d4f564520544852 Q(n 4f554748204c49535400*18a218a00c20f0ff207d*ff505245535320054553 {CBM-L}(x 439b20544f2045584954*0020e4ffc91df00bc99d*f00dc91bd0f14c2a1c20 {$fb}(B 992c4c0c2020b22c4c0c*2020ccffa90185b8a9084153450909*1220492092202d20494e*53455254110d12205620 O!j 92202d20564945570909*1220532092202d205341*5645110d09099d9d9d12 {CBM-H}!t 20442092202044495245*43544f525911110d00a9*818daa028db90218a203 {$f9}!^ a00020f0ff207dff1b51*00200f28d0068d1a2d4c*961da9008d7d2da83d0b14c2a1cae1a2d 7,Z d00920462820542a4c5e*1d207dff0d1105455241*53459b0020452b90034c {$7c},{$e4} 5e1dad7b2d8589ad7c2d*858aadff03c58ad00aad*fe03c589d0034c5b2238 A,{$ee} adfe03e5898583adff03*e58a8584a9858db90220*1d29a6818685a6828686 -{$f8} 20992c201d29a48088a2*7 a8 5%V a20820baffad1a2d1869*05a2fda02c20bdff2018*28adfe038589adff0385 Z% 8a203228201d29a90385*fea9fe85fda681a482e8*d001c8a9fd20d8ff20bf {CBM-B}%{$ea} 2a4c5e1d4c2a1c4c5e1d*18a213a00120f0ffae1a*2df02a207dff052a2a2a &{$f4} 2046494c4520494e204d*454d4f52592057494494e44110d122041*2092202d204f4e452046 b0P 49454c44110d12204220*92202d2054574f204649*454c44532028414e4429 0Z 20202020202020202045*4e5445523a110d122043*2092202d2054574f2046 L0 49454c445320284f5229*110018a204a02620f0ff*20f728a20086ff8e270a 1 20e c1e24186909ca*d0fa18691b8584a90069 93{$de} 2da8a584a20820fc28a5*fff00cc686f010a5818d*892d4c9e24a5818d892d {$7e}3{$e8} 4c0f25a5818d8a2d18a2*13a00820f0ff207dff9b*3a9d00a98b8581a92d85 C3{$f2} 82a23f868fae892dbdf3*2c8dc72daaa000206828*b09da6868ec92da5fff0 4{$fc} 2f18a2*85baa90085b9a90985b7 @)L a97e85bba92d85bc20c0*ffa2008690e820c6ffa0*06207dff939b0084fb20 )V e4ffa6fc85fca490d028*a4fb88d0eea4fc20328e*a920202dc720e4ffa690 J) d012aaf006202dc74cca*20a90d202dc7a004d0cb*20ccffa90120c3ffa911 * 202dc7202dc720bf2a420320 >"H 9b2a20f728ae1a2da902*a02d20fc2818a21220f0*ff207dff1b400020e4ff "R c941f03ac943f028c949*f02ac94cf017c956f019*c945f01bc946f01dc953 H"{$7c} f00ac944d0d94c80204c*171f4c901e4cbc1f4cf9*204cda214c7e224c6223 # eaea200f28f075201828*902a18a217a00af20a202a27f20af0288*10f3a583d002c684c683 k- d0d5a584d0d120322818*a217a00d20f0ff207dff*055245434f5244204552 - 415345440020542a4c2a*1cae1a2dd00920462820*542a4c5e1d207dff0d11 U- 05494e534552549b0020*452b90034c5e1dad7b2d*8589ad7c2d858a201828 . {CBM-+}9);"9" ${$fe} 0,5,79,12:G(27){CBM-N}"1" 3$G(27){CBM-N}"3":{$fe} 0,0,79,24,1: [$ "40/80col","list","80col","40col" $ "directory","window","to","screen","drive" {SHIFT-@}${CBM-POUND} "printer","one","two","save","retrieve" {$e2}${CBM-R} "1 2 8","e s c a p e","p o w e r" {$f2}${CBM-C} "k e "of the following:" 0D i{CBM-R}0{CBM-@}n{CBM-Q}1:(256{CBM-D}a(i)):: vN "new starting address";ad:50:{$fe} XX ad${CBM-R}D(ad):ad${CBM-R}I(ad$,C(ad$){CBM-Q}1) g${CBM-R}"esc key.ml" {CBM-C} "installing machine language, please wait" U {$fe} 15:x{CBM-R}ad {CBM-@} ad{CBM-N}690 {$f6} a$:a{CBM-R}Q(a$):cs{CBM-R}cs{CBM-N}a: x,a:x {CBM-N} (Z d2,ff,a6,eb,e4,e5,d0,dc,a9,00,85,f8 :( a2,04,b5,a6,9d,5d,03,ca,d0,f8,68,a8 D( 68,aa,18,20,18,c0,a9,04,20,c3,ff,20 ( cc,ff,60,ea,85,b4,a5,d7,30,03,4c,7e {CBM-U}({CBM-I} a0,a9,0d,a0,02,91,b2,20,bf,a3,a5,80 {$e2}({CBM-D} 29,e6,f0,03,4c,6c,79,a0,01,a2,01,a5 ){CBM-L} line 480" !"press [c] to continue" c!"press [n] to print normal size" {$60}!{CBM-@}{CBM-K}{$f9}a$:a${CBM-R}"n"{CBM-M} chg{CBM-R}1:500 Q!{CBM-S}a${CBM-R}"m"{CBM-M}{$fe}:{$e8} !{CBM-U}"modify line 480, ensure printer "; C!B"is ready and then enter 'run 480'" {SHIFT--}!L 480:"run 480"::{$fe} {$f7}!Va${CBM-W}{CBM-E}"c"{CBM-M}420:U:ch b1,b5,a2,0c,20,cc,cd,8d,2e,0a,c8 *,T c8,a2,14,b1,b5,20,cc,cd,8d,2f,0a,a6 t,{$7e} eb,a4,ec,18,20,18,c0,60,a2,0c,20,da {$7e}, cd,48,a2,18,a9,a0,20,cc,cd,a2,21,a9 {CBM-POUND}, 00,20,cc,cd,ca,68,20,cc,cd,d1,b5,d0 R, 01,c8,b1,b5,a2,12,20,cc,cd,e8,a9,00 {$fc},{CBM-+} 20,cc creates indexer e {$e8}:"use this program to create indexer.ml W "on a work disk. place a formatted work disk ( "in the drive and press a key... {CBM-M}2 {CBM-K}{$f9} a$ D< 8,8,8,"indexer.ml,p,w" {$e1}f "creating indexer.ml... {$fb}p a$: a${CBM-R}"-1" {CBM-M} 8: y s" %F a9,a6,8d,00,0a,a9,2a,8d,38,03,a2,13 f%P 8e,39,03,e8,8e,13,03,86,b6,86,b3,e8 P%Z 8e,01,0a,a9,93,85,b2,a9,cc,85,b5,a9 %{$e4} e2,8d,12,03,60,ea,c9,40,90,03,4c,c1 D%{$ee} c9,c9,31,f0,32,c9,32,f0,2e,c9,38,f0 {$ee}%{$f8} 04,c9,39,d0,52,48,a5,d7,10,1d,a0, cs{CBM-W}{CBM-E}86156{CBM-M}"data error":710{CBM-Q}: ,{CBM-H} ad{CBM-W}{CBM-E}4864{CBM-M}{$fe} \{CBM-V} dir{CBM-R}ad{CBM-N}256:hi{CBM-R}ad{CBM-Z}256: ad{CBM-N}11,hi: ad{CBM-N}684,hi VH dir${CBM-R}D(dir):ct{CBM-R}ad{CBM-N}463 R ln{CBM-R}C(dir$){CBM-Q}1:dir${CBM-R}I(dir$,ln):i{CBM-R}1{CBM-@}ln E{CBM--} tp${CBM-R}J(dir$,i,1):tp{CBM-R}F(tp$): ct,tp V{$e6} ct{CBM-R}ct{CBM-N}1::{$fe} {$fe}{$f0} poke ad+108,new secondary add 80,29,11,f0,06,4a,90,02,e8,e8,e8,8a 6){SHIFT-*} 20,67,a6,a9,00,aa,20,87,92,a0,60,a6 {$60})J b4,a9,00,20,57,92,38,20,d8,90,90,09 )T 48,20,14,a1,68,aa,4c,3c,4d,a2,00,20 {CBM-H}){$de} 45,a8,20,c6,ff,a0,03,8c,74,11,20,63 {$de}){$e8} 92,8d,75,11,20,51,92,d0,3e,20,63,92 *{$f2}g{CBM-R}1 " 4,4,0:4,G(27){CBM-N}G(15): 4 +"{$ea}chg{CBM-R}0{CBM-M}chg{CBM-R}1:20 g"{$f4}{$e8}: ,18,5,"":w$(14);{CBM-+}3) I"{$fe}w$(15);{CBM-+}3);w$(16);{CBM-+}3);w$(17) ":w$(0);{CBM-+}2);w$(1);{CBM-+}4);w$(2); {CBM-P}"{CBM-+}3);w$(2);{CBM-+}3);w$(2);{CBM-+}3);w$(3); R"{CBM-+}3);w$(3);{CBM-+}4);w$(4);{CBM-+}1);w$(4) {$f5}"&w$(5);{CBM-+}5);w$(6);{CBM-+}5);w$(7);,cd,a0,10,a2,1e,a9,ff,20,cc,cd &-{CBM-A} 88,d0,fa,60,48,a2,12,b1,b5,20,cc,cd p-{SHIFT-@} e8,a9,00,20,cc,cd,85,a7,a9,04,85,a8 Z-D 68,c9,37,f0,1f,a2,1f,a0,00,b1,a7,20 {CBM-@}-N cc,cd,c8,d0,f8,e6,a8,a5,a8,c9,dc,f0 N-X 0a,c9,08,d0,ec,a9,d8,85,a8,d0,e6,60 {$f8}-{$e2} a2,1f,az C(a$){CBM-W}62 {CBM-M} 150 :D b${CBM-R}J(a$,1,20){CBM-N}J(a$,22,20){CBM-N}J(a$,43,29) hN n{CBM-R}C(b$){CBM-Z}2 vX i{CBM-R}1 {CBM-@} n S h${CBM-R}J(b$,i{CBM-D}2{CBM-Q}1,2):h{CBM-R}Q(h$) 8,G(h);:: 80 {CBM-T} C(a$){CBM-W}20 {CBM-M} b${CBM-R}a$:180 {CBM--} C(a$){CBM-W}42 {CBM-M} b${CBM-R}J(a$,1,20){CBM-N}J(a$,22,(C(a$){CBM-Q}21)): 180 {CBM-N} b${CBM-R}J(a$,1,20){CBM-N}J(a$,22,20){CBM-N}J00 & a2,00,b1,b5,f0,07,9d,4a,03,c8,e8,d0 b& f5,68,8d,52,03,a9,0d,8d,53,03,a0,0a L& 84,d0,60,a0,09,d0,e1,48,a9,04,aa,a0 & 00,20,ba,ff,a9,00,20,bd,ff,20,c0,ff {SHIFT-*}&* b0,e8,a2,04,20,c9,ff,68,c9,31,f0,12 {$ea}&4 a5,2d,85,61,a5,2e,85,62,20,e5,50,a9ress {$fa} {$fe}&:ad 2:"saving machine language to disk" s{$fe}(g$),b15,p(ad) {CBM-@} p(ad{CBM-N}691) Ids{CBM-W}{CBM-E}26{CBM-M}ds$:320 ":"please remove write protect tab" H,"press [space bar] when ready or [esc] to abort" {$e7}6{CBM-K}{$f9}a$:a${CBM-R}G(27){CBM-M}320:U:260 @"do you wan 8d,76,11,20,51,92,d0,33,ce,74,11,d0 2*{$fc} e5,ae,75,11,ad,76,11,20,32,8e,a9,20 \* 20,69,92,20,63,92,48,20,51,92,d0,16 * 68,f0,05,20,69,92,d0,ef,a9,0d,20,69 {CBM-A}* 92,20,93,92,f0,05,a0,02,d0,0a,68,20 Z*$ 6f,92,a9,00,18,4c,75,92,a9,0d,d1,b2 +. d {CBM-+}2) #0w$(7);{CBM-+}2);w$(7);{CBM-+}2);w$(7);{CBM-+}2) 7#:w$(7);{CBM-+}5);w$(8);{CBM-+}5);w$(8) [#dw$(9);{CBM-+}2);w$(9);{CBM-+}3);w$(10);{CBM-+}5) {$7e}#nw$(11);{CBM-+}5);w$(12);{CBM-+}4);w$(12); #x{CBM-+}3);w$(13);{CBM-+}5);"8";{CBM-+}9);"9" {CBM-O}#B:{CBM-+}3);"1";{CBM-+}8);"2";{CBM-+}7) V#L"3";{CBM-+}7);"4";{CBM-+}7);"5";{CBM-+}7) {$f7}#V"6";{CBM-+}8);"7";{CBM-+}9);"8"; 0,00,20,da,cd,91,a7,c8,d0,f8 ".{$ec} e6,a8,a5,a8,c9,dc,f0,eb,c9,08,d0,ec l.{$f6} a9,d8,85,a8,d0,e6,a9,2a,8d,38,03,a9 G. 13,8d,39,03,4c,03,40 ,cc,cd,a2,21,a9 {CBM-POUND}, 00,20,cc,cd,ca,68,20,cc,cd,d1,b5,d0 R, 01,c8,b1,b5,a2,12,20,cc,cd,e8,a9,00 {$fc},{CBM-+} 20,cc(a$,43,C(a$){CBM-Q}42) {CBM-H} n{CBM-R}C(b$){CBM-Z}2 ({CBM-V} i{CBM-R}1 {CBM-@} n eH h${CBM-R}J(b$,i{CBM-D}2{CBM-Q}1,2):h{CBM-R}Q(h$) yR 8,G(h);:: 80 X{CBM--} indexer database utility {CBM-X}{$e6} 031ca9008d00ff8d20d0*8d21d08dfe038dff038d*882da97d8d1803a59d29 {$f0} 7f859dadf22c858020cf*27207dff8e05939b0b12*202020202020 '> 00,f0,63,6c,12,03,a5,eb,48,a5,ec,48 >'h a9,80,85,f8,a2,00,a0,00,18,20,18,c0 H'r a2,00,bd,5e,03,95,a7,e8,e0,04,d0,f6 '\ a9,00,9d,5d,03,ca,d0,fa,a5,eb,8d,30 {CBM-C}'F 0a,a5,e7,85,ea,a9,03,85,d6,20,09,c0 {$e6}'P c9,0d,f0,07,20,d2,ff,a9,00,f0,f2,20 t an escape key cheat sheet (y/n)";a$ , ja${CBM-W}{CBM-E}"y"{CBM-M} ; tL(0){CBM-W}5{CBM-M}{$fe} I ^"switch monitor to the 80 column screen" {$7b} HG(27){CBM-N}"x":{$fe} {CBM-K} RG(27){CBM-N}"4":{$e8}:"verify line 480 "; V {$7c}"will switch the printer to condensed printing" ! 480:"press [m] to modify0,06,a9,20,91,b2,d0,9f,91,b2,a5,ec .+8 c9,1e,f0,97,a8,88,a6,eb,18,20,18,c0 x+b a0,02,d0,8b,53,59,53,35,31,32,30,2c +l 00,20,44,49,72,44,30,2c,55,00,10,00 {CBM-D}+v 18,08,a0,12,c9,37,f0,68,c9,36,f0,64 V+{$60} c9,35,f0,28,c9,34,f0,05,c9,33,d0,1f ,J c8, {CBM-POUND}H{CBM-N}{CBM-Z}{$e8}{$60}{$fb}{$fc}{$e6} {CBM-E}{$fb} HL{$e6}{$f5}{$60}I"{$f0}&I IaI[IAI{$7f} {SHIFT-POUND}.lR~lR~lR~)_lR~ R~{SHIFT-POUND} T{SHIFT-POUND}"{$60}h [ [H{$60}h [H{$60}hjjjj{CBM-POUND}{CBM-O}P R~H){CBM-POUND}{CBM-O}PlR~lM{CBM-X}{SHIFT-POUND} lM{CBM-X}{$fb}{$fc} {CBM-E}{$fb}{$f0}HP{$f9}{$60}h Z{$e6}H8{$ed}{$e6}j{$e6} {CBM-B} {CBM-N} . {CBM-Z}{$e6}l{CBM-N}I {$f0}{$e7}{CBM-I} {SHIFT-POUND} R~{$e8}{$ec}{$e7}{$f7}{$60}h{SHIFT-POUND} R~H{$60}{$e5} ,O0 , {$ec} I {$f0}&I{$f0}+I {$f1}L{$e5}{CBM-A}{$ec}I{$60}I{SHIFT-*}{CBM-A}lT,O0 I{SHIFT-+}){$7f}{$60} {$60}){$7f}{$60}{SHIFT-POUND}{CBM-I} {SHIFT-@}~{SHIFT-POUND} {CBM-X}~ {SHIFT-*}~{CBM-A}{CBM-I} I~{CBM-A} L~{$60} L~8{$60}{CBM-I} I~ Track: {CBM-Z}{$e2} ; Sector: {CBM-Z}{$e3} ; {SHIFT-POUND} R~ R~{CBM-I} {$e5} t{SHIFT-POUND}: R~ {CBM-B}{CBM-X}{$f2}{$e6}{CBM-N} t {CBM-B}{CBM-S}{$e6}{$e8})I P{$e8} {SHIFT-POUND} R~ PK PG{SHIFT-POUND} R~lL~hh{SHIFT-POUND} {CBM-N}H{CBM-N}H{$60}h * {CBM-I}{$f2} {$fb}{$fc}{CBM-Z}{$e5}E{$fb}{$fb}{SHIFT-POUND} E{$fc}{$fc}{SHIFT-POUND} H{CBM-N}{$60},O{$60} {SHIFT-POUND} {$e1}{$60}h,Ol{$f0} lI~{SHIFT-POUND}{CBM-S}N {SHIFT-@}~{SHIFT-POUND}{CBM-I} {CBM-X}~l{SHIFT-*}~# {CBM-I} F~{CBM-I} wn{$e8}I P{$f5}J{SHIFT-POUND} nlL~{$fb}{$fc} {$ef} {CBM-E}{$fb}{$f0} R~HP{$f6}{$60}{CBM-I}\ '{CBM-S}{$e2} U {CBM-B}{CBM-S}{$e3} U{SHIFT-POUND} R~ L~lu1: 2 0 {CBM-I} '{CBM-S}{$e2} U {CBM-B}{CBM-S}{$e3} U{SHIFT-POUND} R~ L~lu2: 2 0 b-p: 2 0 {SHIFT-POUND} p {CBM-Y} P{SHIFT-*} P{$60}8{$60}h B {$f0}{CBM-I}O # H{CBM-N} Ul:Disk Error! ,O{$60} {CBM-S}{$e4} m C~{CBM-I}n ' L~ {CBM-I} _{CBM-I}n {SHIFT-POUND} {$ec} " s {$f4}l{$fc}{CBM-S}{$e4} ~Pl{$fc} {CBM-W}{$e2}{$e8}{CBM-X}{$f2}{$e3}l{SHIFT-POUND}@^V{$60} B l Prep. PrinterPress Return. {$ec} I P {$f1}{CBM-A} {CBM-I}Z {SHIFT-POUND} C~ {CBM-V}l{$fc}Printing... {$f0} B {$f0} Insert DiskHit Any Key {$ec} {CBM-V} {CBM--}{CBM-A}K lx j l s{CBM-A} cl{$fa}lA J{CBM-A} Byte:{SHIFT--} Addr: {CBM-Q}{SHIFT-*}{CBM-E}{SHIFT-*}{CBM-W} Ascii String: {CBM-Q}{SHIFT-*}{CBM-R} {SHIFT-*}{CBM-W} {SHIFT--} {SHIFT--} {SHIFT-*}{SHIFT-*}{CBM-E} {$60} Wl{SHIFT-+}{CBM-Z}OPlN B ll,O 8{$60}{$60}{SHIFT-POUND}~O {CBM-R} F1-F4:Block +/-{SHIFT--} F5-F8:Bl.+Read {SHIFT--} H)unt {SHIFT--} S)ector Change{SHIFT--} R)ead Block{SHIFT--} W)ri P{$f4}{$60}8{$60} Enter Petscii String. -=> {CBM-I} Gh " sH{$f0} !ll{$fc} {CBM-O}mSP{$f7}{$60}{SHIFT-POUND} {CBM-I}< l{$fc}File Search {SHIFT-POUND} {CBM-I}w l{$fc}Disk Search {SHIFT-POUND} {SHIFT-POUND}{CBM-Z}{SHIFT-POUND}I1{CBM-A}{CBM-I}{CBM-N} !{SHIFT-POUND} X{CBM-A}${CBM-D}{SHIFT-POUND}{CBM-Z}{$ee}TH{SHIFT-POUND}{SHIFT-*}PX{SHIFT-POUND} T {CBM-V}{CBM-D}{SHIFT-POUND}{$f0}ll{$fc}{CBM-D}{SHIFT-POUND}l Byte #0 {CBM-Z} P{CBM-Z}{$f2}{$f0}{$e2}{CBM-Z}{$f3}{$e3}{$60}8{$60}{$ee}{$e3}{$60}~012 R~nHPS 3{SHIFT-POUND} n{$60}{SHIFT-*} {$f0}F,O0{SHIFT-*} lT 3h H{CBM-POUND}l,h{SHIFT-POUND} LH{$60}h{SHIFT-POUND}L{SHIFT-POUND} R~H{$60}{SHIFT-POUND} {$ee}{$ef}{CBM-I}{CBM-X}n{$e8}I {$f0}9 {CBM-A}2){$e7}{$ee}.{$ef}{$ee}.{$ef}{$ee}.{$ef}{$ee}.{$ef}{CBM-Z}{$ee}M{$e7}{$ee}{SHIFT-POUND} M{$ef}{$ef}li8{$60}l{CBM-P}){$7f}IIg{CBM-A}Ia{CBM-A}I:{CBM-A}I0{CBM-A}l{CBM-Z}8{$e9}){$60}8{$60}{CBM-S}{$ee}{CBM-D}{$ef}{$60}{SHIFT-POUND} {$ee}{$ef}{CBM-I} {CBM-X}n{$e8}I {$f0}r {CBM-A}k){$e7}{CBM-Z}{$ee}{$f0}{CBM-Z}{$ef}{$f1}{$ee}.{$ef}{$ee}.{$ef}{CBM-Z}{$ee}M{$f0}{$ee} -=> H{CBM-N} G{SHIFT-*} {$f0} ^ {CBM-V}{$60} {CBM-V}8{$60}h{CBM-D}{$e4}{$f2}){CBM-POUND}H{$fd}{$60} L 7 l{SHIFT-+},O{$60}{$ee}{$ef} {CBM-V}{SHIFT-POUND}{$e1} {CBM-S}{$ee}{CBM-D}{$ef}l* u lD O lD {CBM-M} lD lD j lD 7 {SHIFT-+}l{$fc} rl{$fc} L lD + lD lD{CBM-I}{SHIFT-POUND} 4l{CBM-A} {SHIFT-+} W $ j {CBM-V}l{$fc}Reading... ZlL lL lL lL Wl{$fc} Zl{$ea} l{$ea} {CBM-I} L{SHIFT-POUND}$ R~{CBM-S}{$e4} t{CBM-I} _ {CBM-W} ; {CBM-I} _{CBM-S}{$e4} ~P - lk {CBM-W}h{$e8}{CBM-X}{$f2}{CBM-POUND}H{CBM-N}{$ee}{$ef} K {SHIFT-POUND} R~{SHIFT-POUND}$ R~{CBM-S}{$ee}{CBM-D}{$ef} i l0H{$e6}H{$e7}H{$fb}{$ea}H{$fc}{$eb}{CBM-Z}{$e7}h{CBM-Z}{$e6}h {$60}M{$ea}{$ea}{SHIFT-POUND} M{$eb}h{CBM-Z}{$ea}h{$60} ^{CBM-E}{$fb}H {$f8}l{$7d}{$e6}{CBM-I} {SHIFT--}{SHIFT-*}{$f0}{$e8} {$f6}{CBM-D}{$e6}lR~ {CBM-N}{CBM-X}Gh{CBM-X}Fh{$60} QS{$e7}{$f6}$8{$60}{CBM-D}{$e6}{CBM-E}{$fb}{CBM-N}H{CBM-E}{$fb}{CBM-POUND} _{CBM-D}{$e6}HH{$60}{CBM-D}{$e6}{CBM-E}{$fb} cl{$fa}{CBM-I}{$ed} j l{$fc}First Sector 4l{CBM-A} {SHIFT-+} W j l{$fc} B l % HUNT: Next Ascii Petscii #s? MODE: File Disk {$ec} IaPl{$7f}IpPl{SHIFT-+}h " sHI#PlCIfPl-IdPlhIn{$f0}l{$fc} L {SHIFT-+}{CBM-I}K <RET> Aborts {CBM-S}{$e4} {CBM-A}{CBM-I}{CBM-O}T{$f0}t{SHIFT--}{$f2}{$f0}f {$e8}P{$f1} {CBM-R}l te Block {SHIFT--} U)nit Toggle{SHIFT--} Q)uit Editing {SHIFT--} P)etscii Text {SHIFT--} T)ext (Ascii) {SHIFT--} J)ump CRSR Lnk {SHIFT--} C)hange Disk {SHIFT--} O)utput Block {SHIFT--} D)isk Command {SHIFT--} N)ext Accessed {SHIFT--} L)ast Accessed{SHIFT--} {SHIFT--} +) Read Next{SHIFT--} A) 3456789ABCDEF {$e3}{$ee}{$e2} 4ls{CBM-I}{$e4} {SHIFT-+} W {$e4}~I {$f0}{CBM-I} lBH{$e8}P{CBM-D}Jl,{SHIFT-*} P l{$fc}{CBM-I}V l^28{$e9}~{$e4} Njjjjj{CBM-POUND}{SHIFT-*} {$f0} {SHIFT-@}P{$fa}{CBM-I}D lD{CBM-I}{$60} j l{$fc}Not Found! Hunting... Aborted! Enter Ascii String.-=> {CBM-I} Gh " sH F{CBM-A} !ll{$fc}{CBM-POUND}{SHIFT-*} {$f0}{CBM-O}m Xm {CBM-Z}{$ef}M{$f1}{$ef}{$ee}.{$ef}{CBM-Z}{$ee}M{$e7}{$ee}{SHIFT-POUND} M{$ef}{$ef}lA8{$60}l{CBM-P}I0I:{CBM-A}{$60}8{$60}{$fb}{$fc} {CBM-E}{$fb}{$f0} R~HP{$f6}{$60}h{CBM-N} m {CBM-B}{SHIFT-POUND}$ R~H{CBM-N}lt D{CBM-A} {CBM-B} {CBM-A} {CBM-B}lU{CBM-Z}nI${$f0}l{CBM-Y}l?hhh8{$e9}{$e8}{$e9}' {$e8}{CBM-A}' {CBM-B}8{$e9}{$e7}{$e8}{$e9} {$e8}{CBM-A} {CBM-B}{SHIFT-*} P D{CBM-A} {CBM-B} {CBM-A} {CBM-B} QH{CBM-POUND}H{CBM-N}H{$60} B Track? {CBM-I} G{SHIFT-*} P{CBM-Z}{$e2}hl ^ {$e2}h Track: H ; l{$ea} l{$ea} Wl {$60} {$f0} {CBM-P} {CBM-V}l{CBM-I} ' {$60}{CBM-I} I~{CBM-I} {CBM-X}{$f2} R~{$e8}P{$f7} L~lE{CBM-I} fl{CBM-A} {$f0} {CBM-V}l:Writing... ,O{$60}{$ee}{$ef} {CBM-V}{SHIFT-POUND}{$e1} {CBM-S}{$ee}{CBM-D}{$ef}{SHIFT-POUND} l{CBM-I}J !{SHIFT-POUND} X{CBM-A}{CBM-Z}{$ee} l{$fc}Byte? l{$fc}{CBM-S}{$e4} ~{$f0}{$f6}{CBM-I}{$fc} {CBM-N} L{CBM-D}{$e6}H{$60}{CBM-D}{$e6}{CBM-E}{$fb}{CBM-N}{SHIFT-POUND}l{$e7}{CBM-I} R~{$e8}{$ec}{$e7}{$f7}{CBM-D}{$e6}H{$60}{CBM-D}{$e6}{CBM-E}{$fb}H{$e6}{CBM-N}{CBM-E}{$fb}l{CBM-D}{$e6}{CBM-E}{$fb} {CBM-N}H{$60}{SHIFT-POUND}{$f2}M{$e4}h{SHIFT-POUND} I{CBM-POUND}H{CBM-N}{CBM-Z}{$e4}I{$f0}{SHIFT-POUND} 8{$ed}{$e4}{$e7} {SHIFT-POUND}8{$ed}{$e6}l{CBM-N}{SHIFT-POUND}l hh{CBM-N}H{CBM-POUND} {$f0}~H{$60}hh8 {$f0}~{CBM-POUND}H{CBM-N} _H{$60}{SHIFT-POUND} P{SHIFT-POUND}!P{$60} {CBM-A}{SHIFT-*}{CBM-S} {SHIFT--}ASCII Disk Editor{SHIFT--} {CBM-A}{SHIFT-*}{SHIFT-*}{CBM-S} {CBM-A}{CBM-E}{SHIFT-*}{CBM-E}{CBM-S} {SHIFT--}U8{SHIFT--} {SHIFT--}By Greg Badros - 90{SHIFT--} {CBM-A}{CBM-E}{SHIFT-*}{SHIFT-*}{CBM-E}{SHIFT-*}{SHIFT-*}{CBM-E} s 4{CBM-Z} Pls{SHIFT-POUND} {$e3}{$ee}{$e2} 4ls{CBM-I}{$e4} {SHIFT-+} W {$e4}~I {$f0}{CBM-I} lBH{$e8}P{CBM-D}Jl,{SHIFT-*} P l{$fc}{CBM-I}V l^28{$e9}~{$e4} Njjjjj{CBM-POUND}{SHIFT-*} {$f0} {SHIFT-@}P{$fa}{CBM-I}D lD{CBM-I}{$60} j l{$fc}Not Found! Hunting... Aborted! Enter Ascii String.-=> {CBM-I} Gh " sH F{CBM-A} !ll{$fc}{CBM-POUND}{SHIFT-*} {$f0}{CBM-O}m Xm ddress{SHIFT--} B)yte Change{SHIFT--} Change {CBM-E}{SHIFT-*}{SHIFT-*} {$60}{CBM-I} {$ec}{$ed}{$60}{CBM-S}{$ed}{$ec} z {CBM-Z}{$e2}{$f4}{$e8}{CBM-Z}{$e3}{$f4}{$e8}{$ed}{$60}{CBM-S}{$ec}{CBM-X}{$f4}{$e2}{CBM-X}{$f5}{$e3}{$60}{CBM-S}{$ec}{$e8}{$e8}{$ec}{$ed}P8{$60} z{CBM-I} {$ec}{$60}{CBM-S}{$ec}JJ {$fe}P8{$60}{$ec}{$60}{CBM-S}{$e2}{$e8}{$e2}{$60}{CBM-S}{$e2}J {CBM-A}{CBM-I}{$e2}{$60}{CBM-S}{$e3}{$e8}{$e3}{$60}{CBM-S}{$e3} {CBM-A}{CBM-I}J{$e3}{$60}{CBM-I} {SHIFT--}{$f0}{$e8} {$f6}h m HI {$f0} R l{$fc}l={CBM-I} {$e9} {CBM-V}l{$fc},{$e9}P{$60}IaI[IA, bill alaniva's 128 escape power keys 8 ad{CBM-R}4864 w w$(17):i{CBM-R}0{CBM-@}17: w$(i): B chg{CBM-M} S( {$e8}:L(0){CBM-E}4{CBM-M}{$fe}% 2 ck{CBM-R}{CBM-J}(ad{CBM-Z}256):ck{CBM-R}ck{CBM-D}256:ck{CBM-W}{CBM-E}ad{CBM-M}{$fe} {CBM-O}< n{CBM-R}0:i{CBM-R}19{CBM-@}25:a(n){CBM-R}i:n{CBM-R}n{CBM-N}1: Yf "starting address must be" {$fa}p "divisible by 256. try one" z Sector? {CBM-I} G{SHIFT-*} P{CBM-Z}{$e3}hl ^ {$e3}h Sector: H ; {$60} ;{$60}{CBM-I} F~{CBM-I} w{$f2}{$e8}P{$f7} L~ I{CBM-I} l_hh {$e4}~{$e8}H{CBM-POUND}H{CBM-N}{CBM-Z}{$e8}{$60}{CBM-I} {$e4}{CBM-I}L{$fd}{CBM-I}{$fe}{$60},O{$60} {CBM-Z}{$e2} ; {CBM-I} L{CBM-Z}{$e3} ; {$60} I {CBM-I} {CBM-X}{$f2}{$fd}{$e8}{$f0}H{SHIFT-*} {$f3} {SHIFT-@} {$f0}{$ec}{$60}{CBM-S}{$e4}{CBM-X}{$f2}{$60}{SHIFT-POUND}(E{$fd}{$fd}{CBM-G}{$fe}I {$fe}{$60}{CBM-G}{$fd}8{$e9}({$fd}{CBM-G}{$fe}{$e9} {$fe}{$60}{SHIFT-POUND}{CBM-S}N {SHIFT-@}~{SHIFT-POUND}{CBM-I}{$ec} {CBM-X}~l{SHIFT-*}~i0 {CBM-I} !{SHIFT-POUND} X{CBM-A}{$e8}{CBM-Z}{$ef}h{CBM-Z}{$ee} L H l{$fc}Address? {$f0}{CBM-Z}NIP{CBM-I}Nl{CBM-I}N 7 {CBM--}{CBM-A} {$f0} lx{CBM-I}> l0{$7e}{$60}No Drive! {CBM-I} {$7e} Petscii Entry l{$fc}{CBM-I}{SHIFT-*} {$7e} Ascii Entry l{$fc}{$e9} B l Exit w/Return {$60} B l % Enter Disk Command.-=> {CBM-I} G{SHIFT-*} {$f0}{SHIFT-POUND} {SHIFT-*}{CBM-E}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{CBM-S} {SHIFT--} {SHIFT--} {SHIFT--} {SHIFT--} {SHIFT--} {SHIFT--} {SHIFT--} {SHIFT--} {SHIFT--} {SHIFT--} {SHIFT--} {SHIFT--} {SHIFT--} {SHIFT--} {SHIFT--} {SHIFT--} {CBM-Q} {SHIFT-*}{CBM-W} {SHIFT--} {SHIFT--} {SHIFT--} {SHIFT--} {SHIFT--} {SHIFT--} {SHIFT--} {SHIFT--} {SHIFT--} {SHIFT--} {SHIFT--} {SHIFT--} {SHIFT--} {SHIFT--} {SHIFT--} {SHIFT--} {SHIFT--} {SHIFT--} {SHIFT--} {SHIFT--} {CBM-Z} {SHIFT-*}{CBM-X} {$60}{SHIFT-POUND} O {SHIFT-*} Track: Sector: {CBM-Q}{SHIFT-*}{CBM-R} {SHIFT-*}{CBM-W} Position:{SHIFT--} \ = HELP {CBM-Q}{SHIFT-*}{CBM-R}{SHIFT-*}{CBM-E} {SHIFT-*}{CBM-W} 8 {$f8}b{$ea} 60a9108d0178ad0278c9*28900938e928ee01784c*9d4f8d007860ad0e78d0 =c{$eb} 0160a920858ca9008d32*78206c40a9058d1878a9*0a8d1978a90520d2ff18 c{$ec} ae1878ac197820f0ff38*8aa8e905a8b19baaa900*20cdbdee1878ad1878c9 Gc{$ed} 0df0034cca4f6086fb84*fc6086fd84fec0f0b00cc933f00bc9*30f00a604c6b4a4c854a*4c784a4c924aa9018d3e ;<Q 7820b74cad19788d01d0*ad32788d00d06038a9ff*ed3e788d1878ad017820 <R dd4818ad0678692c8d19*78ad0078c91eb01620dd*4818ad067869118d3278 E<S ad10d02d18788d10d060*ad00788d337838ad0078*e91f8d007820d C00a040bd5a519d8003e8 g{$f9} 88d0f660000000000000*00000000000001fe0003*ff000601800601800601 hg{$fa} 80060180060180060180*06018006018003ff0001*fe000000000000000000 _g{$fb} 0000000000000000 Hg{$fc} -1 ff4c8050c980b0b6*4c9d50ad3378f0aea99d*20d2ffa92020d2ffa99d {$ef}0485 @{CBM-*} 01a9808d0ddc205b44a9*9e20d2ff584cf84aad3a*78c987f047c94cf029c9 f@ 53f028c944f027c9c9f0*26c9cff025c988f024c9*86f023ad0e78f00bad3a @{$e1} 78c92bf022c92df03760*4c3c424c65434cae4f4c*18504c2b504c38504c43 P@{$e2} 5020544f20004cd44dad*02788d3c78ad3c7 overkill.ml boot program / z{CBM-R}0 {CBM-M} 30 ; 16384 y 53280,0:53281,0:G(147) ( {CBM-+}6)G(144)"overkill v1.0 by rocco saya": {CBM-I}2 {CBM-+}12)"is now loading" {CBM-V}< t{CBM-R}0{CBM-@}17:x:49152{CBM-N}t,x: {$eb}f p{CBM-R}1{CBM-@}8:c:780,c:49152:l{CBM-R}1{CBM-@}100:::z{CBM-R}1 p "overkill.ml {$e8}:{$e7}0,1:{$e7}4,1 4 ,10,0,"musical pitch test " I ,0,3,"listen to the first pitch and memorize." ( ,10,14,"rating: superior" {CBM-T}2 ,19,15,"excellent" {CBM-Y}< ,19,16,"good" Kf ,19,17,"fair" {$e8}p ,19,18,"below average" z ,19,19,"don't s06*a9008d187860a9018d18 d{$ee} 7860ae3978ac387820f5*4f60ae3978ac387820fa*4fa200a07020f54f4ce4 qd{$ef} 4da200a07020fa4f200e*504ce44da0f120fa4f20*0e504ce44d38ad0878ed d{$f0} 39788d3278ad0978ed38*788d3378ae0878ac0978*20f54fa9028d187818a9 {SHIFT-+}d{$f1} 006d327885fda9d06 d4818ad =T 067869098d3278ad10d0*0d3e788d10d0ad33788d*00786000100000000100 o=U 00000000000000010000*00f0f201000010a218a0*00b9174d990078c8cad0 =V f6a232a900990078c8ca*d0f7ad22d08d1278ad23*d08d1378a9018d1478a9 Y=W ff8d15d0a90e8df8078d*f9078dfa07a9 {$e3})) r{CBM-W}rr {CBM-M} av{CBM-R}r{CBM-Z}rr:U av{CBM-R}rr{CBM-Z}r @ch{CBM-R}{CBM-J}(20{CBM-D}av):ch{CBM-R}33{CBM-Q}ch:ch{CBM-E}19{CBM-M}ch{CBM-R}19 q ,18,ch,"*" Q" ,10,24,"do another? y/n" M,{CBM-K}{$f9}a$:a${CBM-R}"y"{CBM-M} ,10,24," ": ,18,ch," ": ,5,12," ": ,25,12," ":110 X6"": .2 {CBM-M} 140 {$f7} {$eb}:Z 1,rr,6 8cd3d*78b0034ce54eaae88e3d a{$e3} 784ce54ead02788d3d78*20d24e4ce54ead3d78cd*3c78f003900160ae3c78 za{$e4} e88e3d7860ad3c78c9ff*f0034cf94ea9008d3c78*a9018d3d7818a20aa019 a{$e5} 20f0ffa20aa92020d2ff*cad0fa18a20aa01920f0*ffa900ae3c7820cdbda9 {$e4}a{$e6} a5a04e201eaba9 I",8,1 fz 162,0,157,0,216,157,0,217,157,0,218,157,0,219,232,208,241,96 BD 0,11,12,15,15,12,11,6 screen seq scanner dir display freeze key double display ing in public" 9D tt{CBM-R}2: change tt to lengthen memory tone ]N r{CBM-R}{CBM-J}({CBM-F}(1){CBM-D}65000):Z1,r,60{CBM-D}tt:{$fe}tt X ,0,3," now use 1,2,4,5 keys to try to match" {CBM-B} ,4,4,"the sound. hit return when done." {$e8} rr{CBM-R}{CBM-J}({CBM-F}(1){CBM-D}65000):{CBM-L}(rr{CBM-Q}r){CBM-W}r{CBM-D}.2 {CBM-M} 140 {$f7} {$eb}:Z 1,rr,6 d33*7885fe4c064ea9008d33*78a9a420d2ff20edf6d0 e{$f2} 016020e4ffc914f040c9*0df059c922f0ebc92090*e7c9a090298d3a78ad33 Ee{$f3} 78c91090034c8050a99d*20d2ffad3a7820d2ffae*33789d4478ee3378a9a4 {CBM-N}e{$f4} 20d2ff4c8050c980b0b6*4c9d50ad3378f0aea99d*20d2ffa92020d2ffa99d {$ef}208d3878*a9008d39786018a018a2 >X 0920f0ffad3878c938f0*2fad38781869088d3878*eeb041eeb04118a209a0 C>Y 1d20f0ffa92020d2ffa2*09a0191820f0ffad3878*a20020cdbd4c2e48a920 {CBM-POUND}>Z 8d3878a9198db0414c92*4d9e1241524520594f55*20535552452028592f4e {$ed}>{SHIFT-+} 2900ae3978a{CBM-S} 2093: v1.1 greg badros - 1990 {CBM-H}{CBM-N} {CBM-I}~O{$e8}{$e9} {$7c} {CBM-I}N E {CBM--}{CBM-A}lxl{SHIFT-POUND}{$e2}{SHIFT-POUND} {$e3}l: <RETURN> to Start on Unit 8 Or <U> to Toggle Unit Number {$ec} IuP{SHIFT-POUND}8{$ed}NNh HI0 R~I P{SHIFT--} {$60} V{CBM-A} {CBM-A} {$f4} {CBM-A}{$60}{SHIFT-POUND} C~{SHIFT-POUND} C~8{$60}{CBM-I} 00ae3d*7820cdbdad00788d2078*ad01788d2178ad02788d )b{$e7} 1978ad3c788d02782095*4fad19788d0278a9028d*3e7820b74cad19788d03 Nb{$e8} d0ad32788d02d0ad0278*8d1978ad3d788d027820*954fad19788d0278a904 {CBM-W}b{$e9} 8d3e7820b74cad19788d*05d0ad32788d04d0ad20*788d0078ad21788d017 FT m {CBM-Z}{$e4})I {CBM-S}{$e4}J{$e4}({$f0}{$60}{CBM-S}{$e4} ~{$f0}lH{CBM-I}{$e4}{$fd}{CBM-I}{$fe}{$60} m {CBM-Z}{$e4}) {$e4}{$60}{CBM-Z}{$e4}){CBM-POUND}{SHIFT-POUND}q{$fd}{$fd}{CBM-G}i{$60}lI$ 7 {$60}{CBM-Z}{$e4})I{$f0}{CBM-S}{$e4}{$e8}{$e4}{$60}{CBM-Z}{$e4}) {$e4}{$60}{CBM-Z}{$e4})I {$f0}{CBM-S}{$e4}J{$e4}{$60}{CBM-Z}{$e4}{$e4}{$60}{CBM-S}{$e4} {CBM-A}{CBM-Z}{$e4}I {$e4}l{SHIFT-@}{CBM-Z}{$e4}){$e4}lN{CBM-S}{$e4} {CBM-Z}{$e4}8{$e9} {$e4}lH{CBM-I}{$e4}{$fd}{CBM-I}{$fe}{CBM-Z}{$e4}I {$e4}{$60}{CBM-Z}{$e4})I{CBM-S}{$e4}{$e8}{$e4}({$f0}{$60}{CBM-S}{$e4} {$f0}l{SHIFT-@}lj hh {$e4}~{$f0}{$fb}{$e8}H{CBM-K} a$:a${CBM-R}"4"{CBM-M}rr{CBM-R}rr{CBM-D}1.05 ){CBM-N} a${CBM-R}"1"{CBM-M}rr{CBM-R}rr{CBM-D}.95 a{CBM-H} a${CBM-R}"5"{CBM-M}rr{CBM-R}rr{CBM-D}1.005 x{CBM-V} a${CBM-R}"2"{CBM-M}rr{CBM-R}rr{CBM-D}.995 VH rr{CBM-W}50 {CBM-A} rr{CBM-E}65535 {CBM-M} rr{CBM-R}ro R ro{CBM-R}rr {CBM--} {$ec} {$fc} a${CBM-R}G(13) {CBM-J}{$e6} ,5,10,"actual": ,25,10,"your" X{$f0} ,5,11,"pitch": ,25,11,"pitch" {$fc}{$fa} ,4,12,D({CBM-J}(r)): ,24,12,D({CBM-J}(rre{$f5} 20d2ff20d2ffce33784c*7b50a901609e5245504c*41434520592f4e050018 4f{$f6} a203a00720f0ffa9eda0*50201eab20e4ffc959f0*0ac94ef0034c0a514c00 Yf{$f7} 40a90820b1ffa96f85b9*2093ffa95320a8ffa930*20a8ffa93a20a8ffac41 {CBM-V}f{$f8} 78a200bd447820a8ffe8*88d0f620aeff4c6242a2*c387820f5*4fa200a0d020fa4f18a0*01a20120f0ffa04da9bf 2?{CBM--} 201eab20e4fff0fbc959*f00ac94ef0034cf34d4c*504e78a97f8d0ddca501 W?{SHIFT--} 29fb8501a208a000ad18*78f009c902f005a9004c*264eb1fd91fbc8c008f0 {CBM-C}?{$de} 07c000f00d4c164ead18*78c902f00a4c164ee6fe*e6fccad0cfa50109{CBM-U} wPJP{$f8}P{$f5} 7 l{$fc},{$e9}0{CBM-S}{$e1}{$f0}h {CBM-V}H{CBM-I} {SHIFT--}{$f0}{$e8} "{$f6}l{$fc}l{CBM-+}I\{$f0}h zH{CBM-N} m {CBM-N}{CBM-X}{CBM-B}h{CBM-X}{CBM-V}h{$60} {$f0} Thanks for Using ASCII Disk Editor!!! By Greg Badros - 1990 {$60} q\rswbauptdjoc+nlh ekqw]X{$7e}RkL{CBM-W}{CBM-O}{CBM-B}EQW{SHIFT--}{$e3}9H{CBM-R}RgC -{SHIFT-*}ad3d78 5' 20dd4820f14818a59b69*098d1878a59c69008d19*78ad3c7820dd4820f148 Z' 4c4f42a1202020202020*2020b620202020202020*20b52020202020202020 {CBM-B}' 20202020202020202020*2020b60090574f524b49*4e471d904f5645524b49 ( 4c4c1d904d4f4445203a*004f4e1d1d1d17820414860ad00788d03*78ad01788d0478a9028d b2{CBM-D} 0078ad32788d01782072*48a90e8d0178ad33788d*0078ad14788d3b782072 2{CBM-Z} 484cd44820b647ad0278*ac00789103a50469d485*06a5038505ad0178c90e L2{CBM-S} 900ead0f78d00918ad3b*7869084c9f48ad3b7891*05ad03788d0078ad0478 3{CBM-P} b441*8d5dd96040a99320d2ff @+ a90520d2ff18a201a007*20f0ffa90820b4ffa96f*85b92096ffa20020a5ff + 9d72782016e7e8c90dd0*f24cabff20e4ff8d3a78*a9078d8602a9008d3578 J+ ad3a78c991f05fc911f0*5ec99df060c91df059c9*89f05ec98af05dc98bf0 , 5cc98cf064c985fa8b19b4900919b202e*484ce24738ad0078e90a*aabdca498d3e4ae8bdca m6{CBM-F} 498d624aad017838e905*a8ad3d4ac909f017ad3e*4a8d2d4ab19b29008d32 6{CBM-C} 78b19bed3278919b4c41*4ab19b0000919bad614a*c909f017ad624a8d514a W6{CBM-X} b19b29008d3278b19bed*3278919b4c654ab19b00*00919b2 f0*07ad11788d0578606020*d249ad0e7849018d0e78 k/{CBM-K} ad0e78f016ad16788d00*78ad17788d0178a9ff8d*15d0a9a04ce247ad0078 /{CBM-I} 8d1678ad01788d1778a9*0a8d0078a9058d0178a9*008d15d0a9a0202e484c U/{CBM-T} e247a9018d1878ad3678*f0034c6f4b20d249ce01*784ccc47a9018d1878ad 088d1078b19b0a18*919bad1078f007b19b0d*1978919bc8cad0e24cf8 d9F 4aa9018d1878a9808d19*78a94a8d464b4c384ba0*00a208b19b8d1878c8b1 9G 9b88919bc8cad0f6a007*ad1878919b4cf84aa007*a208b19b8d1878a000b1 N9H 9b992078c8cad0f7a000*a207b92078c8919bcad0*f7a000ad18d96afaf*afafafafafaf00904255 i( 46464552004d554c5449*203120203a4d554c4954*203220203a434f4c4f52 ( 2052414d3a4241434b52*4f554e443a5041474520*3a2020202052414e4745 S( 3a20202020904259209b*524f43434f2053415941*00204441a99320d2ffa9 ) 008d20d04c7a 8d01784cba4818ae3278*a00620f0ff6020b048a9*2020d2ff20d2ff20d2ff v3{CBM-A} 20b048a900ae027820cd*bd60ad027820dd484cf1*488d0678a9008d0778a2 3{CBM-E} 030e06782e0778cad0f7*6018ad06786d39788d08*78ad07786d38788d0978 3{CBM-R} ad0878859b8503ad0978*859c8504ad3578f00160*a9cf07ac9*4df05fc95ff061c993f0*6ac952f062c949f049c9 t, 4ff04ec946f03ec93ef0*37c9d2f027c950f01420*5c4ead0f78d0044c7c4c , 60ad3a78c920f042604c*744d4c44474c5a474c93*474c70474c684c4c2746 {$de}, 4c36464c45464c0a4c4c*e44b4cb74b4c68464ca7*464cd44bad367849018d02e484ce247a9 7{CBM-V} 298d3d4aa9098d614a4c*024aa9098d3d4aa9098d*614a4c024aa9098d3d4a A7{CBM-B} a9298d614a4c024aa929*8d3d4aa9298d614a4c02*4aa200ad11789d30dae8 {CBM-+}7{SHIFT-*} d0f7ad11789d00dbe8d0*f760000a4d554c544943*4f4c4f52484952455320 {$eb}7A 2020202018a01aa20320*f0ffae{CBM-@} 3678f0034c8c4b20d249*ee01784ccc47a9008d18*78ad3678f0034c294b20 _0{CBM-G} d249ce0078ad0f78d008*ad0e78d003ce00784ccc*47a9008d1878ad3678f0 {CBM-@}0{CBM-+} 034c5d4b20d249ee0078*ad0f78d008ad0e78d003*ee00784ccc47ae0178b5 {$e9}0{CBM-M} d9290785041869d48506*bdf0ec8503850560ad0e*778919b4cf8 :I 4aa000a208b19b992978*c8cad0f7a90a8d3278a9*028d33782038484cf84a x:J a000a208b92978919bc8*cad0f74cc44b20ea4b4c*f84aa000a208b19b9920 :K 78c8cad0f7a000a207bd*2078919bc8cae0fff003*4cfb4b6020104c4cf84a {$e2}:L a0008c3378a208a90099*2078c8cad44a91320*d2ffa91220d2ffa99620*d2ffa250a92020d2ffca ]) d0faa99220d2ff60205b*44a90b8d4378a043a9a3*201eabce4378d0f4a228 {CBM-I}) a9b820d2ffcad0fa18a2*03a00220f0ffa043a9cc*201eab18a204a00420f0 {$e7}) ffa043a9e7201eab18a2*08a00220f0ffa043a9f7*201eaba9058d4378a858ca9008d327820 %4{CBM-W} 6c40ad03788505ad0478*850660ad0078c90a9010*c912b01cad0178c904f0 J4{CBM-H} 1bc90df01d60a9118d00*78ad0f78d005a9108d00*7860a90a8d007860a90c {CBM-P}4{CBM-J} 8d017860a9058d017860*ad0178c916f037ad0078*c928f018c9fff01a60ad {$f4}4{CBM-L} 0078c910b036ad0178c9*0ff #- 36786020064b6020ec4a*604cfb464cdc49ee1278*ad12788de5d88d22d04c H- 7446ee1378ad13788d0d*d98d23d04c7446ee1478*ad1478c908900aad0f78 {CBM-Z}- d005a9008d1478ad1478*8d35d98d117820b7464c*7446eeb441adb4418d5d {$f2}- d98d1578a2058e187818*ae1878a01f20f0ff3880f78bdb7418db2*41bdb44aaaa00abdb64a 08B 20d2ffe888d0f660a208*a000a900919bc8cad0fa*ad0e78f0034c2e48202e U8C 484ce247a000a200bdca*498d134bb19b4900919b*e8e008f0034c0a4bc8c0 {SHIFT-@}8D 08f0034c084b4cf84aa9*0a8d464ba9808d1878a9*018d1978a000a208b19b ~8E 2d1878f00ead1878f003207b .1{CBM-POUND} 492068494ce247202f49*20b647ac0078ad0e78d0*08b1038d34784cfd47b1 S1{SHIFT-POUND} 038d02788d3478b1058d*05784c1048ac00789103*ad0578910560ad0e78f0 {CBM-U}1{CBM-N} 0620a24c4c2848a9a020*0548adb441aae88a9105*ad0e78d00160a9068d32 {$fd}1{CBM-Q} 78a90e8d3378a9078d3b*0f9a207a000*b9ca498d364c8c3278ac ';M 3378b19bac32782900f0*0ebdca498d434cb92078*0900992078c8c008f003 L;N 4c244ccaee3378e0fff0*034c224ca208a000b920*78919bc8cad0f7602010 {CBM-E};O 4c20104c20e44ba9018d*3278206c404cf84aad0e*78f00160ad3a78c931f0 {$f6};P 0dc932f0200 ,* 8e427818ae4378a01320*f0ffae4278a00abdff43*20d2ffe888d0f68e4278 Q* ee4378ad4378c90bf003*4ccf4418a013a20b20f0*ffa93ba044201eaba200 {CBM-L}* a0008a9d8006a9019d80*dae888d0f3a9a08de504*8d0d058d35058d5d05ad {$fb}* 12788de5d8ad13788d0d*d9ad14788d35d9ad011c917f01360a900*8d007860a9278d007860 95{CBM-Y} a9168d017860a9108d01*7860ad0078c9fff005c9*10f0dd60a90f8d007860 {$7e}5{CBM-U} ad0178c916f0e1c90ff0*0160a9158d0178608040*20100804020120b647ad C5{CBM-O} 347820054860ad0e78f0*016038ad0078e90aaabd*ca498df949ad017838e9 6{SHIFT-@} 05a*e905aabd1278290faaa9 7. 0020cdbda92020d2ffee*1878ad1878c909f0034c*79464c5a4bad0e78f041 {$7c}. ad0f7849018d0f7820ca*4aad0f78f00cad14788d*117820ee464ce446ad14 A. 78c908900c38e9088d14*788d35d94cc846186908*8d117820ee46209f4a20 / 74464c2e4860ad0e78 ,141,24,208,76,217,197,197,76 ) 217,197 m " instant aid 64 is active! O "activate with sys 50618 and "press f7 to view help screen. 57 milk 15 wine 24 trix 31 sugar pops 57 steak 51 shredded wheat 17 rice chex 42 puffed wheat 36 potatoes 35 pop tarts 22 paper towels 23 orange juice 56 life 43 hamburg 54 al. foil 55 zippobeans 37 beer 45 quake 40 mini mart paymore bob's market fred's store miracle mkt. 1 1 0 0 0 1 1 1 1 1 3 5 4 5 4 8 7 6 5 4 98 98 98 98 98 8 7 6 5 4 8 7 6 5 4 8 7 6 5 4 1 1 1 1 1 3 4 5 b this list 1 creates (and should not be called) overkill.ml {$60} 8,8,8,"overkill.ml,p,w" N ct{CBM-R}0:"" a$: a${CBM-R}"-1" {CBM-M} 8::"all done!": {CBM-F} "reading line "{CBM-N}D(ct):ct{CBM-R}ct{CBM-N}1 O C(a$){CBM-W}62 {CBM-M} 55 {$f9} b${CBM-R}J(a$,1,20){CBM-N}J(a$,22,20){CBM-N}J(a$,43,20) {CBM--} 5 6 7 8 4 5 6 7 8 4 5 6 7 8 2 3 4 5 6 3 4 5 6 7 6 7 8 9 10 9 8 7 6 5 5 6 7 8 9 9 8 7 6 5 3 4 5 6 7 9 8 7 6 5 1 98 98 98 98 98 12 4b46202a46203946*206b46a94d205740a950 DF 205740a91d205740a900*8d3c78a9ff8d3d7820e5*4ea9018dfe78207045ad {SHIFT-POUND}G fe78adb4411869028d27*d069018d28d069018d29*d0adfe78f0ac4c31408d {$ee}H 3a7820764560ad14788d*3f7860ad14788dff7860*a94985fea9ca85fda200 3 I 8aad1403a9418d15*038d12d0a91b8d11d0a9 ["Q 018d1ad08d0ddca9008d*40785860ad19d08d19d0*2901f028ce40781005a9 "R 018d4078ae4078bdaf41*8d18d0bdb1418d16d0bd*b3418d21d0bdb5418d12 {$e5}"S d08af00668a868aa6840*4c31ea1519c8d802009b*00d8c81519c8d802009b *#T 005341 soap hand 39 soap dish 25 wax paper 26 carrots 14 celery 34 apples 49 grapes green 48 grapes red 47 walnuts shelled 46 walnuts whole 13 peanuts 1 pop corn 12 bananas 11 peaches 32 pears 29 hot dogs 33 buns hot dog 52 bun 6 7 7 3 6 5 4 11 12 13 14 15 8 7 6 5 4 98 98 98 98 98 7 4 5 6 7 9 9 9 9 9 8 8 8 8 8 7 7 7 7 0 5 8 7 6 5 5 6 7 0 8 5 2 3 4 1 1 1 1 1 i{CBM-R}1 {CBM-@} 30 5 c${CBM-R}J(b$,(i{CBM-D}2){CBM-Q}1,2):h${CBM-R}H(c$,1):l${CBM-R}I(c$,1) w# h{CBM-R}E(h$): h${CBM-E}"9" {CBM-M} h{CBM-R}F(h$){CBM-Q}55 Y( l{CBM-R}E(l$): l${CBM-E}"9" {CBM-M} l{CBM-R}F(l$){CBM-Q}55 - by{CBM-R}h{CBM-D}16{CBM-N}l:8,G(by); 2 : 10 {CBM-U}7 C(a$){CBM-W}21 {CBM-M} b${CBM-R}a$: 70 {$eb}< C(a$){CBM-W}42 {CBM-M} b${CBM-R}H(a$,20){CBM-N}I(a$,(C(a$){CBM-Q}21)): 70 a b${CBM-R}H(a$,20){CBM-N}1eaba20060*207650d00160ae3378a9 r%{$7c} 009d44788e4178a90160*a90d20d2ffa9018d8602*ad4278d00aa042a92e20 %{$7d} 1eab4cda42a041a9e220*1eaba078a944201eaba0*01a901a20820baffad41 {CBM--}%{$7e} 78a244a07820bdffa900*859dad4278d00ea99bae*1878ac197820d8ff4c10 !&{$7f} 43a90020d8b19b858ba0008a18*6905aabdf0ec850585b2*b5d9290785061869d485 X J b38a38e905aaadb4418d*3f788dff78a58b31fdf0*10205e40c8a58b31fdf0 {CBM-X} K 3e2065404c0a41c8a58b*31fdf04aad0f78f00620*65404c0a41ad3278f015 !L 4ce24088a58b51fd858b*c8a58b51fd858b6020d3*40ad22d056450d92004c4f*41440d920090454e5445*522046494c454e414d45 O#U 203a20000d4e4f57204c*4f4144494e472005000d*9e4f2e4b2e0d0d009e45 {CBM-H}#V 52524f522c2043484543*4b204452495645202620*4449534b000550524553 {$f9}#W 5320535041434520544f*20434f4e54494e554500*0d4e4f57205s hamburg 53 english muffins 30 root beer 10 ginger ale 9 fruit punch 8 rice 18 bologna 41 coffee 7 sugar 38 flour 6 jello straw 20 jello orange 19 jello lime 5 jello lemon 44 tuna fish 4 beef stew 3 peas canned 50 peas 1 7 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 8 7 8 9 8 1 1 1 1 1 6 5 7 6 5 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 98 98 98 98 98 12 J(a$,22,20){CBM-N}I(a$,C(a$){CBM-Q}42) *f i{CBM-R}1 {CBM-@} C(b$){CBM-Z}2 wk c${CBM-R}J(b$,(i{CBM-D}2){CBM-Q}1,2):h${CBM-R}H(c$,1):l${CBM-R}I(c$,1) Yp h{CBM-R}E(h$): h${CBM-E}"9" {CBM-M} h{CBM-R}F(h$){CBM-Q}55 u l{CBM-R}E(l$): l${CBM-E}"9" {CBM-M} l{CBM-R}F(l$){CBM-Q}55 {CBM-W}z by{CBM-R}h{CBM-D}16{CBM-N}l:8,G(by); {CBM-V}_ : 10 ZD hex data for overkill E 0040204b51204b44202f*4d20 5ffa9068d86*02a590f035c940f03120*3f45ad7278c936f0034c F& 3143ad7378c933f01a18*a203a00720f0ffa041a9*fa201eab18a205a00720 {CBM-Q}& f0ff4c55434cfb50a041*a9f1201eaba042a91520*1eab20e4fff0fb4c0040 {$f0}& 60a9008d4278a90a8db3*418db4418d20d0a9028d*8602a9018d35788d3f788dff78 g!M 4c0a41ad0f78d014ad32*78f00320d340ad23d08d*3f788dff784c0a418898 !N 18690aa8a58c9105ad3f*7891b2c8adff7891b2a5*8c91053898e90aa8c8c0 Q!O 08f0034c9a40ad3278f0*068aa8a58b919be8e008*f0034c764060a008a200 "P bdb9419daf41e888d0f6*78a9748 34156494e >$X 47200500a9068d8602a9*0e8db3418db4418d20d0*8d4278a9008d15d02065 $Y 4220a642d006a9008dfe*78604cba42a99320d2ff*a91220d2ffa228a92020 H$Z d2ffcad0faa9158db041*18a010a20020f0ffad42*78d00aa041a9c1201eab %{$7b} 4c9c42a041a9c8201eab*a041a9cf20 ofrozen 27 corn canned 28 corn frozen 21 chicken soup 2 beef soup 16 49 grapes green 48 grapes red 47 walnuts shelled 46 walnuts whole 13 peanuts 1 pop corn 12 bananas 11 peaches 32 pears 29 hot dogs 33 buns hot dog 52 bun 13 14 13 12 14 13 12 13 14 8 7 9 8 7 5 6 4 3 4 7 6 5 6 7 8 7 6 5 4 9 11 10 7 2 98 98 98 98 98 4 5 6 7 8 3 4 7 6 5 7 6 5 6 7 3 4 5 6 7 4 new rerun c128 menu - lou wallace @ run magazine v( 53280,0:53281,0 T2 dr{CBM-R}B(186):v{CBM-R}54273:G(142) < ch${CBM-R}"abcdefghijklmnopqrstuvwxyz" {CBM-J}f dr${CBM-R}I(D(dr),C(D(dr)){CBM-Q}1) Zp n$(255),d$(255):cx{CBM-R}54272: "" {$e2}z f D 380:nl{CBM-R}14:s1{CBM-R}0:s2{CBM-R}0: new rerun c64 automenu 0 lou wallace n( 53280,0:53281,0:G(142) D2 dr{CBM-R}B(186):v{CBM-R}54273 < ch${CBM-R}"abcdefghijklmnopqrstuvwxyz" {CBM-G}f dr${CBM-R}I(D(dr),C(D(dr)){CBM-Q}1) Jp n$(255),d$(255):cx{CBM-R}54272: "" Rz f {$ee}D i{CBM-R}1 {CBM-@} f: n$(i),d$(i) N C(n$(i)){CBM-E}B(53265) 53265,B(53265){CBM-P} 247 7 {CBM-@} 53265,(B(53265){CBM-P}248){CBM-N}7 a {CBM-S} 440 V {CBM-U}pr${CBM-R}"Q{CBM-G} {CBM-M}Q" {CBM-Q} Btp${CBM-R}"Q{CBM-G}UDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDI{CBM-M}Q" Lmd${CBM-R}"Q{CBM-G}B B{CBM-M}Q" !Vbt${CBM-R}"Q{CBM-G}JCCCCCCC8){CBM-N}7 1{CBM-U}pr${CBM-R}"Q{CBM-G} {CBM-M}Q" FBtp${CBM-R}"Q{CBM-G}UDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDI{CBM-M}Q" Lmd${CBM-R}"Q{CBM-G}B B{CBM-M}Q" PVbt${CBM-R}"Q{CBM-G}JCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCK{CBM-M}Q" {$f1} hd${CBM-R}"march/april 1991 rerun" {$ea} {$f5}# ${CBM-POUND} file list >${CBM-R} first entry is the number of programs on this disk ^${CBM-C} followed by each filename $F second data item is run or sysxxxxx {CBM-U}$P run if file is basic,boot or xxxxx if ml {SHIFT-*}$Z 7 X${$e4} smart shopper,run {$ec}${$ee} pitch 128,run {$fe} {$de}search-replce,run . help screen,run /8 seq scanner,run eb dir display,run zl freeze key,run Sv double display,run {$60} smart shopper,run {CBM-T}J boot overkill,run {CBM-H}T ade 64,run I{$7e} calculator,run ound routine here x v{CBM-N}23,15: wm{CBM-R}80 {CBM-M} s1{CBM-R}15:s2{CBM-R}25:nl{CBM-R}16 4N i{CBM-R}1 {CBM-@} f: n$(i),d$(i) {$60}X C(n$(i)){CBM-E}nl {CBM-M} n$(i){CBM-R}H(n$(i),nl{CBM-Q}1){CBM-N}"*" F - print first column of names - d${CBM-R}"" {CBM-Z} i{CBM-R}1 {CBM-@} f{CBM-Z}2 {CBM-Y}{CBM-N} d$; Z{CBM-H} {CBM-+}s1)""J(ch$,i,1)" "n$(i) {$ee}{CBM-V} 650:d${CBM-R}d${CBM-N}"" {$f4}H R - 13 {CBM-M} n$(i){CBM-R}H(n$(i),13){CBM-N}"*" X ( 400 n - print first column of names - _ d${CBM-R}"" O i{CBM-R}1 {CBM-@} f{CBM-Z}2 Y{CBM-N} d$; {CBM-H} ""J(ch$,i,1)" "n$(i) {CBM-D}{CBM-V} 590:d${CBM-R}d${CBM-N}"" {CBM-R}H XR -- then 2nd column of names --- {$e9}{CBM--} d${CBM-R}"" {$fd}{$e6} i{CBM-R}(f{CBM-Z}2{CBM-N}1) {CBM-@} CCCCCCCCCCCCCCCCCCCCCCCCCCCK{CBM-M}Q" 6! hd${CBM-R}" march/april 1991 rerun @!{$ea} 550 !{$f4}pr${CBM-R}"Q{CBM-G} {CBM-M}Q" {$fa}!{$fe}tp${CBM-R}"Q{CBM-G}UDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD""; $ {$f4} tp$;: 590 a {$fe} i{CBM-R}1 {CBM-@} 2: md$;: 590: ^ "";hd$;: 590 J :""; i{CBM-R}1 {CBM-@} 1: md$;: 590: & bt$;: 590 {CBM-L} 0 i{CBM-R}1 {CBM-@} 19: pr$;: 590: E : 53265,27 K d {$e4} n sound routine here x v{CBM-N}23,15: V${$f8} indexer,run % indexer.gen,run )% customizer,run b% escape key 128,run q% " " {$60}%* " " 1: md$;: 650: #B bt$;: 650 {CBM-+}#L i{CBM-R}1 {CBM-@} 19: pr$;: 650: A#V wm{CBM-W}{CBM-E} 80 {CBM-M} 53265,27 G# # sound routine here {$ef}#Z 1,1000,1 D memory search & replace ;I t{CBM-R}0{CBM-@}62:a:50555{CBM-N}t,a: {$7d}N 32,131,174,32,247,183,132,251,133,252,32,131,174,32,247,183 {CBM-X}S 140,176,197,141,182,197,32,155,183,134,253,32,155,183,134 {$fb}X 254,160,0,177,251,197,253,208,4,165,254,145,251,230,251 >- then 2nd column of names --- +{CBM--} d${CBM-R}"" b{$e6} i{CBM-R}(f{CBM-Z}2{CBM-N}1) {CBM-@} f{CBM-N}.5 l{$f0} d$; S{$fa} {CBM-+}s2){CBM-+}19)""J(ch$,i,1)" "n$(i) 650:d${CBM-R}d${CBM-N}"" {CBM-I}:a${CBM-R}"" {CBM-L} L(.){CBM-W}{CBM-E}5 {CBM-M} 290 {CBM-B}"{CBM-K}{$f9}m$ Z,m${CBM-W}"a"{CBM-A}m${CBM-E}G(64{CBM-N}f){CBM-M}290 {$f2}6p{CBM-R}F(m$){CBM-Q}64:"" @ df {$f0} d$; * {$fa} {CBM-+}19)""J(ch$,i,1)" "n$(i) > 590:d${CBM-R}d${CBM-N}"" d x {CBM-K}m$:m${CBM-R}""{CBM-M} 280 S "m${CBM-W}"a"{CBM-A}m${CBM-E}G(64{CBM-N}f){CBM-M}280 ,p{CBM-R}F(m$){CBM-Q}64:"" {CBM-@} 6 d$(p){CBM-W}{CBM-E}"run" {CBM-M} 340 K @C(n$(p)){CBM-E}12{CBM-M}n$(p){CBM-R}H(n$(p),12){CBM-N}"*" {$f6} j"load"G(34)n$(p)G(34)","dr$"":360 tDDI{CBM-M}Q" w"md${CBM-R}"Q{CBM-G}B B{CBM-M}Q" {CBM-H}"bt${CBM-R}"Q{CBM-G}JCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCK{CBM-M}Q" {$e8}"hd${CBM-R}" march/april 1991 rerun #&" v{CBM-N}4,9: v{CBM-N}5,0: v,1: v{CBM-N}3,32: v{CBM-N}3,33 B 0{$e8} file list I{$f2} first entry is the number of programs on this disk {$fc} followed by each filename {CBM-W} second data item is run or sysxxxxx {$e2} run if file is basic and sys xxxxx if ml {$eb} 10 $ D instant aid /I t{CBM-R}0{CBM-@}61:a:50618{CBM-N}t,a: KN 120,174,20,3,172,21,3,142,218,197,140,219,197,162,211 {CBM-G}S 160,197,142,20,3,140,21,3,88,96,165,203,201,3,240,3 {$e1}X 76,49,234,173,24,208,72,169,198,141,24,208,32,159,255 {$7d} 32,228,255,240,248,104 D{$7d} 208,2,230,252,165,251,201,0,208,234,165,252,201,0,208,228,96 J " memory search & replace is active "use the syntax: {CBM-K} "sys 50555,start,end+1,s,r" {CBM-X} "s=search, r=replace" $(p){CBM-W}{CBM-E}"run" {CBM-M} 350 2jC(n$(p)){CBM-E}16{CBM-M}n$(p){CBM-R}H(n$(p),15){CBM-N}"*" ft (n$(p)),u(dr) M^C(n$(p)){CBM-E}16{CBM-M}n$(p){CBM-R}H(n$(p),15){CBM-N}"*" H d$(p){CBM-R}"boot" {CBM-M} {$fe} (n$(p)),u(dr) {CBM-U}R{$fe} (n$(p)),b0,u(dr): (E(d$(p))) P{$7c} 53280,0: 53281,0 {$f0}wm{CBM-R}N(2): wm{CBM-R}80 {CBM-M} {$fe}%: 500 ov{CBM-R}C(n$(p)){CBM-E}15{CBM-M}n$(p){CBM-R}H(n$(p),16){CBM-N}"*" e^"load"G(34)n$(p)G(34)","dr$",1" rHa${CBM-R}d$(p) BRa${CBM-R}a${CBM-N}G(13) {$7c}631,13:b{CBM-R}1{CBM-@}C(a$):631{CBM-N}b,F(J(a$,b,1))::198,10 {CBM-I} {CBM-J} 53280,0: 53281,0 Eov{CBM-R}B(53265) {CBM-*}{CBM-@} 53265,B(53265){CBM-P} 247 {$fc}{CBM-S} 53265,(B(53265){CBM-P}24"; #0 tp$;: 650 8#: i{CBM-R}1 {CBM-@} 2: md$;: 650: t#d"";hd$;: 650 z#n W#x i{CBM-R}1 {CBM-@} 1: md$;: 650: #B bt$;: 650 {CBM-+}#L i{CBM-R}1 {CBM-@} 19: pr$;: 650: A#V wm{CBM-W}{CBM-E} 80 {CBM-M} 53265,27 G# # sound routine here {$ef}#Z 1,1000,1 a{$fe}~~~~~~~~~~~~~~~~~~~~~ L{$fb} {$ef}~~~~~~~~~~~~~~~~~mar/apr rr 91 2a menu 128 menu 64 search-replce help screen seq scanner dir display freeze key double display smart shopper grocery shopdata overkill.gen , overkill.ml boot overkill pitch 128 ade 64 calculator buttons.o mouse.pointer calculator.btn calculator.txt calcpop.o calculator.o escape key 128 ~ esc key.ml indexer indexer.ml indexer.gen , customizer indx.run D sequential scanner 6I t{CBM-R}0{CBM-@}74:a:50682{CBM-N}t,a: WN 32,155,183,142,69,198,162,1,32,198,255,160,0,32,207,255,72 {CBM-O}S 165,144,240,5,104,32,204,255,96,104,201,13,240,9,32,210,255 {$fd}X 32,225,255,208,230,96,200,204,69,198,208,21,32,204,255,32,228 D display directory 6I t{CBM-R}0{CBM-@}179:a:50764{CBM-N}t,a: UN 160,0,162,1,32,198,255,32,197,198,32,207,255,141,253,198 {CBM-R}S 32,207,255,13,253,198,208,15,206,255,198,96,32,197,198 {$ed}X 32,207,255,208,3,76,100,198,32,197,198,32,207,255,72 *{$7d} 165,144,24 ,0,0,0 #{CBM-N} "display directory is active" d{CBM-P} "use the following syntax:" X{CBM-H} "open 1,8,0,"G(34)"$"G(34)":sys 50764:close 1" ,240,251,104,168,162,1,32,198,255,104 {$e3} 201,34,208,202,32,207,255,201,34,240,7,153,0,199,200,76 $ 172,198,32,203,198D freeze key .I t{CBM-R}0{CBM-@}57:a:50960{CBM-N}t,a: ON 120,174,20,3,172,21,3,142,48,199,140,49,199,162,41,160,199 {CBM-Z}S 142,20,3,140,21,3,88,96,165,203,201,41,240,3,76,238,238 {$ec}X 173,141,2,201,4,208,246,238,32,208,32,159,255,32,228,255 {$7d} 240,248,206 D double display 3I t{CBM-R}0{CBM-@}229:a:51018{CBM-N}t,a: NN 32,155,183,142,128,200,120,174,20,3,172,21,3,142,228 {CBM-+}S 199,140,229,199,162,139,160,199,142,20,3,140,21,3 {$e1}X 169,129,141,26,208,173,128,200,141,18,208,173,17,208 {$7d} 41,127,141,17,208,160,6,247,160,7,185,64,200,153,248,7,136,16 x{CBM-P} 247,160,2,185,75,200,153,27,208,136,16,247,160,9 {CBM-H} 185,78,200,153,37,208,136,16,247,173,72,200,141,16 J{CBM-O} 208,173,73,200,141,21,208,173,74,200,141,23,208,76 X{CBM-V} 188,254 {$fb}H "double display is acti {SHIFT-POUND}>{$7d} 255,208,6,32,225,255,208,246,96,162,1,32,198,255,160,0,169 [ 13,32,210,255,76,7,198 "sequential scanner is active. {CBM-I} "use sys 50682,# of lines" 0,7,104,32,204,255,76,100,198,32,225,255,208 I 7,104,32,204,255,76,100,198,32,204,255,152,72,32,228,255 {CBM-G} 240,5,32,228,255,240,251,104,168,162,1,32,198,255,104 {$e3} 201,34,208,202,32,207,255,201,34,240,7,153,0,199,200,76 $ 172,198,32,203,198* "be sure to save all changes to g "a formatted work disk. K "press a key to continue... {CBM-K} a$: a${CBM-R}"" {CBM-M} 8 shopping list organizer {CBM-W} B (40960) {CBM-M} 20 I {$e7} 6,7:{$e7} 0,7:{$e7} 4,7 {$e6} 53280,14:53281,14:"" / xp${CBM-R}"-> ":pr${CBM-R}"--> ^,32,208,76,47,199 / "freeze key is active." w "enter sys 50960 and press ctrl/p" help screen seq scanner dir display freeze key 75,169,0,153,48,200,136,16,250 v 169,127,141,13,220,88,96,173,25,208,141,25,208,41,1 208,3,76,188,254,173,129,200,240,73,206,129,200 F 169,0,141,18,208,160,15,185,88,200,153,0,208,136,16 247,160,7,185,104,200,153,248,7,136,16,247,160, ive" " R "see documentation to use this in < {CBM--} "your own programs." ,208,136,16,247,173,112,200,141,16,208,173,113 {CBM-Z} 200,141,21,208,173,114,200,141,23,208,76,221,221,238 {$e8}{CBM-G} 129,200,173,128,200,141,18,208,160,15,185,48,200,153 !{CBM-N} 0,208,136,1m$(kf(1,1)){CBM-M}is{CBM-R}1:170 3N z${CBM-E}m$(kf(ng,1)){CBM-M}is{CBM-R}ng{CBM-N}1:180 bX mn{CBM-R}1:is{CBM-R}ng B hp{CBM-R}{CBM-J}((mn{CBM-N}is){CBM-D}.5):hp{CBM-R}mn{CBM-M}170 z${CBM-E}m$(kf(hp,1)){CBM-M}mn{CBM-R}hp:130 {CBM-I} z${CBM-W}m$(kf(hp,1)){CBM-M}is{CBM-R}hp:130 {CBM-H} mn{CBM-R}hp:is{CBM-R}hp{CBM-N}1 Z{CBM-N} m{CBM-R}ng{CBM-@}is {SHIFT-POUND}{CBM-Q}1:kf(m{CBM-N}1,1){CBM-R}kf(m,1):m {$f0}{CBM-H} ng{CBM-R}ng{CBM-N}1:cs{CBM-R}1{CBM-M}200 {CBM-V} m$(ng,32,207,255,208,251,76,86,198,32,207,255 B 76,207,255,173,255,198,208,6,238,255,198,76,245,198,140 {CBM-T} 253,198,169,40,56,237,253,198,74,170,169,32,32,210,255,202 {$e3} 208,250,169,0,153,0,199,169,0,160,199,32,30,171,169,13,32 {CBM-G} 210,255,160,0,96":sp${CBM-R}" ":bs${CBM-R}"":sc${CBM-R}"" t( fr${CBM-R}" " 2 ln${CBM-R}"----------------------------------" {SHIFT-POUND}< m$(500),w$(50),kf(500,2),in(500,6) {SHIFT-@}f iu(99):600 Yp qq{CBM-R}1{CBM-@}10:{CBM-K}k$:qq:qq{CBM-R}{CBM-U}(0): {$f3}z "sorting......";ng{CBM-N}1 D z${CBM-W}"";:x{CBM-R}lp{CBM-N}fc{CBM-N}1{CBM-@}sc{CBM-N}lp:"";sc$m$(kf(x,1)):x : "";pr$;bs$; o zz{CBM-W}15{CBM-M}zx{CBM-R}1:310 _ "zz{CBM-W}30{CBM-M}zx{CBM-R}2 O ,zz{CBM-E}30{CBM-M}zz{CBM-R}0 6zx320,330,340 @pr$;bs$;:340 {CBM-@} jxp$;bs$; {SHIFT-*} t{CBM-K} k$:zz{CBM-R}zz{CBM-N}1:k${CBM-R}""{CBM-M}280 R ^k${CBM-R}G(32){CBM-M}430 {$e4} Hk${CBM-R}G(13){CBM-M}480 !Rk${CBM-R}G(67){CBM-P} cl2,185 ; 115,200,153,27,208,136,16,247,160,9,185,118,200,153 R 37,208,136,16,247,173,112,200,141,16,208,173,113 {CBM-Z} 200,141,21,208,173,114,200,141,23,208,76,221,221,238 {$e8}{CBM-G} 129,200,173,128,200,141,18,208,160,15,185,48,200,153 !{CBM-N} 0,208,136,1{CBM-R}fc{CBM-M}cl{CBM-R}0:sp$:"";:340 ?!{$7c}k${CBM-R}G(67){CBM-M}cl{CBM-R}fc:sp$;"";sc$;pr$;bs$;:340 t!k${CBM-R}G(78){CBM-M}"": I!k${CBM-R}G(80){CBM-M}"": R!280 !{CBM-@}"";pr$;bs$;:340 !{CBM-S}d{CBM-R}d{CBM-N}1:sp$ {CBM-D}!{CBM-U}d{CBM-R}fc{CBM-M}d{CBM-R}0:""; {CBM-F}!Bcl{CBM-R}fc{CBM-M}470 N!Lpr$;bs$;:340 {$e5}!Vsc$;pr$;bs$;:340 " i{CBM-R}d{CBM-N}cl{CBM-N}lp{CBM-N}){CBM-R}z$:kf(is,1){CBM-R}ng: -H kf(is,1){CBM-R}tk:m$(tk){CBM-R}z$:cs{CBM-R}0: zR i{CBM-R}0:zx{CBM-R}0:d{CBM-R}0:cl{CBM-R}0:zz{CBM-R}0:fc{CBM-R}22:sc{CBM-R}44:""; K{CBM--} x{CBM-R}1{CBM-@}23::x {$e6} " c=change column" O{$f0} "space=next cr=select p=print n=next page"; {$f4}{$fa} x{CBM-R}lp{CBM-N}1{CBM-@}fc{CBM-N}lp:sp$m$(kf(x,1)):x ( ({$de}"enter new items------>1" $({$e8}"enter store names---->2" c({$f2}"edit items----------->3" B({$fc}"print data----------->4" ("return to main menu-->5":hs{CBM-R}5:1980 {CBM-A}( zz x1130,1250,1340,1660,1050 {$e4}(" saving user file..grocery" 2" %P"new disk setup---->3" 3%Z"quit-------------->4":hs{CBM-R}4:1980 p%{$e4} zz x750,980,1810,1970 %{$ee}lp{CBM-R}0:570:" setting up grocery list..." {CBM-G}%{$f8}210:k${CBM-R}"p"{CBM-M}790 {CBM-Y}%lp{CBM-N}44{CBM-E}ng{CBM-M}790 I%lp{CBM-R}lp{CBM-N}44:760 {$fa}%" set up printer an0 /tk{CBM-R}kf(ix,1):m{CBM-R}ix{CBM-@}ng{CBM-Q}1:kf(m,1){CBM-R}kf((m{CBM-N}1),1):m (/ng{CBM-R}ng{CBM-Q}1:cs{CBM-R}1:100:980 a/ix{CBM-R}ix{CBM-N}1:ix{CBM-E}ng {CBM-M}ix{CBM-R}1 k/"1390 V/,2090:"select store to change":580 /6"store-->";sn$(zz) {CBM-P}/@"item-->";m$(kf(ix,1)) {$e2}/j"present aisle number ";in(kf(ix,1:sp$;"";m$(kf(i,1));"":d{CBM-R}d{CBM-N}1 $"{$ea}fc{CBM-Q}d{CBM-R}0{CBM-M}510 ;"{$f4}z{CBM-R}1{CBM-@}fc{CBM-Q}d:"";:z v"{$fe}qy${CBM-R}"":"quantity";qy$ Q"qy{CBM-R}E(qy$):qy{CBM-W}.01{CBM-M}qy{CBM-R}1 {CBM-G}""";sp$sp$sp$sp$sp$sp$sp$:z{CBM-R}1{CBM-@}fc{CBM-Q}d{CBM-N}1:"";:z {CBM-L}"cl{CBM-R}fc{CBM-M}sc$; X"&sp$;"";m$(kf(i,1));"";qy: #0iu(in(kf(i,1),sn)){CBM-R}1: ,"type n for no or return for yes";:zz${CBM-R}"" 0,zz$:zz${CBM-R}"n" {CBM-A} zz${CBM-R}"no"{CBM-M}1250 f,(sn$(zz){CBM-R}H(nn$,15) o,2980 S,<" edit items" ,f"item number to edit {CBM-A},p"(number from item listing)"; L,z"->";ix$:ix${CBM-R}"r"{CBM-M}1050 {$eb},Dix{CBM-R}E(ix$):ix$),10):q {$f8}1{$f4}z${CBM-R}z${CBM-N}D(in(kf(x,1),q)) 2{$fe}3,z$ 2x: 3:980 92" new disk setup " F2" insert formatted disk in drive and" 2&" return when ready" {SHIFT-@}20" or type any key and cr to return"; {$e2}2:" to)$15,8,15:1,8,8,"@0:grocery,s,w" &).1,ng:zz{CBM-R}1{CBM-@}ng:1,m$(zz) a)81,kf(zz,1):zz: 1: 15 V)b" saving user file..shopdata" )l15,8,15:1,8,8,"@0:shopdata,s,w" {CBM-H})vx{CBM-R}1{CBM-@}5:1,sn$(x):x {$e4}){$60}x{CBM-R}1{CBM-@}ng:z{CBM-R}1{CBM-@}5:1,in(x,z):z:x: 1: 15:680 d hit any key" & " when ready" .&*{CBM-K}k$:k${CBM-R}""{CBM-M}810 f&43,4:3,sn$(sn):3, M&>z{CBM-R}0{CBM-@}99:fi{CBM-R}0:tl{CBM-R}0:iu(z){CBM-R}0{CBM-M}z:930 &hx{CBM-R}1{CBM-@}ng:kf(x,2){CBM-W}{CBM-E}0 {CBM-P} in(kf(x,1),sn){CBM-R}z {CBM-M}860 {CBM-D}&rx:z:930 {CBM-C}&\ fi{CBM-W}{CBM-E}0{CBM-M}880 {$e5}&F3,:3,ln$;"aisle # ";z;ln$:fi{CBM-R}1:3, 'P1),zz):80 0t"new aisle number";in(kf(ix,1),zz) =0^2090:80:"type n for no or return for yes"; F0Hzz${CBM-R}"":zz$:zz${CBM-R}"n" {CBM-A} zz${CBM-R}"no"{CBM-M}1590 P0R1390 {CBM-K}0{$7c}" set up printer and hit any key" B0" when ready" V0{CBM-K}k$:k${CBM-R}""{CBM-M}1680kf(i,2){CBM-R}qy:qy{CBM-R}1:440 #:" select store" =#dx{CBM-R}1{CBM-@}5:x;" ";sn$(x):x u#nhs{CBM-R}5: 1980:sn{CBM-R}zz: #x" loading data file...grocery" {CBM-L}#B15,8,15:1,8,8,"0:grocery,s,r":1,ng K#Lx{CBM-R}1{CBM-@}ng:1,m$(x) {$e4}#V1,kf(x,1):x: 1: 15 $"{CBM-W}1{CBM-A}ix{CBM-E}ng{CBM-M}1340 {$f5},N2090 -X"change item spelling--->1" 9-"change aisle number---->2" z-"item ok next item------>3" {$7b}-"return to item menu---->4" - "return to edit menu---->5" H-{CBM-N}"return to main menu---->6":hs{CBM-R}6:1980 {$ed}-{CBM-H}zz1470,1580,1 the main menu"; {$fd}2dz${CBM-R}"":z$:z${CBM-W}{CBM-E}""{CBM-M} 680 *3nz${CBM-R}"":"creating user file..shopdata" o3x15,8,15:1,8,8,"0:shopdata,s,w" K3Bx{CBM-R}1{CBM-@}5:1,"store ";x:x 3L1,1:1,1: 1: 15 {CBM-+}3V"creating user file..grocery" J315,8,15:1,8,8,"0:grocery,s,w" {SHIFT--}3 {$fc})J"input new items" &*T"0=unknown aisle 99=not available" u*{$7e}"98=back wall \=return to edit menu" S*"item--";z$:z${CBM-R}"\"{CBM-M} 980 *z${CBM-R}H(z$,15):"item-->";z$ {CBM-O}*"type n for no or return for yes"; {SHIFT-+}*{CBM-+}zz$:zz${CBM-R}"n" {CBM-A} zz${CBM-R}"no"{CBM-M}1130 {$eb}*{CBM-A}x tv${CBM-R}H(((D(kf(x,2))){CBM-N}fr$),4) +'Ztg${CBM-R}H((tv${CBM-N}(m$(kf(x,1)){CBM-N}fr$)),20) ?'3,tg$;:tl{CBM-R}tl{CBM-N}1 r'tl{CBM-R}4{CBM-M}tl{CBM-R}0:3, E'x:3,:tl{CBM-R}0:z M'{CBM-I}3, '{CBM-D}3,ln$;"end of list";ln$ '{CBM-L}3, {CBM-D}'{SHIFT-*} 3:x{CBM-R}1{CBM-@}99:iu(x){CBM-R}0:x J'Jx{CBM-R}1{CBM-@}ng:kf(x,2){CBM-R}0:x:680 {$e6}'T" edit menu" {$f2}03,4:3," # item"; 1{CBM-@}3,G(16)"20";sn$(1); $1{CBM-S}3,G(16)"45";sn$(3); <1{CBM-U}3,G(16)"65";sn$(5) u1B3,G(16)"35";sn$(2); M1L3,G(16)"55";sn$(4) {$7d}1V3,:x{CBM-R}1{CBM-@}ng {CBM-D}1 z${CBM-R}H((D(x){CBM-N}sp$),4){CBM-N}H((m$(kf(x,1)){CBM-N}ln$),22) {SHIFT--}1{$ea}q{CBM-R}1{CBM-@}4:z${CBM-R}z${CBM-N}H((D(in(kf(x,1),q)){CBM-N}ln loading data file...shopdata" a$15,8,15:1,8,8,"0:shopdata,s,r" y$x{CBM-R}1{CBM-@}5:1,sn$(x):x $x{CBM-R}1{CBM-@}ng:z{CBM-R}1{CBM-@}5:1,in(x,z):z:x: 1: 15 ${CBM-POUND}" shopping list {CBM-U}${CBM-R}" main menu" T${CBM-C}"shopping list----->1" {$f0}$F"edit list--------->560,1340,980,1050 .{CBM-V}"item-->";m$(kf(ix,1)) =.H"correct spelling and hit return":iq{CBM-R}0 [.R"item-->";m$(kf(ix,1)) L.{CBM--}"";z$ .{$e6}z${CBM-R}H(z$,15):"item-->";z$ {CBM-R}.{$f0}"type n for no or return for yes"; {SHIFT-+}.{$fa}zz${CBM-R}"":zz$:zz${CBM-R}"n" {CBM-A} zz${CBM-R}"no"{CBM-M}1471,1:1,"milk" {$e6}31,1 {$f1}3 1: 15 {$fa}3{CBM-POUND}600 4{CBM-R}"": 4{CBM-C}"selection--> " 44Fzz{CBM-W}03{CBM-M}x{CBM-R}2:2020 c4Pzz{CBM-W}06{CBM-M}x{CBM-R}1 s4Zzz{CBM-E}06{CBM-M}zz{CBM-R}0 D4{$e4}x2030,2040 4{$ee}"selection-->":2050 4{$f8}"selection-->" {CBM-R}4zz{CBM-R}zz{CBM-N}1:{CBM-K}k$:k${CBM-R}""{CBM-M}1990 T4E(k$){CBM-W}1{CBM-A}E(k$){CBM-E}hs{CBM-M}k${CBM-R}""{CBM-R}1{CBM-@}5:zz{CBM-R}0 +{SHIFT-@}"";sn$(x):"aisle number ";zz 5+Dzz{CBM-W}0{CBM-A}zz{CBM-E}99{CBM-M}"out of range":1210 j+Nin(ng{CBM-N}1,x){CBM-R}zz:x x+X90:1130 U+{$e2}"store names":nn${CBM-R}"" +{$ec}"enter store number to change" {CBM-T}+{$f6} 580 {SHIFT-*}+ "new store name-->";nn$ {CBM-*}+ "new store name=>";nn$ @ kq kd /m kf *f 9f Kf{SHIFT-POUND}m w@{SHIFT-POUND}p w@{SHIFT-POUND} w@{SHIFT-POUND} <X{SHIFT-POUND}~=X {$e5}n{SHIFT-POUND}{$fe}X Pe{CBM-Z}{$fe}X{CBM-Z}{CBM-H}aI'PI(PI)P{CBM-Z}{$fe}X{$f0}{CBM-D}l1@:X Ve{$60}{CBM-Z}X?X{$60}{CBM-Z}X~X{$60}{SHIFT-POUND}i{$fe}{SHIFT-POUND}J{$fd}{CBM-I} {CBM-POUND}{CBM-E} I{CBM-N}{CBM-X}{$f0}{$ec}{CBM-R}{CBM-J}Y)IT{CBM-W}8{$e9}{CBM-N}{CBM-Z}{CBM-H}a?X~X{CBM-G}1{$fd}{$f0} ^@H{CBM-G}1{$fd}{$f0}> E@l aH{CBM-G}1{$fd}{$f0}j{CBM-Z}X{$f0} E@l a{CBM-Z}2X{$f0}l{$e2}@{CBM-G}q{$fd}H{CBM-G}q{$fd}{$60} S@{CBM-Z}"P?X~Xl a{CBM-Z}XP{CBM-Z}2X{$f0} Ji{$f9}i{CBM-Z}X8{$e9}{CBM-POUND}{CBM-E}i .hl{$e2}g8{CBM-Z} X{$e9} {CBM-N}{CBM-X}Ji>j{$e8}{CBM-X}JiBj{CBM-Z}X8{$e9}{CBM-POUND}{CBM-Z}=jI{$f0}{CBM-Z}>j-j{CBM-E}) 2X{CBM-E}{$ed}2Xlaj{CBM-E} {CBM-Z}AjI{$f0}{CBM-Z}Bjqj{CBM-E}) 2X{CBM-E}{$ed}2XlEj{CBM-E} .hl{$e2}g{SHIFT-POUND})=j{SHIFT-POUND}Ajlj{SHIFT-POUND}=j{SHIFT-POUND}Ajlj{SHIFT-POUND}=j{SHIFT-POUND})Ajlj{SHIFT-POUND})=j{SHIFT-POUND})Ajlj{CBM-I} {CBM-Z}X0Z{$e8}P{$f7}{CBM-Z}X {SHIFT-+}{$e8}P{$f7}{$60} multicolorhires {CBM-I} {$f0}~{CBM-S}X{CBM-X}{CBM-Y}a{CBM-R}a{CBM-X}{CBM-H}j{CBM-N} {CBM-X}{CBM-L}j R~{$e8}X{$f0}{CBM-Z}XX{$60}{$60} Ri{CBM-Z}XiX{CBM-Z}X{$f0}{CBM-Z}X X{CBM-Z}XX{SHIFT-POUND}~P{SHIFT-POUND} l{$e2}g{CBM-Z} XX{CBM-Z}XX{SHIFT-POUND} X{SHIFT-POUND}X{SHIFT-POUND} P{SHIFT-POUND} .hl{$e2}g{SHIFT-POUND}X{CBM-Z}6X{$f0}lOk RiNXlLg{SHIFT-POUND}X{CBM-Z}6X{$f0}lk Ri{$ee}XlLg{SHIFT-POUND} X{CBM-Z}6X{$f0}l)k RiN X{CBM-Z}XP{CBM-Z}XPN XlLg{SHIFT-POUND} X{CBM-Z}6X{$f0}l]k Ri{$ee} X{CBM-Z}XP{CBM-Z}XP{$ee} XlLg{CBM-S}X{CBM-J}Y)IT{CBM-X}{$f0}{$ec}{$60}{CBM-Z}X{$f0}{CBM-Z}X{$f0} {$7b}i Hil{$e2}g /i {CBM-L}g{CBM-D} X{CBM-Z}XP{CBM-E} {$ed}:2030 {$f7}4zz{CBM-R}E(k$):"selection-->";zz 5 80: $5*"item-->";m$(kf(ix,1)) d54{CBM-T}22)"item number-->";ix W5>"aisle store name store number" 5hz{CBM-R}1{CBM-@}5:in(kf(ix,1),z); {CBM-G}5r{CBM-T}10);sn$(z); {CBM-L}5\{CBM-T}31);z:z: grocery,s,w" {SHIFT--}3 buffer multi 1 :mulit 2 :color ram:backround:page : range: by rocco saya da{SHIFT-POUND} R~{SHIFT-POUND} PlZd{SHIFT-POUND} R~{SHIFT-POUND} R~{SHIFT-POUND} R~{CBM-I}p{SHIFT-POUND} R~JP{$fa}{SHIFT-POUND} R~{$60} [d{SHIFT-POUND}cX c{SHIFT-POUND}{CBM-T} {CBM-Q}NcXP{$f4}{CBM-I}({SHIFT-POUND}{CBM-U} R~JP{$fa}{CBM-I} {$f0}~ c{SHIFT-POUND}L {CBM-Q}{CBM-I} {$f0}~ c{SHIFT-POUND}{$e7} {CBM-Q}{CBM-I} {$f0}~ c{SHIFT-POUND}{$f7} {CBM-Q}{SHIFT-POUND}cX{CBM-I} bX{CBM-S}cX {$f0}~{CBM-S}bX {CBM-X}~c R~{$e8}P{$f6}bX{$ee}cX{CBM-Z}cXI{$f0}P-XP{$60}{CBM-Z} X3X8{CBM-Z} X{$e9} X {SHIFT--}h{CBM-Z}XI2X{CBM-Z}P >XP{CBM-Z}3X X{$60} {$f0}{$f2} {CBM-I} {CBM-O}m XHJP{$f6}{CBM-I}2{SHIFT-POUND} XHJP{$f7}{CBM-Z}"PX{CBM-Z}#PX{SHIFT-POUND}X{SHIFT-POUND}~P{SHIFT-POUND}{$f8}{$f9}{$fa}{SHIFT-POUND} 8X{SHIFT-POUND} 9X{$60} {CBM-I} {$f0}~{CBM-Z}8XI8{$f0}/{CBM-Z}8XI8X{$ee}{CBM-A}a{$ee}{CBM-A}a{CBM-I} {$f0}~{SHIFT-POUND} R~{CBM-I} {$f0}~{CBM-Z}8X{CBM-I} M{CBM-X}l.h{SHIFT-POUND} 8X{SHIFT-POUND}{CBM-A}almare you sure (y/n) {CBM-S}9X{CBM-D}8X {$f5}o{CBM-I} P S@{CBM-Z}#P?X~Xl aI {CBM-POUND}{CBM-G}{CBM-Z}?X{CBM-R}H{CBM-Z}~X{CBM-R}{CBM-G}8{$e9} {CBM-POUND}H{SHIFT-*}{$f0}l@{CBM-Z}2X{$f0}{CBM-POUND}{CBM-G}{$e8} {$f0}lV@{$60} {CBM-I} {CBM-X}{CBM-O}a{CBM-P}a{$e8}P{$f6}X{SHIFT-POUND}T{SHIFT-POUND}aP{SHIFT-POUND}P{SHIFT-POUND}P {CBM--}{SHIFT-POUND} @Xx{$60}{CBM-Z}PP){$f0}(N@X{SHIFT-POUND}@X{CBM-S}@X{CBM-X}{CBM-P}aP{CBM-X}{CBM-E}aP{CBM-X}{CBM-W}a!P{CBM-X}{CBM-J}aP{$f0}H{CBM-POUND}H{CBM-N}H@l1{$ea}HX XHHX save load enter filename : now loading o.k. P{$f6}{$60}{CBM-I} {SHIFT-POUND} HJP{$fa}{CBM-Z}X{$f0}l.h .hl{$e2}g {CBM-I} {CBM-X}Jik{CBM-E}i {$e8} {$f0}l kH{SHIFT-*}{$f0}lkl{$f8}j{SHIFT-POUND} fk{SHIFT-POUND}X{SHIFT-POUND}X {CBM-I}{CBM-E}-XX{CBM-E} {CBM-Z}X{$f0}{CBM-E} XHJP{$e2}l{$f8}j{SHIFT-POUND}X{SHIFT-POUND}X{SHIFT-POUND}jfkl8k {CBM-I}{CBM-E}XH{CBM-E}HJP{$f6} {CBM-Z}Xl{$f8}j {CBM-I}{CBM-E}X {CBM-E} XHJP{$f7} {CBM-I}{CBM-O} XHJP{$f7} {CBM-Z}Xl{$f8}j {CBM-I}{CBM-E})XHJP{$f7}{SHIFT-POUND} 2X{SHIFT-POUND}3X 8hl{$f8}j {CBM-I}{CBM-O})XHJP{$f7}lDk {$ea}4Xl{$fd}g{CBM-E}X4X{CBM-E}Xlh{CBM-D} X{CBM-Z}X{$60}{CBM-Z}X{$f0} {CBM-I}ll(h{SHIFT-POUND} h{CBM-Z}{CBM-H}a{CBM-N}{$e8}{CBM-Z}XP{$60}{SHIFT-POUND}2X{SHIFT-POUND}3X{SHIFT-POUND};X ah{$60}{CBM-Z} XX{CBM-Z}XX{SHIFT-POUND} X{CBM-Z}2XX Rh{SHIFT-POUND}X{CBM-Z}3X X{CBM-Z}X;X RhlTh {CBM-L}g{CBM-Z}X{CBM-D} X{CBM-G}IT{CBM-G}{CBM-Z}XI{CBM-Z}XP{CBM-Z};XIlh{CBM-Z};X{CBM-Z}X X{CBM-Z}XXl{SHIFT-@}h{CBM-S}2X {$f0}~{$60} {CBM-A}h{SHIFT-POUND} R~ R~ R~ {CBM-A}h{SHIFT-POUND} {CBM-S}X M{CBM-X}{$60}{CBM-Z}X {SHIFT--}hl{$f1}hX{SHIFT-POUND} X{CBM-I}X.{CBM-POUND}{CBM-E}{CBM-N}{SHIFT-POUND} M{CBM-X}{$ee}X{CBM-Z}XI {$f0}lJo{$60}{$fb}{$fc}{$60}{$fd}{$fe}{SHIFT-*}{$f0}{CBM-A}{SHIFT-POUND} X{$60}{SHIFT-POUND}X{$60}{CBM-S}9X{CBM-D}8X {$f5}o{$60}{CBM-S}9X{CBM-D}8X {$fa}o{CBM-I} P {$f5}ol{$e4}m{CBM-I} P {$fa}o pl{$e4}m {$f1} {$fa}o pl{$e4}m8{CBM-Z}X{$ed}9X2X{CBM-Z}X{$ed}8X3X{CBM-S}X{CBM-D}X {$f5}o{SHIFT-POUND}X{SHIFT-POUND} M2X{$fd}{SHIFT-POUND}PM3X{$fe}ln{SHIFT-POUND} 3X{SHIFT-POUND}{CBM-@} R~ {$ed}{$f6}P{$60} {$e4}~I{$f0}@I {$f0}yI"{$f0}{$eb}I {$e7}I ):X{CBM-Z}3XIlp{SHIFT-POUND} R~{CBM-Z}:X R~{CBM-S}3XdX{$ee}3X{SHIFT-POUND}{CBM-@} R~lpI{CBM-A}{CBM-L}lp{CBM-Z}3X{$f0}{CBM-S}{SHIFT-POUND} R~{SHIFT-POUND} R~lOd {CBM-I} {$f0}~{SHIFT-POUND}; d {CBM-Q}{CBM-I} {SHIFT-POUND}Z{$e8}P{$f3}{SHIFT-POUND} {$e5} 5]{CBM-Z}X{$e5}X{CBM-Z}X Y{CBM-Z}X5Y{CBM-Z}{CBM-H}a]Y{$60}@{SHIFT-POUND} R~{SHIFT-POUND} R~{CBM-I} {$f0}~{SHIFT-POUND} {CBM-H}~{SHIFT-POUND}O{CBM-O} ~{CBM-I} {CBM-G}~RX {$e7}{$e8}I P{$f2}l{CBM-Q}~ {$e4}~:X{SHIFT-POUND}{SHIFT-POUND} 5X{CBM-Z}:XI{$f0}_I{$f0}^I{$f0}{$60}I{$f0}yI{$f0}^I{$f0}]I{$f0}\I{$f0}DI{$f0}ZIm{$f0}_I_{$f0}AI{$f0}JIr{$f0}BIi{$f0}iIo{$f0}nIf{$f0}>I>{$f0}7IR{$f0}'Ip{$f0} \n{CBM-Z}XPl{$7c}l{$60}{CBM-Z}:XI {$f0}b{$60}lTmldglzglglPg{$fa}o {CBM-I} {$f0}~ m{SHIFT-POUND}{CBM-B} {CBM-Q} {$e4}~{$f0}{$fb}Iy{$f0} In{$f0}l{$f3}mlpnX{SHIFT-POUND}{$7f} {CBM--}{CBM-G}){$fb}{CBM-I} {CBM-Z}X{$f0}I{$f0}{SHIFT-POUND} l&n{CBM-E}{$fd}{$fb}H{SHIFT-*}{$f0}{SHIFT-*} {$f0} ln{CBM-Z}XI{$f0} ln{$e6}{$fe}{$e6}{$fc}JPO{CBM-G}{SHIFT-POUND} {CBM--} [d{SHIFT-POUND} R~xl{$f8}j{CBM-Z}:XI{$f0}gIl{$f0})Is{$f0}(Id{$f0}'II{$f0}&IO{$f0}%I{$f0}$I{$f0}#{CBM-Z}X{$f0}{CBM-Z}:XI+{$f0}"I-{$f0}7{$60}l<blEcl{CBM-S}olpl+pl8plcp to lTm{CBM-Z}X<X{CBM-Z}<XM=X{CBM-A}l{$e5}n{CBM-N}{$e8}=Xl{$e5}n{CBM-Z}X=X Rnl{$e5}n{CBM-Z}=XM<X{$f0}{$60}{CBM-S}<Xerror, check drive & disk press space to continue now saving {SHIFT-POUND}{SHIFT-POUND}{CBM-W}a{CBM-H}a PbX{SHIFT-POUND} P Eb {CBM-+}bP{SHIFT-POUND} {$fe}X{$60}l{SHIFT-@}b{SHIFT-POUND} R~{SHIFT-POUND} R~{CBM-I}({SHIFT-POUND} R~JP{$fa}{SHIFT-POUND}{CBM-A}a {CBM-I} {$f0}~{CBM-Z}bXP a{SHIFT-POUND}A {CBM-Q}lb a{SHIFT-POUND}H {CBM-Q} a{SHIFT-POUND}O {CBM-Q}{CBM-I} {$60} VpP{$60}{CBM-S}3X{SHIFT-POUND} dXaX{SHIFT-POUND}{$60}{SHIFT-POUND} R~{SHIFT-POUND}{CBM-Z}bXP b{SHIFT-POUND}. {CBM-Q}lZb a{SHIFT-POUND}{$e2} {CBM-Q} X{SHIFT-POUND}d {CBM-Q} {SHIFT-POUND}{CBM-I} {SHIFT-@}~{CBM-Z}aX{CBM-I}d X {CBM-X}~{SHIFT-POUND} kl{$f8}j {CBM-I}{CBM-E} XHJP{$f7} {CBM-I}{CBM-X} XHJ ~{$f0}l{$fb}k{$60} ll{$f8}j 3X{CBM-I}{SHIFT-POUND} XHJP{$f9}{CBM-I} {CBM-O}Ji6l2X{CBM-D}3X{CBM-E}{CBM-D}2X) {$f0}{CBM-X}Jicl{CBM-O} X XH{SHIFT-*}{$f0}l$lJ{$ee}3X ~{$f0}l"l{CBM-I} {CBM-O} XHJP{$f7}{$60} l l {$e4}k{SHIFT-POUND}2X L@l{$f8}j{CBM-Z}X{$f0}{$60}{CBM-Z}:XI1{$f0} I2{$f0}I3{$f0}I0{$f0} {$60}lKjljlXjlj{SHIFT-POUND}>X {CBM-Y}l{CBM-Z}XP{CBM-Z}2X P{$60}8{SHIFT-POUND}~{$ed}>XX{CBM-Z}X {SHIFT--}h{CBM-Z}XI,X{CBM-Z} XI{CBM-A} {SHIFT--}h{CBM-Z}XI2X{CBM-Z}XJP{$f7}{$60}{CBM-Z}XM9XX{CBM-Z}XM8XX{CBM-Z}X{CBM-Z}X{CBM-Z}5X{$f0}{$60}{SHIFT-POUND}O{SHIFT-POUND} 2X L@{CBM-Z}X{CBM-Z}X{$60}{CBM-Z} XI I{CBM-A}{CBM-Z}XI{$f0}I {$f0}{$60}{SHIFT-POUND} X{CBM-Z}XP{SHIFT-POUND} X{$60}{SHIFT-POUND} X{$60}{SHIFT-POUND}X{$60}{SHIFT-POUND}X{$60}{CBM-Z}XI{$f0}7{CBM-Z} XI({$f0}I~{$f0}{$60}{CBM-Z} XI{CBM-A}6{CBM-Z}XI{$f0}I{$f0}{$60}{SHIFT-POUND} X{$60}{SHIFT-POUND}' X{$60}{SHIFT-POUND}X{$60}{SHIFT-POUND}X{$60}{CBM-Z} XI~{$f0}I{$f0}{SHIFT--}{$60}{SHIFT-POUND} X{$60}{CBM-Z}XI{$f0}{$e1}I{$f0}{$60}{SHIFT-POUND}X{$60}@ {CBM-L}g{CBM-Z}4X h{$60}{CBM-Z}X{$f0}{$60}8{CBM-Z} X{$e9} {CBM-N}{CBM-X} {SHIFT-*}{SHIFT-POUND} R~ R~N3Xl{$7b}p{SHIFT-POUND}{$60}replace y/n {CBM-I} {$f0}~{SHIFT-POUND}{$ed} p {CBM-Q} {$e4}~Iy{$f0} In{$f0}l ql @{SHIFT-POUND} {CBM-E}~{SHIFT-POUND}O{CBM-O} ~{SHIFT-POUND}s {CBM-POUND}~{SHIFT-POUND}0 {CBM-POUND}~{SHIFT-POUND}: {CBM-POUND}~{CBM-D}aX{CBM-I} {CBM-X}dX {CBM-POUND}~{$e8}P{$f6} {CBM-S}~lBb{CBM-I} @{CBM-X}zq{$e8}P{$f6}{$60} {$fe} ~ ~ {$fe} 8{$e9}({$ee}Xlo X{$60}{CBM-Z}XP{$60}{SHIFT-POUND} {SHIFT-POUND} 2X L@{SHIFT-POUND}X{SHIFT-POUND} X{SHIFT-POUND} R~{CBM-S}X{CBM-D}X {$f0}~8{CBM-POUND}{$e9}lHll'fl6flefl ll{$e4}kl{CBM-Y}klHfl{CBM-M}flTk{CBM-Z}6Xi6X{$60} k{$60} {$ec}j{$60}l{$fb}fl{CBM--}i{$ee}X{CBM-Z}X{$e5}X"PlTf{$ee}X{CBM-Z}X Y#PlTf{$ee}X{CBM-Z}XI {CBM-Z}XP{SHIFT-POUND} X{CBM-Z}X5YX {CBM-Y}flTf{$ee}{CBM-H}a{CBM-Z}{CBM-H}a]YX{CBM-I}X{CBM-S}X {$f0}~8{$e9}{CBM-N}{CBM-X}X){CBM-N}{SHIFT-POUND} M{CBM-X}{SHIFT-POUND} R~{$ee}X{CBM-Z}XI{$f0}lYflzk{CBM-Z}X{$f0}a{CBM-Z}XiX Jj{CBM-Z}X{$f0}{CBM-Z}XX {$ee}fl{$e4}f{CBM-Z}XI8{$e9}X5YlHfIX {$ee}f j Tfl.h{$60}{CBM-Z}{$e8}=X{$60}{CBM-Z}<XI~{$f0}l{$f9}n{SHIFT-POUND} <X{SHIFT-POUND}=X{CBM-I} {$f0}~{CBM-I} {SHIFT-POUND} R~JP{$fa}{CBM-I} {$f0}~{SHIFT-POUND} {CBM-S}<X M{CBM-X}{SHIFT-POUND}{CBM-G} n {CBM-Q}{SHIFT-POUND} {CBM-S}=X M{CBM-X}{CBM-Z} X X{CBM-Z}X!X{CBM-Z}XX{CBM-Z}<XX o{CBM-Z}XX{SHIFT-POUND}>X {CBM-Y}l{CBM-Z}XP{CBM-Z}2XP{CBM-Z}XX{CBM-Z}=XX o{CBM-Z}XX{SHIFT-POUND}>X {CBM-Y}l{CBM-Z}XP{CBM-Z}2XP{CBM-Z} X X{CBM-Z}!XX{$60}{SHIFT-POUND}X{CBM-Z}XI(8{$e9}({$ee}Xlo X{$60}{CBM-Z}XP{$60}{SHIFT-POUND} {SHIFT-POUND} 2X L@{SHIFT-POUND}X{SHIFT-POUND} X{SHIFT-POUND} R~{CBM-S}X{CBM-D}X {$f0}~8{CBM-POUND}{$e9}{CBM-Z}bXP{SHIFT-POUND}{CBM-S}X{CBM-D}X X~lc{SHIFT-POUND} U~{SHIFT-POUND}{CBM-G}{$f0}5I@{$f0}1 ?e{CBM-Z}RXI6{$f0}l1c{CBM-Z}SXI3{$f0}{CBM-I} {$f0}~ a{SHIFT-POUND}{$fa} {CBM-Q}{CBM-I} {$f0}~lucl{$fb}p a{SHIFT-POUND}{$f1} {CBM-Q} b{SHIFT-POUND} {CBM-Q} {$e4}~{$f0}{$fb}l @{$60}{SHIFT-POUND} bX{SHIFT-POUND} {CBM-W}a{CBM-H}a P{SHIFT-POUND}{SHIFT-POUND}5X{CBM-Z}=X {SHIFT--}h {$f1}h{CBM-G}IX{CBM-G}I X{CBM-Z}<X {SHIFT--}h {$f1}hlob{CBM-K} {CBM-L} {CBM-J} {CBM-L} workingoverkillmode : on{CBM-P}{CBM-P}{CBM-P}{CBM-P}{CBM-P}{CBM-P}{CBM-P}{CBM-P}% 53280,1: 53281,1: 646,2:dv{CBM-R}8 d x{CBM-R}0{CBM-M}x{CBM-R}1:"buttons.o",dv,1 G x{CBM-R}1{CBM-M}x{CBM-R}2:"mouse.pointer",dv,1 x{CBM-R}2{CBM-M}x{CBM-R}3:"calculator.o",dv,1 {CBM-Z}( x{CBM-R}3{CBM-M}x{CBM-R}4:"calculator.btn",dv,1 Q2 x{CBM-R}4{CBM-M}x{CBM-R}5:"calculator.txt",dv,1 {$f0}< x{CBM-R}5{CBM-M}x{CBM-R}6:"calcpop.o",dv,1 5a set up {SHIFT-*}{SHIFT-POUND}{CBM-POUND}a{SHIFT-POUND}Db{SHIFT-POUND}#{SHIFT-POUND}{SHIFT-POUND}B{CBM-N}{SHIFT-POUND}s{CBM-Q}{SHIFT-POUND}{SHIFT-*}{CBM-D}{SHIFT-POUND}e{SHIFT-POUND}Df{$60}{$f5}{$f4}{CBM-I} 8{$ed}{$f5}){$7f}I@{CBM-A}j{$f0}{CBM-D}{$f4}{$60}{SHIFT-*}I~{$f0}8J{CBM-I}~{CBM-D}{$f4}{$60}{SHIFT-POUND} {$60}{SHIFT-POUND} PPX {CBM-I}~JP{$fd}P{$f8}X{CBM-Z}T{CBM-D}{$f2} ){SHIFT-*}{$f2}M P PI )mPP{CBM-Z}T{CBM-D}{$f3} ){SHIFT-*}{$f3}8i~MPPx{CBM-Z}<{$fd}{SHIFT-POUND} F{SHIFT-POUND}{CBM-M}{CBM-Z}={$fe}{$f0}{CBM-Q} {CBM-E}{$fd}@{$e6}{$fd}P{$e6}{$fe}{CBM-Z}P8{$e9}2jjj>{CBM-Z}Pj{CBM-Z} PJjj8{$e9}? 6D{CBM-G})@{$f0} {SHIFT-POUND}{$f0}{$f3}{SHIFT-*}{SHIFT-POUND}{$f4}{SHIFT-*}{CBM-G})?M?{$ea}{$ea}{CBM-A}4EM?L UD{SHIFT-POUND}{CBM-P} J{$f1}NjP{$f6}{SHIFT-POUND}{SHIFT-@}lJ{$f1} sD{SHIFT-POUND}%P{$e8}H ^D{CBM-G}){$f0} ID{CBM-G}{$fb}{CBM-G}{$fc}{CBM-G}{CBM-N} k{SHIFT-POUND}%PJJ {$7d}D{CBM-E}{$fb} J{$f1}{$ee}k{CBM-D}kNjP{$f0}{$60} sD {$e5}{CBM-G}) ID{SHIFT-POUND}G{SHIFT-POUND}{SHIFT-POUND} J{$f1}{CBM-I}i{SHIFT-POUND}%{$f0}{CBM-I}i{SHIFT-POUND} J{$f1}{SHIFT-POUND} J{$f1}{SHIFT-POUND} J{$f1}NiP{$ec}{CBM-G}{CBM-N}JJjlC{SHIFT-POUND} J{$f1}NjP{$f6}{SHIFT-POUND} G{SHIFT-POUND}{SHIFT-POUND}lJ{$f1}{CBM-S}{CBM-R}{CBM-D}{CBM-W} {$e5}{CBM-Z}{CBM-J}{CBM-N})G){$7f}{$60}{SHIFT-POUND} M{CBM-L}P{CBM-Z}{CBM-E}M{CBM-M}{$f0} DlTC{$60} {CBM-G}C{CBM-Z}{CBM-M}{CBM-E} {CBM-E} {$f0} J{$f1}{$e6}{CBM-@}L{CBM-H}P{$f0}{SHIFT-POUND} {CBM-L} c{SHIFT-*}~{$f0} UP U{SHIFT-*} U{SHIFT-*} UP {SHIFT--}\ {$f3}w U{SHIFT-*} 5P {$f0} {SHIFT-*} {SHIFT-POUND}{$fb}{SHIFT-POUND} {$fc}{CBM-E}{$fd}{$fb}HJP{$f8}{SHIFT-POUND}{$ea}{$f3}{SHIFT-*}{$f4}{SHIFT-*}{$60}{CBM-G}){CBM-N}{CBM-G})?{CBM-POUND}{$60}{SHIFT-POUND}@%PHl {$e5}Ijjjj{$60} J{$f1}{CBM-G}{CBM-N}JJ{SHIFT-POUND}@%PJj{$60} sD ^D{CBM-G}) ID{SHIFT-POUND}O UD{SHIFT-POUND}{CBM-Y} J{$f1}NjP{$f6}{SHIFT-POUND}P J{$f1} sD{SHIFT-POUND}@%PH{$e8} {$e5}{SHIFT-POUND}{CBM-G} UD{SHIFT-POUND} J{$f1}NjP{$f6}{SHIFT-POUND}{CBM-M} J{$f1} sD{$e8}{$e8} ^D{SHIFT-POUND} {CBM-A})j0S{CBM-E}V{CBM-E}s0{$7e}{CBM-E}{CBM-E}d {CBM-E}{CBM-E}g0{CBM-T}{CBM-E}{CBM-+}{CBM-E}d {CBM-R}{CBM-E}{CBM-H}{CBM-E}m0{CBM-V}{CBM-E}A{CBM-E}p0M{CBM-E}P{CBM-E}gU{CBM-E}V{CBM-E}g{$e7}{CBM-E}{$e8}{CBM-E}dP{$fa}{CBM-E}{$fb}{CBM-E}jP {CBM-R}{CBM-R}j{CBM-R}{CBM-R}j3{CBM-R}4{CBM-R}j6{CBM-R}7{CBM-R}jP9{CBM-R}:{CBM-R}mPc{CBM-R}e{CBM-R}mr{CBM-R}s{CBM-R}mu{CBM-R}v{CBM-R}mx{CBM-R}y{CBM-R}mP[{CBM-R}\{CBM-R}pPK{CBM-R}M{CBM-R}p{$7b}{CBM-R}{$7c}{CBM-R}p{$7e}{CBM-R}{$7f}{CBM-R}p{CBM-R}{CBM-R}pP{CBM-R}{CBM-R}s {CBM-R}{CBM-R}s{CBM-R} {CBM-R}s{CBM-I}{CBM-R}S{CBM-E}tantangent coscosine orboolean or sqrsquare root acall clear atnarc-tangent sinsine (open parenthesis )close parenthesis ^exponentiation msmemory store 77 88 99 /division mcmemory clear 44 55 66 *multiplication mrmeinitial mouse pointer (x,y), set color=white, (x) msb=0 Qb 13{CBM-D}4096,100:13{CBM-D}4096{CBM-N}1,100:13{CBM-D}4096{CBM-N}39,1:13{CBM-D}4096{CBM-N}16,0 c set sprite block pointer = 11*64 = 704 {CBM-Q}d 2040,11 Tf 49152: initialize button driver {$f8}p 53000: activate calculator {$fe}z {$f0}-+{CBM-G})M>{$f0}{CBM-A} I{CBM-N}{SHIFT-POUND}%{$f0}JJM>{$f0} {CBM-V}C{CBM-Z}{CBM--}){$f0} l[{SHIFT-*}{$ee}{CBM-M}{CBM-G}{$fd}I{$fd}{$e6}{$fe}{CBM-D}{CBM-M}L@ {$fb}Cl[{SHIFT-*}{CBM-Z}{CBM--}){$f0}{$f9}{SHIFT-POUND} F{CBM-G}){$f0}j{CBM-Z}{CBM-M}{CBM-N}J)h){$f8}jjj{CBM-POUND}{CBM-Z}e{$fb}{CBM-Z}f{$fc}{SHIFT-POUND}{CBM-S}h{$f0} JP{$fc}h{CBM-E}{$fb}{CBM-N}-hPmh{$fb} {CBM-L}AlBmh{$fb} {$ec}AlB {CBM-L}A {CBM-I}~JP{$fd}P{$f8} {$ec}AlB{CBM-G})@P{SHIFT-POUND}{$f0}vCllC{CBM-G})P{SHIFT-POUND}{CBM-R}B{SHIFT-POUND}{$f0}{CBM-H}B {CBM-Q}BN{CBM-R}B{SHIFT-POUND}{CBM-H}B{$60}{SHIFT-POUND}C CNC{$60}{CBM-G})@P{SHIFT-POUND}vCllC {CBM-W}{SHIFT-POUND} G{$60}{SHIFT-POUND}{$7f}M{CBM-L}P{$60} {CBM-G}C {CBM-E}{SHIFT-POUND} J{$f1}{$e6}{CBM-@}L{CBM-H}P{$f2}{SHIFT-POUND}{$7f}l{$f3}C {CBM-Z}e"{CBM-Z}f#{SHIFT-POUND} "P{$fb}"{$60}{CBM-I} {SHIFT-POUND}{$fb}{SHIFT-POUND} {$fc}{CBM-E}{$fd}{$fb}HJP{$f8}{SHIFT-POUND}{$ea}{$f3}{SHIFT-*}{$f4}{SHIFT-*}{$60}{CBM-G}){CBM-N}{CBM-G})?{CBM-POUND}{$60}{SHIFT-POUND}@%PHl {$e5}Ijjjj{$60} J{$f1}{CBM-G}{CBM-N}JJ{SHIFT-POUND}@%PJj{$60} sD ^D{CBM-G}) ID{SHIFT-POUND}O UD{SHIFT-POUND}{CBM-Y} J{$f1}NjP{$f6}{SHIFT-POUND}P J{$f1} sD{SHIFT-POUND}@%PH{$e8} {$e5}{SHIFT-POUND}{CBM-G} UD{SHIFT-POUND} J{$f1}NjP{$f6}{SHIFT-POUND}{CBM-M} J{$f1} sD{$e8}{$e8} ^D{SHIFT-POUND} DO{CBM-G}){$fe} {CBM-G}{$60}{CBM-G}{SHIFT-@} {CBM-Z} {SHIFT--}{CBM-X}{CBM-G}){$fe}{$60}{CBM-G}){$fe} {CBM-Q}{CBM-T} {CBM-I} {$e5}{SHIFT-POUND} {SHIFT-POUND}e J{$f1}{SHIFT-POUND}2{CBM-@}3{CBM-@}4{CBM-@}{SHIFT-POUND}e{CBM-A}{CBM-W}{SHIFT-POUND} 0{CBM-H}{$7f}O{CBM-+}HHl{CBM-I} (open parenthesis )close parenthesis ^exponentiation msmemory store 77 88 99 /division mcmemory clear 44 55 66 *multiplication mrme X{CBM-T}{CBM-R}sP{CBM-E}{CBM-R}{CBM-R}{CBM-R}sPF{CBM-R}G{CBM-R}g P{CBM-R}S{CBM-R}B{SHIFT-*}{$e7}{CBM-R}{$e8}{CBM-R}B {SHIFT-*}{$fc}{CBM-R}{$fd}{CBM-R}d {CBM-W}{CBM-W}m0!{CBM-W}${CBM-W}g03{CBM-W}6{CBM-W}j0o{CBM-W}r{CBM-W}g0{$60}{CBM-W}C{CBM-W}d U{CBM-W}X{CBM-W}p0{CBM-W}{CBM-W}sP{CBM-W}{CBM-W} mory recall 11 22 33 -subtraction ceclear entry 00 .decimal point =evaluate expression +addition offturn calculator off Qscroll display left Qscroll display right andboolean and absabsolute value expnat log raised to power intinteger value lognatural lo 53280,1: 53281,1: 646,2:dv{CBM-R}8 d x{CBM-R}0{CBM-M}x{CBM-R}1:"buttons.o",dv,1 G x{CBM-R}1{CBM-M}x{CBM-R}2:"mouse.pointer",dv,1 x{CBM-R}2{CBM-M}x{CBM-R}3:"calculator.o",dv,1 {CBM-Z}( x{CBM-R}3{CBM-M}x{CBM-R}4:"calculator.btn",dv,1 Q2 x{CBM-R}4{CBM-M}x{CBM-R}5:"calculator.txt",dv,1 {$f0}< x{CBM-R}5{CBM-M}x{CBM-R}6:"calcpop.o",dv,1 5a set up {CBM-G})P {SHIFT-POUND}{CBM-R}B{SHIFT-POUND}{CBM-H}Bl{CBM-Q}B{SHIFT-POUND}C{SHIFT-POUND}{$f0}ClC{SHIFT-POUND}{$fe}-PP{$60}{CBM-Z}a{$fd} D{CBM-Z}b{$fe} {CBM-E}{CBM-S}{CBM-POUND}J{$f0}%{CBM-E}{$fd} {$e6}{$fe}E{$e6}{$fe}I{$e6}{$fe}E{$fd}{$e6}{$fe}{$fd}l8B{CBM-E}{$fd}h{CBM-G}{$fd}<{CBM-G}{$fe}={$e6}{$fd}P{$e6}{$fe} 6D{SHIFT-POUND}vC{CBM-G})@P lC{CBM-G})P {CBM-Q}B C{CBM-G}{$fd}I{$e6}{$fe}{$fd}NhPS{SHIFT-POUND}{$7f}{CBM-L} D{$60} sD ^D{CBM-G}) ID{SHIFT-POUND}O UD{SHIFT-POUND}{CBM-Y} J{$f1}NjP{$f6}{SHIFT-POUND}P J{$f1} sD{SHIFT-POUND}@%PH{$e8} {$e5}{SHIFT-POUND}{CBM-G} UD{SHIFT-POUND} J{$f1}NjP{$f6}{SHIFT-POUND}{CBM-M} J{$f1} sD{$e8}{$e8} ^D{SHIFT-POUND} {$60}{CBM-T}{CBM-Z}{CBM-R}h{CBM-Z}{CBM-W}h{CBM-Z}{CBM-H}h{CBM-Z}{CBM-J}h{CBM-Z}ah{CBM-Z}bh{CBM-Z}{CBM-POUND}h{CBM-Z} Ph{CBM-Z}!Ph{SHIFT-POUND} P!P{SHIFT-POUND} 5{CBM-@}6{CBM-@} {CBM-Q}{CBM-T}{SHIFT-POUND} 2{CBM-@}4{CBM-@}3{CBM-@}{SHIFT-POUND}{CBM-POUND}{SHIFT-POUND}a{SHIFT-POUND}{CBM-A}b{SHIFT-POUND}{CBM-W}{SHIFT-POUND}{CBM-R}{SHIFT-POUND}{CBM-J}{SHIFT-POUND}{CBM-H}{SHIFT-POUND} h{SHIFT-POUND}PhL{SHIFT-POUND}{SHIFT-POUND} 2{CBM-@}3{CBM-@}4{CBM-@}{CBM-I} {$e5}{SHIFT-POUND} {SHIFT-POUND}O J{$f1} {SHIFT-POUND}{CBM-Y} J{$f1}P{$f8}{CBM-I} {$e5}{SHIFT-POUND}{CBM-H} J{$f1}{CBM-I} {$e5}{SHIFT-POUND}{CBM-H} J{$f1}{SHIFT-POUND} PQRS{$f8}{$f9}{$fa}{$fb}{SHIFT-POUND} h{SHIFT-POUND}ThL{CBM-Q}{CBM-Z}{CBM-M}I {$f0}@I!{$f0}<I{$f0}8I{$f0}4h{CBM-Z}2{CBM-@}{$f0}-M4{CBM-@}{$f0}( {CBM-Q}{CBM-T} {CBM-Z}2{CBM-@}I{CBM-A}{CBM-POUND}h {$f2}{CBM-T}Hh{CBM-Z}2{CBM-@}8{$e5}{CBM-POUND}{CBM-O}{CBM-A}{CBM-W} J{$f1}H{CBM-POUND}P{$e5}HIIPl7 IP){CBM-D}2{CBM-@}5{CBM-@}{$f0}{CBM-O}{CBM-P}{CBM-W}{CBM-P}{CBM-H}P{$f7}{CBM-D}3{CBM-@}6{CBM-@}{CBM-O}{$7e}O{CBM-P}{CBM-J}{CBM-O}/{CBM-H}/{CBM-J}P{$f1}lL IP{SHIFT-POUND} 5{CBM-@}6{CBM-@}lL IPP{CBM-D}5{CBM-@}{$f0}HM2{CBM-@}I{CBM-A}{CBM--}h {$f2}{CBM-T}Hh{CBM-Z}5{CBM-@}8{$e5}{CBM-POUND}M2{CBM-@}{CBM-N}{CBM-O}{CBM-A}{CBM-H}{CBM-A}{CBM-W} J{$f1}H{CBM-POUND}P{SHIFT--}{CBM-Z}2{CBM-@}7{CBM-@}M5{CBM-@}2{CBM-@}4{CBM-@}{CBM-D}6{CBM-@}{CBM-S}3{CBM-@}JE{CBM-N}{CBM-O}{CBM-P}{CBM-J}{$7f}O{CBM-O}/{CBM-J}M7{CBM-@}0{CBM-H}JP{$ec}{CBM-Z}3{CBM-@}M6{CBM-@}3{CBM-@}lL IPg{CBM-S}3{CBM-@} {$f0}{$f2}J{SHIFT-POUND}~{CBM-Z}2{CBM-@}8{$fd}0{CBM-H}{CBM-POUND}hh {CBM-@}{CBM-I} {CBM-Z}2{CBM-@}8{$e9}{CBM-POUND}{CBM-O}{CBM-A}{CBM-W}{CBM-N} J{$f1}N2{CBM-@}H{CBM-POUND}P H{CBM-N}{CBM-X}0{CBM-H}2{CBM-@}4{CBM-@}3{CBM-@}lL I{$f0}l{CBM-I}{CBM-G}Zh{CBM-G}{$7b}h{CBM-Z} h{CBM-Z}h{SHIFT-POUND}. {SHIFT-POUND}O{CBM-D}3{CBM-@}{SHIFT-POUND} {$7f}O{SHIFT-POUND}{$7f}Z{SHIFT-POUND}O{$7b} O {CBM-Q}{CBM-T} h{CBM-O} {$f0} {$f2}{CBM-T}{CBM-G} J{$f1}H{CBM-POUND}{CBM-G}{CBM-A}{CBM-W}{$7f}O0{CBM-H}HP{$de}H2{CBM-@}4{CBM-@}3{CBM-@}HH H{$7b}HZlL l8{CBM-T}I{$f0}{$f9}I P{CBM-Z}4{CBM-@}IN4{CBM-@} {CBM-@}{CBM-Z}4{CBM-@}8{$e9}{CBM-POUND}{CBM-O}{CBM-A}{CBM-W} J{$f1}lL I!P{CBM-Z}4{CBM-@}M2{CBM-@}{CBM-A} {$f2}{CBM-T}{$ee}4{CBM-@}{CBM-D}4{CBM-@}{CBM-O}{CBM-P}{CBM-W} J{$f1}lL {CBM-Z}2{CBM-@}I{$7e}{CBM-A}{$f6} {CBM-S}{CBM-M}J{$f0} {CBM-O}8{CBM-@}H){$f0}{$f8}P{$f3}{CBM-S}{CBM-M}J{CBM-X} dgarithm notboolean not sgnvalue of sign ee*10e (sci notation) all clear atnarc-tangent sinsine (open parenthesis )close parenthesis ^exponentiation msmemory store 77 88 99 /division mcmemory clear 44 55 66 *multiplication mrmeZ{CBM-@}{CBM-S}3{CBM-@}{$7f}O{CBM-Z}2{CBM-@}{CBM-S}3{CBM-@}0{CBM-H}{$ee}3{CBM-@}{CBM-N}{CBM-O}8{CBM-@}h){$7f}{CBM-A}{CBM-W}H{$e8}hh {$f2}{CBM-T}{CBM-G} J{$f1}{$ee}4{CBM-@}H{CBM-N}H{CBM-POUND}H){$f0}{SHIFT-+}2{CBM-@}lL {$7c}{CBM-T}H!PH PH{CBM-POUND}HbHaH{CBM-J}H{CBM-H}H{CBM-W}H{CBM-R}{$60}{SHIFT-POUND} {$f7}{$f9}{SHIFT-POUND}{$f8}{SHIFT-POUND}{CBM-U}{$fa} {CBM-T}{SHIFT-POUND}X{$f8}{SHIFT-POUND}{CBM-C}{$fa}l{CBM-T}{SHIFT-POUND} {$f9}{$f7}{SHIFT-POUND}{$fa}{SHIFT-POUND}{CBM-U}{$f8} {CBM-T}{SHIFT-POUND}X{$fa}{SHIFT-POUND}{CBM-C}{$f8}l{CBM-T}{CBM-I} {CBM-E}{$f7}{$f9}HP{$f9}{$e6}{$f8}{$e6}{$fa}JP{$f0}{$60} {CBM-I} {$e5}{SHIFT-POUND} {CBM-G}G{SHIFT-POUND}{CBM-A} J{$f1}{CBM-I}{SHIFT-POUND}C J{$f1}JP{$f8}{SHIFT-POUND}{CBM-S} J{$f1} {CBM-I} {$e5}{CBM-I}{SHIFT-POUND} J{$f1}JP{$f8} {$e7}{CBM-T} {CBM-I} {$e5}{SHIFT-POUND}{$7d}lJ{$f1} {CBM-O}x {SHIFT-POUND}{CBM-+} {SHIFT-POUND}*8{CBM-I}9{$e8}{CBM-L}{CBM-W}{$e8} {SHIFT-POUND}{CBM-R}{SHIFT-POUND}L{CBM-J}{SHIFT-POUND}{$e2}{$60}{$ea}I@lAII1{$f0}2I2{$f0}.I8{$f0}I9Prh{CBM-G}W {CBM-I} {CBM-E}{CBM-J}{$f0}jH{$e8}P{$f5}Hr{SHIFT-POUND} s P{$60} P{$e1}h{SHIFT-POUND}{CBM-N} {SHIFT-@}~{SHIFT-POUND} {CBM-X}~ {SHIFT-*}~{CBM-A}{$e8}{CBM-I} I~HI1{$f0}{CBM-G}-A{CBM-G}.B {$e5}p{SHIFT-POUND} {$f0}CL{CBM-G}{$eb}h{CBM-G}{$ec}h{SHIFT-POUND}{$f8}{CBM-I} {SHIFT-*}{CBM-I} {CBM-X}^{CBM-M}{$e8} P{$f6}{SHIFT-POUND} ]JP{$fa}{CBM-G}{$eb}0 {CBM-G}{$e7}{$ea}{SHIFT-POUND}V {SHIFT-*}I {$f0} R~{SHIFT-POUND} {$f0}{$f2} R~{CBM-+}{$eb}{$e4}{$e5}P{CBM--}{SHIFT-POUND} {$f8}{CBM-I}{CBM-J}{CBM-+}]JP{$f8}H{CBM-POUND}H{CBM-N} {SHIFT-*}{SHIFT-POUND} C~ L(.){CBM-R}0 {CBM-M} 60 < "switch monitor to 40-column mode w "and press a key..." A( {CBM-K}{$f9} a$ R2 {$fe}&:G(27)"x" < {$fe} "indexer.ml" izer indx.run {SHIFT-POUND} ~ P!P{$fe}~-{SHIFT-POUND}{$7d}{CBM-G}){$7f}{CBM-Z}{$f2}, O' {$7d}~ i n d e x e r v1.0 mahmood merchant (august 1990) records free: ( {$7d}~ used: {$f7}' {$7d}~ l - load f - find {CBM-S}-P{CBM-X}{$e1}{$e8}I P{$f8}J- {$7d}~ a - add c {$fe}{$fd}{CBM-+}{CBM-@}{$e8}PH{SHIFT-POUND}{$fd} X~ {CBM-B}*l^l*l^{CBM-I} {$f0}~{CBM-S}-{$f0}* {$7d}~*** file in memory will be erased *** {$7d}~ enter filename: {SHIFT-POUND}{SHIFT-POUND}- {CBM-H}*{CBM-A}{CBM-T}{CBM-+}{$f0}- v#{CBM-I}{SHIFT-POUND} H~{SHIFT-POUND} {CBM-POUND}{CBM-I} {SHIFT-@}~{CBM-Z}-I{CBM-I}{$fd} , {CBM-X}~{SHIFT-POUND} {CBM-I}{$fe} U~ {CBM-B}*{CBM-Z}C-I0P {CBM-Z}D-I0Pl{CBM-I} -l{CBM-S}-P f( t*l^ {$7d}~ view e+l^{CBM-Z}{$7b}-{CBM-Z}{$7c}- {$7d}~ {SHIFT-POUND}{CBM-I} *{CBM-S}-{SHIFT-POUND} {CBM-S}xH{CBM-O}xXxXHH{SHIFT-*}P{$eb} P{CBM-I}{CBM-X}x{$e8}xJ{CBM-X}xX{$e8}xXJJ ~P{$eb} {CBM-I} {$e5}{SHIFT-POUND}{$60} taNcoSoRsqRatNsiN{CBM-POUND}{SHIFT-POUND}{$de}{CBM-Y}{CBM-U}{CBM-O}{CBM-P}{CBM-H}{CBM-J}{CBM-L}{CBM-N}{CBM-E}{CBM-R}{CBM-W}{CBM-Z}{CBM-A}{CBM-S}{CBM-Q}anDabSexPinTloGnoTsgNE{SHIFT-*}{CBM-V}{CBM-A}{SHIFT-@} A{CBM-B}(){CBM-S} 789{CBM-Z} 456{CBM-D} 123{CBM-Q} 0. {CBM-N} {CBM-P}{CBM-L}{CBM-X}{CBM-J}{CBM-C}{CBM-POUND}{CBM-H}e4{CBM-@} {CBM-@}{CBM-Z}4{CBM-@}8{$e9}{CBM-POUND}{CBM-O}{CBM-A}{CBM-W} J{$f1}lL I!P{CBM-Z}4{CBM-@}M2{CBM-@}{CBM-A} {$f2}{CBM-T}{$ee}4{CBM-@}{CBM-D}4{CBM-@}{CBM-O}{CBM-P}{CBM-W} J{$f1}lL {CBM-Z}2{CBM-@}I{$7e}{CBM-A}{$f6} {CBM-S}{CBM-M}J{$f0} {CBM-O}8{CBM-@}H){$f0}{$f8}P{$f3}{CBM-S}{CBM-M}J{CBM-X} e+l^{CBM-Z}{$7b}-{CBM-Z}{$7c}-{CBM-Z}~EP {CBM-Z}{$fe}EPl["8{CBM-Z}{$fe}{$e5}{CBM-Z}~{$e5}{SHIFT-POUND}{CBM-O} ){CBM-+}{CBM-+} , ){CBM-@}{CBM-I}{$7f} {CBM-I}{CBM-I}{$7f} {CBM-P}{$f3}{CBM-G}PFFPU{CBM-G}PQ 2({CBM-I} {$f0}~ {$7d}~record erased t*l*{CBM-S}-P f( t*l^ {$7d}~ insert e+l^{CBM-Z}{$7b}-{CBM-Z}{$7c}- (*{CBM-I} {$f0}~ {$7d}~no more record space t* 2(l^8{CBM-Z}{$fe}{$e5}{CBM-Z}~{$e5}{SHIFT-POUND}{CBM-O}{CBM-Z}{$fe}L~{$60}{$ea}{CBM-H}{CBM-G}W0l{$7e} {SHIFT-POUND} {CBM-R} {CBM-B}{CBM-T}{CBM-G}){$e6}{$f0}lLY {CBM-I}{CBM-G}){$f0}j{$e8}{$e8}{$e8} G{CBM-+}{SHIFT-POUND} {CBM-N} {$60}{CBM-+}{CBM-H}{SHIFT-POUND} w8 Xh {CBM-K}H{CBM-N}l<m{CBM-I} e{CBM-POUND} F~ T CU qP> CV qP3NTP{$e5}{CBM-S}U{CBM-Z}V 2{SHIFT-POUND} I Ch qPH{$f0} IP{$ef}{SHIFT-POUND} I {$f0} P H O{SHIFT-POUND} lU{SHIFT-POUND} Q{CBM-R}P{SHIFT-POUND} {CBM-R}P{CBM-R}{CBM-G}{$ec}I{$f0}{CBM-POUND}{CBM-+}{$eb} {SHIFT-*} Psys5120, diRd0,u I7{$f0}HI6{$f0}DI5{$f0}(I4{$f0}I3PH{CBM-E} {$fc}({CBM-G}~{$f0}F{$f0}{CBM-G}-l${CBM-G}-l%{CBM-G}-{CBM-I} {$f0}~ {$7d}~: {SHIFT-POUND}{SHIFT-POUND}-{CBM-I}?{CBM-S}-{CBM-X}{$f3},G-{CBM-N} H({CBM-A}{CBM-+}I-{CBM-G}~{$f0}/{CBM-I} {$f0}~ {$7d}~: {SHIFT-POUND}{SHIFT-POUND}{SHIFT-POUND}-{CBM-I}?{CBM-S}-{CBM-X}{$f3},H-{CBM-N} H(l${CBM-+}J-{CBM-I} {$f0}~ {$7d}~searching {SHIFT-POUND}O{SHIFT-POUND}-{CBM-I} M-N-{CBM-S}-{CBM-G}8{$fd}{$f3},JP{$f9}8{CBM-Z}G-{$ed}I-I{CBM-G} ,l5& ){SHIFT-POUND} {$fa}{CBM-@}{CBM-I}{$7f} {CBM-I}{CBM-+}{$fa}{SHIFT--}-PH{$e6}{$fa}{CBM-G}{$fa}MI-P{$ea}{SHIFT-POUND}K- correct e - erase i - insert v - view s - save d directory {SHIFT-POUND}{CBM-N}{CBM-O}{CBM-I} {$f0}~ {$7d}~q (P-l{SHIFT-POUND} {$7d}-{CBM-I} * {$f7}({CBM-S}-{SHIFT-POUND} - {$fc}({CBM-I} {$f0}~ {$7d}~@ {$e4}~Ia{$f0}:Ic{$f0}(Ii{$f0}*Il{$f0}Iv{$f0}Ie{$f0}If{$f0}Is{$f0} IdPYl lll{CBM-C}l{$f9} lZ!l{$7e}"lB#{$ea}{$ea} ({$f0}U (*{CBM-I} {$f0}~ {$7d}~no m - {$fc}( {$7d}~-view {$ee}{$7d}- ) H){CBM-I} {$f0}~ {$7d}~use cursor keys to move through list {CBM-I} {$f0}~ {$7d}~press esc to exit {$e4}~I{$f0}I{$f0} IP{$f1}l* ,l {CBM-R},l L~{SHIFT-POUND}{CBM-U}{SHIFT-POUND}{SHIFT-@}{SHIFT-POUND} {CBM-O}{SHIFT-POUND}{CBM-Y}{SHIFT-POUND}{$7e}{CBM-F}{SHIFT-POUND}-{CBM-C} {SHIFT-*}~{CBM-I} {$e8} F~ {$7d}~ {$fb} {$e4}~{CBM-+}{$fc}{$fc}{CBM-@}P({CBM-@}{$fb}P{$ee}{CBM-@}{$fc} 2{SHIFT-POUND} -G {$e4}~{CBM-+}P{CBM-N}{$f0} -GlJ {SHIFT-POUND} -G PK L~{SHIFT-POUND} C~{SHIFT-POUND} -G -G {CBM-B}*l{$7d}-{SHIFT-POUND} {SHIFT-POUND}O{SHIFT-POUND}-{CBM-Z}M-PNN-NM-{SHIFT-POUND}? ~ {CBM-E}H{CBM-E}{SHIFT-POUND} ~ ) H){CBM-I} {$f0}~ {$7d}~use cursor keys to move through list press esc to exit {$e4}~I{$f0}I{$f0}-IP{$f1}l*{CBM-Z}M-EP {CBM-Z}N-EPlS'{$e6}P{$e6}{$e6}P{$e6}{$e6}P{$e6}l'{CBM-G}P{CBM-G}PlS'{CBM-G}PFF{CBM-G}PFFPFFl'{SHIFT-POUND} {$fc}{SHIFT-POUND}{$fb}{$fd}{$e6}P{$e6}8{CBM-G}{$fc}{$e5}{$fc}{CBM-G}{CBM-Z}~ ){CBM-+}{CBM-+} {CBM-R}, ){CBM-@}{CBM-I}{$7f} {CBM-I}{CBM-I}{$7f} {CBM-P}{$f3}{CBM-G}PFFPU{CBM-G}PQ{SHIFT-POUND}{CBM-O} ) {$7d}~ {SHIFT-POUND}{CBM-I} *{CBM-S}-{SHIFT-POUND} - {$fc}( {$7d}~-insert ll!{CBM-I}{CBM-X}--J{$f7}{$60}{CBM-S}-P f( t*l^ {$7d}~ {SHIFT-POUND}{CBM-I} *{CBM-S}-{SHIFT-POUND} - {$fc}( {$7d}~-find a - one field b - two fields (and) enter: c - two fields (or) {CBM-I} & {$f0}~ {$f7} {SHIFT-@}{CBM-J}{CBM-I} LM. HH{CBM-I}{CBM-E}{CBM-J} LM/ {CBM-+}{$eb}{CBM-@}{$ec} {SHIFT-*}{$60}{CBM-I} ZMh{CBM-I}{SHIFT-POUND} LM{CBM-I}!{SHIFT-POUND} LMJH LMQ{CBM-J}PH{CBM-E}{CBM-J}{CBM-I} LM{$e8}{SHIFT-POUND} LM {CBM-I}{SHIFT-POUND}~ LMP{$fa}{$60}h{CBM-I}{CBM-E}{CBM-J} LM{$e8}{SHIFT-POUND} LM{CBM-M}{SHIFT-POUND}{CBM-POUND}HI7{$f0}{CBM-I} {CBM-E}{CBM-M} LMHP{$f8}{$e6}{CBM-POUND}{CBM-G}{CBM-POUND}I{CBM--}{$f0} IP{$ec}{SHIFT-POUND}X{CBM-POUND}P{$e6}{$60}{CBM-I} ZM{CBM-M}HP{$f8}{$e6}{CBM-POUND}{CBM-G}{CBM-POUND}I{CBM--}{$f0}{$eb}IP{$ec}{SHIFT-POUND}X{CBM-POUND}P{$e6}{SHIFT-POUND}*8{SHIFT-POUND}9l@]JP{$fa}{CBM-G}{$eb}0 {CBM-G}{$e7}{$ea}{SHIFT-POUND}V {SHIFT-*}I {$f0} R~{SHIFT-POUND} {$f0}{$f2} R~{CBM-+}{$eb}{$e4}{$e5}P{CBM--}{SHIFT-POUND} {$f8}{CBM-I}{CBM-J}{CBM-+}]JP{$f8}H{CBM-POUND}H{CBM-N} {SHIFT-*}{SHIFT-POUND} C~ -PFP{SHIFT-POUND} K-l &{$e6}PM{CBM-G}~{$f0} 0{$60}{CBM-Z}K-{$f0}{CBM-M}lK&{CBM-Z}K-{$f0} {CBM-G}H{CBM-G}{$e6}P{$e6}{$e6}P{$e6}{$ee}M-P{$ee}N-l{CBM-I}%{CBM-Z}N-P%{CBM-Z}M-P {CBM-I} {$f0}~ {$7d}~search failed t*l*{CBM-G}{CBM-G}lI&{CBM-Z}K-P{CBM-POUND}{CBM-S}-{CBM-G}8{$fd}{$f3},JP{$f9}8{CBM-Z}H-{$ed}J-I{CBM-G}{SHIFT-POUND} {$fa}{CBM-@}{CBM-I}{$7f} {CBM-I}{CBM-+}{$fa}{SHIFT--}{SHIFT-POUND}-PH{$e6}{$fa}{CBM-G}{$fa}MJ-P{$ea}{SHIFT-POUND}L-PFP{SHIFT-POUND} L-l{CBM-V}&{$e6}PM{CBM-Z}L-Pl{CBM-I}%l& {$7d}~ {SHIFT-POUND}{CBM-I} *{CBM-S}-{SHIFT-POUND} - {$fc}( {$7d}~-find {$ee}ore record space t* 2(l* 2( ({CBM-A}{$f2}{CBM-Z}{$fe}{CBM-Z}~ ) {$7d}~ {SHIFT-POUND}{CBM-I} *{CBM-S}-{SHIFT-POUND} - {$fc}( {$7d}~-add ) H)F 2(lzl* f( {$7d}~to create a file enter name: {CBM-D}*{CBM-A};{CBM-G}-{$f0}4l{CBM-S}-P f( t*l^{SHIFT-POUND}{CBM-I} * {$7d}~saving {CBM-S}-{SHIFT-POUND} - {$fc}( t*l^ +{CBM-I}{SHIFT-POUND} H~{SHIFT-POUND} {CBM-POUND}{CBM-I} {SHIFT-@}~{CBM-Z}-I{CBM-I}{$fd} , {CBM-X}~ ({CBM-Z}{$fe}{CBM-Z}~ 2( ){SHIFT-POUND}{$fe}{SHIFT-POUND}*{CBM-S}-P f( t*l^ {$7d}~ correct e+l^{CBM-Z}{$7b}-{CBM-Z}{$7c}- {$7d}~ {SHIFT-POUND}{CBM-I} *{CBM-S}-{SHIFT-POUND} - {$fc}( {$7d}~-correct {$ee}{$7d}-{CBM-I}{$7f} ) H){CBM-I} {$f0}~ {$7d}~press esc to exit {CBM-S}{$f3}, {CBM-I} {$f0}~{CBM-@}{CBM-O}{$f3},{$fa}{$fb}{CBM-G}{$fe}8 {$f0}~{$e8}{$e8} {$f0}~ G,{CBM-G}I{CBM-POUND}{CBM-+} {$f0}~{CBM-@}{$ec}{CBM-E} I PF{$ec}F{$fb}P{$f2}{$e6}{$ec}{CBM-I} ' V({CBM-A}{CBM-G}EFP{CBM-E}l*{CBM-S}-P f( t*l^ {$7d}~ erase {$fd}{$e9} {$fd}P{$eb}{CBM-G}{$fc}E{CBM-A}{$e5}{$60}{CBM-S}{$fe}{CBM-Z}~l28{CBM-G}{$ed}{$fe}{CBM-N}{CBM-G}{$ed}~l2{CBM-Z}{$fe}P{CBM-Z}~{$60}{$ee}{$fe}P{$ee}~{CBM-Z}~EP{CBM-G}M{$fe}$8{$60}{CBM-Z}{$fe}PN~N{$fe} ({$f0}$8{$60}{CBM-I} {$f0}~ {$7d}~no data in memory {$60}{$fa}{$fe} G,{CBM-I} ' {$fb} {$e4}~I{$f0}I {$f0}#I{$60}{CBM-A}{$f1}I{$f0}II {$e9}{CBM-+}{$fb}{$e4}{$fa}{$f0}{$e3}{$e6}{$fb} -GlV({CBM-+}{$fb}{$f0}WF{$fb}l({$ee}' {CBM-@}{$ec}{CBM-E} ){$7f} {CBM-G}{$fb}{CBM-+}{$fc}{CBM-@}{$fd} {$f0}~{SHIFT-POUND}{CBM-N} {SHIFT-@}~{SHIFT-POUND} {CBM-X}~ {SHIFT-*}~{CBM-I} F~{CBM-I} {$fb} {$e4}~{CBM-@}{$fe}{CBM-+} {CBM-P}{$e6}{$fe}{$e6}{$fb}{CBM-+}{$fb}{$e4}{$fa}P({CBM-I} ~' {$e4}~I{$f0}Ia{$f5}Id{CBM-A}{$f1}{$ee}' -GIa{$f0}IcPF~,{$e6}~l$${$ee}' l*{CBM-Z}{$f3},I1{SHIFT-POUND}{CBM-I} {SHIFT-POUND}- {$7d}~ {CBM-G}hiHP {$7d}~ l_$ {$7d}~ 8{CBM-G}{$e5} -G {$7d}~ - {CBM-I}{CBM-G}{CBM-@} {$fc}({CBM-G}I{CBM-G}I FP{CBM-U}{CBM-I}{CBM-I} {$f0}~{CBM-Z}{$f3},I1 {$7d}~ enter {$f7}({CBM-I} ' {$e4}~I{$f0}I1{$f5}E{CBM-A}{$f1}8{$e9}1{CBM-N}8{CBM-Z}{$f3},{$e5}{SHIFT-POUND} {$ee}' l{SHIFT-+}$l$IJP{$fa}I{SHIFT-POUND} I-{CBM-POUND}{CBM-G}{CBM-I}{$ec} L~{SHIFT-POUND} C~{$60}{$ee}' 8{$60}{SHIFT-POUND}{$f1}{$60}{$fa}{$fb}{$fc} {CBM-E}{$fa} R~HD{$fc}P{$f6}{$60}{CBM-@}{SHIFT-POUND} {CBM-I}{$7f} {CBM-P}{$f8}{$60}{CBM-+}{CBM-@}PJ{CBM-G}{$fa}{$fb}{$fd}{SHIFT-POUND} {CBM-I}JF{$fa}E{$fb}J{$f5}{$fb}{CBM-G}{$fc}{SHIFT-POUND} {CBM-I}JF{$fc}E{$fd}J{$f5}{$fd}{CBM-G}{$fb}E{$fc}{CBM-G}{$fa}{CBM-G}I{$60}{CBM-I} {$f0}~ {$7d}~record # {CBM-+}{CBM-G} 2{SHIFT-POUND} -G {$7d}~ {SHIFT-POUND} {CBM-Z}{$f3},{SHIFT-POUND}{$fd}{SHIFT-POUND}-{$fe}{CBM-I}{CBM-G}{$fd}{CBM-@}{$fe} {$fc}({CBM-G}{$fd}I{$fd}{CBM-G}{$fe}I {$fe} {$f7}({CBM-+}{CBM-X}{$f3},{$fa} <* {$7d}~ FPP{CBM-S}{$7d}-{$f0}{$60}{CBM-I}{$7f}{CBM-I} {$f0}~ L(.){CBM-R}0 {CBM-M} 50 i "switch monitor to 40-column mode, press a key" r {CBM-K}{$f9}a$ C( G(27)"x":{$fe}& L2 W130 < {$e8}:"in order to use customizer, first copy " Of "indexer.ml to a work disk. place that " {$fa}p "work disk in the drive and enter the +z{$fe} on line, in touch, out of sighjohn ryan feb 9026 c-64 features tfoosball 64 tony brantner feb 9032 c-64 features gdou robert cook feb 9036 c-64 features gsuper fonts r. r {$f2}{CBM-+}{$fa} -GJP{$fa}8 {$f0}~{$fc}{$fd}l{$f7}(h indx. article :author :issue :page :computer:section :category: : $0:indx.* ~{CBM-I} {$fb} {$e4}~W-{$e6}{$fb} creates indexer e {$e8}:"use this program to create indexer.ml R "on a work disk. place a formatted work ( "disk in the drive and press a key... {CBM-M}2 {CBM-K}{$f9} a$ D< 8,8,8,"indexer.ml,p,w" {$e1}f "creating indexer.ml... {$fb}p a$: a${CBM-R}"-1" {CBM-M} 8: {$7d}~press esc to exit {CBM-S}{$f3},{CBM-I} {CBM-+}{CBM-X}{$f3},{CBM-N}{CBM-@} H({CBM-A}{CBM-G}E8 {$f0}~{$e8}{$e8} {$f0}~FPZ{$60}{CBM-G}{CBM-POUND}{CBM-I}{$7f} {CBM-I} -GHF{$fa}P{$f3}{CBM-G}E{$60}{CBM-I} {$f0}~ {$7d}~press return to continue {$f7}({SHIFT-POUND} ' {$e4}~I {$f0}IP{$f5}h{$ee}' {$7d}~p HI{$60}M-{$fa}8{SHIFT-POUND}({$e5}{$fa}j{CBM-POUND}l{$f0}~{SHIFT-POUND}{SHIFT-POUND}-{CBM-I} {SHIFT-POUND} lH({SHIFT-POUND}{CBM-POUND}{CBM-I} {SHIFT-@}~{SHIFT-POUND} {CBM-X}~ {SHIFT-*}~{CBM-I} F~{SHIFT-POUND} {$fb} O~I {$f0}{CBM-+}{$fb}C{CBM-N}n{CBM-Q}i),l(i): # R{CBM-T}10)"record length =";rc e {$7c}{CBM-T}9)"any corrections (y/n)?"; n {CBM-K}{$f9}a$ L a${CBM-R}"y"140:Ua${CBM-W}{CBM-E}"n"390 "saving modified program..." {SHIFT-POUND} {CBM-@}"enter filename";f$ A {CBM-S}f${CBM-R}""{CBM-A}C(f$){CBM-E}16410 {$de} {CBM-U}{$fe}(f$),b1,p7171 {CBM-@} p11727 !Bds{CBM-R}63{CBM-M}{$fe}:"file e "filename for indexer.ml at the prompt. " ?D {$fe}0,4,39,24:{$fe}1 GN "filename";f$:f${CBM-R}""{CBM-A}C(f$){CBM-E}16110 UX {$fe}(f$),b1 ds{CBM-W}{CBM-E}0{CBM-M}"";ds$:490 {CBM-H} rc{CBM-R}0:d{CBM-R}B(8336):d${CBM-R}"y":d{CBM-R}9{CBM-M}d${CBM-R}"n" {$e6} "full directory ";d$;:"";d$:d${CBM-R}H(d$,1) ~ d${CBM-W}{CBM-E}"y"{CBM-P}d${CBM-W}{CBM-E}"n" {CBM-U}ockefeller feb 9042 all features ufast-40 bret timmons feb 9044 all features ujiffydos review m. cavanaugh feb 9061 all hw gallery r calculator.o escape key 128 20202020 g{$fa} 49204e20442045205820*452052202056312e3020*20202020202020202020 20202020204d41484d4f*4f44204d45524348414e*54202841554755535420 Q 31393930292020202020*9211110d09099d9d9d9d*5245434f524453204652 45453a0500200028207d*ff0d9b09091z C(a$){CBM-W}62 {CBM-M} 150 :D b${CBM-R}J(a$,1,20){CBM-N}J(a$,22,20){CBM-N}J(a$,43,29) hN n{CBM-R}C(b$){CBM-Z}2 vX i{CBM-R}1 {CBM-@} n S h${CBM-R}J(b$,i{CBM-D}2{CBM-Q}1,2):h{CBM-R}Q(h$) 8,G(h);:: 80 {CBM-T} C(a$){CBM-W}20 {CBM-M} b${CBM-R}a$:180 {CBM--} C(a$){CBM-W}42 {CBM-M} b${CBM-R}J(a$,1,20){CBM-N}J(a$,22,(C(a$){CBM-Q}21)): 180 {CBM-N} b${CBM-R}J(a$,1,20){CBM-N}J(a$,22,20){CBM-N}J-{$e6}{$fb}P{$f0} L~{SHIFT-POUND} C~8{CBM-G}{$fb}{$ed}-{CBM-I} * {$f7}({CBM-+}{$fb}{SHIFT-POUND}C - {$fc}(lt*{SHIFT-POUND}{CBM-N} H~{SHIFT-POUND}{CBM-POUND}{CBM-I} {SHIFT-@}~{SHIFT-POUND} {CBM-X}~ {SHIFT-*}~{CBM-I} I~{SHIFT-POUND}s R~{SHIFT-POUND}: R~{CBM-Z}-I{CBM-N}{SHIFT-POUND}{$fd} , {$fc}( L~{SHIFT-POUND}lC~ {$7d}~ - enter record # {CBM-S}-{$fa} N,{CBM-I} ' {$fb} {$e4}~I{$f0}I {$f0}(I{$f0}I0{$ed}I:{CBM-A}{$e9}{CBM-+}{$fb}{$e4}{$fa}{$f0}{$e3}{$e6}{$fb} -GlT+{CBM-+}{$fb}{$f0}WF{$fb}l+{$ee}' 8{$60}{CBM-G}{$fb}{$f0}{$f5}{$ee}' {CBM-@}{$ec}{CBM-E} ){$7f} {CBM-+}{$fc}{CBM-@}{$fd} {$f0}~{SHIFT-POUND}{CBM-N} {SHIFT-@}~{SHIFT-POUND} {CBM-X}~ {SHIFT-*}~{CBM-I} F~{CBM-I} {$fb} {$e4}~W-{$e6}{$fb} xists! replace it (y/n)" /!L{CBM-K}{$f9}a$:a${CBM-R}"y"{CBM-M}{$f2}(f$):440:U410 a!V{$fe}:ds{CBM-W}{CBM-E}0130 y! "save completed!" X!{$ea}{$fe}15:{$fe}0,0,39,24: 1,0,15: i),j,1)): {CBM-E}j{CBM-T}25)"length ";l(i):"";l(i) Itl(i){CBM-W}1{CBM-A}l(i){CBM-E}30330 {$e5}^rc{CBM-R}rc{CBM-N}l(i):: 11506,rc Hi{CBM-R}1{CBM-@}n:(11508150 {CBM-N} d{CBM-R}9:d${CBM-R}"y"{CBM-M}d{CBM-R}2 {CBM-H} 8336,d i{CBM-V} n{CBM-R}B(11507):i{CBM-R}1{CBM-@}n:l(i){CBM-R}B(11508{CBM-N}n{CBM-Q}i): {$7b}H "number of fields ";n:"";n R n{CBM-W}2{CBM-A}n{CBM-E}8{CBM-M}"";:200 {CBM-K}{CBM--} 11507,n {CBM-D}{$e6} i{CBM-R}1{CBM-@}n {CBM-O}{$f0} f$(i){CBM-R}"" D{$fa} j{CBM-R}1{CBM-@}8 {$e6}f$(i){CBM-R}f$(i){CBM-N}G(B(11537{CBM-N}i{CBM-D}9{CBM-N}j)) {$ec} "field 4153450909*1220492092202d20494e*53455254110d12205620 O!j 92202d20564945570909*1220532092202d205341*5645110d09099d9d9d12 {CBM-H}!t 20442092202044495245*43544f525911110d00a9*818daa028db90218a203 {$f9}!^ a00020f0ff207dff1b51*00200f28d0068d1a2d4c*961da9008d7d2da d1d1d1d55*5345443a050020f72720 [ " 7dff0d11119b12204c20*92202d204c4f41440909*1220462092202d204649 , 4e44110d00ae882dd00c*bde104e8c920d0f8ca8e*882d207dff1220412092 {$e5} 6 202d2041444409091220*432092202d20434f5252*454354110d1220452092 *!@ 202d204552(a$,43,C(a$){CBM-Q}42) {CBM-H} n{CBM-R}C(b$){CBM-Z}2 ({CBM-V} i{CBM-R}1 {CBM-@} n eH h${CBM-R}J(b$,i{CBM-D}2{CBM-Q}1,2):h{CBM-R}Q(h$) yR 8,G(h);:: 80 X{CBM--} indexer database utility {CBM-X}{$e6} 031ca9008d00ff8d20d0*8d21d08dfe038dff038d*882da97d8d1803a59d29 {$f0} 7f859dadf22c858020cf*27207dff8e05939b0b12*202020202020{CBM-+}{$fb}{$e4}{$fa}P{$f2} L~{SHIFT-POUND} C~{CBM-I} {$7b}-{$7c}- p,{CBM-X}W-8{$e9}0M{$7b}-{$7b}-{CBM-Z}{$7c}-I {$7c}-{$e8}{$e4}P{$e3}{CBM-Z}~M{$7c}-{$f0}l),{CBM-Z}{$fe}M{$7b}- {CBM-Z}{$7b}-P {CBM-Z}{$7c}-P{CBM-+}{$fc}{CBM-@}{$fd} {$f0}~ {$7d}~ lE+{$60} {$7b}-{$fe}{CBM-Z}{$7c}-~P{CBM-G}{$fe}P{$60}{$fe}&~{$fe}&~{CBM-Z}{$7b}-E{$fe}{$7b}-{CBM-Z}{$7c}-E~{$7c}-{$7b}-.{$7c}-{$60}{$e6}P{$e6}{CBM-G}M~P{CBM-Z}{$fe}E{$60}8{$60}{$e6}P{$e6}{CBM-G}M~P{CBM-Z}{$fe}E{$60}l{CBM-R},{CBM-G}PFF{CBM-G}P{CBM-G}Pl,{$60} {$7d}~ {CBM-+}{$fa}{SHIFT-POUND}{CBM-T} -GJP{$fa}{SHIFT-POUND} -G{SHIFT-POUND}20320 >"H 9b2a20f728ae1a2da902*a02d20fc2818a21220f0*ff207dff1b400020e4ff "R c941f03ac943f028c949*f02ac94cf017c956f019*c945f01bc946f01dc953 H"{$7c} f00ac944d0d94c80204c*171f4c901e4cbc1f4cf9*204cda214c7e224c6223 # eaea200f28f075201828*902a18a217a00a#";i;" ";f$(i):"";f$(i) 3"f$(i){CBM-R}H(f$(i),8) z,C(f$(i)){CBM-W}8{CBM-M}f$(i){CBM-R}f$(i){CBM-N}G(32):300 E6j{CBM-R}1{CBM-@}8 @ 11537{CBM-N}i{CBM-D}9{CBM-N}j,F(J(f$(i),j,1)): {CBM-E}j{CBM-T}25)"length ";l(i):"";l(i) Itl(i){CBM-W}1{CBM-A}l(i){CBM-E}30330 {$e5}^rc{CBM-R}rc{CBM-N}l(i):: 11506,rc Hi{CBM-R}1{CBM-@}n:(115084c683d0d5a584d0 ./h d1a9818db902200f2920*7dff059300a907a20020*9b2aae1a2da902a02d20 S/r fc28207dff9b2d494e53*455254004c4c21a20bbd*0e2d9d022dca10f760ae {CBM-U}/\ 1a2dd00920462820542a*4c5e1d207dff059300a9*05a200209b2aae1a2da9 {$fd}/F 02a02d20fc28207dff9b*2d4683d0b14c2a1cae1a2d 7,Z d00920462820542a4c5e*1d207dff0d1105455241*53459b0020452b90034c {$7c},{$e4} 5e1dad7b2d8589ad7c2d*858aadff03c58ad00aad*fe03c589d0034c5b2238 A,{$ee} adfe03e5898583adff03*e58a8584a9858db90220*1d29a6818685a6828686 -{$f8} 20992c201d29a48088a2*7*85baa90085b9a90985b7 @)L a97e85bba92d85bc20c0*ffa2008690e820c6ffa0*06207dff939b0084fb20 )V e4ffa6fc85fca490d028*a4fb88d0eea4fc20328e*a920202dc720e4ffa690 J) d012aaf006202dc74cca*20a90d202dc7a004d0cb*20ccffa90120c3ffa911 * 202dc7202dc720bf2a4c4c*20424520455241534544 i&{$fe} 202a2a2a00207dff0d11*9b454e5445522046494c*454e414d453a00a90e85 & 81a92d858220b42ab0a3*a686f09f8e1a2d205623*a20fa9012068ffa900a8 S& a20820baffad1a2d1869*05a2fda02c20bdffa900*a2fea00320d5ff20bf2a ' ad632dc930d00aad 20f0ff*207dff054e4f204d4f52 r# 45205245434f52442053*504143450020542a2032*284c2a1c203228201828 # b0f2adfe038589adff03*858a201d29207dff0593*00a904a200209b2aae1a {CBM--}#{CBM-@} 2da902a02d20fc28207d*ff9b2d41444400200f29*20682990c62032284c5a !${CBM-S} 1e4c2a1c2046292202d2000a2 %2{CBM-L} 08a584a48520fc2818a5*8469098584a585690085*85c683d0b8a202868618 J2{SHIFT-*} a210a00020f0ff18adf3*2c69318582207dff0d9b*11454e5445520d0020f7 {CBM-P}2J 28a2008e270a20e4ffc9*1bf01ec93190f5c582b0*f138e931aa858138adf3 {$f4}2T 2ce5818581a900ee270a*4cdb244494e44110d122041*2092202d204f4e452046 b0P 49454c44110d12204220*92202d2054574f204649*454c44532028414e4429 0Z 20202020202020202045*4e5445523a110d122043*2092202d2054574f2046 L0 49454c445320284f5229*110018a204a02620f0ff*20f728a20086ff8e270a 1 20e f20a202a27f20af0288*10f3a583d002c684c683 k- d0d5a584d0d120322818*a217a00d20f0ff207dff*055245434f5244204552 - 415345440020542a4c2a*1cae1a2dd00920462820*542a4c5e1d207dff0d11 U- 05494e534552549b0020*452b90034c5e1dad7b2d*8589ad7c2d858a201828 . c*2a1cae1a2dd009204628*20542a4c5e1d207dff0d t* 1105434f52524543549b*0020452b90034c5e1dad*7b2d8589ad7c2d858a20 * 7dff059300a908a20020*9b2aae1a2da902a02d20*fc28207dff9b2d434f52 {$de}*{CBM-POUND} 5245435400ee7d2da27f*868f201d2920682918a2*18a00c20f0ff207dff9b #+{CBM-R}642d*c930d0034c111fa2008e*1a2d4c031cae1a2dd009 ]'& 20462820542a4c5e1d20*7dff0d1105564945579b*0020452b90034c5e1dad {CBM-I}'0 7b2d8589ad7c2d858a20*7dff059300a905a20020*9b2aae1a2da902a02d20 {$e7}': fc28207dff9b2d564945*5700ee7d2d201d292068*2918a217a00220f0ff20 8207dff*9b544f20435245415445*20412046494c4520454e F${CBM-U} 544552204e414d453a00*20ac2ab03ba5868d1a2d*f0344c1a1eae1a2dd009 {CBM-Q}$B 20462820542a4c5e1da9*07a214209b2a207dff9b*534156494e47200500ae {$f0}$L 1a2da902a02d20fc2820*542a90034c5e1d200a2b*a20fa9012068ffa900c1e24186909ca*d0fa18691b8584a90069 93{$de} 2da8a584a20820fc28a5*fff00cc686f010a5818d*892d4c9e24a5818d892d {$7e}3{$e8} 4c0f25a5818d8a2d18a2*13a00820f0ff207dff9b*3a9d00a98b8581a92d85 C3{$f2} 82a23f868fae892dbdf3*2c8dc72daaa000206828*b09da6868ec92da5fff0 4{$fc} 2f18a24ffc91bf01ec94190*f5c944b0f1ee270a202d*c7c941f012c943d003c6 v1 ff2ce6ff4c2424ee270a*4c2a1cadf32c85831869*31858ba91b8584a20086 1{CBM-I} 89a92d8585207dff1111*119b00a5894849018589*68d00b207dff0d111220 1{CBM-D} 004c5f24207dff090912*200038a58be583202dc7*207dff20 902a18a217a00a20f0ff*207dff054e4f204d4f52*45205245434f52442053 _.* 504143450020542a2032*284c5e1d38adfe03e589*8583adff03e58a8584a9 {CBM-@}.4 858db902adfe038589ad*ff03858a201d29a68186*85a682868620b22c201d {$e9}.> 29a48088a27f20a202a2*7f20af028810f3a583d0*02c68 50524553532005455343*9b20544f204558495400*aef32c8683a000848418 H+{CBM-C} a20420f0ffa483b9f32c*858585fa85fba58485fe*3820f0ffe8e88686a008 {CBM-Z}+F 20f0ff20c72c18a58569*08a8a68620f0ffa4ecb1*e0c920d006c6ecc6fbd0 {$f2}+P f2e6eca2008e270a2076*28b00b18a58465858584*c6,(d 7dff9b55534520435552*534f52204b4559532054*4f204d4f564520544852 Q(n 4f554748204c49535400*18a218a00c20f0ff207d*ff505245535320054553 {CBM-L}(x 439b20544f2045584954*0020e4ffc91df00bc99d*f00dc91bd0f14c2a1c20 {$fb}(B 992c4c0c2020b22c4c0c*2020ccffa90185b8a908a8 5%V a20820baffad1a2d1869*05a2fda02c20bdff2018*28adfe038589adff0385 Z% 8a203228201d29a90385*fea9fe85fda681a482e8*d001c8a9fd20d8ff20bf {CBM-B}%{$ea} 2a4c5e1d4c2a1c4c5e1d*18a213a00120f0ffae1a*2df02a207dff052a2a2a &{$f4} 2046494c4520494e204d*454d4f5259205749416a00820f0ff20*7dff9b3a9d00a9a98581*a92d8582a23f868fae8a m4 2dbdf32c8dc82daaa000*20682890034c1e24a686*8eca2d18a218a00f20f0 4 ff207dff9b5345415243*48494e4700a9cf858ba9*2d858ca2008ecd2d8ece W4 2d8689868aae892da580*38fdf32ccad0f9858485*8538adc72de{CBM--} 2de6fbd0f020ccffa90f*20c3ff38a5fbed1a2da2*17209b2a20f728a6fba9 =a{$e6} 63a02d20fc284c542aa9*0faa2068ffa90fa8a208*20baffa90020bdff20c0 a{$f0} ffa20f20c9ffa95320d2*ffa93a20d2ffad1a2d18*6905aaa9fda02c20fc28 Ga{$fa} 20ccffa90f4cc3ff207d*ff202d20454e54455220*5 >N 8583a91b85fda92d85fe*a209a5fda4fe20fc2818*a5fd690985fda5fe6900 f>X 85fe20f728a683bdf32c*858585fa203c2a207dff*119b0d00c683d0d0ae7d > 2df00160a27f868f18a2*18a00b20f0ff207dff50*5245535320054553439b P> 20544f20455849541311*11111111111d1d1d1d1f20 ; 7dff054e4f2044415441*20494e204d454d4f5259*9b110d006086fa84fe20 o; c72ca2008e270a86fb20*e4ffc914f01ec90df023*c960b0f1c91bf069c920 ; 90e9a6fbe4faf0e3e6fb*202dc74c7628a6fbf0d7*c6fb4c9528ee270aa4ec Y; b1e0297f91e0a5fb8586*18a6fca4fd20f0ff2dcecd 8 2da93f8d00ffa000b18b*8589c8b18b858aa9008d*00ff201d2920682918a2 x8 17a00220f0ff207dff9b*55534520435552534f52*204b45595320544f204d 8{CBM-+} 4f5645205448524f5547*48204c49535420202020*20202020202020202020 {$e2}8{CBM-A} 50524553532005455343*9b20544f20455 dc92d1869 5$ 018583a585858420812c*90034c3526201d29a900*85faa484a27f20a202a6 A5. fadd8b2dd011c8e6faa5*facdc92dd0eaa9018dcb*2dd010c683d008a9008d {CBM-+}58 cb2d4c0026e684d0cda5*fff00a3060adcb2df0a7*4c6b26adcb2df09fa000 {$eb}5b a589918bc8a58a918be6*8bd002e68c 20ad7c2dd01b18a6fca4*fd20f0ff207dff202020*20209d9d9d9d9d119b00 4dt 4c652b18600d7b2d85fe*ad7c2d85ffd005a5fed0*016006fe26ff06fe26ff Yd^ 18ad7b2d65fe8d7b2dad*7c2d65ff8d7c2d0e7b2d*2e7c2d60e689d002e68a {CBM-V}dH a58acdff03d007adfe03*c589900218603860e689*d002245434f524420232020 b 2020209d9d9d9d9d1100*ae882d86fa20ce2ca200*8e270a86fb20e4ffc914 qb f01ec90df028c91bf01f*c93090edc93ab0e9a6fb*e4faf0e3e6fb202dc74c b 742ba6fbf0d7c6fb4c93*2bee270a3860a5fb8586*f0f5ee270aa4ecb1e029 {SHIFT-+}b" 7f91e018a6fca4fd20f0* d*1d1d1d00aef32c8683a2 ? 008684a683bdf32caa86*85a484206828b01818a5*84658585843820f0ffe8 z? e8a0081820f0ffc683d0*da1860a584a8a27f20a2*02202dc7c8c6fad0f318 ?{CBM-N} a584658585846018a218*a00820f0ff207dff9b50*52455353205245545552 {$e4}?{CBM-H} 4e20544f20434f4e54a903*aaa00020baffa90020bd <( ff20c0ffa20320c6ffa2*0086fb20e4ffa4fea68f*20af02e6fee6fba6fbe4 C<2 fad0ec20ccffa90320c3*ff1860ee270a3860a901*85f16085fa84fb86fca0 {CBM-POUND}<< 00b1fa20d2ffc8c4fcd0*f660a48088a920a27f20*af028810f860a68aa489 {$ed}<f d001ca88a58085f8495400*20e4ffc91df00bc99df0 '9{SHIFT-@} 2dc91bd0f14c2a1cadcd*2dc58dd00aadce2dc58e*d0034c7327e68dd002e6 L9D 8ee68bd002e68ce68bd0*02e68c4c0627a58dd007*a58ed0034c7327a58dd0 {CBM-E}9N 02c68ec68da58bd002c6*8cc68bd002c68cc68b4c*0627a90085fc85878588 {$f6}9X a9fb85fde687e68bd002e6*8ceecd2dd003eece2d4c 06l a225adce2dd025adcd2d*d02018a217a00d20f0ff*207dff05534541524348 U6v 204641494c4544002054*2a4c2a1ca589a58a4cc9*26adcb2dd0a8ae8a2da5 {SHIFT-@}6{$60} 8038fdf32ccad0f98584*858538adc82dedca2d18*69018583a5858584a900 ~6J 85faa484ae68aa58acdff03d0 eR 07adfe03c58990021860*4cb22ca589d002c68ac6*89a58ad007a589d0034c he{$7c} 992c1860207dff1d119b*00a6faa9a3202dc7cad0*faa991202dc7a99da6fa e 202dc7cad0fa3820f0ff*86fc84fd4cf728480701*0c0503060f1e0000494e Re 44582e00000000000000*000ffa903aaa00020baffa9*0020bdff20c0ffa20320 c, c6ffa20086fb20e4ff9d*772de6fba6fbe4fad0f2*20ccffa90320c3ffa200 Ec6 8e7b2d8e7c2d20502cbd*772d38e930186d7b2d8d*7b2dad7c2d69008d7c2d {CBM-N}c@ e8e486d0e3adff03cd7c*2df00590154c292cadfe*03cd7b2d900aad7b2dd0 {$ef}cj 49*4e5545200020f728a900*8d270a20e4ffc90df004 )@{CBM-V} c91bd0f548ee270a207d*ff1b500068c91b60186d*1a2d85fa38a928e5fa4a N@H 18a84cf0ffa9028581a9*2d8582a20aa000a90085*8f4c6828a90fa8a20820 {CBM-W}@R baffa90020bdff20c0ff*a20f20c6ffa90085fb20*cfffc90df009a6fb9d63 {$f8}@a84fb*86fd18a900a2086a66fa*90031865fbca10f585fb 2=p a58085fc18a900a2086a*66fc90031865fdca10f5*85fd18a5fb65fc8582a5 W=z fa858118a58269048582*6018a203a00e20f0ff20*7dff5245434f52442023 {CBM-C}=D 200500a689a58a20328e*a920202dc7207dff1111*9b0d00a9008584adf32cd002e688*38a5fce58085fca5fde9*0085fdd0eba5fcc580b0 ;:{$e2} e560aefe03adff034c32*8e38a587edfe03aaa588*edff034c328eadfe03d0 :{$ec} 03adff0360eefe03d003*eeff03adff03c588d007*a587cdfe039002182438 E:{$f6} 60adfe03d003ceff03ce*fe03200f28f002182438*6018a215a00b20f0f27f20a202a6*fadda92dd011c8e6faa5*facdca2dd0eaa9018dcc d7T 2dd010c683d008a9008d*cc2d4cbe26e684d0cdad*cc2dd0034ca2254c1326 7{$7e} 207dff059300a905a200*209b2aae1a2da902a02d*20fc28207dff9b2d4649 N7 4e4400ee7d2da900858d*858ea9cf858ba92d858c*adcd2dd003cece00000000000000000*00000000000000004152 f 5449434c45203a415554*484f5220203a49535355*452020203a5041474520 \f{CBM-@} 2020203a434f4d505554*45523a53454354494f4e*203a43415445474f5259 {CBM-K}f{CBM-S} 3a20202020202020203a*00000000000000000000*00000000000000000000 {$e6}f{CBM-U} 00 O00000000000024303a*494e44582e2a00000000*00000000000000000000 +gB 00000000000000000000*00000000000000000000*00000000000000000000 LgL 00000000000000000000*00000000000000000000*0000000000000000 UgV -1 503060f1e0000494e Re 44582e00000000000000*000