WHEN PRINTER IS LOADED WITH PAPER AND TURNED ON";Q$ Mю#Ќ2,"!---------!-------------------------------------------------------!---------!" ј#Ќ2,"! !";Є12);K$;Є40);M$;Є66)"! !" п#Ќ2,"! ! ! !" ђ
S$Г"Y" Ї 810 *#Ќ2,"! !";Є12);"SIDE 0";Є66);"! !" 5 Ѕ 820 {*#Ќ2,"! !";Є12);"SIDE 0";Є40);"SIDE 2";Є66);"! !" д4#Ќ2,"! ! ! !" м>XГ1 ыH NГ1 Ѕ 20 KR#Ќ2,"! ) ! p ' p p pЙ В +А rpr ) p xї )
( А
( А 00 В 000000 0 0 0 0 0 p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p p pАp№p p p p p p p p p p p p p p p p p p p p ) @L@M
3Сn t7fl0 лaи 5йЯяЛ}ЗЁ[ўь_ўЎЌrл С gЊжyЉmе*ПОўћ
Нъел§ Жяє9oЩЛЭџ{Оџ} 5њ]х Ю ы_sш(ќьoДў{iEџэв#0 ЯUљ(Ћ§сўпoўGъћџо0 dї~Е{CЛEЭ_яюљыТЙюжР 0зЩзжєйuНчИo§.з{Ями
wўЎоіЄs`с?їтќ/іЦ =WяњWЫѓРп ЗўП№ў%Р 7wpo9ЯЛm ]
№ілКУІip ,П[y/фяГР §чя6KП&А ЮйПЗѕ}зOр`\ 6К!џўл§Ј жtџЄоЧI` пыџўо_Ш оqСлЙАп` 6ПчћЏї Б;ПНеНјUР ;=^ўќў пяmЏпџћZ я§ењYы ђgq]N}з'Р Я=Зsп;K ЬПх~№Чџр 8ў|Ђўь~Ь zџ§WйпЯeр Wћџq пъмЯўЧHЛ` 9ѓяWтюзь ;jјн пР uіпй?їq Йxт;єЖ ш Q~џXwЕп E{yєоїџ'ЪР
Lћ{Л+ше ОЖv{ХыўГ` 7ЦзюЛЩџЖ џ9 рїпtЕІ /јлМЛ^sE |їъ?џ0іbI1>{ўџэЛz! 8x^]~_йС1LbђўњЭљютt
pbЊЃОaњ 2 $tЏ[ў]Зf` VЕыџw}ПЗС Ж§ч§%Ы§Пр эkЗкџпn}`БLb1eзпќJє ЅПюїпћ#rЄ- Зa}vu}ЛА ф1чЏ\љъ_` <ИЋяљпцoњ№ §пяmЙћыVР лgфЗџЛ;§@ TњЇЬ~ouїL и]дOўђџ[р §яnuаЃ2Р
КїПsџѕ n[pѓў+СLр 1ќq;ўнz)@ №чЧЙю, п§П{]b~оР ця?sџ?u` 5ћTьЧ§eќц ѕзМЖєYЦ+Р §ЏюьVX %К/оџюџ= P onj№Єћc` 4нЏО{!ѕCР и \№Б]цњз ЋПо+я_!ехр 5[ц ѕјїЫl QіПЪ:_"rлр лѕАЛ}Зd
жcUџg§р`=;%Бч№џј
ЛыоќыЈљ§Р Рџ1ЦкX <ћзoCіgЏп0 `џжЖЛыѕ Н 7[џнОуЎЕР` ( ?яћчr}є( уcп6лОf]ж`Р 7ИнЗ=Ка сќн&л
ў=yэ№ї{l 7[Е~ќSgџ~f Р>asЬоЪ] 6н_йПљѓІЬ XdОuыч|Яџ` ЌњлraLъ§ ( ТlўgіOчЭѕ8 Ўюыћ`Џћр?мyЭ§ъWџX unк{ѓwиР Р ќZ[џМЋл bюUё=г7e @ № жЬїГќ( nЗ]Г§o§Uя ртBOсэЎyЈ іѓп.Ь/ёз| РюёBќыkЖН` №ЯУж?Пи
0 ѕћn{zЬТЩl oWМдfv3оКа № [LХЧЁќш? mљЎ§ МПbР( x чЃѓMН~џ` Џ
oАщџP `
v:іџже8 ;hиuRЋє-з рР H оѓ^ісџX 1Wт№vЗn{рЮ | ь5џ
л 6ЯѕП7ѓъh№6 4ЦсxиЗk<( 0ЛkњЗ`А< >иЦVgмЅя^yЈ dWКџР Р`8зs~_Н` ў сoђ= ^?` ЖэcУЩl 7[kVэі 43^ gњпщП 6С`s~g| l38Оўч?Og` д<.{mп№ ј 0`P§§pЖ
8 lюЋЮ0нрСА`АрPdЭџ
П?X
МЧяС^Ч`є>31ЧјM tИ gЗмпоЧyW,] поJЭ§ЬY( /Mі~йDйNісћлЧПЗvёCЈ IЛnБп|yйVз{ОйчяЂќ3 р lпоuўлхў ѓ~ kН(, <Ћў&ѓѕЯw§іЏeўfЯбУuёmЬ Л}ь}њђўmcwО~Ѓуcсчя` о,апэ§рc КЎЗдНФжq 1ЅZ,ї?ў{mL[Пp~Oн1ј еX{О,Їњ}?сFDУGз+Ў 3uГџўЮfzЬяЖOЎЄp З TеЯО§Ыf5ф/ЏН_О^t№ Чmю§_ѕхGмќЭуqWНI 7iцчіћНY§у[Џ&w-p-0 6ЏЮѓЄ7GЪ YоЊGONГЏ9 Еiэ[гџВЅЗke л_ел&EЎ јЎџюъыcЬЇПЦхЊ}(6бV jыбnћк
o5А{Ьф;OTиђ ajѓ7№Эцйv0рѓ&СYїхЁД V>Ян#Эъёћ
I}ь'ij 0ѕЏ{]р=щ~~Гл ЭM@ і=єнLeыv.5юOЦЬp ІЭm
БЯПј\8МлЃ0 ЧЯ 2Н§ясэћХИї іf2Ж6 F5И
ГѓxЌg`
{мf06р(ЦёЬ№q0` ~ј0ёр0 w]Ь№ P № ф м Р Р р Ю Р Р ` ў @ 3 Ш Ж ` o 0 ( л T ` і џ @ Ь p Р @ № н ` D ` р ЯР 0 8 јр §Р ХР @ Р ] @ & " @ Р @ @ Р ф Р @ @ H @ Р @ Р @ @ @ H $ @ @ @ @ @ @ @ @ @ 1 (+оЪ< x о{( `
МpЊТ и ?3~џч?ћsz УіkўuА MЗё? _Лv8 љяL|7/жоь'ўПNі _лЧж/ГЧАѓ> Ы
М|С/ўOЮO1§у0ю Fwx]ч(Оxоян4 a'йXџwі Чџ:сwН?сяј8Мy лGs: w[
Ў Йѓ,П nь7Цaоџ
тuРY ш>рљьDF7sтzh:ёГD?PЇy5# ѓЇB\Ый .'§Э1_п ћB Й dнПИpЧ ПМщРFїЏфџНаЬЩўчXDОі^@3
џўwУњћBgїr ШЭПёrџ2 йч28xюПч9пђ@Nя ХячЧ гА w{Р}ПЧЦ#=Ч`9цсЧћ>6м`СvqСЧЬ gЦ ppv3`6p№qcСјТйЬ Ц?
и3 n єУ7Ч Ц 6n р qІ`X ?ИqрЯ о ` с сёУГ УР<1x07Рp 1є f н3і9?пЦимёсч`џ~ nћ§Ч//љЫy'хњџћџПяр ZQ Ќ
~ygН<ЧНэчr 0W-` р3Пчгџ}
ќџџр џџ№ џџ№ џџр џџ№ џџ№ џџА џџ№ џџ№ џџ№ џџ№ џџ№ џџ№ џ?№ џ?№ џ?р ў?№ џ;№ ї?№ џ?ј џ?ј џ?№ ў?№ џ?№ џ?№ ў?№ џП№ џџ№ џџј џџј џџ№ ћџј џ?ј џ?ј џ?ј џ/ј П?ј џ?ј џ?ј џ?ј ўџј џџј џџј џџј џџј џџј џџј џџј џџј џџј џџј џј џџј пџИ џџј џџј
џџј џј џј џј џџј џџј џџј џџј џџј џџј џџј џџј џџј џїј џџј џџј џџј џј џпј џџј џџј џџј Пџј џџј џџј џџј џџј џџј џџ№ џџј џџј џџ№ џџ№ џџ№ џџ№ џџ№ џџ№ џї№ џџ№ џџр џџ№ џџ№ 0E18 81 20 CMPA 20 Compare reg. A with decimal 32 (&H20) / /:0E1A 2F 08 BLE 08 Branch if less than or equal down to CLEAR /ы 0:0E1C 80 00 SUBA 00 Subtract from reg. A value from USR call 0= 1:0E1E A7 84 STA ,X Store reg. A back in loc pointed by Reg.X 0 2:0E20 C6 01 LDB 01 Load Reg. B with one (a flag) 0С 3:0E22 20 04 BRA 04 Branch always to STEP 1 4:0E24 86 20 CLEAR LDA 20 Load Reg. A with &H20 (decimal 32=space) 1` 5:0E26 A7 84 STA ,X Store reg. A in loc pointed by Reg. X 1 6:0E28 30 02 STEP LEAX ,+2 Increment Reg. X by 2 1я 7:0E2A 8C 2F00 CMPX 2F00 Compare Reg. X to &H2F00 (end of screen) 29 8:0E2D 26 E7 BNE LOOP1 Branch if not equal back to LOOP1 2} 9:0E2F C1 01 CMPB 01 Check if Reg. B is set to 1 2Х ::0E31 27 DF BEQ LOOP0 If set (equal) go back to LOOP0 3 ;:0E33 86 79 ENDING LDA 79 Load A with &H79 (the usual 8K block) 3` <:0E35 B7 FFA1 STA FFA1 Store that &H79 back in the MMU reg. 3 =:0E38 4F CLRA Clear reg. A 3ч >:0E39 B7 FFD8 STA FFD8 Store A (a zero) at &HFFD8 (POKE 65496,0) 4+ ?:0E3C 39 BYE RTS Return to the BASIC program 4y @:The basic operation is between 0E0F and 0E33. The routine checks each 4Ь A:position on the text screen and decreases it to the character below. I mean 5 B: that any letter D's become C's, Z's become Y's, etc. This continues, until 5r C: every character has been reduced to 32, the code for a space. Then and only 5Ё D: then does MELT return control to BASIC. eases it to the character below. I mean 5 B: that any letter D's become C's, Z's become џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ 2 ]p`P`PV pVP`0SV pvP`e0V`0`SP`V`g p`v5e`Se0S`0e xpaVSVSee`Vg`PeVP5P`e`v p`PVPV0P`SP`SPe`pїg0PAC5A@6ep pv`V5`P5e`vp јp`e`VSe P%P`g p`cPT`Vp`px№p`qV`PW`6pa №`vVV`A`P`gp pq5`PP`6Pa`vp№px pvvp`c`PpP`c0a`agxpqgvP`c`5p PVpx v0cVE`VPe`vvpx`6Pp P0P`P`pvp pv6VPQPQ@Pc`vppqe`e@T@TPVpg ppvSPEP@P``px pa`ec`PQ $Vpg p`vp`eE@PVP`qpј`VV @P0`g`ppv`cV@F@P`vp pqg`TP@T@P0`g x`vP@E`Рd@PVpvpx p`V6SP@B @PV`pp eEA@Р@PVpg їg`p`VP@AT Р$Vgї`eSE@`Р$ep`VP`PP@Р@P`g`p№p№pp`6E `@PVP0`agјpvVe @PV`pppqP`PEA@P`pxpp``e0PQ@ `@P`P`ppv`ePT`$0`pp№pg`ce`PTPEp №p`c0PT $g x`e`PT`$P`g pvcPP` pv`SPT@F@E`gpp`e5` $PpxїgV5P`g`P0PQgx xp`e5T @P0`p x`qe@TP`vpg№`e`e@Eg ї`eeT $g`0SP`vPA@Ep`ecPTP @P0`g VPQPE@ 0 @P@P`P`gpx 0@Q`gpxјp`PV5eA@pG@EP`p p`P`VAP`V0`g0V5A@G0ptPVpvpxV6P0P0@5PcVpx0SQEP6Vp PQPQ0p@50`pxpp`ece0@0e`S``pxpјPcV5P`epx pg56P@`S`ppvV0`4`6P`pxp`cP`5`p gV `6pp`cP0`up№x №x0e00@1Vppv`P5S x`SVPPS 5`qpg056 pv P0p xpp0gS`p @QG №5ePepї6Q 'p ps0 7Pc5p pp4x0b@ј 00v@p
`sW `P ! `pQ&`P( Pp!1` pq(' p& (``dЁ pv АЁ pP p`p `p і їџЁїџ Ц НЉЂЦїџ ІЄ+Р@ Ы@ їџ ІЄ+Р Ы їџ ІЄ+Р Ы їџ ІЄ+Р Ы їџ ІЄ+Р Ы їџ ІЄ+Р Ы чJ&§?џ&іё& \їїџЁ 9ЗџЁ9џ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџЂ&N : MELT.BAS creates a new type of CLS for WIDTH 40 and WIDTH 80 screens. & : Just use line 20 of this program to store the machine language for MELT in &ь : memory. Once there, you only need to call the MELT with a USR call. '= : You can call it anytime from within your program, once MELT is installed. ' : MELT is stored from 3584 to 3644, part of the old PMODE 0,1 graphic screen. 'л : To call MELT: A=USR0(x) where x is a number between 1 and 255. (* : However, the BEST x values are x=1 --> a slow melt x=2 --> medium melt (| : x=4 --> pretty quick. Values like 255 are ridiculous, they essentially do (Э : a CLS. You can also call negative numbers, for similar effects. -1=slow )
: Calling an x=0 is trapped by MELT and sent back. Your program continues )J : with nothing happening to the screen. )Q : )
: MELT by Stuart T. Wyss-Gallifent August 17, 1992 ) : *y AГ3584 Ѕ 3644: A$: A,џ("&H"ЋA$): A: BD,B3,ED,5D,27,36,F7,0E,1D,4F,B7,FF,D9,86,36,B7,FF,A1,5F,8E,20,00,A6,84,81,20,2F,08,80,00,A7,84,C6,01,20,04,86,20,A7,84,30,02,8C,2F,00,26,E7,C1,01,27,DF,86,79,B7,FF,A1,4F,B7,FF,D8,39 * Йџ0Г3584 *Ч : What now follows is a hand-disassembled listing for MELT *ї : As written, this code is NOT relocatable +* :Memory Codes Labels Opcodes Description +| !:--------------------------------------------------------------------------- +Ы ":0E00 BD B3ED JMP B3ED Get value from USR call, put in Reg. D , #:0E03 5D TSTB Check if USR call is a zero ,P $:0E04 27 36 BEQ BYE If zero, go to BYE label , %:0E06 F7 0E1D STB 0E1D Store USR call value at &H0E1D ,ф &:0E09 4F CLRA Clear register A (set Reg A to zero) -3 ':0E0A B7 FFD9 STA FFD9 Same as POKE 65497,0 (High-Speed poke) - (:0E0D 86 36 LDA 36 Load Reg A with &H36, the 8K block that -Ю ): contains the high-res text screens . *:0E0F B7 FFA1 STA FFA1 Put that &H36 into MMU register &HFFA1 .V +:0E12 5F LOOP0 CLRB Clear register B .Ј ,:0E13 8E 2000 LDX 2000 Load reg. X with beginning of text screen .љ -:0E16 A6 84 LOOP1 LDA ,X Load reg. A with value pointed by reg. X /G .:"305TH /NIB CFDM1-07"
"3DTICTAC/TOE CFDM1-03"
"ACES-UP /BAS CFDM1-06"
"ACESUP /FNT CFDM1-06"
"AMY /BAS CFDM1-07"
"AMY /BIN CFDM1-07"
"BALLOONS/BAS CFDM1-05"
"BALLOONS/NIB CFDM1-05"
"BLOCKS /BAS CFDM1-01"
"BLOCKS1 /BAS CFDM1-02"
"BLOCKS1 /DAT CFDM1-05"
"BLOCKS4 /DAT CFDM1-05"
"BOMBS /BAS CFDM1-06"
"BOOT /BAS CFDM1-04"
"BOOT /BAS CFDM1-07"
"BOWLPLOT/BAS CFDM1-01"
"BRANSON2/BAS CFDM1-02"
"BRANSON2/NIB CFDM1-02"
"BROOK /BAS CFDM1-01"
"BROOK /NIB CFDM1-01"
"BYTETUT1/BAS CFDM1-02"
"C /BAS CFDM1-03"
"CARDNDEX/BAS CFDM1-06"
"CARDS3X5/BAS CFDM1-03"
"CATRTD /BIN CFDM1-05"
"CCTOOLS /BIN CFDM1-04"
"CHEM /BAS CFDM1-02"
"CHKRITER/BAS CFDM1-05"
"CLRPICK /BAS CFDM1-07"
"COCODE /BAS CFDM1-04"
"COLORS /BAS CFDM1-04"
"CONVERT /BAS CFDM1-01"
"CONVERT /DOC CFDM1-01"
"DEMO /BAS CFDM1-06"
"DEMO2 /BAS CFDM1-05"
"DEMO3 /BAS CFDM1-05"
"DESERT /BAS CFDM1-03"
"DESERT /NIB CFDM1-03"
"DESERTPZ/BAS CFDM1-03"
"DESERTPZ/NIB CFDM1-03"
"DISKSEEK/BAS CFDM1-05"
"DOLLY /BAS CFDM1-04"
"DOLLY /BIN CFDM1-04"
"DRIVER /BIN CFDM1-04"
"DSKO /TUT CFDM1-05"
"DTEST /BAS CFDM1-03"
"DTOOLS /SET CFDM1-04"
"DUNNY /BAS CFDM1-04"
"DUNNY /NIB CFDM1-04"
"DUTCHMIL/BAS CFDM1-06"
"DUTCHMIL/NIB CFDM1-06"
"EL FARO /BAS CFDM1-03"
"EL FARO /NIB CFDM1-03"
"ENTRYCHK/CRD CFDM1-03"
"EXAMPLE /BIN CFDM1-04"
"F11 /NIB CFDM1-06"
"F12 /NIB CFDM1-06"
"F13 /NIB CFDM1-06"
"F14 /NIB CFDM1-06"
"FACE /BAS CFDM1-04"
"FONT /BIN CFDM1-03"
"FONT /BIN CFDM1-07"
"FREE /BAS CFDM1-03"
"FREE /NIB CFDM1-03"
"GALLERY /BAS CFDM1-07"
"GLOBEPLT/BAS CFDM1-07"
"GRAFIX /BAS CFDM1-03"
"HAMTENNA/BAS CFDM1-02"
"HARDCOPY/BAS CFDM1-01"
"HCLSINFO/BAS CFDM1-04"
"HELMETS /BAS CFDM1-02"
"HI RICK /NIB CFDM1-07"
"HOLYHEAD/NIB CFDM1-07"
"HSCR2 /BAS CFDM1-02"
"HSCR2EZE/BAS CFDM1-03"
"JULY 4 /BAS CFDM1-06"
"JULY 4 /NIB CFDM1-06"
"LABEL /BAS CFDM1-04"
"LABELPRC/001 CFDM1-07"
"LABELTUT/001 CFDM1-07"
"LIVLINES/BAS CFDM1-02"
"LLIST2C /BAS CFDM1-01"
"LLIST3C /BAS CFDM1-03"
"LPOKE /BAS CFDM1-02"
"M /BAS CFDM1-07"
"MANDBROT/BAS CFDM1-02"
"MANDBROT/NIB CFDM1-02"
"MATHFONT/FNT CFDM1-07"
"MATHMIXR/BAS CFDM1-07"
"MENU /BAS CFDM1-04"
"MENU3 /BAS CFDM1-02"
"MENUPOP /BAS CFDM1-05"
"MODULE /BIN CFDM1-05"
"MOUNTAIN/NIB CFDM1-07"
"MUTILS /BIN CFDM1-07"
"NAME /BAS CFDM1-02"
"NEBULA /BAS CFDM1-04"
"NEWDESPZ/BAS CFDM1-06"
"NIBLOADR/BIN CFDM1-01"
"NIBLOADR/BIN CFDM1-02"
"NIBLOADR/BIN CFDM1-03"
"NIBLOADR/BIN CFDM1-04"
"NIBLOADR/BIN CFDM1-05"
"NIBLOADR/BIN CFDM1-06"
"NIBLOADR/BIN CFDM1-07"
"NIBSAVER/BIN CFDM1-05"
"OLDMILL /BAS CFDM1-04"
"OLDMILL /NIB CFDM1-04"
"OUR HOME/BAS CFDM1-04"
"OUR HOME/NIB CFDM1-04"
"PALINTCP/BAS CFDM1-04"
"PATCHGRF/BAS CFDM1-05"
"PIXDOCTR/BAS CFDM1-05"
"PIXLOADR/BAS CFDM1-07"
"PREFIX /BAS CFDM1-01"
"PREFIX /BIN CFDM1-06"
"PRINTME /BAS CFDM1-01"
"PRINTME /BAS CFDM1-05"
"PRINTME /BAS CFDM1-07"
"PROTECT /BAS CFDM1-04"
"PUZDAT /DAT CFDM1-03"
"PUZZLE1 /NIB CFDM1-03"
"R /001 CFDM1-06"
"RAMBASE /BAS CFDM1-04"
"RCS /BAS CFDM1-06"
"READDOC2/BAS CFDM1-02"
"READDOC2/DOC CFDM1-02"
"RECYCLE /BAS CFDM1-01"
"RECYCLE /NIB CFDM1-01"
"REPATCH /BAS CFDM1-06"
"RI /BAS CFDM1-05"
"ROMPAK /TXT CFDM1-06"
"SAILING /BAS CFDM1-05"
"SAILING /NIB CFDM1-05"
"SAMPLE /BAS CFDM1-02"
"SAMPLE /CRD CFDM1-01"
"SCRMBLER/BAS CFDM1-06"
"SCROLLER/BIN CFDM1-06"
"SEEMANDS/BAS CFDM1-06"
"SEQ0 /DAT CFDM1-03"
"SLINKY /BAS CFDM1-04"
"SP TEST /BAS CFDM1-06"
"SPLIT /BAS CFDM1-01"
"SPLIT /DOC CFDM1-01"
"SPRITE+ /BAS CFDM1-04"
"STARDUST/BAS CFDM1-06"
"STARDUST/BIN CFDM1-06"
"STRING1 /BAS CFDM1-03"
"STRING2 /BAS CFDM1-03"
"STRING3 /BAS CFDM1-03"
"SUPERPUT/BIN CFDM1-06"
"SWITCH /BIN CFDM1-03"
"THRBEARS/BAS CFDM1-04"
"THRPIGS /BAS CFDM1-07"
"TICTACTO/BAS CFDM1-07"
"TINYDIR /BAS CFDM1-04"
"TITLESCR/BAS CFDM1-04"
"TRANSLAT/PAT CFDM1-04"
"TREKINS /BAS CFDM1-02"
"TREKKIE /ASM CFDM1-02"
"TREKKIE /BAS CFDM1-02"
"TREKKIE /BIN CFDM1-02"
"TWOLABEL/BAS CFDM1-04"
"VCR CARD/BAS CFDM1-01"
"VUMASTER/BIN CFDM1-03"
"WEATHER /BAS CFDM1-05"
"WHOTHERE/BAS CFDM1-05"
"WINTSERN/BAS CFDM1-01"
"WINTSERN/NIB CFDM1-01"
1-02"
"TREKKIE /ASM CFDM1-02"
"TREKKIE /BAS CFDM1-02"
"TREKKIE /BIN CFDM1-02"
"TWOLABEL/BAS CFDM1-04"
"VCR CARD/BAS CFDM1-џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџЗ :***** DISKFILE ***** S :by RICHARD M. POTTS and NORMAN BARSON :based in part on a program by Paul Selig, RAINBOW, Dec. '83 p.163 Ў
№ Ѕ1540 Н я Ѕ1530 Х т32 и (65497,0:Ѕ800 є d:LOAD DISK DIRECTORIES nР1:18000:P$(700):PCГ0:65496,0 D xPCГPCЋ1:
DA$ДВ""Ї130:Л"DATE IS ";DA$ @17,"ENTRY COUNT ":@28,(PCЌ1):@32,"LAST DISK LOADED: "Z$: є
PCВ650 Ї@300," ": " FILE COUNT IS APPROACHING MAXIMUM LIMIT":TГ1Ѕ5000::PCГPCЌ1:Ѕ800 = 1,1:Л"MOUNT DISK IN DRIVE AND ENTER DISK NAME (OR ): ";Z$: Y
Z$Г"END"ЇPCГPCЌ1:Ѕ800 o Њ"DRIVE NO.: ";DR Д:READ IN THE DISK DIRECTORY ОSГ3Ѕ11 Б Шп(DR),17,S,A$,B$ С вXГ1Ѕ128Љ32 л мP1$Гџ(A$,X,11):І300 т цX ђ №XГ1Ѕ128Љ32 њP1$Гџ(B$,X,11):І300 X S $Ѕ130 ."Ѕ800 I,
џ(P1$,1)Гџ(255)Ї130 `6
џ(P1$,1)Гџ(0)Ї @P1$Гџ(P1$,8)Ћ"/"Ћџ(P1$,9,12)Ћ" "ЋZ$ ЂJP$(PC)ГP1$:PCГPCЋ1 зT@28,PC:@150," ";:@205," ";:@65," " н^ їh:SORT THE ARRAY P$() r65497,0 |0:BГ1 $@236,"SORTING"; ;BГ2B:
BДГPC Ї 400 RBГџ(BЎ2):
BГ0Ї460 fЄIГ1Ѕ(PCЌB):CГI ЎDГCЋB:
P$(C)ДГP$(D)Ї450 ЕИPP$ГP$(C):P$(C)ГP$(D):P$(D)ГPP$:CГCЌB:
CВ0Ї430 ТТI:Ѕ410 ЯЬ 1,20:0 ж@233,"SORT";џ(128);"COMPLETE";:XГ1Ѕ1000:X рЅ800 ъ:PRINT CATALOG оє65496,0::"CAUTION! WHEN YOU PRINT, THE FILE IN MEMORY WILL BE LOST! YOU MUST SAVE IT FIRST. HAVE YOU SAVED THIS FILE? ":"" щўІ1500
AA$Г"Y"Ї530 :800 Z:"BE SURE PRINTER IS CONNECTED ANDTURNED ON. ALIGN PAPER TO THE TOP OF THE PAGE." ~ :"WHEN READY, HIT ANY KEY.": &Ђ 44539 Р0
(џ(65314) А 1)Г1 Ї " TURN ON PRINTER.":Ѕ550 й:0:@236,"PRINTING"; ћD 150,1 :SETS 9600 BAUD RATE <N
PCД165ЇPPГ0:
PCД330ЇPPГ1:
PCД495ЇPPГ2:
PCД650ЇPPГ3:PPГ4 HXPГ0ЅPP Qb#Ќ2 Аl#Ќ2,џ(14)Є13)"QUICK-FIND CATALOG" :SETS EXPANDED PRINT (34 CHAR/LINE) FOR ONE LINE ONLY Сv#Ќ2,Є8)DA$; в#Ќ2,Є58)TT$ ##Ќ2,Є8)"FILENAME/EXT DISK"Є33)"FILENAME/EXT DISK"Є58)"FILENAME/EXT DISK" t#Ќ2,Є8)"------------ ----"Є33)"------------ ----"Є58)"------------ ----" Ђ:PRINT THE DATA IN A THREE COLUMN FORMAT РЈXГ0Ћ(P165) Ѕ 54Ћ(P165) эВ#Ќ2,Є8)P$(X) Є33)P$(XЋ55) Є58)P$(XЋ110) ћМ
PCДX Ї ЦX аZZГ1Ѕ6:#Ќ2:ZZ кP +ф65497,1 6 :MENU
*:џЁ(32,172);џ(128);" DISK FILER ";џ(128);џЁ(32,163); Ў4"********** SELECTIONS **********"; Д> еH" 1. START NEW CATALOG" ѕR" 2. LOAD OLD CATALOG" \" 3. SAVE CATALOG" 0f" 4. DELETE A RECORD" Mp" 5. PRINT CATALOG" iz" 6. SORT CATALOG" " 7. ADD NEW RECORDS" Є" 8. SCAN CATALOG" И" 9. QUIT" иЂ@499,"TYPE 1 - 9";:І 1500
Ќ: AA Ѕ 100,970,1100,1170,490,360,120,1370,960 ЖЅ800 $Р:Ѕ1540 >Ъ:LOAD AN OLD CATALOG vд:" OAD AN OLD CATALOG ENU":І1500 о
AA$Г"L"Ї1000 :800 ЌшР1:18000:P$(1000):PCГ0 УђЛ"DATE IS ? ";DA$ ъќ65496,0:Л"CATALOG FILENAME ";TT$ :PCГ0:"I",#1,TT$
џ(1)ГЌ1Ї1080 (PCГPCЋ1:@0,PC 7$#1,P$(PC) B.Ѕ1040 S8TTГ1Ѕ1000: rB#1:PCГPCЌ1:65497,0:Ѕ800
L:SAVE CATALOG УV:" AVE TO DISK OR ENU":І1500:
AA$Г"S"Ї1120 :800 э`65496,0::Л"CATALOG FILENAME ";DN$ џj:"O",#1,DN$ !tNГ1ЅPC:й#1,P$(N):@0,N !!~ !8#1:65497,0:Ѕ800 !N:DELETE A RECORD !:"YOU NEED TO KNOW THE NUMBER OF THE ENTRY YOU WISH TO DELETE": !ЫІ"SCAN THE CATALOG TO FIND THE RECORD NUMBER" !їА@448,"CAN ELETE ENU":І1500 " К
AA$Г"S"Ї1370 "!Ф
AA$Г"D"Ї1230 :800 "LЮ:"NUMBER OF RECORD";SH:
SHВPC Ї1230 "Zи
SHГ0Ї810 "rт:"CURRENT ENTRY:" "ь SH" ";P$(SH) "Гі:"ELETE TO REMOVE RECORD":"ENU" "б І1500:
AA$Г"D"Ї1290:810 "п
P$(SH)Г"" "ыNГ1ЅPC #
P$(N)Г""Ї TГN:Ѕ1330 # ( #2NГT Ѕ PC #,ONTINUE; ENU"; $ЊІ1500 $!Д
AA$Г"M"Ї800 $2О
AA$Г"C"Ї $=ШЅ1450 $Oв: INKEY$ SUB $YмA$Гџ $rцAA$Гџ:
AA$Г""Ї 1510 $№AAГџ(AA$): $Їњ"ERROR CODE ";џЌ;"IN LINE ";џ $Ж65496,0: #П #аІ1430:Ѕ800 #с:INKEY$ SUB $ @480," ONTINUE; џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@0 Ф@ Fу&жq№
$ * аB
ш Q&mџр@ Р С
E@#? E HA(P , Ь fRФм шђ "!\ Р `iб*ўАx$!
L Р )&Еb q yA@ Ѕ Р D QэЈR d9 @ Р i ФZ8 `Т P DЄ а $ иуA @ (Ђd с @|э D"а@ L D С @ QЩlЄ@б Р, Р AJvЪ%"A ќ А>`
Ш ЩЪ
KЪ№ p @ !\ Ф Ф eEN Ш !Ё
$3 Щ UЉ&H D" @@/ Ь2B ДЂ"р0 I = Х ( +pNPА§ШрТ@D$0 w б @ EЩ*JТ,йЎ#@A 3 ф" " ЊЌ)ЮPЁ!@QI q ИШX{ ?№јО жК
о~@9ћП Д|ў /ПОа \лwъ №
г№ Нш A|а ќp Зр V/
рwЌ h ш Hпо џќзћяџоЭџїћџџїџџяяПџџ~џџџїоџЮџпўџџПџМџџО>џп<ўхппЬwЏџџ§п?џџѓџџяџћџїџљЛџџџѓџн~?Пїџн§џпќўяџџџ?џџџnoџяНsћџџџОїџ_лпПљјћџџяЛўwявћњџ§џ_џї§џџџм=Пљ~>џџљјїџџqѓЕчЗїџvїќёіОяЃПџљо?oџџћќ>ЧџўѓПџсџ}џџџџзОџџпџОрџпџџНПћУџїџoќїpЗќН{ќџ§ў_пИ?яџџїЗќЏџчйРљпџіџ<+уЗџЯћОџо
Няњп џОо{џэўМѓџп бНнќпў_ћП7ўФћлуџпР'ёпї8cїпџџОНў№6+Ыџ@g/ј46|ўРј&#Т№[~ ноNђџоW а9я7џ укџf џ~ФПїѕњ`+џЏ№gпѕїЯЏў{лпПџћї§џ§џћџ[їп w§{ПїџћўџОџљПџџџЯџћЧўџџЭяџўџїПџэћџџ?я§;џџоoлНЫзџИ?Пќ~эџы{Пџџуџпџџ?љщўћў{§џј?]Ўў§ћџџџПозяџЯѕџџћѓЛџџпјѓЏіs+џогЦєъџэЏљ}џџлПџ<яПўёџёѓwџМ>ГџћсїџљЛзї 0 `0ў `0ў `0;џ `0;џ `0?џр0џgр3џџр:џџПр?џџПр<џџЗр<џџЧр<џџЯр9џџяр?џџяр1џџяр0џџяр1џџџр1џџџр1џўр=џџџр=џџџр?џџџр?џџџр?џџџр?џџџр?џџџр?џџџр?џџџр?џџџр?џ§џр?џџџр?џџџр?џџџр?џџџр?џџџр?џџџр?џџџр?Яџџр?џџџр?§џяр?џџџр?џџџр?џћџр?Чџџр?џџџр?џџџр?џџр?џџџр?їџџр?џџџр?џ§џр?џџџр?џџр?яџџр?зўџр?џџр?џџџр?џяџр?яџр?џяџр?џџр?пЯџр?џџр?џЯпр?џЯџр?ўяџр?џяџр?пџџр?џџџр>џџџр>чџџр>џџџр>џџџр>чџџр?џџџр?џџпр?їџџр=џџџр?џџџр?џџчр?џџур?џПїр?џ7пр?џџр?џПћр?ї?јр?џпЭр?џџнр?~ ћр?ћр?џџџр/яџїр?џџџр?џџ§р?їџџр?џџџр?џџџр?џџџр?џџџр?џџџр?џџџр?џџр?џћяр?џїџр?џџџр?џџџр>?ўџр?џџџр?џџџр?џџџ`?џџр?џџр?џџў`?џџ`?џџџр?џџџр?џџџр?џџџр?Пџџр?џ§џр?џџџр?џџџ`7џџўр?џџџр?џџџр?џџџр>џџџр?џџџр?џџџр?§џџр?џџџр;џџџр?џўџр?џџ~р=џџр?џџ§р?џџџр?џџр< џЛр=пџџр0 џџр0џїр0яїџ`1џџр2џџр3пџџр3пџџр;Пџ?`зџџр8џџџр?џпр=џяр>џџ§р>џџџр0 ` 2?3>60 5,8 [ц0 {цf1|m џ џџр3пџџр3пџџр;Пџ?`зџџр8џџџрџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџоа
h~№р`hзp`xxўои
~ўў`аpvmяэа~ір№g`h`эра`pxv`x
эриаpx`xx`опопраp`а`эў§яа
xp`v
g`аpэяаhhз`pgэяаиаh`pgp`hvзpvg
я
`pxgxgоў§
оpxghmgnp
эя
`аож`pg`иарpрэяажаўожpи
рч `эяаж
ўоmижзpзna
эяажаўоm}
pаpрэяаиў}
hh}э Р Г0r~. Р іл@ Р №
Ж`Гё'\Р ! Р | Ѓ (9E Ь Р Ш 4`ЄЅД0А l Р чWк5гb(( x Ь Р H >п0ОRxкEФO @6 < Р @ кf mXР фЁ2Ч @ГР7М Т ofqА*li ^ТЈЉ0 і6Ќ а AсГѓAU4GЈЎЌЪ] Яџ@L P ѓцБKTaШh `Р ^mЁ " (Vх{hРP`ib7 ТА о!c\ а$ ЦРЊєГЊЇ ДP`ai AО&ь Р @ ^пLўр
№Fp<ЊC 50 @=§nЌ Р Иѕа
#йГ\В Н" `
P2Єь Р Ю СX ёt PTAД кLI Р эЪ
АЬk@9ЄU С 5Aъ Р ^Г aZйГf Ь& Jю
ЖбQС| Р У`І§@ЉВ`KЈ UсхР P| Р < XРЬ;бc[J$а (=
жцHГяь Р6о Ь`)gт( О.ш § ЬІbд, СЭ `J|}Щ3V2њ( д%_y3Юl Чњеl И ьH~йr- dVШNcqњ!ь џэл[ ќ 6ШЇIC (Ч` Xx<ч Ь зл,р 1йyЄa@Љ:x
1:aАL\ ~Ќ ёCёЌl!№IaP/
% Ькtр VНOш №д УNц+ИVюvх#ЪhRЬкм 2aШ
ЩЌ кА2 л№ъЮЏЄ ЉДF22+Д \5М о82 o!РruXЛПoэФ(0 Щр,hљ=4, ьРУ\ЁкоBЬм\ѓТцImсi=mт_Б< сf0БЬў*rщБг@ ЮйќрgЌ сg/ЬЦRЕ5ЉкXлlпДћфйЇcДФцЌ їEl*РѓіynВСНVй
ГIшkT(SЪOl м` g<"ЬгTьslЬyЙЇw?пРЋ NPЬ и0@W@Ьаг3hЬър§uХПc|=0л4<Чo, ѕ lLТfmYе>a,Ькf
pсВYБw сX 9cЁHJ=s2 Р ЬЦЊл кГ №GЧэдy| и0p0d! AљЉйN ]к
Р ћxЎ У ёу8@ HѕcV5ТOРљуalaћЖОё ц ШЃ lЬЭWpfYъ(Ц\цfип8Fжь ё P!Іa 2ЊЋ7
vЮ s 2iщ!L о(ЁцB(HjAXjfЏЎхxЪюx3ЕbлЃ5ќ ќf YUЬ`А 9Lнљ7љЩ:| СЦh )@$г\р9Уи `иЩОКvjК| жwфr @
З ѓSАД/6uVуmJбќ чZРМ H
Жл N5psуoлЯЊНћк Щлlщiq ]aXд 1џІ1ЌЖ1Н Я
< ТГп DХр
ўџОEЌlЬ№rMхщ.Љ,s џПмпАр
џ эџ+X\цЫL.ыпv№ЉИ п9ќ `PMП§џ! лBЮХhЪLуl ќmKОнВ! ?ќР\Іоgѕb: IхМ ў§ЗqУ Пэџќ U9HрЪAК ѓыНпѓёDЂ
ЄПчџрnpАзФyЂзП6џЬ єљ]Ь т $ ПяїџH+ КЊvЪЏхh іћ~kо џПџВПVЛ+ћ хШЏЬ\ їG>оkl RAЭџџПџђ^
нnъњdЁЌ яЅyНќфR Пџц Њ@ећЙекЩ}фќ юЈЯzЖІ ЙяџќхпезEЈЎzы| ўщЭОLB! ѕ џћ0ђдiVqc~Zл, џтъcЧц џпџМ ЦЕ2юфнџЊм џўюР& PЏџп џђk{5Nг?нgќ џЗYь6 Џџў7џ§4ИP`WBЭВкWVЌ џЖп?цQWі§џснg>ZЎцЉG!М уЗнлэІ іџaЗџoќb Іoўw-m6оЇМ Ц6нЯt&$BЁпѓcїџoћіУW
Я{ч/}mЋ Ъ"нЬ`СТ эпѓяїјџP+Z.tіпь о]Ь`С
їџяїќнџЛкд_1й+Гiўќ њEЬ`С"A"-їџэПќнўSСє"e8bьіеЋМ ъ.YлЉ ў~?Ф`С >л§џќџEіфГНWSЈОl оѓ;4 (KI= ЯќпџхSв` kзом оѓіНІЊ(D^=§ЯќлџZ ИЬ D TЅs<Ь їГіџщЈ Q =сїќЯќpzЭ`@ п)mL ѕaпІ)2 Iџ§ї№?їЯ=f MъІ\ ъa}_рЈ0E ?џэїџkЭ ?њэќ ъaГ\џя(0 џэЗџџиЮP B 3 HP\ ўаГ=Ођh0 JяќџУџГ№тБ Љ3о< іСFnќш0 Fяџўў4C B(\ чЦ
9H02E
џМE-@ Vн Чl+ 2X0a Ю
їџёч$B
§ЋЬ Чla4\0РЁ-їџїџ gMi щl Х(yA(V1@
№ 'ЮЌА м Х`+ј(S3 PЬMїяџ VЅД Ul Ч@" PQЖ (
їэїќ WS@ .1м Х )XP !
3ьU
L Ц60 pPД (a Hы\+ ЁU §эј p@PH kyа№4аеї J пы0aP1 "`< Ц Mѕo" @Їд ўaўђтPЂБ(bf0ЪћуВРё^ $" L( ўЯ§њшPЅа(ЊпWЬФ6Uр 2| џ иvш(І@yЗ ёвЃЉАA @ШЊd ѓнђѓа(ЈШPF8вЕ %bIИ "@Ќ иYЭрЋL 0хB ЪшД94 A? и`Х'рГ dЋqж3 eі
Д& (
HJ юЕж611U$A q@ dT љA0H ЬФ>1R1R { NЌ@
H ,!! ѕиfCвHЬ1&B `цJ8"D ` A јvо6 Е* @9`Сh!Ђ Ad@ Фc4NДZЕњІ С
ш Ђ $AC0 С5aX`СБ 0еЅzG@!Н@@V Ыау `С0Сdx|hЦ0ЂФ
@ ѓИ>(2+ЂD-Y@ fXИ@ Ѕ !ЗH ўям Ј9э&zD 0@j ё`j Ъ
Z0cџL6B Рњ@ оVPxF1%Hd `џїhB! ` ЌР ф "e`*FVє >ш @ ЁK жЋ@ Рh шт @P1& Ш A@$3F"
DpЄСB а Р` PP(@ЂD
Ф +8 a ЁB
Р Ъ#ДD"B ! Xh "
№ @ УJB ЈЉ Ф ABjф @ р%Ћ Йтfv @t! є4ЖB Р ХЂЄ
гсІ^РD Ќ љu ZFB
3HХЃ)ќ\h YA! §њz(^јСT№d p H Ч+ г@Bф
Q6$%*Р(B@
A B @ C0Ъп) ЭшX A м & 1 A
/ N~ X 2ѓ @ ФB A
( & B ФР @"6 . p @ $ р B* є1 h l! ф "I C3ЕT!@7!@Ђ0$ P х С ( (:Пh:Т9 ! р Ф"P ц'ВIl D! Тq`7д "` 8 @L Р Р0а 0ВИА%ХvР@$4h А Ф @ " Р]+2Пр `аb Ш@`HDABHШiѕЇ 1р$ ЦС D Цњ ч ЩЪ@ Ф! Ќ
1JKЭЬ @% aЄ B $ Р
@ gh0
+g:"J"0аР ШD` @
ЁIЊїи8 -а m!##02521!##%220102R0#!###%20 #!021#S%# !220212#S$%# 012121! 025$RP #! 01#1!CABA!R##!#!#!BA$!R2121!S!$#!#!#! 0204$!#2##$A!#S#!21252A!$!#25!$B2212SRA!$%#!#!#$BBR51!#2BB2121!1!#!BBB#! 2452Bђ$2#B2C#T!/в$!A!#!A#!$#$§B1!СФ#$!B2B§№д$!A!AФТ#!2B$C#$!/п
$!AФТL22Bј№ад$ L$B42$!ABізпавBТBФР!$2B!§m§
$!$ BL, !$!$BBјgавBA!BA$ТL.!$!$!$!$/зіїп
!BA$ L$,Bф BBB$/жo}m§
$A$A$!L,.NB$$Bјox§
BBBA!A!ABBфт@$!A!A!$!$/жзgзпав!$$$!BA$!ТBФф$ $B$/жo}m§
!BBA!B$!$$ L,ф$ !$!$!/іїh№авBABA!$$!B$!BA!$!AТBф$.B/зіїж§
BBB$!$ТL.BрB!$!$!B§m}m§
BB$!$$ТBЮBр$!$$/авA!BBA!$!$!$!$ ТNBьBA$B§}m}m§
!$!$!$A$!$!BA$!BAB ,$,ф$ь.Т@BA$Bіжпад$$BB!B!B!BBABТNBФТB@$!$!Bјh§
B$BB$BAB$ Ф$,ф.$,. $B$/m§
!$!$!$,BТNЮBф$Тфр$!$A$/жпавA!BB$$!$!$ТBL$,$Ф,N BA!$Bј§
B!$A$!$!$BABBABФ,BL,$фрB§m}m}m§
$BBA$B$!L,BФ$ьр$$/жпад$A$!$!$$!$!AТBФ$.,$ь$ТN@$$/авBA$!$!$BLBФ,$.Ю$ТN,Bт@$a$/жзж§
$!$!%BA!,L$ТBь.ТФ$тФь$ $!d$dA!/зжпавB$$!$ТL$фь$.NТЮ.B@BBFBјxhmoвBBA%!%BBAФ,BL$Ю,.N.ФфтBbBa$!'BжзжђBB%!RBAФ,LФ,тФтNBNBр&$bBA!BrtrжзжиmжmжxжnђB$!R%!B!$ТФтL.,фтNФфтЮAd&BABbFBdrBtиmзиhжє$!%!Q$!С,$N$.,фтNLф$ЮBd$a&$BG$-gжзжижиoxmжиxжя%R!B ,$BЮФ.$.NФфь.РA&$&BB'BrG-m}mиoxmиxзђ%Q!$B$BLф.$фТф$тЮ,$da&$&$qG'BrиhmіїжзжиhзёR!%!ТA,NBфь.,.,.Bdd$drG$'$'Mm}m}mиho}mxhxиxиnѕ%!%!Q!$ $Ф.L$фЮТL$ф,тТтрFF$d'BAжзm}mиmv}hжиmxhЈиxиxhтх%!R%!$AL NФТNBТФ.NBтЮ.@bA&BA&B!t!іїззіїзиhжhиЈhиhm%ТBA$.Ф$ф.$ЮBЮ.LBF!'BtrA'жзіїmxжmo}mhж-R%!RL!$!L!$тф.Ф.BТЮ$РBF$!baBAr-}mv}m}hжзіїзxжxж%!%!%,Ф L!.!Bтф.L.Bф$ьNТB&Bd&!'A$їіїиmhзіїзhзиhxЈиhgиhзeh%%!%!$ТФ !B.$ТLф.BLNBNЮBвn&F$Aqbжзїжзжзіїжxзиз}zz&%!RAТ!BN$тФ.Тьф.Ттвпэф$bзїжзgжиhз}зmxжиhxиhиhиR%!$Т!BN.$,.,тL.N$ф.Bьр§эяп-тж$!abїіїhmhзиmxжиhзmR%!,Т$тBLф$,тN.,ьтЮпэ§ф$ж}movжиhж}hжи}mxЈиhЈhxиhbR%,$!$$тЮNФ,NBNФЮ.о§э§фтBA$&-}mv}mmhзи}жз%!%СB$!$тN.Bь$ТNBNBўопэ§ўо$Abїіїиhжиhзжзж}RС,A!BABA$фь.BNФ$ЮBТN$oопо§ўbBзїжзіїжиhижmm}иxhxm}иxиЂrRRQ% $BA$!$вд$Ть$Ю$ЮBNФ,ьBnўпэяnзжзжзhжижи}mи}hз
!%\,BABMBТBфТьть$.BфтL цяэяпціјmxж}иmзи}жo}RQ!ТBвBMТN.$тNФтBь.nўоіцэm}mxж}иmзжиhиЈgіїиxиbRRBM$до$тЮ$ф$ьфТф.Nцф.ўoц§m}m}mжиmиhзmoxиh%%!RT$двдовBоТФ$.N.BтфццтN&ўnжи}m}mxжиhЈxзg!%Q%RдводвNТBNBтТLрцтфцті§mhжизижиxиxhxзії%!%!%довТNBNФ,$ТФфЮn&FцEтRFвшnm}hжизїижo}RRR]эL.BьBЮ.n&ц.bтBbmTоiщmvж}xhиgі}hЈh%R!-]§эMBф.BN.n&.$тbmтшцmvжmиmv}hжзbQ!%R]§эТBф$тфтфрnd$nBbцвтщkmhжиmзїh}hжxаиh% ]э§эФ-Bд$.BвNаn.bn.&втЙmиmvжЈh%!-э§MBо.Mэцэmцтц&.&в^оkmhжиhvиmhиhиЈhRQ%!вапоN$тфдоац.&вNищЙkm}hжиhvиhзhж
%
яовтоицжцвиkm`pж_%-
§эBM$иnmэiЙжзжmhvи}hз
_е.аоаияэMBиэnmnmэkvжmvи}hзhhѕеаоаоаиэMэцоkmphЈh§э]
аоаишрцжоnmщЖЙзmpжз№їm
m§аи
ээшоnmщЖЙж
mvжз
mhm`§
№аоиоио№цэцоk§ў§э
§
эо№цтцоk§јяаэ
а№апиоио№тц.&тэmщiЙ§ў§э
э
№пиоио№.bтфтbтцоkоиЙ§ўијяоаэ
аи
ээ№N&тn.N.жищЖОоиЙ§яоаа
оиоио№.bтbтBтBNищЖНэшы§яэирэаиоиоиоў№тn$.&$(шmkэпоў§
арапоиоиоў№&$ф$тbN$(шцищЖНэ§ўаираяиээя
§$&BтищЖНэшЙИпоўаиэ
ээя
§ищЖНэшЙОпоў§
оиоиўоиИпоўоаошэя
э§ээш§яоя
§оиОпяиэээяпшэышпоў§оиоияпои§э§яипоиооў№яэ§эо§ўёјипиээяэўоишпоўёђјэ§шиоио№оэфжоNэпоўё/шэээяN-фdдф§єпдўї§эипяBFэшпвђ§ђMђд.ўбж xпиоиоў№$опвд$ђвBдвBOж§иоў№ оpnд-BвMиhhјээ№
эрnhд$(hxvx§о№gрgn$xhx`v§ў№жи`x`v.xhxm`ў№ия`аxpn`їў~`xп
vаяhgvяпчпvўvx`эяпэўh𢹧`pgph
}иоўоў№эnяэяhxp§pа§}§эnоoў№оў№pаpn§№јпияээї`№яў№``xn№јиајо
§§№pў№ўїhgxp`hў§шп§ўяпgў№№іp`vxhяаирў§g№g`жhяаоў§hxg№x
pз`пяиhxhph`иg`№иvx``рpghpxh`hg``px`hpvhh
hgxx`h
v
g`xhxp`аm`vxgg``xhhpжxvhhpж`xxx`
`а`mxvиmxvx`xx
p}pvhpvmоx``vxp`зpvhxv
mhо
`pжxpж}mhh
pxпэш
h`а}pжиа`hxэжx
pжа`xhxожvш
з
`m`x
эяэиhxhяра`ж
vh`эо
h~ў
аh`g
эяэ
hрижgpџh
LOGIC 2 11.17.90 Ѕ 800:т40:І1860: G$(9),L$(3):э1,15:э2,15:LVГ10:SCГ1:S$Г"V20L255O1CC#DC#DD#DD#ED#EFEFED#ED#DD#DC#DC#C":T$Г"V31T255O4BA#AG#GF#FED#DC#C" 9 V$Г"O1T100L100V31EFV29EFV27EFV25EFV23EFV21EFV19EFV17EFV15EFV13EFV11EFV9EFV7EFV5EFV3EFV1EF":W$Г"T255L255V31O4CC#DD#EFF#GG#AA#BBA#AG#GF#FED#DC#C" H ( № Ѕ1910 2ф2:ѕ"BM95,0C15D29R19U6L13U23L6BR30GLG3DGD17FDF3RFR8BH6R4E2U13H2L4G2D13F2BF6ERE3UEU17HUH3LHL7BR25R8FRF3DFD3L6UH2L4G2D13F2R4E2UL3U5R9D8GDG3LGL8HLH3UHU17EUE3REBR20D6R2D17L2D6R10U6L2U17R2" Д <ѕ"U6L10BR22R8FRF3DFD3L6UH2L4G2D13F2R4E2UR6D3GDG3LGL8HLH3UHU17EUE3REBM144,53U2EUE3RER8FRF3DFD7GDG10R11D6L20U6E14U3H2L4G2DL6":IГ113Ѕ193Љ20:ш(I,28),15,15:I:ш(153,46),15,15 FІ1850:Щ T$:ч12:ю(12,12),"by Ray Berney":Щ S$:ч1:ю(0,23),"Press right joystick FIREBUTTON to start" P
џЊ(0)Г0 Їч џ(9)Ћ1:U$Г"V3L11T11O"Ћџ(џ(3)Ћ49)Ћџ(џ(7)Ћ64):Щ U$:ю(21,23),"FIREBUTTON":Ѕ80 :Щ V$:ц h ZG$(1)Г"C10R16FR2FRFRF3DF2G2DG3LGLGL2GL16EUEU2EU6HU2HUC1":G$(2)Г"C8R18FRF3DFD6GDG3LGL18U17C1":G$(3)Г"C6BD18EUEU2EU6HU2HUHBR5R16FR2FRFRF3DF2G2DG3LGLGL2GL16EUEU2EU6HU2HUC1":G$(4)Г"C7FRFRFRFRFRFRFRFRFRLGLGLGLGLGLGLGLGLGU17C1" / dG$(5)Г"C3R16FR2FRFRF3DF2G2DG3LGLGL2GL16EUEU2EU6HU2HUBR27BD7ER2FD2GL2HC1":G$(6)Г"C5R18FRF3DFD6GDG3LGL18U17BR25BD7ER2FD2GL2HC1":G$(7)Г"C9FRFRFRFRFRFRFRFRFRLGLGLGLGLGLGLGLGLGU17BR18BD7ER2FD2GL2HC1" о nG$(8)Г"C4R2UEUEUDFDFDFDFDUEUEUEUEUDFDFDFDFDUEUEUEUEUDFDFDFDFDUEUER2C1":G$(9)Г"U2LGD2FR2EU2HD3L2U2F":G$(0)Г"C2FRFRFRFRFRFRFRFRFRLGLGLGLGLGLGLGLGLGU17BM+2,+5R4D6R2L4U6L2C1" oE$Г"C1UH2L4G2D8F2R4E2U2L3BF4BR3U3EU2EU2EUEFDFD2FDNL5DFD3BR4U12F4E4D12BR4NR8U12NR8D6R5BF6BR15H2U8E2R4F2D8G2NL4BR6BU12D3FD2FD2FDFEUEU2EU2EU3BR4NR8D6NR5D6R8BR4U12R6F2D2G2L5RF6" xL$(1)Г"F2D2G2BU6BR4LR5FRL6FR6FL7DR6GL6GR5":L$(2)Г"BR2D6ERERERFREHLGLHLHLD3RU2FR":L$(3)Г"R4FRF2ERFGLHG2LGL4U5R5F2G2L4U3R4FGL3UR3" B ч1:ф2:ѕ"BM1,0R2FD2GL2HU2":ы(0,0)Ќ(4,4),2 u ц:65497,0:І1860:І460:І1810:І1850:65496,0
JВГ316 Ї 200,2:Ѕ420 м ы(JЌ2,KЌ2)Ќ(JЋ2,KЋ2),1:ь(JЌ2,KЌ2)Ќ(JЋ2,KЋ2),2,Н:ь(JЌ2,KЌ2)Ќ(JЋ2,KЋ2),1,Н ј ЊXГџ(0):YГџ(1):BГџЊ(0) " Д
BГ0 Їє(TI,188):TIГTIЌ1:
TIДГ25 Ї1900 Y О
BГ1 Їъ(TI,188)Ќ(TIЌ1,188),О:TIГTIЌ2:
TIДГ25 Ї1900 Ш
XД20 АџЊ(0)Г0 АџЋ(JЌ1,K)Г1 ЇJГJЌ1 Ї в
XД20 АџЊ(0)Г1 АџЋ(JЌ3,K)Г1 ЇJГJЌ3 Ю м
XВ44 АџЊ(0)Г0 АџЋ(JЋ1,K)Г1 ЇJГJЋ1 ѕ ц
XВ44 АџЊ(0)Г1 АџЋ(JЋ3,K)Г1 ЇJГJЋ3 №
YД20 АџЊ(0)Г0 АџЋ(J,KЌ1)Г1 ЇKГKЌ1 C њ
YД20 АџЊ(0)Г1 АџЋ(J,KЌ3)Г1 ЇKГKЌ3 j
YВ44 АџЊ(0)Г0 АџЋ(J,KЋ1)Г1 ЇKГKЋ1
YВ44 АџЊ(0)Г1 АџЋ(J,KЋ3)Г1 ЇKГKЋ3 тPГџЋ(JЋ1,K):P Ѕ290,300,410,310,410,320,330,340,410,350,360,370,380,390,400 ь"Ѕ150 9,IГ1Ѕ30: џ(99),1:I:JГJЋ19:SГSЋ((LVЌ9)25)Ћ(TIЌ26):І1830:І1880:Ѕ150 Ѓ6Щ"V31L8T2O1C":JГJЋ29:TIГTIЌ50:
TIДГ25 Їъ(TIЋ50,188)Ќ(26,188),О:Ѕ1900 :ъ(TIЋ50,188)Ќ(TI,188),О:Ѕ150 @ 9,1:
џЋ(J,KЋ10)Г14 ЇJГJЋ32:KГKЋ5:SГSЋ((LVЌ9)45)Ћ(TIЌ26):І1820:І1880:Ѕ150 :
џЋ(J,KЋ10)Г13 Ї410 GJ 9,1:JГJЋ19:SГSЋ((LVЌ9)20)Ћ(TIЌ26):І1830:І1880:Ѕ150 T 9,1:JГJЋ25:KГKЋ5:SГSЋ((LVЌ9)30)Ћ(TIЌ26):І1830:І1880:Ѕ150 Ы^ 9,1:JГJЋ27:KГKЋ5:SГSЋ((LVЌ9)30)Ћ(TIЌ26):І1830:І1880:Ѕ150 њhЩ V$:JГJЋ1:KГKЋ1:SГSЋ5Ћџ(10):І1880:Ѕ150 +rЩ S$:JГJЋ2:KГKЌ1:SГSЋ(џ(10)5):І1880:Ѕ150 Q|Щ T$:JГJЋ1:SГSЋџ(5):І1880:Ѕ150 Щ W$:JГJЋ3:KГKЋ2:SГSЋ(100(((џ(2)В1)2)Ћ1)):І1880:Ѕ150 ФЩ"O1V31T4L4C":JГJЋ2:SГSЌџ(100)Ќ100:І1880:Ѕ150 Щ"V31L1O1C":ч1:ъ(0,176)Ќ(143,183),О,BF:ю(0,22),"Wrong again, human!!":І1891:1:Ѕ1920 NЄIГTI Ѕ26ЉЌ1:SГSЋ(LVЌ9):є(I,188):I:І1890 рЎSCГSCЋ1:
SCВ10 Їч LVЋ1:ъ(78,54)Ќ(234,65),Н,BF:ч0:ю(10,7),"BONUS POINTS -"Ћџ((LVЌ9)1000):SГSЋ((LVЌ9)1000):І1880:SCГ1:LVГLVЋ1:Щ W$ЋW$ЋW$ЋW$ ёИ
LVГ14 Ї1950 ћТЅ140 'Ь Q$:QГџ(Q$):
џ(Q$,1)В"9" Їѕ Q$:Ѕ460 Lр
QВГ500 ЇQ1ГQЌ500:ѕ G$(Q1):Ѕ460 uъ
QГ401 Ї Q1,Q2,Q$:ю(Q1,Q2),Q$:Ѕ460 є
QГ402 Їч13:ѕ"BM-5,+13L0":ч1:Ѕ460 Уў
QГ403 Їч14:ѕ"BM-5,+13L0":ч1:Ѕ460 з
QГ444 Ї J,K: "BM3,12R188BR30R9BR20R65BD20L4BL290L11U20XG$(9);D20XG$(9);D21R10BR78R218BM192,12",508,"BM231,3",504,"BM22,23",504,"BM41,23",504,"BM60,23",504,"BM79,23",504,"BM98,23",504 / "BM117,23",504,"BM136,23",504,"BM155,23",504,"BM174,23",504,"BM193,23",504,"BM212,23",504,"BM231,23",504,"BM250,23",504,"BM269,23",504,"BM288,23",507,"BM21,53",508 Y&"BM50,53",508,"BM79,44",504,444,3,12 30"BM3,171R11U10XG$(9);NR10U10R3U3R3U3R3U3R3U3R3U3R3U3R3U3R3U3R3U3R3U3R3U3R3U3R3U3R3U3R3U3R3U3R3U3R3U3R3U3R3U3R3U3R3U3R3U3R3U3R3U3R3U3R3U3R3U3R3U3R3U3R3U3R3U3R3U3R3U3R3U3R3U3R3U3R3U3R3U3R3U3R3U3R3U3R3U3R3U3R3U3R11" :"BR20R136BM44,161R230BR20R21BM161,7",504,"BM25,152",504,"BM275,152",504,444,3,171 GD"BM3,92R233L30XG$(9);U20NR10D40R30BR20R59BU20L59BU20BL20R49BR30R0BM176,92XG$(9);U50R10BR20R109BD90L109BL20L20U4џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџС ФС ФТФУ ЧСШШС !"#$%&'()*+ЦЧС/0СЦУ4ТУХ8ЩЩФУХШ?@AФФЦ C BAS 9 Я C* BAS < Ж C1 BAS : C2 BAS ; њ CALC BAS > CALC DOCџ - CFDMPROGDATџ CHANSON BIN 6 Ь DIGITAL BAS , DISKCAS2BAS Г DISKCASEBAS 3 B DISKFILEBAS К DRAWPOKRBAS . / FONT BIN B GALLERY BAS 1 U HRIDDLE NIB INTERLUDBIN
A JOYSTICKBAS = ъ LOGIC2 BAS MELT BAS Ѕ NIBLOADRBIN 2 ` OLD MILLNIB к OPINIONSNIB < ORGANISTBAS 5 } PLAY BIN - T PRINTME BAS C PROGPUZLBAS RECORD BIN Ѓ SHUTTLE NIB 7 j TRANQUILBIN
џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ0XG$(9);L20XG$(9);U80R10BR20R140LBD150L139BL20L20U70XG$(9);BM237,83",504 РN"BM217,63",504,"BM187,33",504,"BM157,3",504,"BM237,103",504,"BM187,123",504,"BM157,153",504,"BM286,72",508,444,3,92 !X"BM3,86R20U75NR16D30XG$(9);NR16D30XG$(9);NR16D15XG$(9);D15XG$(9);NR16D30XG$(9);NR16D30R16BR20R160D5L150D5R155U10R15BU30L30D10L10U20L10D20L10U20L10D20L10U20L10D20L10U20L10D20L10U20L10D20L10U10L40BU30R160U5L5U5R10D15" "ub"L5D5R10U10R10BU30L150D20L5U40L5D20L20BU30R130D5R5U5R5D5R5U5R5D5R5U5R5D5R5U5R15BU30L30D20L3U3L3U3L3U3L3U3L3U3L3U3L3U3L3U3L3U3L3D7L120BR200BD150R58BU5L50U25L8BU30R13D50R45BU5L40U75L18BU30R23D100R35BU5L30U125L28" #3l"BM40,2",504,"BM40,32",504,"BM40,62",504,"BM40,92",504,"BM40,122",504,"BM40,152",504,"BM240,2",504,"BM240,32",504,"BM240,62",504,"BM240,92",504,"BM240,122",504,"BM240,152",504,444,3,86 #чv"BM3,116R188BD10L189BM162,116XG$(9);U30NR29XG$(9);U30R29BR28BD5R96BD15R2L140U10R14BD30L14D10R140BU15BLL92BD30R91BM190,112",503,402,"BM190,82",503,403,"BM190,52",501,444,3,116 $Ћ"BM3,6R88BD10L88BD30R88BD30L88BD30R88BD30L88BD30R88BR33BU155R5XG$(9);NR186D15L50D10R12BR33BD5R5XG$(9);NR186D15L50D10R12BR33BD5R5XG$(9);NR185D15L50D10R12BR33BD5R5XG$(9);NR186D15L50D10R12BR33" %M"BD5R5XG$(9);NR187D15L50D10R12BR33BD5R195BM90,2",503,403,"BM90,32",503,403,"BM90,62",503,403,"BM90,92",503,403,"BM90,122",503,403,"BM90,152",503,402,444,3,6 &&"BM3,46R12L6XG$(9);U40NR308BD50NR6D40R90D20L5BL43L49BM43,51R13BD5BR26R14BD5BR33R15BR20R16BD5BR32R13BD5BR31R17BD5BR28R16BM56,61L10D35XG$(9);BL10BD20XG$(9);D20R70U50L20U20R10BM106,86XG$(9);R60U15NR14D15XG$(9);R50" &№"U10NR9D10XG$(9);R50U5R7BM49,51XG$(9);U40R268BM88,56XG$(9);U40R229BM136,61XG$(9);U34R84BR59R38BD13L9BL59L113XG$(9);BD21BR36XG$(9);U10R144BM14,42",501,"BM57,47",502,"BM95,52",503,403,"BM145,52",504 '
Ј"BM179,57",505,"BM226,62",506,"BM272,67",501,"BM52,107",504,"BM71,107",507,"BM221,27",508,"BM250,27",508,"BM250,40",508,"BM279,40",508,444,3,46 (LВ"BM3,170R7U19XG$(9);NR9U20XG$(9);NR9U20XG$(9);NR9U20XG$(9);NR9U20XG$(9);NR9U20XG$(9);NR9U20XG$(9);NR9U20R9BR20R100D5R12BD10L12D5L100BD20R134D5R8BD10L6BL88L20D5L28BD20R134D5R6BD10L4BL88L20D5L28" )
М"BD20R100D5R10BD10L10D5L100BM183,21R134BD20BL2L102D20XG$(9);L4R11L7D15R67BD10L67D15XG$(9);R7L15R8D20R102BU20RL72BU40R72BD20NL3BD60L136BM20,2",504,"BM20,22",504,"BM20,42",504,"BM20,62",504 )ЛЦ"BM20,82",504,"BM20,102",504,"BM20,122",504,"BM20,142",504,"BM150,12",505,"BM150,132",506,"BM180,92",502,"BM180,52",501,"BM221,52",507,"BM221,92",507,"BM279,72",503,403 *6а"BM88,66",508,"BM117,66",508,"BM146,66",508,"BM88,106",508,"BM117,106",508,"BM146,106",508,"BM279,86C9R0C1",444,3,170 *јк"BM3,41R16L8XG$(9);U35NR10D60NR10XG$(9);D30NR10XG$(9);D30NR10XG$(9);D30R10BD10L4D6R37XG$(9);U6NR7D6R40U6NR7D6XG$(9);R40XG$(9);U6NR7D6R40XG$(9);U6NR7D6R40XG$(9);U6NR7D6R40XG$(9);U6NR7D6R63" +Чф"BU30L63XG$(9);U6NR7D6L40XG$(9);U6NR7D6L40XG$(9);U6NR7D6L40XG$(9);U6NR7D6L40XG$(9);U6NR7D6L40XG$(9);U6NR7D6L37U6R4BU30L4D6R37XG$(9);U6NR7D6R40XG$(9);U6NR7D6R40XG$(9);U6NR7D6R40XG$(9);U6NR7D6R40XG$(9);" ,ю"U6NR7D6R40XG$(9);U6NR7D6R63BU30L224XG$(9);U6NR8D6L39XG$(9);U6NR5D6L37U6R4BU60L4D7R37XG$(9);U7NR7D7R40XG$(9);U7NR7D7R40XG$(9);U7NR7D7R40XG$(9);U7NR7D7R40XG$(9);U7NR7D7R40XG$(9);U7NR7D7R63BU12NL23BD30NL8BD30L28" -jј"BL20L10BL20L10BL30L6BL24L10BL20L10BU5BL28L8D5L8BU5BL26L3D5L2BU60R3U5R4BR33BD5R3U5R4BR33BD5R3U5R4BR33BD5R3U5R4BR28BD5R5U5R7BR32BD5R4U5R4BM54,101R3U5R4BR33BD5R3U5R4BR33BD5R3U5R4BR33BD5R3U5R4BR33BD5" .1"R3U5R4BR33BD5R3U5R4BR33BD5R22BM54,131R3U5R4BR33BD5R3U5R4BR33BD5R3U5R4BR33BD5R3U5R4BR33BD5R3U5R4BR33BD5R3U5R4BR33BD5R22BM54,161R3U5R4BR33BD5R3U5R4BR33BD5R3U5R4BR33BD5R3U5R4BR33BD5R3U5R4BR33BD5" .ф "R3U5R4BR33BD5R21BM20,2",503,403,"BM60,2",503,403,"BM100,2",503,403,"BM140,2",503,403,"BM180,2",501,"BM220,2",505,"BM260,2",503,402,"BM20,32",504,"BM39,32",507,"BM62,32",504 /"BM81,32",504,"BM100,32",504,"BM119,32",504,"BM138,32",504,"BM157,32",504,"BM176,32",504,"BM195,32",504,"BM214,32",504,"BM233,32",504,"BM252,32",504,"BM271,32",504,"BM290,32",504 0R "BM20,62",503,403,"BM60,62",502,"BM100,62",501,"BM140,62",504,"BM170,62",507,"BM200,71",508,"BM240,62",504,"BM270,62",500,"BM20,92",503,402,"BM60,92",503,402,"BM100,92",503,402 1*"BM140,92",503,402,"BM180,92",503,402,"BM220,92",503,402,"BM260,92",503,402,"BM20,122",503,403,"BM60,122",503,403,"BM100,122",503,403,"BM140,122",503,403,"BM180,122",503,403,"BM220,122",503,403 1Х4"BM260,122",503,403,"BM20,152",503,403,"BM60,152",503,403,"BM100,152",503,403,"BM140,152",503,403,"BM180,152",503,403,"BM220,152",503,403,"BM260,152",503,403,444,3,41 2>"BM3,161R26BR20R80U15L110U15R10BR20R81U15L111U15R10BR20R82U15L112U15R10BR20R83U15L113U15R10BR20R84U15L114U15R10BR20R210BR20R10D40L40D40R10BR20R38BM30,2",504,"BM30,32",504,"BM30,62",504,"BM30,92",504 2лH"BM30,122",504,"BM30,152",504,"BM260,2",504,"BM260,82",500,444,3,161 3ЁR"BM3,63R4XG$(9);D3XG$(9);NR33U20NR2D51R3BR107R200BU31L167BL20L2BU20NR188L11BL20L0BM10,46",508,"BM39,46",508,"BM68,46",508,"BM98,37",504,"BM41,66",508,"BM70,66",508,"BM99,66",508,"BM131,57",504 3ч\"BM11,97",508,"BM40,97",508,"BM69,97",508,"BM98,88",504,444,3,63 4Фf"BM3,6R88BD10L10D10NL4NR4BD2NL2NR2BD2D0BD16R10L30U40XG$(9);L10XG$(9);D90R40BU40L10D10NL4NR4BD2NL2NR2BD2D0BD50U0BU2NL2NR2BU2NL4NR4U10R10BD40L50U140XG$(9);BD150BR50L60U140L28BR116BU5R100BR30R30L10XG$(9);D20R10BD20L20" 5p"U40XG$(9);BR40R16BD20L16BD20R16BD20L70U20L122BD50BRR95BR30R30BR20R10D15L40D15R10BR20R16BD20RL17BL20L30BL30L95BM90,142",503,403,"BM90,92",503,403,"BM90,42",505,"BM90,2",501,"BM220,11",508,"BM220,101",508 6
z"BM220,151",508,"BM280,142",504,"BM280,122",504,"BM280,92",504,"BM280,2",504,"BM280,22",504,"BM280,42",504,444,3,6 6щ"BM3,36R24L20XG$(9);U30R20BD10L8D7NL4NR4BD2NL2NR2BD2D0BD9BL12D35R18BR20R10D15L40D15R10BR20R10D15L40D10R12BD10L8D7NL4NR4BD2NL2NR2BD2D0BU90D0BU2NL2NR2BU2NL4NR4U7R8BE35L2R55BR30R70BR30R40BR20R12BD30L138BL24L10XG$(9);" 7Ъ"NL90D20XG$(9);NR10D15R12BD10L8D7NL4NR4BD2NL2NR2BD2D0BD34BL89R10D30R186BR20R15BR24R2BM175,61R60U5R30BD10L15D5NL4NR4BD2NL2NR2BD2D0BM235,61XG$(9);D20XG$(9);NR30D15R32BD10L8D7NL4NR4BD2NL2NR2BD2D0BM189,81R10D63R118BU83NL21" 8"BD20NL28BD20BL22R10D20L43D11R3BR30R22BM26,2",503,403,"BM26,32",501,"BM26,62",504,"BM116,11",508,"BM216,11",508,"BM286,2",504,"BM156,32",507,"BM156,52",504,"BM156,72",505,"BM266,52",506 9Ђ"BM266,72",507,"BM266,92",501,"BM266,132",508,"BM26,92",504,"BM26,122",503,403,"BM292,152",507,"BM257,152",504,444,3,36 9сЌ"BM3,111R16L10XG$(9);U100NR10D20XG$(9);NR10D20XG$(9);NR10D20XG$(9);NR10D20XG$(9);NR10D40XG$(9);NR10D20XG$(9);NR10D16R10BR30R30U16R10BR20R10D16R198BM39,11R50BD20NL46BR24R20U15R36BU10L50D5L10BR86R40D15R16BD10L16D15" :ЙЖ"L40BU5BL26L5U10R60U10L80D25L105BD20BR4R10U5R38BD10L20D15L28BU20BR76R40U15R10BL130BD55R10U15R90U5R30BR24R10U15R48BU10L7U10R50U25L10BD40R10D20L50D15R7BD10L40D15L11BL161R20U25R32BD10L10D25L10D10L28BR81BU40R30D15" ;zР"XG$(9);NR15D10XG$(9);NR15D20R95BU10L10U10R50U25L6BD40BL3R37BM20,2",504,"BM20,22",507,"BM20,42",504,"BM20,62",507,"BM20,82",507,"BM20,102",504,"BM20,122",504,"BM20,142",507,"BM20,167",508 <<Ъ"BM90,142",504,"BM90,102",503,403,"BM90,62",501,"BM90,22",507,"BM90,2",504,"BM170,2",502,"BM170,42",502,"BM170,82",507,"BM170,122",506,"BM250,22",503,403,"BM250,62",503,403,"BM250,102",505 <[д"BM250,142",506,444,3,111 = о"BM3,26R18L10XG$(9);U20NR306BM21,36L10D30XG$(9);NR40D20XG$(9);NR100D20XG$(9);NR150D10L9BD10R9XG$(9);NR210D20R260L10XG$(9);D15R25BR20R10BU20BLNL11BU20L19BL20L22R7XG$(9);D15R10BM315,101L9BL20" =сш"L0BL20L0BL20L0BL20L32R10XG$(9);D15NR17BU35NL60R11BR20R20BR20R20BR20R0BL165XG$(9);D15R11BU35BL77R10XG$(9);D15NR17U15R41BR20R10BR20R10BR20R10BR20R10BR20R10BR20R11LBU30L16BL20L10BL20L10BL20" >ђ"L10BL20L10BL20L10BL20L10BL20L45R10XG$(9);D15L20D10R7BM160,92",503,403,"BM110,72",503,403,"BM50,52",503,403,"BM20,22",503,403,"BM220,112",503,402,"BM270,132",503,402 ?6ќ"BM100,22",504,"BM130,22",504,"BM160,22",504,"BM190,22",504,"BM220,22",504,"BM250,22",504,"BM280,22",504,"BM136,52",504,"BM166,52",504,"BM196,52",504,"BM226,52",504 ?ы"BM256,52",504,"BM286,52",504,"BM216,72",504,"BM256,72",504,"BM296,72",504,"BM287,92",504,"BM267,92",504,"BM247,92",504,"BM227,92",504,"BM277,112",504,"BM287,152",504,444,3,26 @Ў"BM3,161R19BR107R19BR107R10U106R10BR30R12BM23,161",508,"BM52,161",508,"BM81,161",508,"BM110,152",504,"BM149,161",508,"BM178,161",508,"BM207,161",508,"BM236,152",504,"BM276,55",508,444,3,161 A"BM3,6R18BD10L8D7NL4NR4BD2NL2NR2BD2D0BR41BU16RD135R6BD10L8D7NL4NR4BD2NL2NR2BD2D0BR41BU16R2U145R15BD10L7D10R7D5NL4NR4BD2NL2NR2BD2D0BR33BU24RD135R6BD10L8D7NL4NR4BD2NL2NR2BD2D0BR41BU16R2U145R15BD10L7D10R7D5NL4NR4" BY$"BD2NL2NR2BD2D0BR33BU24R15L8XG$(9);D60R38BR20R10D15L40D15R10BR20R10D15L40D15R46BU90RL17BL20L5U30XG$(9);L5R10BR20R16BM20,2",503,403,"BM60,142",503,403,"BM110,2",503,403,"BM150,142",503,403,"BM200,2",503,403 BЏ."BM250,2",504,"BM280,2",504,"BM280,32",504,"BM280,62",504,"BM280,92",504,444,3,6 Cm8"BM3,11R13BR229R2D13L234D13R4BR286R13BM6,11XG$(9);D150R80BR20R210BM17,2",504,"BM36,2",504,"BM55,2",504,"BM74,2",504,"BM93,2",504,"BM112,2",504,"BM131,2",504,"BM150,2",504,"BM169,2",504 D B"BM188,2",504,"BM207,2",504,"BM226,2",504,"BM18,28",504,"BM37,28",504,"BM56,28",504,"BM75,28",504,"BM94,28",504,"BM113,28",504,"BM132,28",504,"BM151,28",504,"BM170,28",504 DL"BM189,28",504,"BM208,28",504,"BM227,28",504,"BM246,28",504,"BM265,28",504,"BM284,28",504,"BM87,152",504,444,3,11 ERV"BM3,16NR145BD30NR143BD30NR145BU70R145BR28BD5R30D15L100D10R40BR26BD5R34D15L100D10R42BR33BD5R25D15L100D15XG$(9);NR40D21R40BR30R140BU21L150BM147,2",501,"BM147,32",502,"BM147,62",503,403 E~`"BM147,92",504,"BM147,122",508,444,3,6 F8j"BM3,136R33BD10L5D16R8BR23BU21R139BR20R5U15L40U15XG$(9);NR15U30XG$(9);NR15U30R15BR20R70BD30NL66BD30NL66BR20R6BU30L6BU30R6BM40,162",508,"BM69,162",508,"BM98,162",508,"BM127,162",508 Fкt"BM156,162",508,"BM185,162",508,"BM214,162",508,"BM243,162",508,"BM272,162",508,"BM37,132",502,"BM202,132",504,"BM202,102",507,"BM202,72",507,"BM202,42",504 G$~"BM292,42",500,"BM292,72",500,"BM292,102",500,401,38,20,V+,444,3,136 Gх"BM10,173U0BU2NL2NR2BU2NL4NR4U14R5BR24R5XG$(9);R5BR24R5XG$(9);R5BR24R5XG$(9);R5BR24R5XG$(9);R5BR24R5XG$(9);R5BR24R5XG$(9);R5BR24R5XG$(9);R5BR24R10BR24R6BL273U30L40U60R10BU5NL12BU5L10U52L" HЅ"BM40,60R10XG$(9);U20L30U30R5BR20R240BR20R10BM50,60R20U20L10U10R23BD10L5D115BR34U100R10U10R90BM116,35R110D30L50D10R35BD10L45U30R50U10L3BM239,80R10XG$(9);U50L47U10R67D10R47BM249,80D20R20" I_"BD5BRL124D50BR34U45R89BM214,155U10L10U24R15BD10L4D10R33D14BU29BL3R10D10R25BU10L20U8R55U13L18BM308,131R7BM286,1",504,"BM82,26",503,403,"BM210,71",501,"BM268,96",501,"BM279,122",501 IўІ"BM220,117",502,"BM26,1",504,"BM15,51",502,"BM288,146",507,"BM254,146",507,"BM220,146",507,"BM186,146",507,"BM152,146",507,"BM118,146",507,"BM84,146",507 J)А"BM50,146",507,"BM16,146",507,444,3,3 JўК"BM3,3R3D3R3D3R3D3R3D3R3D3R3D3R3D3R3D3R3D3R3D3R3D3R3D3R3D3R3D3R3D3R3D3R3D3R3D3R3D3R3D3R3D3R3D3R3D3R3D3R3D3R3D3R3D3R3D3R3D3R3D3R3D3R3D3R3D3R3D3R3D3R3D3R3D3R3D3R3D3R3D3R3D3R3D3R3D3R3D3R3D3R3D3R3D3R3D3R3D3R3D3" KФ"R3D3R3D3R3D3R3D3R3D3R3D3R6U3R3U3R3U3R3U3R3U3R3U3R3U3R3U3R3U3R3U3R3U3R3U3R3U3R3U3R3U3R3U3R3U3R3U3R3U3R3U3R3U3R3U3R3U3R8BR20R46BM252,93",504,444,3,3 LVЮ"BM3,173R60U5L60U5R80L5XG$(9);U20R5BR20R3U14L103U110R4BR20R10XG$(9);ND100R6BR267R5BM37,119R10U6R16BR248R4BM66,43L29XG$(9);BD10BR29L10D10R40XG$(9);U5NR10D10R40XG$(9);U5NR10D10R40XG$(9);" Mи"U5NR10D10R40XG$(9);U5NR10D10R40XG$(9);U5NR10D10NL4NR4BD2NL2NR2BD2D0BM99,48R7BD5BR33R7BD5BR33R7BD5BR33R7BD5BR33R7BD5BR33R17LBD90L212BM84,154",504,"BM84,134",504,"BM8,10",504,"BM44,10",504 MПт"BM63,10",504,"BM82,10",504,"BM101,10",504,"BM120,10",504,"BM139,10",504,"BM158,10",504,"BM177,10",504,"BM196,10",504,"BM215,10",504,"BM234,10",504,"BM253,10",504 Nqь"BM272,10",504,"BM291,10",504,"BM65,39",503,403,"BM105,44",503,403,"BM145,49",503,403,"BM185,54",503,403,"BM225,59",503,403,"BM265,64",503,403,"BM64,104",504,"BM83,104",504 O0і"BM102,104",504,"BM121,104",504,"BM140,104",504,"BM159,104",504,"BM178,104",504,"BM197,104",504,"BM216,104",504,"BM235,104",504,"BM254,104",504,"BM273,104",504,"BM292,104",504,444,3,173 P "BM3,11R208BR20R80D20L80D20R10BR20R50D20L80D20R40BR20R20D20L140D20R10BR20R10D20L50U20L20D30R80BR20R10U40R10D40R10U40R40D20R5BM212,2",504,"BM242,42",504,"BM272,82",504,"BM182,122",504,"BM222,152",504,444,3,11 Pб
"BM3,3R20D170R3U170R3D170R3U170R3D170R3U170R3D170R3U170R3D170R3U170R3D170R3U170R3D23R52BD10L10D10NL4NR4BD2NL2NR2BD2D0BR43BU19R10U28R3D170R3U170R3D170R3U170R3D170R3U170R3D170R3U170R3D170R3U170R3D170" Qn"R3U170R3D138R16BR20R30XG$(9);NR56U138R3D70R3U70R3D70R3U70R3D70R3U70R3D70R3U70R3D70R3U62R5BR20R3BM110,22",503,403,"BM210,132",504,"BM295,2",504,444,3,3 R< "BM191,36L10D5NL4NR4BD2NL2NR2BD2D0BR8BD21L5D10NR133BD20NR7D10XG$(9);NR7D10XG$(9);NR7D16XG$(9);NR5D6NL4NR4BD2NL2NR2BD2D0BU131BR25R106BD20L91BD30L9R100BD30L96BD20BR4R92BD21L96BD29BL10R107BL313BU70R3U86" S("R3D160R3U160R3D160R3U160R3D160R3U160R3D160R3U160R3D160R3U160R3D160R3U160R3D160R3U160R3D160R3U160R3D160R3U160R3D160R3U160R3D160R3U160R3D160R3U160R3D160R3U160R3D160R3U160R3D160R3U160R3D160R3U160" SЧ2"R3D160R3U160R3D160R3U160R3D160R3U160R3D160R3U160R3D160R3U160R3D160R3U160R3D160R10U4XG$(9);NR38U75XG$(9);NR40U30XG$(9);NR38U30XG$(9);NR40U15R38BM190,2",504,"BM190,22",503,403,"BM190,52",502 T<"BM190,82",501,"BM190,102",505,"BM190,132",508,"BM190,152",504,444,3,91 TщF"BM3,161R66BR20R5XG$(9);NR221U150R5BR20R5XG$(9);NR191D130R5BR20R5XG$(9);NR161U110R5BR20R5XG$(9);NR131D90R5BR20R5XG$(9);NR101U70R5BR20R5XG$(9);NR71D50R5BR20R5XG$(9);NR41U30R5BR20R17BM70,152",504,"BM100,2",504 UTP"BM130,132",504,"BM160,22",504,"BM190,112",504,"BM220,42",504,"BM250,92",504,"BM280,62",504,444,3,161 V.Z"BM260,157L5D10L40U10NR5D10XG$(9);L40U10NR5D10XG$(9);L40U10NR5D10XG$(9);L40U10NR5D10XG$(9);L40U10NR5D10XG$(9);L40U10NR5D10R200D6NL4NR4BD2NL2NR2BD2D0BM315,152L2BL20L0BL33BU5L4D5L3BL33BU5L4D5L3BL33BU5L4D5L3BL33BU5" Vљd"L4D5L3BL33BU5L4D5L3BL33BU5L4D5L3BL33BU5L10U65XG$(9);NR128NL7U60R99BR107R100LBD60L157BM110,22",508,"BM139,13",504,"BM158,22",508,"BM187,22",508,"BM139,73",504,"BM139,143",503,403,"BM99,143",503,403 Wyn"BM59,143",503,403,"BM19,143",503,403,"BM179,143",503,403,"BM219,143",503,403,"BM259,143",503,403,"BM294,143",504,444,3,82 X7x"BM3,11R4BR20R10BR20R10BR20R10BR20R10BR20R10BR20R10BR20R10BR20R10BR20R10BR20R20BD40L20BL20L10BL20L10BL20L10BL20L10BL20L10BL20L10BL20L10BL20L10BL20L10BL20L4BU20R4BR20R220BR20R10BR20R19" Xо"BM8,2",500,"BM38,2",500,"BM68,2",500,"BM98,2",500,"BM128,2",500,"BM158,2",500,"BM188,2",500,"BM218,2",500,"BM248,2",500,"BM278,2",500,"BM8,42",500,"BM38,42",500 Y"BM68,42",500,"BM98,42",500,"BM128,42",500,"BM158,42",500,"BM188,42",500,"BM218,42",500,"BM248,42",500,"BM278,42",500,"BM8,22",504,"BM248,22",504,"BM278,22",504,444,3,31 YЛ"BM3,42R250BR20R43BM254,33",500,444,3,42 Z "BM3,101R153BR20R6XG$(9);U6R3U3R3U3R3U3R3U3R3U3R3U3R3U3R3U3R3U3R3U3R3U3R3U3R3U3R3U3R3U3R3U3R3U3R3U3R3U3R3U3R3U3R3U3R3U3R3U3R3U3R3U3R3U3R3U3R29BR20RBD90L6BL20L19BM185,101",508,"BM214,101",508 ZЪЊ"BM243,101",508,"BM157,92",504,"BM296,2",504,"BM291,92",504,444,3,101 [Д"BM3,3R80D160R9BR20R4U150R80BR20R4XG$(9);U7R47BD10L10U2LHU2ER2FD2GBD30EU2HL2GD2FRD2R10BD30L10D3NL4NR4BD2NL2NR2BD2D0BD23BR10L10U2LHU2ER2FD2GBD32BR9L10D3NL4NR4BD2NL2NR2BD2D0BD23BR10L10D7R60" \CО"BU72L17BU60R17BU30L17BD60R15BD60RL16BD30R17BU5BL50L47U30XG$(9);NR47U30XG$(9);NR47U30XG$(9);NR47U30XG$(9);NR47U23BM93,154",504,"BM197,4",504,"BM266,2",503,402,"BM266,32",503,402 \Ш"BM266,62",503,403,"BM266,92",503,402,"BM266,122",503,403,"BM266,152",503,402,444,3,3 ]Yв"BM3,117R20XG$(9);D10L20D10R30BR20R10D20L10XG$(9);NU10L30XG$(9);U10L20D20R10U10BR10D10R50BR30R10U10R10BR20R10D10R10XG$(9);U20L30U10L20D10L10D10L30U20R10BR20R5U10R25XG$(9);R10D10R30" ^%м"D20BG10R20U40L30U10R40XG$(9);D50R10BR59R55BL124BU50R10D40R114BM23,117U10L10U10XG$(9);L10ND10R20U10L20U10R40BD10L10D10R10D10L10D10R10D10R30U10R50U10L65D10NL4NR4BD2NL2NR2BD2D0BD6BR75U30L80BU15BR23R7" ^ъц"D5R60XG$(9);ND30R10XG$(9);D20R60BR20R10D10L10D10L20D10R30BM212,143D6U3R4U3D6BR5R2LU6LR2BR6D4BD2D0BR6U0BU2U4BM143,87U10L50U10L90U20R10BR20R10D10XG$(9);L10R70D10R50D10R10BG10R10BR88R10BU10L98" _№"BM53,57XG$(9);U10R60BR20R10D10R20D10R80U10BM263,137R10U10L10U10L10U10R20D10R10D10R10D10L10D10R20U10R10U10R4BU45L28BM243,57L70U10R80BR20R44BM34,128",504,"BM74,167",508 `Gњ"BM124,148",504,"BM84,128",504,"BM204,167",508,"BM233,167",508,"BM42,73",503,403,"BM214,98",504,"BM244,128",504,"BM14,38",504,"BM164,87",508,"BM193,87",508,"BM222,87",508 `Љ"BM260,73",501,"BM114,38",504,"BM254,38",504,401,4,2,THIS SPACE FOR RENT OR LEASE.,444,3,117 as"BM309,166NR8BU10NR7BU10NR8BU10NR6BU10NR7BU10NR6BU10NR5BU10NR10BU10NR9BU10NR7BU10NR6BU10NR6BU10NR5BU10NR10BU10NR7BU10NR8BU10NR6BL30L40D10XG$(9);R6BR30NLR5BL41L143BL20L60D70XG$(9);R10U50R10BR20R90" bA"XG$(9);D20NR10U20R10BR20R30D10R73L10XG$(9);D10R10BD10L20U10L60U10L10D10L13BH20L10U15R30D10R5U10R5D5R93L60XG$(9);D10R60BD40L30U10L73D10L30U10L10U20L80D10L20D40L20XG$(9);U10D60XG$(9);R10BR20R10XG$(9);" c ""R10BR20R10XG$(9);R10BR20R10XG$(9);R10BL90U10L10U10L20U20R20U40R20U10R60D20R10D10R50U10R50D10R30XG$(9);NR13D10R13BM96,146U40R183BD10L143D30BR30R10U20R103BM16,146D20R160U10R10BR20R10XG$(9);U10NR10" cЮ,"D20R10BR20R33BU20L33R20XG$(9);U10R13BD20L13U10BM16,86L13BM245,16",508,"BM77,7",504,"BM37,27",504,"BM157,27",504,"BM157,47",504,"BM27,137",504,"BM67,137",504,"BM107,137",504,"BM147,137",504 d6"BM187,147",504,"BM227,137",504,"BM227,157",504,"BM280,6",508,"BM280,16",508,"BM280,26",508,"BM280,36",508,"BM280,46",508,"BM280,56",508,"BM280,66",508,"BM280,76",508,"BM280,86",508 e@"BM280,96",508,"BM280,106",508,"BM280,116",508,"BM280,126",508,"BM280,136",508,"BM280,146",508,"BM280,156",508,"BM280,166",508,444,3,86 eзJ"BM3,61R30XG$(9);U50NR16D20XG$(9);NR16D20XG$(9);NR16D20XG$(9);NR16D20XG$(9);NR16D20R16BR20R247BU20L247BU20R247BU20L247BU20R247BU20L247BM50,2",504,"BM50,22",504,"BM50,42",504,"BM50,62",504 fT"BM50,82",504,"BM50,102",504,444,3,61 fв^"BM3,6R38BD5BR28R10L7XG$(9);U8R243BD13BL194L16R8XG$(9);U8R202BD13BL161R5BR20R40XG$(9);NR97D20L100D30R10C5BRU10R20D40L20U30BRBD7F3G3C1BU3BL2NL127BM132,68R3FD4GL3RU6BR12R2FD3GNHNFGLHU4BD20D4FRENHNFEU3HL2" gYh"BHBUR4BM151,71R166BD20L166BM121,26L8D5L110BU5R70U5R6BU5BL38L39BM40,2",501,"BM80,7",502,"BM120,12",503,403,"BM160,12",504,444,3,6 h&r"BM254,136C3R50U130L50D130C1BM253,107L10U96L36BL24L180BM253,115L15U65L31R10XG$(9);D15L50D10R7BD5BR28R30D43R21BD8L26U21L29BU5BL26L5U10R50U15XG$(9);BD51BR10XG$(9);L30U5L30D14R5BR20R30D21R20BR30R44BU30" hђ|"NL11BU9NL11BU8NL11BU8NL11BU8NL11BU8NL11BU8NL11BU8NL11BU8NL11BU8NL11BU8NL11BU8NL11BU8NL11BU8NL11BU8NL11BU8NL11BM174,45NL171BD10NL171BD30NL171BD30BL2L169BM184,2",507,"BM173,41",503,403,"BM173,71",501 iН"BM173,101",502,"BM173,131",504,"BM243,161",508,401,37,1,0,401,37,2,1,401,37,3,2,401,37,4,3,401,37,5,4,401,37,6,5,401,37,7,6,401,37,8,7,401,37,9,8,401,37,10,9,401,36,11,10,401,36,12,11,401,36,13,12 j# 401,36,14,13,401,36,15,14,401,36,16,15,401,32,13,A,401,32,14,B,401,32,15,C,401,32,16,D,444,3,45 jѓ"BM194,91C10R8U10R4L8D10C1BM253,86L4C10BM160,74LGD2FR2BD6L2GD2FRBR54U26R41D34L41U7BM247,7C1D30BDC9L94D63R110U63L16BD29BR9R6BD24L6BL68L6D9BU24BL25L3BD10R3BM213,68L9U15HD2R2U2DR6L20U14BR56D14L6BM191,37C1" kРЄ"U10L60D11NL5NR5BD3L2GLGBR10HLHL2D10NL4NR4BD2NL2NR2BD2D0BM152,76L60U10L12BL20L57R40XG$(9);D20R17BR20R72L60XG$(9);D30R40BR20R10D40R10BR20R123L110XG$(9);U10R60BR30R21BU55L52BL82BD11D10R134BM160,72",501 l[Ў"BM189,77",502,"BM212,53",508,"BM61,57",504,"BM61,77",504,"BM133,107",504,"BM173,147",504,"BM266,146",508,401,31,8,Q,401,31,11,Q,401,30,0,V+,444,3,66 m4И"BM19,11NR30D15XG$(9);NR70D15XG$(9);NR30D15XG$(9);NR70D15XG$(9);NR30D15XG$(9);NR70D15XG$(9);NR30D15XG$(9);NR70D15XG$(9);NR30D15XG$(9);NR70D15R30BM109,86R80BU5L80U10L40BU30R50D30R70BD5L75U20L5BU30R15D40R65BU5L60" n Т"U50L60BD90R40U10R80BD5L75D20L5BD30R15U40R65BU5L70D30L50BD30R60U50R60BM190,51C9D90R20U90L20BD10C11R0BFC14R0BF2BRC12R0BEBRC15R0BR2C13R0BRC12R0BEBRR0BEBRR0BEBRR0BEBRC14R0BF2BRC13R0BRC1R105BM190,66C14R0BRBF2R0BR" nзЬ"BF2C12R0BRBEC15R0BR2R0BR2R0BR2R0BR2R0BR2R0BR2R0C1R106BM191,71C14R0BR10C11R0BM191,76C13R0BRC15R0BR3BUC12R0BM190,81D0BEBRR0BEBRR0BEBRR0BEBRR0BEBRR0BEBRR0BEBRC13R6C1R106BM19,86L16BM190,86C13R21C1R104" oЏж"BM190,91C15R21C1R105BM190,96C14R0BF2BRC11F15C15R0BR2C1R10U17R95BM190,101C12R0BEBRC14R0C15R0C11R0BFC13R0BRC11R0BFR0BFC14R0BF2BRC13R0BRBM190,111C14R0BF2BRR0BF2BRR0BF2BRR0BF2BRR0BF2BRR0BF2BRC13R0BRR0BRR0BRC1R106" pр"BM190,106C12R0BEBRR0BEBRR0BEBRR0BEBRR0BEBRR0BEBRR0BEBRR0BEBRR0BEBRC15R0BR2" pЌъ"BM50,2",504,"BM50,32",504,"BM50,62",504,"BM50,92",504,"BM50,122",504,"BM50,152",504,"BM90,17",504,"BM90,47",504,"BM90,77",504,"BM90,107",504,"BM90,137",504,444,3,86 q{є"BM3,12R5XG$(9);NR111D20XG$(9);NR111D20XG$(9);NR111D20XG$(9);NR111D20XG$(9);NR111D20XG$(9);NR111D20XG$(9);NR111D20R111BR20R10D17R166BM195,5C3D110R80U110L80BM139,12C1R55BD20L55BD20R55BD20L55BD20R55BD20" rJў"L55BD20R70XG$(9);NU16R107BU30RL41BU80R41BM120,3",500,"BM120,23",500,"BM120,43",500,"BM120,63",500,"BM120,83",500,"BM120,103",500,"BM120,123",500,"BM120,143",500,401,25,1,MC14480L,401,37,4,S,401,37,5,E r 401,37,6,G,401,37,7,M,401,37,8,E,401,37,9,N,401,37,10,T,401,37,11,S,444,3,12 rчч1:ю(0,22),"Score":ч15:ю(5,22),џ(S):ч1:ю(0,23),"Low":ю(25,23),"High" s^ IГ1Ѕ SC:ч I:ѕ"BM"Ћџ(246ЋI7)Ћ",180XG$(9);":I:
LVВ10 ЇIГ11Ѕ LV:ч I:ѕ"BM"Ћџ(245Ћ((IЌ10)15))Ћ",185"ЋL$(IЌ10):I s&ч10:ъ(26,188)Ќ(197,188),Н,BF:TIГ197:ч1: sО0A$Г"00000000000000002232095463254538":І1870: sё:A$Г"00633016171819202122235438453225":І1870: tDIГ0Ѕ15:у I,0:I: t3NIГ15Ѕ0ЉЌ1:у I,џ(џ(A$,I2Ћ1,2)):I: tBX
SДГ0 ЇSГ0 tubъ(48,176)Ќ(95,183),О,BF:ч15:ю(5,22),џ(S):ч1: tГcч14:ъ(100,82)Ќ(218,110),Н,BF:ѕ"BM115,93XE$;":Щ"O1T2L1C": tђlч13:ю(5,23),"Loss of Voltage!":Щ V$ЋV$:І1891:ф0:1:Ѕ1920 u+v65496,0:ф0:1:ё6,11:"Some fool hit the BREAK key!" uЩ S$:І1840:ј1,0,B:ё7,1:"You have failed at LOGIC 2!":ј4,0:ё13,3:"Last attempt -" uој2,0:ё11,5:"Levels completed:";:ј0,0: LVЌ10:ј6,0:ё12,7:"Schematic page:";:ј5,0: SC vј3,0:ё15,9:"Score:";:ј7,0: S:ё0,22:ј0,0: vqф0:1:ё0,1:ј7,0:"YOU'VE FINISHED ALL OF THE SCHEMATICS!!":ё0,3:ј5,0:"FINAL SCORE:";:ј4,0: S vЈIГ1Ѕ6:Щ S$ЋV$:I:Щ T$ЋW$ :"Levels completed:";:ј0,0: LVЌ10:ј6,0:ё12,7:"Schematic page:";:ј5,0: SC vј3,0:ё15,9:"Score:";:ј7,0:џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ &O
: This program was written by Stuart T. Wyss-Gallifent (c) Nov. 14, 1992 &j ї:у 0,0:у 8,63:т 80:1 &x 282,255 & (SBГ&H30:EBГ&H35:HSГ0:SRГ5 &А 2 &H400,SB: &H402,EB &Ы < 1143,SR: 1325,18ЋSR &й F 65496,0 &њ P
џ(&H403)ДВ246 Ї 90 : 100 ' ZгM"RECORD":гM"PLAY" '" dЙџ0Г&H0403 '2 nЙџ1Г&H0500 '9 x: '? 'N № Ѕ 120 'q "128K/512K SOUND DIGITIZER!!" 'y Ё Њ ' Њ ' Д"Menu: 1> Record" 'Д О" 2> Play " ( Ш" 3> Alter recording speed (Current:";:
HSГ0 Ї "Low)" : "High)" (= в" 4> Alter sampling rate (Current:"SR")" ( м" 5> Change blocks (Current:"SB"to"EB", or "((EBЌSBЋ1)8192)Ў1024"k)" (а ц" 6> Continuous record and play (BREAK to stop)" (щ №" Q> Quit" (я њ );"128k users may use only blocks 48 to 53, 512k users may use 0 to 53." )A )YI$Гџ:
I$Г"" Ї 280 )t"
I$Г"Q" Ї 65496,0: ),
џ(I$)Г0 Б џ(I$)В6 Ї 280 )М6 џ(I$) І 340,350,430,460,360,330 )Ч@Ѕ 130 )јJІ 340:І 350:"Press BREAK to abort":Ѕ 330 *TЁ Њ:"Recording...":AГџ0(0): *9^"Playback...":AГџ1(0): *hh"Start block number (Decimal 0 to 53)";SB *rSBГџ(SB):
SBД0 Б SBВ53 Ї 360 *М|"End block number (Decimal"SB"to 53)";: EB *пEBГџ(EB):
EBД0 Б EBВ53 Ї 380 *ё
EBДSB Ї 380 + &H400,SB: &H402,EB +Є +4Ў
HSГ1 Ї HSГ0 :
HSГ0 Ї HSГ1 +XИ
HSГ1 Ї 65497,0 : 65496,0 +^Т +Ь"New sampling rate (Suggested 1-30)";SR +ІжSRГџ(SR):
SRД1 Ї 460 +щр
SRВ100 Ї "Above 100 is very terrible! Don't use it.":Ѕ 460 ,ъ 1143,SR: 1325,SRЋ18 ,
є Є +4Ў
HSГ1 Ї HSГ0 :
HSГ0 Ї HSГ1 +XИ
HSГ1 Ї 65497,0 : 65496,0 +^Т +Ь"New sampling rate (Suggested 1-30)";SR +ІжSRГџ(SR):
SRД1 Ї 460 +щр
SRВ100 Ї "Above 100 is very terrible! Don't use it.":Ѕ 460 ,ъ 1143,SR: 1325,џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ J ЖџїЗџЖџїЗџЖџ#Зџ#і їџЁї ІЄHHЗџ ЦZ&§1!?џ&ьіё'\ зЦ9їџЁ9џ Ё9џ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ,&; :DRAW POKER 3 BY KEIRAN KENNY AND RICHARD SCHMIDT &H
65497,0 &T ї:2000 &o F$(13),K(4,13),HD$(5) & (LLГ80:STГ100:PRICEГ3 & 2IГ1Ѕ13:F$(I): &О < 2,3,4,5,6,7,8,9,10,J,Q,K,A &Ш FЅ150 &о P
џ(ZL$)ДГLL Ї120 ' ZTГLL Ѕ1ЉЌ1:
џ(ZL$,T,1)Г" "Ї110 ' dT:Ѕ120 'P nP$Гџ(ZL$,T):W$ГP$:І130:ZL$Гџ(ZL$,(џ(ZL$))ЌT):CГCЋ1:Ѕ80 '[ xW$ГZL$ 'i ю(B,C),W$ 'o '~ у0,0:у2,63 ' №Ѕ1410 ' Њф4 'Љ ДBFГ1Ѕ5:эBF,1024: 'О Оы(0,0)Ќ(63,63),5 'ъ Шч2:XГ0Ѕ576Љ192:ъ(X,0)Ќ(XЋ63,63),Н,BF: ( вч1:ѕ"BM32,14M+22,+15M-22,+15M-22,-15M+22,-15" (- мш(32,40),3,1 (B цы(0,0)Ќ(63,63),1 (r №ѕ"BM224,24E8R8F8D4M-24,+15M-24,-15U4E8R8F8" ( њш(224,30),3,1 (ы(192,0)Ќ(255,63),2 (Чщ(416,22),14:щ(430,34),14:щ(404,34),14 )ш(416,22),0,1:ш(430,34),0,1:ш(404,34),0,1:ш(416,30),0,1 )*"ѕ"BM416,34M+12,+12M-24,+0M+12,-12" )<,ш(416,45),0,1 )T6ы(384,0)Ќ(447,63),3 )@ѕ"BM608,16R8M-8,+12E8R8F8D4M-24,+12M-24,-12U4E8R8F8M-8,-12R8" )ЖJш(608,20),0,1:ш(608,40),0,1 )ЮTы(576,0)Ќ(639,63),4 )ы^ч1:ю(36,12),"Draw Poker" *%hю(20,15),"Copyright Keiran Kenny and Richard Schmidt" *Crю(34,18),"Australia 1992" *|:HPRINT(40,16),"and":HPRINT(34,18),"Richard Schmidt":HPRINT(34,20),"Adelaide, 1991" *Кю(35,23),"Press any key." *ЭЂ44539:K$Гџ:ц *ыч2:ю(34,0),"INSTRUCTIONS" +Єч1:BГ0:CГ1:ZL$Г"Your initial stake is $100. Each hand costs $"Ћџ(џ(PRICE),џ(џ(PRICE))Ќ1)Ћ". If your stake runs out, press any key to play again.":І80 ,}ЎCГCЋ1:ZL$Г"Use the left/right arrow keys to move the arrow under your hand. Press the spacebar to discard a card. Press to draw cards. Press if you are satisfied with your current hand. Press the key to quit.":І80 ,Ич2:ю(36,6),"PAYMENTS." ,ЭТч1:ю(0,7),"ROYAL FLUSH (AKQJ10 of a suit): $100" -Ью(40,7),"STRAIGHT FLUSH (run of 5 of a suit): $40" -%жю(0,8),"FOUR OF A KIND: $20" -Cрю(40,8),"FULL HOUSE: $10" -jъю(0,9),"FLUSH (all same suit): $5" -єю(40,9),"STRAIGHT (any run of 5): $4" -Вўю(0,10),"3 OF A KIND: $3" -Ью(40,10),"2 PAIR: $2" -фю(53,10),"PAIR: $1" -я SГ1Ѕ4 -ћ&NГ1Ѕ13 .0K(S,N)Г(SЌ1)13ЋN .:N,S .1D:***Deal Cards*** .?NXГ96:YГ96 .JXTГ1Ѕ5 .abNГџ(џ(Ќџ)13)Ћ1 .wlSГџ(џ(Ќџ)4)Ћ1 .v
K(S,N)Г0Ї610 .Ђь(X,Y)Ќ(XЋ63,YЋ63),S .гч0:ю(XЎ8Ћ1,YЎ8Ћ1),F$(N):ю(XЎ8Ћ6,YЎ8Ћ6),F$(N) .љHD$(T)Гџ(џ(N),2)Ћџ("DHCS",S,1) /K(S,N)Г0 /ЈXГXЋ96 /В /,М:***Discards*** /:ЦXГ16:YГ20 /Oач1:ю(X,Y),џ(94) /jкK$Гџ::IFK$=""THEN830 /ф
K$Гџ(8)АXГ16Ї730 /ю
K$Гџ(9)АXГ64Ї730 /№ј
K$Гџ(32)ЇQXГQXЋ1:PX(QX)ГX8Ќ32:ь(PX(QX),96)Ќ(PX(QX)Ћ63,159),5:HD$(џ(XЎ12))Г"XXX" 0
K$Гџ(12)АQXВ0Ї830 0
K$Гџ(13)Ї920 0L
K$Гџ(8)Їч0:ю(X,Y),"^":XГXЌ12:ч1:ю(X,Y),"^" 0}
K$Гџ(9)Їч0:ю(X,Y),"^":XГXЋ12:ч1:ю(X,Y),"^" 0*Ѕ730 04:***Draw Cards*** 0Ћ>TXГ1ЅQX 0ТHNГџ(џ(Ќџ)13)Ћ1 0иRSГџ(џ(Ќџ)4)Ћ1 0ъ\
K(S,N)Г0Ї840 1
fь(PX(TX),96)Ќ(PX(TX)Ћ63,159),S 1Bpч0:ю(PX(TX)Ў8Ћ1,13),F$(N):ю(PX(TX)Ў8Ћ6,18),F$(N) 1pzHD$(PX(TX)Ў96)Гџ(џ(N),2)Ћџ("DHCS",S,1) 1K(S,N)Г0:PX(TX)Г0 1:QXГ0 1Ѓч0:ю(X,Y),"^" 1ЎЂІ1010 1ЮЌ
WN ЇSTГSTЋWN :STГSTЌPRICE 2Жю(46,22),"CURRENT STAKE = $"Ћџ(џ(ST),џ(џ(ST))Ќ1):WNГ0:NS$Г"" 2!Р
STВ0Ї980 2ЪXГ96Ѕ480Љ64:ь(X,160)Ќ(XЋ63,191),5:ю(12,23),"YOU'RE BROKE! GO HOME, OR PRESS ANY KEY TO TRY AGAIN.":STГ100:Ѕ990 2Здч1:ю(33,23),"PRESS ANY KEY." 3 оЂ44539:K$Гџ:XГ96Ѕ480Љ96:ь(X,96)Ќ(XЋ63,159),5::XГ96Ѕ480Љ64:ь(X,160)Ќ(XЋ63,191),5::QXГ0:Ѕ540 38ш:***Scoring routine*** 3fђMINГ13:MAXГ0:ZL$Г"BETTER LUCK NEXT TIME!" 3rќN1Г1Ѕ5 3NS$ГNS$Ћџ(HD$(N1),2) 3ЗNSГџ(џ(HD$(N1),2)):SS$Гџ(HD$(N1),1) 3Ы
NSДMIN ЇMINГNS 3п$
NSВMAX ЇMAXГNS 3ѕ.P1Г0:P2Г0:N2Г1Ѕ5 48
NSГџ(џ(HD$(N2),2))ЇP1ГP1Ћ1 46B
SS$Гџ(HD$(N2),1)ЇP2ГP2Ћ1 4VLN2:PAIR(N1)ГP1:PBIR(N1)ГP2 4^VN1 4j`N1Г1Ѕ5 4Яj:IFNS$="13121110 9"ORNS$=" 910111213"ANDPBIR(N1)=5THENWN=100:ZL$="A ROYAL FLUSH! $100":GOTO1460 5t
MAXГ13АMAXЌMINГ4АPBIR(N1)Г5ЇWNГ100:ZL$Г"A ROYAL FLUSH! $100":Ѕ1380 5 ~N1 5,N1Г1Ѕ5 5n
MAXЌMINГ4АPBIR(N1)Г5ЇWNГ40:ZL$Г"A STRAIGHT FLUSH $40":Ѕ1380 5vN1 5ІN1Г1Ѕ5 5ЙА
PAIR(N1)Г4ЇWNГ20:ZL$Г"FOUR OF A KIND! $20":Ѕ1380 5СКN1 5ЭФN1Г1Ѕ5 6Ю
PAIR(N1)Г3ЇN2Г1Ѕ5:
PAIR(N2)Г2ЇWNГ10:ZL$Г"FULL HOUSE! $10":Ѕ1380:N2 6!иN1 6-тN1Г1Ѕ5 6[ь
PBIR(N1)Г5ЇWNГ5:ZL$Г"A FLUSH! $5":Ѕ1380 6cіN1 6o N1Г1Ѕ5 6Ѕ
PAIR(N1)Г3ЇWNГ3:ZL$Г"THREE OF A KIND! $3":Ѕ1380 6N1 6Й N1Г1Ѕ5 7/(
PAIR(N1)Г2ЇN2Г1Ѕ5:
PAIR(N2)Г2АF$(џ(џ(HD$(N1),2)))ДВF$(џ(џ(HD$(N2),2)))ЇWNГ2:ZL$Г"TWO PAIRS! $2":Ѕ1380:N2 772N1 7C<N1Г1Ѕ5 7rF
PAIR(N1)Г2ЇWNГ1:ZL$Г"ONE PAIR! $1":Ѕ1380 7zPN1 7ЊZ
MAXЌMINГ4ЇWNГ4:ZL$Г"A STRAIGHT! $4":Ѕ1380 7гdXГ96Ѕ480Љ64:ь(X,160)Ќ(XЋ63,191),5: 8nч1:
џ(ZL$,1)Г"B"Їю(14,22),ZL$ :ю(14,22),"SCORE = "ЋZL$ 8x 8+т32:ї:65496,0: 2 772N1 7C<N1Г1Ѕ5 7rF
PAIR(N1)Г2ЇWNГ1:ZL$Г"ONE PAIR! $1":Ѕ1380 7zPN1 7ЊZ
MAXЌMINГ4ЇWNГ4:ZL$Г"A STRAIGHT! $4":Ѕ1380 7гdXГ96Ѕ480Љ64:ь(X,160)Ќ(XЋ63,191),5: 8nч1:
џ(ZL$,1)Г"B"Їю(14,22),ZL$ :ю(14,2џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџR&' : ****************************** &M d: * NIBLOADER * &s n: * BY * & x: * RICK COOPER * &П : * (C) 1990 * &х : * * ' : * DISTRIBUTED BY * '1 : * RICK'S COMPUTER ENTERPRISE * 'W Њ: * P.O. BOX 276 * '} Д: * LIBERTY, KY. 42539 * 'Ђ О:****************************** 'Љ ШР8 'Б вт32 'И м0 'Ш цгM"NIBLOADR 'ћ №
џ(&HCFC3)ДВ&H8D Ї &HE76,&HCE: &HE77,&HE7 ( њ @37,"CFDM COCO GALLERY MENU"; (9 @101,"1) OLD MILL"; (S @165,"2) OPINIONS"; (l @229,"3) SHUTTLE"; (
" @293,"4) HRIDDLE"; (' @357,"5) QUIT"; (Г,I$Гџ:
I$Г"" Ї 300 (в6IГџ(I$):
IД1 Б IВ5 Ї 300 (р@
IГ5 Ї (ћJ
IГ1 Ї F1$Г"OLD MILL" )T
IГ2 Ї F1$Г"OPINIONS" )1^
IГ3 Ї F1$Г"SHUTTLE " )Lc
IГ4 Ї F1$Г"HRIDDLE " )YhL2Г&HE92 )or XГ0 Ѕ џ(F1$)Ќ1 )| L2,џ(џ(F1$,XЋ1,1)) )L2ГL2Ћ1 ) X )Ы
IГ1 Ї M1$Г"OLD MILL":M2$Г"NORM BARSON" )њЄ
IГ2 Ї M1$Г"OPINIONS":M2$Г"PERRY FRIESEN" *&Ў
IГ3 Ї M1$Г"SHUTTLE":M2$Г"JIM BENNETT" *RГ
IГ4 Ї M1$Г"HRIDDLE":M2$Г"JIM BENNETT" *YИ0 *rТM1Г174Ќџ(џ(M1$)Ў2) *ЬM2Г303Ќџ(џ(M2$)Ў2) *Гж @35,"COCO FRIENDS DISK MAGAZINE"; *Ър @107,"PRESENTS"; *щъ @M1,џ(255);M1$;џ(255); *њє @238,"BY"; + ў @M2,M2$; + &HE6E4,&HE6 +'Ђ &HF00 +. ф2 +@&
џГ"" Ї 550 +F0ї +Q:Ѕ 200 YИ0 *rТM1Г174Ќџ(џ(M1$)Ў2) *ЬM2Г303Ќџ(џ(M2$)Ў2) *Гж @35,"COCO FRIENDS DISK MAGAZINE"; *Ър @107,"PRESENTS"; *щъ @M1,џ(255);M1$;џ(255); *њє @238,"BY"; + ўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ Ђ PН\ Џџџ '0 їџйН НчBНсО@ гь§@ ЏЮ;Z$ ьэСЏ ёОTгОVеН5 ОRзОTгН5ОNгОPеН5 Н5aН5}L'Н5шННрџН џи9 /џЉІЇ џЏ&і95 ь;џАьэЁџР%іЖKЗџ990123>0123=> џЁЦ0џЄ$ч\ іІ40 ІНЯУ5ІџЁЦ "9џЄ$ч\ іЬмн9"SCREEN /NIB" !р 5 г е%9цoч ђПџг1?@ % цЄoЄч1?0 ю0ЯЮ@ Ыз%пг9ІЄЫ'ІЬжЬчРЫ
Ы&фЫ1! мПџг1?@ $0П 9цЄчoЄ1?0 ~5ш @ ў йЫР %9ІЄй'Н5УЭЇйІЄй'Н5УЬЊЇй
й&жй1! Ю
Ы'цРФЫзЬXXXXзЭ ЫцФФ№зЭTTTTзЬ 9@ @ Р %9цшЄч ёџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ
?
: DISKCASE ) : =BY= @ : GRANT WILSON Z (: 295 SHERIN AVE. w 2: PETERBOROUGH, ONT. <: 742-9937 F: OCT 10/84 Ѕ PР1 Џ Z5000 К _150,1 к d N$(100),N1$(100),N2$(100) р n ( x:"THIS PROGRAM WILL READ YOUR DISKDIRECTORY AND WILL PRINT IT ON" w "A PIECE OF PAPER ALONG WITH THE DOTTED LINES TO MAKE A DISK JACKET." л :"YOU SIMPLY CUT IT OUT WITH A PAIR OF SCISSORS, FOLD ON THE DOTTED LINES, AND TAPE TWO" љ "FLAPS DOWN IN THE BACK" :"PRESS TO START" % Њ 150,1 . Д Q$ 4 О : Ш b в:"WHAT IS THE TITLE OF THE DISK"; n м 150,1 y ц: K$
№ 150,1 Н њ:"DO YOU USE BOTH SIDES OF THE DISK (Y/N)";S$ л
S$ДВ"Y" А S$ДВ"N" Ї 240 с э 150,1 !":"INSERT DISK TO READ DIRECTORY ON SIDE 'A' F,:"PRESS WHEN READY";Q$ T6NГ1:QГQЋ1 c@ IГ3 Ѕ 11 uJп0,17,I,A$,B$ T JГ1Ѕ128 Љ32 ^P$Гџ(A$,J,11) ЅhІ 530 r J П| JГ1Ѕ128 Љ32 вP$Гџ(B$,J,11) нІ 530 х J эЄ I їЎNГNЌ1 И
S$Г"Y" А QГ2 Ї 660 Т TГ1 Ѕ N HЬ
џ(N$(T)) Д32 Б џ(N$(T)) В90 Ї 500 UжQ$ГN$(T) vрW$Гџ(Q$,1,8):EX$Гџ(Q$,9,3) ъN1$(T)ГW$Ћ"/"ЋEX$ є T Їў
S$Г"Y" Ї 580 ВЅ 720 Я
џ(P$,1)Гџ(255) Ї 430 ш
џ(P$,1)Гџ(0) Ї ѕ&N$(N)ГP$ џ0NГNЋ1 : D TГ1 Ѕ 100 "NN$(T)Г"" *X T 0b <l 150,1 pv:"TURN DISK OVER TO READ DIRECTORYON SIDE 'B' :"PRESS WHEN READY";Q$ Ѕ 310 Ў TГ1 Ѕ N р:IF ASC(N$(T))<32 OR ASC(N$(T)) >90 THEN 710 эЈQ$ГN$(T) ВW$Гџ(Q$,1,8):EX$Гџ(Q$,9,3) $МN2$(T)ГW$Ћ"/"ЋEX$ ,Ц T 2а >к 150,1 ф: "PRESS WHEN PRINTER IS LOADED WITH PAPER AND TURNED ON";Q$ фю#Ќ2,"!---------!-------------------------------------------------------!---------!" ј#Ќ2,"! !";Є12);K$;Є66)"! !" n#Ќ2,"! ! ! !"
S$Г"Y" Ї 810 Й#Ќ2,"! !";Є12);"SIDE A";Є66);"! !" Ф Ѕ 820
*#Ќ2,"! !";Є12);"SIDE A";Є40);"SIDE B";Є66);"! !" c4#Ќ2,"! ! ! !" k>XГ1 zH NГ1 Ѕ 20 кR#Ќ2,"! !";Є12);N1$(X);Є25);N1$(XЋ20);Є40);N2$(X);Є53);N2$(XЋ20);Є66);"! !" ф\XГXЋ1 ьf N Ep#Ќ2,"!---------!-------------------------------------------------------!---------!" Tz NГ1 Ѕ 28 Ѓ#Ќ2," ! !" Ћ N њ#Ќ2," !-------------------------------------------------------!" Ђ Ќ 150,1 &Ж: "AGAIN (Y/N)";Q$ 8Р
Q$Г"Y" Ї 80 >Ъ --!" Tz NГ1 Ѕ 28 Ѓ#Ќ2," ! !" Ћ N њ#Ќ2," !-------------------------------------------------------!" Ђџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџz&}
:LOADER FOR MUSIC FROM "THE ORGANIST", TRANSCRIBED USING MUSIC3+ PROGRAM BY GEORGE QUELLHORST IN RAINBOW 4/91 PAGE 10. &ш :@107,"INTERLUDE";:@175,"BY";:@229,"CHARLOTTE WOOD MC CANN";:@354,"TRANSCRIBED BY: HERB SCHULER"; ' гM"INTERLUD/BIN":&HFF40,0 ' (65497,0:Ђ:65496,0 ' 2:@108,"CHANSON";:@207,"BY";:@264,"BERTHA R. FRICK";:@386,"TRANSCRIBED BY HERB SCHULER"; ' <гM"CHANSON/BIN":&HFF40,0 'Ж F65497,0:Ђ:65496,0 (# P:@106,"TRANQUILLITY";:@207,"BY";:@261,"ELIZABETH T. VAN WOERT";:@386,"TRANSCRIBED BY HERB SCHULER"; (B ZгM"TRANQUIL/BIN":&HFF40,0 (Z d65497,0:Ђ:65496,0 (y n:@392,"FEEL BETTER NOW?" ER"; ' <гM"CHANSON/BIN":&HFF40,0 'Ж F65497,0:Ђ:65496,0 (# P:@106,"TRANQUILLITY";:@207,"BY";:@261,"ELIZABETH T. VAN WOERT";:L3BH3HU4BUHLHBH2BLBR4R2FRF2DBD3D4F2R2EBRBFF6R4BR2EF9R3F4R3UHL3H6U3H6U3BUBH4LGD3F4D2BD2BFBR4BE2BR4BF2FDFD3F2BRRF7R3F8R3E3UH3L3G2DR4F2BFBR2R5F3BFBR5R7F2R8ER12E3L2G2L3H3L5H3L7H4L2GL2H8U4H2U5E3U2D2F4D4F3D3F4DF4UH5U6 Т Zѕ "H2U2EU3E3UHU2BUUDF4DG3DF2D4F8R3F3R4F2R2BR3BD7BGBL6BH4BLBGBL6L3BHBLBHBL4L2HBH3BLL4BL2BH4H4L2GLH6L3G2LG2DF3D2GDF7RERBRBL4BH11H3BH4BL11BH2H5U3EUH6LG2DFRF2D5F8R4F4R2ERF9R2EBR2BU10BH3H4U2BU2BH3H3U3D4G3LH7LD2GLH6BHBD3BF55BR25BF2BR4BF2BR13 д dш(142,8),12,0 У nѕ "BG2BD2C1G23D3E2UE24R3ER4BD5BGBLDG2DG2DG2DG2DG2D2L4GL5GL4GL2GLG2BUBE4BR15BU3BR5BEBUBL2L2GL3E2UE2UE2UE2UE2UE2R4BLBG10BL4BG2BL2BG2BDBGBDBL6L3GL2GL2GLG2BR2BHH2LHLHLHLHLHL4GL3GLG10L2GL4GL4GL4GL4GL4GL4GL2GL2GLGLGLG5L2GLG2LG3LG7DG2DGD2FRF В xѕ "R4FR14ER9ER7ER3ER4ER6ER2ER5ER97ER3ER2EREH2LHL2HLHL2HLHL2HLHL2HLHL2HLHL2HLHL2U7EUEU3H3LHLHBRRER3FRF3D3GDGL2BR3FD4G4BUBRBEBUBRR4FR15H2R15HR8HR5HR6HR3HR6H2R6E2HL4EL7EL12GL7E2R3ER4UR8U2R6U2R4ERE2L5U2L6GL4EL6GL4E2L5GL5DL2HL7GL4GL2ELG2L4 Ђ ѕ "G3L3G2LGBD2BR2R6E2R2E3R6E2R7FR5FRERFR3G2L6GL2G2L2GLHL4G2L3HLGL7BDBGBD6R2E2R3E2R3FRER6ER4FR5ER7FR3G2L3GLH2LGL3G2L5GL7G2L3H2L6BLBD5BL2BDBL4L4GL3GL5GL4GL5GL5GL5GL5GL5GL5GL4GL2GL3GLGLG2DGD2BU4BR2R97ER2EREBD3BL4BHHL2HL2HLHL2HLHL2HL2HLHL2 ѕ "HLHL2HLHL2BL5BUBL2BDBFFR2FRFR2FRFR2FRFR2FRFR2FRFR2FRFBU12BL7L6GL4GL4GL4GL4GL4GL3GL3GL3GLGLG3DBL95BU2BFF3DFD3GBU7BEBU5BL3BFBEF2RF3DF2ER4ER4ER4ER4D8BL36BU2BR2R5ER3ER2EBURER3ER4ER4ER3ER4ER3ER4ER4ER4ER3ER5ER4ER5ER4ER4ER4ER4ER4ER4ER4ER5 ѕ "ER5ER5ER5BU2L5GL5GL5GL3HLHUH4LH2LHLHBD8BR5BE2BUBR2RE3R4ER4ER4ER4BDBF3BR3BLL3GL3GL5GL5GL2HL3BL27BG10BL1 ТM
"#&')*+-.012457889;;<<>>>???????>>><<;;987754210..-+*)'&$#" """""#######""""
7J^r Йгю +LoЛф?qЅмVн(vЩ!тJЙ/Ќ 0 Л
P
э C ў
Фs_X`w к&ќ + ч О"А$Р&я)@+Д.M1 L ?Зџ#P0ўjУЦЩЬ0 Р9РІТ91џPІюІпЯІюІпбІюІпгІюІпеР9|ІLУЋLЦЉLЩЉLЬЗџ мФгЯнФмЧгбнЧмЪггнЪмЭгенЭ1Ђ&
Т' ЧІ С9џu &O 9Ћ №@:2D:2@:(@<0N<0H<0@:2D:2@:(@<0R<0N<0@:(D:(H:(J:,N:0,R:2,N>, J>, D>2 0D<0(@<0(@:2D:2@:(@<0N<0H<0@:2D:2@:(@<0R<0N<0@:2J:2R@2.X@2,T<2,ND6$J@:(N@<(H@6(0J@:JD:, JD:, HB:,JD:,NH<, NH<, RH<,NH<,JD:,ND:,JD:,0HB: 0D:2,HB6,0JD:,RJD,ND<6 ND<6 RD<6ND<60HB: JD:, JD:, HB:,JD:,ND<, ND<, RD<,ND<,JD:,ND:,JD:,0D:2 H@6 @ 0 H@6 N>, J>, D>2 @ 0(@60(@:2(0@<6(@:2D:2@:(@<0N<0H<0@:2D:2@:(@<0R<0N<0@:(D:(H:(J:,N:0,R:2,N>, J>, D>2 0D<0(@<0(@:2D:2@:(@<0N<0H<0@:2D:2@:(@<0R<0N<0@:2J:2R@2.X@2,T<2,ND6$J@:(N@<(H@6(`J@: Tџ N@ 0(@60(@:2(0@<6(@:2D:2@:(@<0N<0H<0@: мѕ"BM103,109C0D2" " с65496,0 "] ц"I",#1,"SHUTTLE/DAT":XГ1Ѕ799:#1,H,V,C:І260:ѓ(H,V,C): "e №#1 "p њЂ44539 " џ65496,0:ї:: "
CВ10ЇCГ3:: ,212,100,1,1,218,100,1,1,218,93,1,1,81,127,4,1,81,130,9,1,243,86,5,1,243,97,5,1,261,83,6,1,90,60,1,1 "џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ ` Q=УЫ РЫ РУГВ <; РУЫ; РУЫ; Р РУЫ; Р Р РЫ;# Р РУЫ; Р РУЫ; Р РУМГВ ГМ;# Р РЫ; Р РУЫ; Р РЫ; Р Р РЫ; Р Р РУГВ <;УГВ2 МГВ <ГВ <ГВ2 <МГВ ГВ <ГВ ГВ <ГВ <ГВ2 <ГВ <ГВ <В <МГВ <МГВ2 <МГВ2 М; Р Р РУГВ ГВ2 ГВ <ГВ ГВ2 ГВ ГВ ГВ <МГВ ГЫ; Р УЫ; Р УЫ; РЫ; РУЫ;# РЫ; РУГВ2 МГВ ГВ2 <ГВ2 <ГВ <;! РУЫ !# РЫУЫУВ М;! РЫ;! ГВ22 <ГВ2 ГВ ГВ2 ;##! РУГВ#! РЫ# ! Р!1 РЫ;# ;# 0 #РЫ# 21 РУЫ;# ГВ21! В21! РЫ# В21! РЫ;# ГВ21! РЫ;# Ы#СaС Ы#Ы;# В1!a <В21!a ГЫ;#1!aQa В!# В!!1!aTQa !1!!E !!!EРТ1aTQa РТ1E #!!1E !1a Р РТ !1a Р!1a ТEEE2!1!!1!1!!!1!!!1!!1!#!1!!1!!1!!1!#!1!!1!1!2!A 21#!A 2#!@A!2!29#212 bF 0 `P 6 2 ` Ь 0 ` Ъ ` С Сp @Р ЪЦи 0a Ьd 0 ` L-
А 0 Ќ 0" 0 ЬБ Р # 0 fa ` @1Р0 2Yи ` А Р Э{ aЈ Х gl0 <` 2f 0 fР 1 0 L 0 У
`8 ЬІСАP С D V@рУ AР Аa С` 0Р 0
Lшa С` є ` `У С` ! `и` cf Э 0Ь1 0l` WР Ц 060 LР Ьax 06 =D ` BG
А 06 СР A)5 @06 0 <
` Q.@ 0
3 Р 1 Р
Ѕ
УaD Ц" Р 0 `P і Р №б С@ (A d 0 `
`Ц0!$ У` г1ь P 2БА6 Ё8L 0 №` (Ьl 0
( Р Р V4 @ ЂB Ь l (Р $ b`+
b x 1 ЂЃ p Ь 3Р 0 @( ( Р ( ` !` $ $Р Р Ј @ 0 Р Р 0 Р (E 0 1
Р
Ё 5 C I( ЃV
& 1 @ @ ` ? @ P 2 @ Р @ 0 4 @ ` Р` @ Р$ ` ` _` d Сl0 р H E 6 И[ ( Р з> Є6 PС y Ё<C Ш &0 ь 4р #l! и Cй0 йPС @ g
АH 2
р `P 0 d`( Р Р Ш3Р $ 0` ` 7 g С@Р X @Я a !A Ъ B 1 @ 2 Р X шЦ P d
` р Ш
( А0 $ 0љ @' ` B
Q&@ d@I 0Ё@ Щ ! @% `(P ) ) B0№ 0 Р
! B( @8q # !TB B 0 ! xР ` @ ) "D( @ 0 D( @Р B D h Р а0( B Х А @ ?§ @ I@A 'шЂ E Р М !
@ (F
@ @ ( B ( @ @ M
! O,( A
Ј @ $@
єЄ ! 4 P ДЅ@ 0 ! $ @ $ H B Р ( ( @ ( Р < P %0 J Р 0 @$ 0f X P0! @ P x # @ #@ Ьђ # 1 Ю ж@ B ! D @ 0 ` ` Р ` Р 0 ЩјИ9fcГйЪ&иБАЖР~``Ь cfЦЁГ<ььgЈХъ2n[ и32@ПS3)цYZaMдг и6я>СLР5ЃДь№Г
=C1§ЗЯO`јПzпПљПБђ§ЧЫж?пњтkvdн M1ч *щк
Н>ui /ѓ{ЯwљјўџџћїЇнї^Ы??SьчzѓџЫЌ~№?пнRНdќИ^Хќ_/wяЯЏЅхb§љ~џрР № Р 0 Р ќ Р ќ Р 0|Р УМР Р<`Р Р У У|Р УўРУћРуИ №їП`РчџРРОцРЧОрРчО<РчнpУї РяРч~ ЬччРџрРЗьРџрРџП№РџoЖРcџАРџиРџРРџЯўР§ѓаиџпіРїЧ№Р ѓЯ Р џцјСРџїР §џіР }№РCџР сйР ~СР ?ч№Р >qќР >pоР >ѓќР №pР УсР` |Р xУ 8Р ?Р
Пр8ѓР8'ќР8рјУ<РpУ4РјР<РкР<№`ЧќАџУ<№|У< №cЧМ рvУИ ќ>УИ x0У8 |?ч ?ЯР >ЧР У | У ~ У ЬУ` У ЧџУ Ч џЦСР §ўР џџР ў>У ќ У §Р џљР џёР џўР џќР џќР џўР џоУ џџР ?џ_Р ?ј?Р ?и Р 7ылР џлР mџ№ љџ№ йп№ ѓџр у§р УпР Чџ џ џ ј И
У8 їx ќ Эќ нќ ;О З~ ў~ lџј §п 9й 1Л ;Г;3 ?3 >` ?c ?c ?` {x {` sР sР s s 7 6 Р 8 Р Р Р? 845&$ ,() F00 f0LwЦQ= џ џЬ&$ :**************************** &G :* DISK AUTO-BOOT SYSTEM * &j :* COLLECTED BY * & :* LESLIE WALTZ * &А :* 720 CARVER ST., N.W. * &г :* MASSILLON, OHIO 44647 * &і :* NO RIGHTS OF OWNERSHIP * ' :* TO INDIVIDUAL PROGRAM * '< :* PARTS IS IMPLIED * '_ :**************************** 'v
: CLEAR 200,32400 ' т32: ' : 'Ђ (: KEYBOARD ENHANCEMENT 'д 2&HA1C1,&H39:IГ&HA1CA Ѕ &HA1C1 ЉЌ1:B:I,B: 'ћ < 121,39,72,67,0,255,182,2,255,127 ( F: (& P: DISPLAY TRACK # DURING DSKINI (^ Z: POKE &HD625,126:POKE &HD626,126:POKE &HD627,&H90 ( d: FOR I=32400 TO 32415:READ A$:POKE I,VAL("&H"+A$):NEXT (з n: DATA 4F,D6,EC,BD,BD,CC,BD,B9,58,10,8E,FF,4B,7E,D6,29 (н x: ) : SET 6ms STEP RATE/FIX HPUT NOT BUG/SET 2400 BAUD PRINTER )Q &HD7C0,0: &HD816,20: &HEF13,&HCCЌ8: 150,18 )W : )y : ENABLES BACK OF DR0 AS DR2 )Ю Њ 243,&HCC: 244,&H41: 245,&H42: 246,&HFD: 247,&HD8: 248,&H9F: 249,57:Ђ 243 )д Д: * О: KILL/FAT/GAT/FREE/BACKUP/COPY/DSKI$/DSKO$/DSKINI FOR DR2 * Ш 50997,78: 51034,84: 51131,78: 51183,78: 51152,78: 52518,78: 52917,78: 53917,40: 54349,78: 54580,39: 54879,40: 54914,40 *Ђ в: *Ц м: RESET PROTECTION FOR CHANGES + ц114,1:115,&HD1: IГ&H1D1 Ѕ &H1D9: A$: I,џ("&H"ЋA$): +% № 12,1A,50,7F,FF,DF,7E,C0,E7 ++ њ: +f: RESTORE NORMAL RESET-MUST BE USED WITH CASSETTE I/O +: POKE 114,&HC0:POKE 115,&HE7 +: +Ј": AUTO BOOT PROGRAM +Ц,AГџ(&H1B)256Ћџ(&H1C)Ќ6 +е6B$Гџ(128) +у@ZГџ(235) +јJ"-=AUTO BOOT=-" ,
T" THIS IS" ,^" DISK" ,+h" SIDE 1" ,@r" IN DRIVE";Z: ,Z|"up"B$ЋB$ЋB$" GO UP" ,r"down"B$" GO DOWN" ,"enter EXECUTE" ,"break ABORT" ,ЏЄ:" RUN C2 FOR" ,УЎ" DISK SIDE 2" ,тИ:"FREE GRANS..";: џЃ(Z) ,ъТЂ A ,№Ь ОРЇЬэЬ э3фoФР І'L'$lВ4Ц ІЇРZ&љ50 %рОРlІ %Юц'6ooІ ЛцtрrС%Ц4ЦІР]Z&љ.VЦІРPZ&љ IІР0C50 Z&дІ; 8Ц =У >Ї 1?&ќ 'њЦ`чЦџ^'
'*
'X&Ш Џn І ќ'ЛїUJЇ ђЁ я$j щџbІ сLЁ л$їVЇ гІ аЁ Щ$пl Ф йЦ =3 е4@ус 9І Џь0 ЌЏ І1wІK&1uІ 'Ї ј4ОРІ50Ї:ЇЦІРЇZ&љ.ЇЦІРЇZ&љІ Ї&њОkЏ Z0Пkp `Ї %љ92b4Ў ?І& Ў 3Пk
Џ .5RUN" " LOADM" ":POKE&HFF40,0:EXEC ў( І ќ'ЛїUJЇ ђЁ я$j щџbІ сLЁ л$їVЇ гІџ&$ :**************************** &G :* C1/BAS * &j :* BY LES WALTZ * & :* PLACE ON DISK SIDE 2 * &А :* TO ACCESS DISK SIDE 1 * &г :* FROM DISK SIDE 2 * &і :*USE WITH AUTO/BOOT PROGRAM* ' :**************************** ')
ZГџ(235)Ќ2 '1 Я Z '> "C/BAS" ОРЇЬэЬ э3фoФР І'L'$lВ4Ц ІЇРZ&љ50 %рОРlІ %Юц'6ooІ ЛцtрrС%Ц4ЦІР]Z&љ.VЦІРPZ&љ IІР0C50 Z&дІ; 8Ц =У >Ї 1?&ќ 'њЦ`чЦџ^'
'*
'X&Ш Џn І ќ'ЛїUJЇ ђЁ я$j щџbІ сLЁ л$їVЇ гІ аЁ Щ$пl Ф йЦ =3 е4@ус 9І Џь0 ЌЏ І1wІK&1uІ 'Ї ј4ОРІ50Ї:ЇЦІРЇZ&љ.ЇЦІРЇZ&љІ Ї&њОkЏ Z0Пkp `Ї %љ92b4Ў ?І& Ў 3Пk
Џ .5RUN" " LOADM" ":POKE&HFF40,0:EXEC ў( І ќ'ЛїUJЇ ђЁ я$j щџbІ сLЁ л$їVЇ гІ аЁ Щ$пl Ф йЦ =3 е4@ус 9І Џь0 ЌЏ І1wІK&1uІ 'Ї ј4ОРІ50Ї:ЇЦІРЇZ&љ.ЇЦІРЇZ&љІ Ї&њОkЏ Z0Пkp `Ї %љ92b4Ў ?І& Ў 3Пk
Џ .5RUN" " LOADџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџї&$ :**************************** &G :* C2/BAS * &j :* BY LES WALTZ * & :* PLACE ON DISK SIDE 1 * &А :* WITH AUTO/BOOT PROGRAM * &г :* TO ACCESS DISK SIDE 2 * &і :**************************** '
ZГџ(235)Ћ2 ' Я Z ' "C/BAS" ОРЇЬэЬ э3фoФР І'L'$lВ4Ц ІЇРZ&љ50 %рОРlІ %Юц'6ooІ ЛцtрrС%Ц4ЦІР]Z&љ.VЦІРPZ&љ IІР0C50 Z&дІ; 8Ц =У >Ї 1?&ќ 'њЦ`чЦџ^'
'*
'X&Ш Џn І ќ'ЛїUJЇ ђЁ я$j щџbІ сLЁ л$їVЇ гІ аЁ Щ$пl Ф йЦ =3 е4@ус 9І Џь0 ЌЏ І1wІK&1uІ 'Ї ј4ОРІ50Ї:ЇЦІРЇZ&љ.ЇЦІРЇZ&љІ Ї&њОkЏ Z0Пkp `Ї %љ92b4Ў ?І& Ў 3Пk
Џ .5RUN" " LOADM" ":POKE&HFF40,0:EXEC ў( І џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџГ&$ :**************************** &G :* DISK AUTO-BOOT PROGRAM * &j :* FOR DISK SIDE 2 * & :*THIS IS A PATCHED VERSION * &А :* OF THE PROGRAM BOOT/BAS * &г :* WITH THE EXPRESS * &і :* UNDERSTANDING THAT * ' :*BOOT/BAS IS PUBLIC DOMAIN * '< :*PATCHES MADE BY LES WALTZ * '_ :*WITH NO CLAIM OF OWNERSHIP* '
:*************************** ' т32 ' ' (AГџ(&H1B)256Ћџ(&H1C)Ќ6 'Л 2ZГџ(235) 'Ъ Ї 1?&ќ 'њЦ`чЦџ^'
'*
'X&Ш Џn І ќ'ЛїUJЇ ђЁ я$j щџbІ сLЁ л$їVЇ гІ аЁ Щ$пl Ф йЦ =3 е4@ус 9І Џь0 ЌЏ І1wІK&1uІ 'Ї ј4ОРІ50Ї:ЇЦІРЇZ&љ.ЇЦІРЇZ&љІ Ї&њОkЏ Z0Пkp `Ї %љ92b4Ў ?І& Ў 3Пk
Џ .5RUN" " LOADM" ":POKE&HFF40,0:EXEC ў( І ќ'ЛїUJЇ ђЁ я$j щџbІ сLЁ л$їVЇ гІ аЁ Щ$пl Ф йЦ =3 е4џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџч&
********** &@ GENERIC HSCREEN JOYSTICK CURSOR ROUTINE &Q ********** &j (І 2000 :INITIALIZE & 2І 1000 :GET INPUT FROM JOYSTICK &Е <ю (1,24),"PRESS ANY KEY TO EXIT" &Ь FA$Гџ:
A$Г"" Ї 70 &ц P 65496,0 :LOW SPEED &ь Zї &ђ d ' М START OVER ROUTINE '-ЦІ 1100 : PRINT INSTRUCTIONS '\аы (0,0)Ќ(7,7),2 :CLEAR OLD DATA TO SPACES 'кH1Г0:V1Г0 :CLEAR OLD LOCATION POINTERS 'ф 'Ќ CURSOR MOVEMENT ROUTINE 'н4ь (H1,V1)Ќ(H1Ћ7,V1Ћ7),2,Н :RESTORE OLD DATA (>ы (H,V)Ќ(HЋ7,VЋ7),2 :GET NEW OLD DATA (9Hь (H,V)Ќ(HЋ7,VЋ7),1,Н :PUT CURSOR CHARACTER (tRSГ0:H1ГH:V1ГV :RESET POINT SET FLAG AND SAVE LOCATION (z\ ( SET POINT ROUTINE (Уь (H1,V1)Ќ(H1Ћ7,V1Ћ7),2,Н :CLEAR THE CURSOR (яѓ (H,V):ѓ (H,VЋ1):ѓ (HЋ1,V):ѓ (HЋ1,VЋ1) )Ђы (H,V)Ќ(HЋ7,VЋ7),2 :SAVE IMAGE )NЌSГ1:H1ГH:V1ГV :SET POINT SET FLAG AND SAVE LOCATION )TЖ )lш 'JOYSTICK ROUTINE )ђІ 1100 :PRINT INSTRUCTIONS )Еќ CTГ1Ѕ4 :GET 4 POINTS THEN RETURN )ёHГџ(10џ(0)Ў8)8:VГ3џ(1) :GET JOYSTICK COORDINATES *%
џЊ(0)Г1 А SГ0 Ї І 900:Ѕ 1080 :DO SET POINT *T
џЊ(1)Г1 Ї І 700:Ѕ 1030 :DO START OVER *$
VДВV1 Б HДВH1 Ї І 800 :DO CURSOR MOVEMENT *Б.Ѕ 1030 :LOOP FOR MORE JOYSTICK INPUT *К8 CT *РB *кL HPRINT INSTRUCTIONS *рVц +`ю (1,0),"BUTTON 1 WILL SET A POINT AT THE CURSOR" +Rjю (1,1),"BUTTON 2 WILL CLEAR THE SCREEN AND START OVER" +Xt +uа INITIALIZATION ROUTINE +Ђк№ Ѕ 3000:я Ѕ 3040 :SET PROPER EXITS +Љф5 +Хю 65497,0 : HIGH SPEED +ъју 0,0:у 1,0 :SET BLACK ON BLACK , IГ61605 Ѕ 61612 ,6 X: I,X :CHANGE HPRINT "!" TO CURSOR CHARACTER ,> I ,V э 1,7 :CURSOR CHAR ,k*э 2,7 :OLD DATA ,s4ф 3 ,z>ц0 ,Hы (0,0)Ќ(7,7),2 :GET OLD DATA ,СRю (0,0),"!" :PRINT CURSOR CHAR ,ч\ы (0,0)Ќ(7,7),1 :GET CURSOR CHAR -fь (0,0)Ќ(7,7),2,Н :CLEAR -$p 252,240,248,220,7,0,0,0 -Dzу 1,63 :SET WHITE ON BLACK -J -^ И ONBRK ROUTINE -x Т 65496,0 :LOW SPEED - Ьї -
ж - р ONERR ROUTINE -Ц ъ "ERROR NUMBER";џЌ;"OCCURED IN LINE";џ -р є 65496,0 :LOW SPEED -ц ў fь (0,0)Ќ(7,7),2,Н :џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ &7 : ********************************************** &m : CALCULATION. 26 DEC 1992 BY: GEORGE QUELLHORST &Ѓ : 203B MEADOWS DR. PAINESVILLE, OHIO. 44077-5361 &й : ********************************************** &р : ' 0,0,0,49,0,98,0,147,100,0,100,49,100,98,100,147,544,127 ' 2000:э1,734:э2,734:э3,734:э4,734:э5,734:э6,734:э7,734:э8,2200:&HF80F,0:&HF84F,0:&HF89C,0:у0,63:у1,27:у2,0:у3,36:№Ѕ101 (6 N$(14),C(52),N(52),Q(19),S(52),W(52),PI(4,18):&HA27E,&HFF:CUГ1:І81:282,255::TГ1Ѕ9:X(T),Y(T):T:
џ(155)Г132 ЇгM"FONT/BIN":&HFF40,0:155,134 (Б 65497,.:т80:1:&HFF9A,&H3F:ё27,11:"PLEASE WAIT DRAWING SCREEN":ё30,13:"AND SHUFFLING CARDS":ё34,15:"(10 SECONDS)" )H 140,180:Ђ&HA956:RГџ(Ќџ):І71:59065,57:ф4:59065,32:ц1:І91:59108,230:ф4:59108,231:65434,27:DEГ5:HГ0:VГ1:YГ0:TГ1Ѕ4:H(T)Г100:P(T)Г1:T:І112 )_
: Cursor Control. )i P$Гџ ) ч2:ѕ"S1BM"Ћџ(X)Ћ","Ћџ(Y)ЋC$ )
P$Гџ(8)ЇЂ:XГ0 )Ж
P$Гџ(9)ЇЂ:XГH(V) )т
P$Гџ(10)ЇЂ:YГYЋ49:VГVЋ1:
XВ0 Ї XГH(V) *
P$Гџ(94)ЇЂ:YГYЌ49:VГVЌ1:
XВ0 Ї XГH(V) *.
YГ196 ЇYГ0 :
YГЌ49 ЇYГ147 *H
VГ5ЇVГ1 :
VГ0 Ї VГ4 *
ENГ1 Ї21:
P$Г" "АXГ0 АDEД53Ї31:
P$Г" "АDEД53 Ї41:
P$Г" "АDEГ53ЇІ111:Ѕ11 *х
P$Гџ(13)А ENГ0 А XДВ0 А PI(V,1)ДВ0 Ї51 :
P$Гџ(13)АENГ0 ЇІ111:Ѕ11 +
P$Гџ(13) А ENГ1 АXГ0 Ї52 +z
P$Гџ(13)А XГ100 А ENГ1 А PI(V,(H(V)Ќ80)Ў20)Г0 Ї 61 :
P$Гџ(13) А ENГ1 А PI(V,(H(V)Ќ80)Ў20)ДВ0 ЇІ111:ENГ0:Ѕ11 +
ENГ1 ЇІ114 +
P$Г"N" Ї151 +а
DEГ53АW(W(1))ЋW(W(2))ЋW(W(3))ЋW(W(4))Г52 Ї154 +ђ ч1:ѕ"S1BM"Ћџ(X)Ћ","Ћџ(Y)ЋC$ +ќ Ѕ 11 ,# : The spacebar to the foundation. ,| CAГW(W(V)):
CAГ13 ЇІ111:ENГ0:Ѕ11 :
(CAЋV)ГW(DE) Б (CAЋVЌ13)ГW(DE)Ї32 :І111:Ѕ11 ,Ъ P(V)ГP(V)Ћ1:І112:ы(544,127)Ќ(608,169),7:ь(X(V),Y(V))Ќ(X(V)Ћ64,Y(V)Ћ42),7 -@ !W(V)ГDE:DEГDEЋ1:
DEД53 Їь(544,127)Ќ(608,169),S(DE):чC(DE):ѕ"S4BM548,129"ЋN$(W(DE)):ѕ"BM594,160"ЋN$(W(DE)) :І131 -o "XГH(V):І121:І141:
DEГ53 ЇІ161:Ѕ11 :11 - (: The spacebar to the tableau. -Ќ )
H(V)Г440ЇІ111:Ѕ11 -б *
PI(V,1)Г0 Ї 43 : H(V)ГH(V)Ћ20 . +І112:ы(544,127)Ќ(608,169),7:ь(H(V),Y(V))Ќ(H(V)Ћ64,Y(V)Ћ42),7 . ,PI(V,(H(V)Ќ80)Ў20)ГDE:DEГDEЋ1:
DEДГ52 Їь(544,127)Ќ(608,169),S(DE):чC(DE):ѕ"S4BM548,129"ЋN$(W(DE)):ѕ"BM594,160"ЋN$(W(DE)) :І131 .С -І121:XГH(V):
DEГ53 ЇІ161:Ѕ11 :11 .§ 2: The enter key. Move card from tableau to foundation. /6 3ENГ1:UГH(V):DГY(V):VVГV:CBГ(PI(V,(H(V)Ќ80)Ў20)):Ѕ11 / 4CAГW(W(V)):
CAГ13 ЇІ111:ENГ0:Ѕ11 :
(CAЋV)ГW(CB) Б (CAЋVЌ13)ГW(CB) Ї53:І111:ENГ0:Ѕ11 05 5І112:P(V)ГP(V)Ћ1:ы(U,D)Ќ(UЋ64,DЋ42),7:ь(U,D)Ќ(UЋ64,DЋ42),1:ь(X(V),Y(V))Ќ(X(V)Ћ64,Y(V)Ћ42),7:W(V)ГCB:PI(VV,(UЌ80)Ў20)Г0:H(VV)ГH(VV)Ќ20:
H(VV)Д100 ЇH(VV)Г100 0 6
PI(VV,(H(VV)Ќ80)Ў20)Г0 Їь(H(VV),D)Ќ(H(VV)Ћ64,DЋ42),2:ENГ0:І141:Ѕ11 0М 7CBГPI(VV,(H(VV)Ќ80)Ў20):ь(H(VV),D)Ќ(H(VV)Ћ64,DЋ42),S(CB) 1> 8чC(CB):ѕ"S4BM"Ћџ(H(VV)Ћ4)Ћ","Ћџ(DЋ2)ЋN$(W(CB)):ѕ"BM"Ћџ(H(VV)Ћ50)Ћ","Ћџ(DЋ33)ЋN$(W(CB)):ENГ0:І141:
DEГ53 ЇІ161:Ѕ11 :11 1_ <: Move card within tableau. 2 =
H(VV)Г100ЇІ111:ENГ0:Ѕ11 :І112:PI(V,(H(V)Ќ80)Ў20)ГCB:PI(VV,(H(VV)Ќ80)Ў20)Г0:ы(U,D)Ќ(UЋ64,DЋ42),7:ь(U,D)Ќ(UЋ64,DЋ42),1:H(VV)ГH(VV)Ќ20:
H(VV)Д100 Ї H(VV)Г100 2д >CDГPI(VV,(H(VV)Ќ80)Ў20):ь(H(V),Y)Ќ(H(V)Ћ64,YЋ42),7:ь(H(VV),D)Ќ(H(VV)Ћ64,DЋ42),S(CD):чC(CD):ѕ"S4BM"Ћџ(H(VV)Ћ4)Ћ","Ћџ(DЋ2)ЋN$(W(CD)):ѕ"S4BM"Ћџ(H(VV)Ћ50)Ћ","Ћџ(DЋ33)ЋN$(W(CD)):ENГ0:
DEГ53ЇІ161:Ѕ11 :11 2э F: Shuffle the Deck. 3~ GN(1)Г13:N(2)Г14:N(3)Г28:N(4)Г42:VГ4:ZГ1Ѕ52:
ZГ13 Б ZГ14 Б ZГ28 Б ZГ42 Ї Z : VГVЋ1:N(V)ГZ:Z:ZГ5Ѕ52:RГџ(48)Ћ4:SГN(R):N(R)ГN(Z):N(Z)ГS:Z 3Њ H: Compute suit and value of each card. 3Н IZГ1Ѕ52:WГN(Z) 3ц J
WДГ13ЇQГQЋ1:Ѕ75:WГWЌ13:QГQЋ1:Ѕ74 3ў K
QД3ЇC(Z)Г3:C(Z)Г2 4 L
WГ13 Ї WГ0 4- MS(Z)ГQЋ2:W(Z)ГWЋ1:QГ0:: 4i Nф0:TГ1Ѕ52:"CARD ";N(T);"VALUE ";W(T);"SUIT ";S(T):: 4 P:Define variables. 5 QN$(2)Г"BR3R7FD2GL6GD2R8ULDL8U2ER6EU2HBL6DLUBR14":N$(3)Г"BR3R7FDGFD2GL7HUBRDFBR5EU2HL3BR3EUHBL5GDBLUEBR14":N$(4)Г"BR6R4D4R2L2D3LU7BL2G4R6BL7E4BR10" 6 RN$(5)Г"BR11L9D3RU3BD3R7FD2GL7HURDFBR5EU2H":N$(6)Г"BR11L8GD5FR7EU2HL6BLU2EBGBD2BRGD2FR5EU2H":N$(8)Г"BR3R7FDGFD2GL7HU2EHUEBRGDFR5BL5GD2FBR5EU2HEUH":N$(9)Г"BR3R7FD5GL8BR7EU2BLEU2HBL5GD2FR5BL5BLHU2E":N$(11)Г"BR6R5BL2D6GL5HURDFBR3EU6L2" 6џ SN$(13)Г"BR2R2D7LULDRU7LDRBRBD3E4R2GLG4BEF3R2HLH3":N$(10)Г"BR2RD7LU6GLE2BR5R5FD5GL5HU5EBRGD5FBR3EU5H":N$(12)Г"BR2R9D7L9U7BRD7BR7U7D6LF2R2UL2":N$(1)Г"BR5R3F3D4LU4H3LG3D4LU4E3BL2BD5R7":C$Г"R268D168L268U168BR4D168BR260U168":N$(7)Г"BR2R9DG6LE6UBL7DLU" 7 TS$(1)Г"BR1GD2F4R4E4U2HL3G2H2L3":S$(2)Г"BR3G3DF3R6E3UH3L6":S$(3)Г"BR4G4D3RE3RD3R2U3RF3RU3H4L4":S$(4)Г"BR5GDFDLHL2GDFR2ERD2R2U2RFR2EUHL2GLUEUHL2" 8B UC$(1)Г"BR4R2F3E3R2F4G8L2H8E4BL4":C$(2)Г"BR7R4FRF5G5LGL4HLH5E5REBR7":C$(3)Г"BR9RF8G3LH2L2D2FL4EU2L2G2LH3E8RBR":C$(4)Г"BR9F4G3R2E2RF3G3LH2L2D2FL4EU2L2G2LH3E3RF2R2H3E4BL9": 8V Z: Draw screen. 8ђ [ѕ"S1C1BM"Ћџ(X(T))Ћ","Ћџ(Y(T))ЋC$:ы(0,0)Ќ(64,42),1:ц0:ѕ"S1C2BM"Ћџ(X(T))Ћ","Ћџ(Y(T))ЋC$:ы(0,0)Ќ(64,42),2:ц0:TГ1Ѕ4:ь(X(T),Y(T))Ќ(X(T)Ћ64,Y(T)Ћ42),2: 9П \TГ1Ѕ2:ѕ"S8C3BM"Ћџ(X(T)Ћ16)Ћ","Ћџ(Y(T)Ћ10)ЋC$(T):ѕ"S4BM"Ћџ(X(T)Ћ50)Ћ","Ћџ(Y(T)Ћ2)ЋS$(T):ѕ"BM"Ћџ(X(T)Ћ4)Ћ","Ћџ(Y(T)Ћ33)ЋS$(T):ш(X(T)Ћ30,Y(T)Ћ18),3,3:ш(X(T)Ћ56,Y(T)Ћ6),3,3:ш(X(T)Ћ10,Y(T)Ћ37),3,3: : ]TГ3Ѕ4:ѕ"S8C2BM"Ћџ(X(T)Ћ16)Ћ","Ћџ(Y(T)Ћ8)ЋC$(T):ѕ"S4BM"Ћџ(X(T)Ћ50)Ћ","Ћџ(Y(T)Ћ2)ЋS$(T):ѕ"BM"Ћџ(X(T)Ћ4)Ћ","Ћџ(Y(T)Ћ33)ЋS$(T):ш(X(T)Ћ30,Y(T)Ћ16),2,2:ш(X(T)Ћ56,Y(T)Ћ4),2,2:ш(X(T)Ћ10,Y(T)Ћ35),2,2: ; ^ш(52,154),2,2:ш(60,154),2,2:ш(6,184),2,2:ш(14,184),2,2:AГ3:TГ1Ѕ4:ы(X(T),Y(T))Ќ(X(T)Ћ64,(Y(T)Ћ42)),A:AГAЋ1:T:ц1 ; _ъ(512,20)Ќ(638,82),Н,B:ъ(513,20)Ќ(637,82),Н,B:ш(530,30),0,2:D$(1)Г"A2345678910JQK":D$(2)Г"246810QA3579JK":D$(3)Г"369Q258JA4710K":D$(4)Г"48Q37J2610A59K" ;ђ `AГ3:TГ1Ѕ4:ч3:ю(65,A),D$(T):ч2:ю(66,A),џ(D$(T),2,1):AГAЋ2::ы(512,20)Ќ(638,82),8 <А aAГ3:TГ1Ѕ4:ь(X(T),Y(T))Ќ(X(T)Ћ64,Y(T)Ћ42),A:чC(T):ѕ"S4BM"Ћџ(X(T)Ћ4)Ћ","Ћџ(Y(T)Ћ2)ЋN$(W(T)):ѕ"BM"Ћџ(X(T)Ћ50)Ћ","Ћџ(Y(T)Ћ33)ЋN$(W(T)):AГAЋ1::TГ5Ѕ8:ь(X(T),Y(T))Ќ(X(T)Ћ64,Y(T)Ћ42),2: =u bAГ5:TГ9:ь(X(T),Y(T))Ќ(X(T)Ћ64,Y(T)Ћ42),S(A):чC(A):ѕ"S4BM"Ћџ(X(T)Ћ4)Ћ","Ћџ(Y(T)Ћ2)ЋN$(W(A)):ѕ"BM"Ћџ(X(T)Ћ50)Ћ","Ћџ(Y(T)Ћ33)ЋN$(W(A)):ч2:ю(66,1),"CALCULATION":
RTГ1ЇRTГ0:ь(512,20)Ќ(638,82),8 =у cч3:ю(71,12),"BY":ю(69,13),"GEORGE":ю(67,14),"QUELLHORST":ч2:ю(68,22),"48 CARDS":ю(66,23),"LEFT IN DECK": =ќ d: End game routine. >w e:65496,0:&HA27E,3:ё23,10:"THANK YOU FOR PLAYING CALCULATION":ё21,12:"BREAK KEY HAS BEEN RESTORED TO NORMAL"::: > n: Sounds. >Ќ o65496,0:ZГ1Ѕ10:Ђ:Z:65497,0:: >Ц pЩ"O3L150T255P100GC": >ђ q65496,0:Щ"V13T2O2L5G;O1L2C":65497,0: ?
rЩ"O4V20T255L255A": ?; x: Update amount of cards remaining in deck. ?e yч1:ю(67,22),54ЌDE:ч2:ю(67,22),53ЌDE: ? : Deck is empty message. ?Ч ь(544,127)Ќ(608,169),2:ю(70,17),"DECK":ю(70,19),"EMPTY":І111: ?х : Next card out routine. @
VГ1 ЇPГ3 :
VГ2 ЇPГ5 :
VГ3 ЇPГ7 :PГ9 @K
W(W(V))ЋVГ10 Ї144:
W(W(V))Г10 Ї145 :
P(V)Г14 Ї146 @ ч3:ю(64ЋP(V),P),џ(D$(V),P(V),1):ч2:ю(65ЋP(V),P),џ(D$(V),P(V)Ћ1,1): @п ч3:ю(64ЋP(V),P),џ(D$(V),P(V),1):ч2:ю(65ЋP(V),P),џ(D$(V),P(V)Ћ1,2): A5 ч3:ю(64ЋP(V),P),џ(D$(V),P(V),2):P(V)ГP(V)Ћ1:ч2:ю(65ЋP(V),P),џ(D$(V),P(V)Ћ1,1): A^ ч2:І112:ю(65,P),D$(V):І112:І112: Au : Start new game. AЗ ц1:ч2:ю(26,12),"PLEASE WAIT SORTING THE CARDS":І71:RTГ1:І97 B3 DEГ5:YГ0:HГ0:VГ1:TГ1Ѕ4:PI(T,1)Г0:H(T)Г100:P(T)Г1::XГH(1):P$Г"":ч1:ю(26,12),"PLEASE WAIT SORTING THE CARDS":І112:Ѕ11 BN : Win a game routine. Bл QГ1Ѕ2:ч3:YГ1Ѕ2:AГ3:TГ1Ѕ4:І112:ю(65,A),D$(T):AГAЋ2:T:ч2:Y:Q:ч2:ю(35,5),"CONGRATULATIONS":ю(27,7),"Y O U W O N T H E G A M E" C' ч3:ю(30,18),"PRESS TO PLAY A NEW GAME":ю(35,20),"PRESS TO QUIT" CO P$Гџ:
P$Г"N"Ї151:
P$Г"Q"Ї101:156 Cf : Check for loss. D Ё
W(W(1))ЋW(W(2))ЋW(W(3))ЋW(W(4))Г52 Ї154 : GГ1Ѕ4:TГ1Ѕ4:CFГW(W(G)):
W(W(G))Г13 Ї162 : CGГW(PI(T,(H(T)Ќ80)Ў20)):
CGГ0 Б (CFЋG)ГCG Б (CFЋGЌ13)ГCG Ї D
Ђ: D ЃAГ3:TГ1Ѕ4:ч0:ю(65,A),D$(T):AГAЋ2::ч3:ю(68,3),"YOU LOST":ч2:ю(69,5),"PRESS:":ю(66,7)," FOR NEW":ю(66,9)," TO QUIT":І113:Ѕ156 GГ1Ѕ4:TГ1Ѕ4:CFГW(W(G)):
W(W(G))Г13 Ї162 : CGГW(PI(T,(H(T)Ќ80)Ў20)):
CGГ0 Б (CFЋG)ГCG Б (CFЋGЌ13)ГCG џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ њ№ 0xx00 0 lll llўlўll 0|Рx ј0 ЦЬ0fЦ 8l8vмЬv 00` 0```0 `00` f<џ ЬЬЬќЬЬЬ x00000x ЬЬx цflxlfц №```bfў ЦюўўжЦЦ ЦціоЮЦЦ 8lЦЦЦl8 ќff|``№ xЬЬЬЬмx ќff|lfц xЬрx Ьx ќД0000x ЬЬЬЬЬЬx ЬЬЬЬЬx0 ЦЦЦжўюЦ ЦЦl88lЦ ЬЬЬx00x ўЦ2fў x`````x Р`0 xx 8lЦ џ00 x |Ьv р``|ffм xЬРЬx |ЬЬv xЬќРx 8l`№``№ vЬЬ| јр`lvffц 0 p000x ЬЬxр`flxlц p00000x ЬўўжЦ јЬЬЬЬ xЬЬЬx ќff|`№ vЬЬ| мvf`№ |Рx ј 0|004 ЬЬЬЬv ЬЬЬx0 Цжўўl Цl8lЦ ЬЬЬ| ј ќ0`ќ 0 f3Ьf3Ь0 0 &fўў` џ џ00 x |Ьv р``|ffм xЬРЬx |ЬЬv xЬќРx 8l`№``№ vЬЬ| јр`lvffц 0 p000x ЬЬxр`flxlц p00000x ЬўўжЦ јЬЬЬЬ xЬЬЬx ќff|`№ vЬЬ| мvf`№ |Рx ј 0|004 ЬЬЬЬv ЬЬЬx0 Цжўўl Цl8lЦ ЬЬЬ| ј ќ0`ќ 0 f3Ьf3Ь0 0 &fўў` џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ&? : PRINTME/BAS ' This file courtesy of Arthur S. Hallock. & 2000:65496,.:140,180:150,18:&HF80F,0:&HF84F,0:&HF89C,0 &Џ ї:TГ1:Ђ43350:І20:у1,1:у10,27:т80:2:ј3,1 '$ ё34,0:ј2,1:"CALCULATOR":ё31,1:џЁ(15,42):ё12,4:"THIS PROGRAM WILL PRINT THE DOCUMENTATION FOR CALCULATOR":ё5,6 '| "TO YOUR PRINTER.":ё23,6:ј7,1:"BE SURE YOU HAVE ENOUGH PAPER, THERE ARE 02 PAGES" ( ё20,9:ј3,1:"YOU MUST NOW SET THE BAUDRATE CONSTANT";:ё20,10:"TO CORRESPOND WITH THE ONE YOUR PRINTER";:ё30,11:"IS CURRENTLY SET TO" ( ё1,14:ј2,1:"600 BAUD=87 / 1200 BAUD=41 / 2400 BAUD=18 / 4800 BAUD=7 / 9600 BAUD=1":ё18,16:"PLEASE INPUT PROPER BAUD RATE > " (Џ ё50,16:ЛBD$:BDГџ(BD$) )
BDГ87 Б BDГ41 Б BDГ18 Б BDГ7 Б BDГ1 Ї150,BD:Ѕ10 :ё49,16:" ": 50,1:Ѕ8 )Щ
ё10,19:ј1,1:"YOU MUST NOW INSERT YOUR PAPER IN THE PRINTER IN SUCH A WAY":ё8,21:"THAT THE FIRST LINE PRINTED WILL BE ON THE VERY TOP OF THE PAPER":ё25,23:ј2,1:"PLEASE PRESS TO START"; )х P$Гџ:
P$Гџ(13)Ї12:11 *- :ј3,1:ё19,23:"PRINTING HAS STARTED, PRESS BREAK TO ABORT";:№Ѕ22 *<
"I",#1,F$ *L
џ(1) Ї18 *b Л#1,L$:FГ1:AГAЋ1 *{ L$:#Ќ2,џЁ(8,32);L$ *
Ѕ 14 * #1: 100,1 *И ::"All Done. Thank you !!": *Ь F$Г"CALC/DOC": + #1::"PRINTING ABORTED"::"ALL FILES CLOSED": S STARTED, PRESS BREAK TO ABORT";:№Ѕ22 *<
"I",#1,F$ *L
џ(1) Ї18 *b Л#1,L$:FГ1:AГAЋ1 *{ L$:#Ќ2,џЁ(8,32);L$ *
Ѕ 14 * #1: 100,1 *И ::"All Done. Thank you !!": *Ь F$Г"CALC/DOC": + #1::"PRINTING ABORTED"::"ALL FILES CLOSEDџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ