JJJJ ( X ,0 ,b9 LԠ  Рààè   3.3     Ԡˠ ͠Рӧ$%L"ʹ0  `)$O1AM0İ1050:790:1120:370>P0PL(S1)PL(S1)10~PG(S1)PG(S1)AM:29:V2:"DOUBLE DOWN":DD1:O1O1AM:430"SORRY YOU ALREADY HIT ON THIS HAND.":"YOU DO NOT ENOUGH MONEY TO DOUBLE DOWN.":  AD1:A1D2:V0:H0:1070:H6:BONEY FOR SPLIT.":2HI1İ1050:670:1120:370pPG(S1)AM2:PL(S1)0:SD1:SE1:32:V2:"SURRENDER":430"YOU CAN NOT SURRENDER BECAUSE YOU":"ALREADY HIT ON THIS HAND.":HI1İ1050:770:1120:370P0AZPL(S1)10:730AZPL(S1O1AM0İ1050:630:1120:370dDO1O1AM:SPSP1:QQQQ1:QPQP1:PL(S1QP)B:PG(S1QP)AM:PL(S1)BrNQVV:PF1XP0P1:J(S1QP)1bH0:V7QQ4:1070:VQV:H6:1030:370l"MAY ONLY SPLIT ON THE FIRST TWO CARDS.":v"DO NOT HAVE ENOUGH MPQP1:P0:4908001J(S1)1J(S1)0:P1E1030:B11:430tBU1Ė36:V2:"BUST":SD1:DD2:BU0:HI0z36:V2:"STAND":SD1:440HI1İ1050:620:1120:370&AP1İ1050:"CARDS MUST BE THE SAME TO SPLIT.":1120:370:IT":"D DOUBLE E SURRENDER"2|OP$:JKC((OP$))@JK0380\JK420,530,540,640,690jHI1:510DD1H12:1030:DD2:SD1:510SD1SD0:H6:VV4:HI0:470B11B10:370HH6:1030:510:B11:430SP0SPSP1:S1S11:QL3:V0:TXH61:TYV8:TX,TYTX16,TYTX16,TY23TX,TY23TX,TYjNI4124:TX,TYITX16,TYI8:TH6:V0:1040:D3A:H6:V7:1030:P3A^P1ACEP3ACEP37P3ACEP1ACEP171310h1150:IN0IN0:140r1050:"H HIT S STAND P SPL0:D20:P0:D30:CL0:JK0:HI0:BU0:SD0:DD0:SP0:QQ0:SE0 6S10:QP0:SP0:B10:O10:O20:PL(0)0:PL(1)0:PL(2)0:PL(3)0:PL(4)0:PF0 @PG(0)AM:D0:PR0:O1DOAM:O2O1::V0:H0:Z2DE:Z1D J960:DEZ2:DZ1:D1A:D2A1:V7:H0:1030:P1A:P2A1DAM$"q"ĉ::+ AM$"R"AM$"r"ė::1374 260I 1050:1120:160o AM(AM$):AM(100(AM.005))100 AM.01İ1050:"YOU CANNOT BET ZERO DOLLARS":1120:160 AMDOİ1050:"YOU DO NOT HAVE THAT MUCH MONEY":1120:160= ,Z20:Z10:DE0:D1A$(127)186) (AM$)2AM$"":189F AM$(AM$,(AM$)1):189s A$"Q"A$"R"A$"q"A$"r"AM$A$:190 A(A$):(A57A48)A46182 AM$AM$A$:AM$(AM$,10) 11:" ";:11:AM$;:182 AM$""ĺ(7);:182 AM$"Q"H","h","S","s","P","p","E","e","D","d"5 DO11320A HAHA1M PF1Đy AM$"":12:"YOU WILL START HAND "HA"." "Q - TO QUIT" "R - TO RESTART GAME":DO;" DOLLARS LEFT":"PLACE BET ";:11 T0:A$:A$(13)190 A$(8)(4);"BLOAD BLACK.ML,A$8000"T 26,168:7,131:(48896)76ĺ(4);"PR#A$8340"::136m <54,64:55,131:1002 CH(13,4),C(255)::BL$" " ACE12:DO100:HA0: I15:A$,AM$:C((A$))I:C((AM$))I:I& "|H COPYRIGHT 1988 COMPUTE! PUBLICATIONS, INC. - ALL RIGHTS RESERVEDy::" COPYRIGHT 1988 COMPUTE! PUBL., INC."11:"ALL RIGHTS RESERVED"12:13:"ANY KEY TO START" 49168,0!T(1):(49152)1333#40196,189:40197,158 (        0,254,96,1 0,0,0,0,0,0,0,0@ 0,0,0,0,0,0,0,0,1,239,216dDB  T0D$(4)!X152((D22TTD?<767X,DFFXPT1717ĺ"ERROR IN DATA STATEMENTS. PLEASE CHECK.":ZD$;"BSAVE IOB,A 768,L 53"d 169,3,160,16,32,217,3,96,0,0 0,0,0,0,0,0,1,96,1,0,17,15 48,3,0,32,0,0,1, 5)(116)256:::8::"COPYRIGHT 1988 COMPUTE!"::34,2:aR$(34)::3:"ENTER FILE NAME, OR CAT FOR DISK CATALOG":5:"NAME: ";FL$:FL$"CAT"İ100::20aFL$""85bER0:150:ER1ER0:23:"INVALID FILENAME-PRESS A KEY TO CONTINUE";:1638 G` COPYRIGHT 1988 COMPUTE! PUBLICATIONS, INC. ALL RIGHTS RESERVED.Q`250`D$(13)(4):A143634:A243635:A343616:A443617:B$(16),F$(64):Q$(34)` (48896)76PR1:D$(4):A148855:A248856:A348859:A448860;aG(103)(104)256:H(11     7 103,1:104,96:24576,05(4)"RUN CONVERT1"OU ARE OUT OF MONEY"52"WISH TO PLAY AGAIN (Y/N)?"=<Y$WFY$"Y"Y$"y"Đ:137pPY$"N"Y$"n"ĉ::zZ1340R BET."1120:IN1Y"YOU DO NOT HAVE ENOUGH MONEY TO INSURE":"YOUR BET.": 1050:"DEALER DID NOT GET BLACKJACK. YOU LOSE":"INSURANCE MONEY AND HAND CONTINUES."1120:31:V2:"BLACKJACK":PG(S1)1.5AM:BJ1:800(:15:"Y"Y"Y$"y"1210%Y$"N"Y$"n"ı/1170RO2AM20İ1050:1280:1120:wINAM2:O2O2AM2:DODOIN:IN0DE21İ1290:IN0:1270AD1:A1D2:V0:H0:1070:1050"DEALER HAS BLACKJACK YOU LOSE YOUR":"INSURANCE MONEY AND SAVE YOUCL24:1:ZZ!$BL$::1:22:5.A12A141090VBTA113A11:TXH61:TYV8lDAACETA11312F32768,T,TX,TYL`13:24:"PRESS ANY KEY"jY$:1050t~D312ı1050:"WANT INSURANCE Y N"Y$:Y$""1170Y$(4(1)1):CH(A,A1)1960;CH(A,A1)1:BA2:A7B10KAACEB11]B11Z1Z11Z2Z2B:Z221Z10Z2Z210:Z1Z11Z221BU1Z2PL(S1):Z1P:960:PL(S1)Z2:PZ1:1070:Z2DE:Z1D:960:DEZ2:DZ1:1070: CL22:ZZ21DE21PL(I)22İ940CDE22DEPL(I)Ė36:V3:"PUSH":PG(I)0sDODOPG(I):VV4::DO(100(DO.005))1001050:I113:J14:CH(I,J)0:J,I:PR114035:V3:" LOSE":PG(I)PG(I):35:V3:" WIN":T(0):A((1)13):A1J1BJ0:870.*DE21āI03:PL(I)0::870E4S11PL(0)21870^>S11SE1SE0:870mHDE16860RHH6:1040:840\DE21Ė36:V3:"BUST"fV7:I0S1pDE21PL(I)22DE22DEPL(I)PL(I)22İ950zDE22DEPL(I)DE22PL(I)     X:I180:767I,I:9 (4)"BSAVE TEST,A768,L80"V12:"TEST FILE CREATED"'250 k, K":285?jER8ĺ"I/O ERROR - CHECK DISK AND DRIVE DOOR":285rjER77ĺ"INSUFFICIENT MEMORY TO CONTINUE":285j"ERROR # "ER" ENCOUNTERED IN LINE "LNj"PRESS RETURN TO CONTINUE, ESCAPE TO END";:16384,128:Z(16384):16368,0j"Z15585k28:16368,0:ER1%iD$"CLOSE"DR$:ci216,0:3288:21:1:958:ER(222):LN(218)(219)256iER3ĺ"DRIVE IS NOT READY - READY DRIVE":285iER4ĺ"DISK IS WRITE PROTECTED - REMOVE TAB":285j ER6ĺ"FILE NOT FOUND - CHECK FOR CORRECT DISAD"DR$hTY$"":I13:A$:7hF$(W):F$(W)""225ih(F$(W),2,(FL$))FL$TY$(F$(W),18,3):225xhWW1:210iTY$"AWP"TY$"ADB"TY$"ASP"TY$"BIN"Ģ20:"FILE MUST BE A BINARY OR APPLEWORKS FILE":"PRESS ANY KEY TO CONTINUE":16384,1gPR0165"g(FL$)15ER1:}gC1:I1(FL$):K((FL$,I,1)):C((K64K91)(K46)(K47K58I1))C1::C0ER1ggK((FL$,1)):(FL$)30K65K90ER1:gg:hD$"PREFIX/":D$"PREFIX":DR$:D$:D$"OPEN"DR$",TDIR":D$"RENVERSION COMPLETE":14:"RUN AGAIN (Y/N)?";QfK16384,128:A(16384):16368,0wfPZ1(A217)2(A206):Z75,20,85fUD$"CLOSE":103,1:104,8:2048,0:34,0::fd:D$("CATALOG",74(PR1))::"PRESS ANY KEY TO CONTINUE":16384,128:16368,0: YOU WANT BINARY FILE"Q$:"PRINT"Q$"SAVED ON IN DRIVE 1, THEN TYPE"Q$:"PRINT"Q$"RUN AND PRESS "Q$eCPR1TY$"BIN"R$",T"TY$R$:"0 PRINT CHR$(4)"Q$"CREATE "F2$R$+fF"1 PRINT CHR$(4)"Q$"BSAVE "F2$",A"A",L"L;R$":NEW":D$"CLOSE"F1$::12:"COV)N(V1):AD$AD$("0123456789ABCDEF",N(V1)1,1)::d7N(IA):B$(J)"":V101:N(V1)(N16V):NN(16V)N(V1):B$(J)B$(J)("0123456789ABCDEF",N(V1)1,1)::d<J16IL1ĺAD$":";:K1J:" "B$(K);:::J0ieA:"3D0G":"PRINT"Q$"PLACE DISK (AGALG)ė:12:"BINARY FILE HAS OVERWRITTEN PROGRAM":103,1:104,8:2048,0:34,0:c#:12:"CONVERSION IN PROCESS...":L1L1c(D$"OPEN"F1$:D$"WRITE"F1$:"CALL -151"c-J0:I0L1:JJ16d2J1NIA:AD$"":V301:N(V1)(N16V):NN(164,128:16368,0::20dbF1$FL$".TXT":F2$FL$:Q11(PR1)26(PR0):(FL$)QF1$(FL$,Q)".TXT"bPR1ER0:200:ER1ER0:FL$"":R$(34):20bPR1TY$"BIN"FL$FL$",A8192,T"TY$XcD$"BLOAD"FL$:A(A1)(A2)256:L(A3)(A4)256:AHLACT.ML"" "Calculating orbits"A XA(2),YA(2):PI3.14159265[ I02:XA(I),YA(I): 7168,7280,7392,7542,7692,7942 XC79:YC76 N02 P,XR,YR:C0 I02PIPIP TX(I)YRXC:TY(I)XRYC XA(N)C,TX:YA(N)C,TY C$Hd Copyright 1988 COMPUTE! Publications, Inc. All rights reserved.nD$(4)::1:9:"Copyright 1988 COMPUTE! Publications"x11:13:"All rights reserved."A(0):A0A4500ģ6572:D$;"RUN GALACT.BAS" :"Loading ml file":D$"BLOAD GA     >?`pxxxxxp`??`px|~~~~||xp|`?   0@HI((((PPPP000000$  q,xx q q,` q 犍|Ĺ}J.|J0|.|8H }JJJ@|hJjjj) |L`LHĢĠ@oph n` $$$$$$pC00000pC  >>><~~~~<?@@@??@```@@ﭿ0|@|0}p|`Ii`}0}3P|`|@}&p}p}p|@}P|`|LZ0}`||lj lj{ʊ%ʊbʊiʊ筿0|||?|@|||O|0}p| aC} amC}D} I`܊݊ފ}}|` q a}Ю`}Ê0} }0 L< ؄Êڊ0}L< oÊʎÊ`@| } | > } > } > }0|}| >} >}` H0}"  ͇0}1} 2} 3} 4})}` }8 }͊} }8}͊}` a-}̓}HJhI`h`0}p}@}p|P|`|` P| `|P|i@}@}T@}| |}J~|J~|ͽ0| }J~ |J~ |J~ |;@|К` pފފ݊݊݊GK'+݊GK'+#`݊ފފ݊ H}0}F0|Ϳ@|6 /}i}͈}}}m}}} ͇i0|ͽڊL(ۊ|0|ڊ`|}| |`|0()ۊ|i@|;ڊL[(ۊ|@|ڊ`}Š0}( =Š0} ܊HI`܊ =h܊Š0}ʎŠ`~ 7e}Š0} 7ŠʎŠ0[L`0}^ P}TL犘 (\P|m0 b犘 (\`|LcJJJJ`ͼ ,LcٜP|`|LcJP|`| ؄ۊڊ|||0|| ||@|L`@|0|||||||||P}`}||0|| ||@||p|P}` ڊۊP|}||P|0()ۊ||i 'NJƊNJii֊`ĊŊ(*8L=Ŋ(```܊@*T܊I`܊`}} a e a=ee}0}}`犭}L.CL&} qĹ0 qĹ`l0 a`m0 b`l0 aTŊŊ M FŊ MƊ`TĊ|LƊ |mĊ|{||Ȋ) ȊҊҊ )mĊҊȊ Lj ȊmȊ`Ȋ J   ) Ȋ`֊TĊLƊNJ|Ȋ{LĊiƊ 'L`mߊlm܊`|ኽ|ߊ|⊽|`} ȀLN 8eNN`PWTR L L@ `؊يي؊`0辶쩉 0` &0 ׂL`L LL ` k k  \ Y Tɛ}`|ኽ0|ߊ |⊽@|p| LʊLN 8eNNre=ʊLN 8eNNeeN=ʊLLከb䊭㊨|m䊍]v{\u㊨LƊTĊJJJJJ H 'he8劍` "" 6***""""""""""<""< :< $"""2,"""""**6"""""< >>8  80,*** ""  ">"6**"""""&*2""""""""""""*,"" "" ">""""""""""""""**6"""""""> >>> >00000>" <"<"""<< <"""<"><$""< """" *>> "2*&" " >>  ">> "8""> """"""< >> ""*:<"">""""""""""""">>><2"<""">""" ggggggccD`(xxEFG >0 e()) $20I$ i EFGXL>>< (&20 *, * ! g``$ !%$$$8.%N$m!!)%m (` g*` ᥡ`_wUUW_GGG_WUW_~xx~zz~~~~z~ccc||cccOGCILOO||`cCy|`cOgssscccccg '&`,!m"#, !,, >-, -,`#1,0 ,!1 ,`~|xp`@?)?),pi(i(m `         쀰r m [h&,-.*,U-."  \& ' ' & & `r   +xȹxȭ( xm) !xm*"+, \+` g5`'&KFKFLEV:KF255KF255#03803Ĺ32132,127P&KFKFLEV:KF255KF255Y0380ame over":2:11:"final score "(32128)(32129)256" level "LEVc 4:13:"Play again (y/n)?" A(49152):A249A217290 A238A206Ā 490 MFMF1:MF14MF14 LEVLEV1:MSPDMSPD5:MSPD31Ĺ32132,63 MSPD63Ĺ32132,127US I12999:? :10:5:"score ";(32128)(32129)256W 11:7:"level "LEV US0Ė12:9:"press fire to continue":32768:450 12:9:"return to continue" A(49152):A141440 C:::C32780 (32133)1520C 9:9:"gA237ĺ"mouse selected":US255:370V JA234A202US1::"joystick selected":380_ T310 ^11:7:"W E R":11:"S F":11:"X C V"::" space bar to fire" hR6:MSPD16:380 r32771 |32130,MF:32131,MSPD:32138,R:32136,KF:32134,C1:CP2I2PI I ND  56,50,50, 75,55,58, 125,68,65 "MF6:MSPD25:R5:LEV1:KF9:C32774:32128,0:32129,0:32132,31 ,:2:4:"Press K for keyboard, J for joystick,":8:"M for mouse" 6A(49152):A235A203US0:350$ @A205XxEFG >0 e()) $20I$ i EFGXL* <"<"""<< <"""<"><$""< """"  "" 6***""""""""""<""< :< $"""2,"""""**6"""""< >>8  80,**"*:<"">""""""""""""">>><2"<""">""" ""  ">"6**"""""&*2""""""""""""*,"" "" ">""""""""""""""**6"""""""> >>> >00000>">>< (&20 *, **>> "2*&" " >>  ">> "8""> """"""< >> "5ȱ`ȱa{i2>222###?>&##> #### 000001## >SSCC&&&&#######> #>0&####### CCSS>  ###> ? ?𘘌0!!?!!!!!!!!!!!!!!!!9!!!!!?!!!>> !!  ?!?-!!!!!#%)1!!!!!!!!!!!%)1>!! !! !>!!!!!!!!!!! !!!!-?!!! !!""" 0`8@@@@8>> 6$$>>< 'tr *, 000 ">">~@`0 !9-'!!?!  !? !!!!!!!!!> >> < :? ERROR ROUTINE@EC(222)JLN(2#$E20E160FE$(LL)"A1-":1080G.E40E192FE$(LL)"B1-":1080M8S:g CENTER TEXTHT((40(A$))2)1: LENGTH OF FILEGG$(LY)(GG$)1FIN$"00"(LY):((GG$)2FIN$"0"(LY):2v;VOL$>::"DONE"::2 TYPE OF FILETE0E128FE$(LL)"T-":1080vE1E129FE$(LL)"I-":1080E2E130FE$(LL)"A-":1080E4E132FE$(LL)"B-":1080E8E136FE$(LL)"S-":1080E10E144FE$(LL)"R-":1080RT A DISK WITH WHICH"@ "YOU WANT TO STORE THE TEXT FILE AND"U "PRESS RETURN";_ 1400i :D$ D$;"OPEN CAT-VOL ";VOL$ D$;"WRITE CAT-VOL ";VOL$ VOL$ USED KK X0(LL1):FE$(X): *"*END*"4D$;"CLOSE CAT-VOL "SECTORS5 USEDUSEDLY: COUNTER FOR SECTORS USED@ NB$"" CXX29:(C)0(C)31(C)127(C)159NB$NB$" ":530 NB$NB$((C)) C FE$(LL)FE$(LL)NB$ &LLLL1 0X :STAEN466:ENSTA210 D440 :"PLEASE INSE STA12046:EN12256:LL0:KK0:USED0:NB$"":FE$""E XSTAEN35m (X)0KKLL:700: UNUSED FILE (X3)255560: DELETED FILE E(X1):1000: TYPE LY(X30):1300:FE$(LL)FE$(LL)FIN$:FE$(LL)FE$(LL)"-": LENGTH OF FILE IN ?"; ,S$" 6S$"Y"S$"y"3409 @S$"N"S$"n"230B J300 T:"PLEASE INSERT"::"DISK VOLUME ";VOL$::"AND PRESS RETURN."; ^1400 A$"PLEASE WAIT. READING CATALOG TO MEMORY":1200 :HT:A$ SS0:SE15:TR17:BU8192:OP1:15004A$"COPYRIGHT '88 COMPUTE!":1200:2 4:HT:A$< 34,8R FE$(100),NB$(35)X :"WHAT IS VOLUME NUMBER OF THE DISK YOU":"WANT CATALOGUED?"; "";VOL$ (VOL$)24230  :"DISK VOLUME ";VOL$  ":::"IS THIS CORRECT 2 COPYRIGHT 1988 COMPUTE! PUBLICATIONS, INC.M ALL RIGHTS RESERVED.Xd1600bi8192nnD$(4)vx:(768)169150D$;"BLOAD IOB,D1":X16:Y140:" ";::A$"PRINT CATALOG TO A TEXT FILE":12002:HT:A$#      z #    ̮ԠԠ Ԡ ՠ Ԡ ԮϠ ˮ̠ ԲҠ Ҡؠ ԮϠ ԠŠԱҠ ˠԠԱŮԠԮ̠ԮӠ