@L}5 _$% l0$)$$Hȱ$ UhL" `e$$%`$%`  R@W!( L(1   Y I`  d  Ld M * @  $ % CC$$)%1 Udߥ$9%: !0 S$% DD˙`  }J)Lr d M * @  $ % CC$$)%1 Udߥ$9%: !0 S$%} DD˙`  }J)Lr J  ((  p L ()   J}L= ( L 0q A    IB JC;? D W } LL  ` W )LA!  ߰")-݆ p" } $G@LL 08`Q")<2Q0 -G$Ș݆ UL# ; p8(()(0ʥ)NQ` }$GȘ݆LU )L ݆ L GȘ ݆LL )W>Z   HH)H  }p h  hyhy D L> L JJ    ! LA*` BF }7'8  M HN H` 8 Z  \LdJJ!"! GFE@F (!L }EE !E^ ^ E E7EȩEdE/EȩE  D } .L }  ;F d  ;?F7F? ( .   Z D LL d } . D  L    p  E` , d)  D L) 0BM݊L݉} ML  N݆ L NLML [ TEqEHȱEqEh 0Gȹ G} HLL GɛL  LFREE SECTORS G) *Gȩ GȽG GȌ*jj >G} C8jJ3j2CD( C202C ԠBX` N 1? l LlD:RAMDISK}.COMLu L1 L ;LHL  T`  `8  ɐ     `TU  } L ? .  t`GBJ ~DEHI B V0dV!}QDEHI VF9 ,0 ,0 s0hhL  L` H hDHEh"}DEL8HI4 0 HI,0 0  9 .G VLO#},0 L4*IJ`llD1:AUTORUN.SYSNEED MEM.SAV TO LOAD THIS FILE.D8:MEM.SAV J y08 B|DEHI$} V0 0`B;DEL`?<0LV`@ʆ v s? F0Ξ05: [ BDEHI%} VY8 B V  @  /DE `E:D8:DUP.SYSERROR-SAVING USER MEMORY ON DISKTYPE Y TO &}STILL RUN DOS B;DE J  (` 9 V⪍ ઍ  -'}LLu ÝDEHILV 9 .l 9 .l  `` s$B BH(}I|DE V BLV nB,DE JLV B V BLVDEIʩ BꭝLu } 3E:}DISK OPERATING SYSTEM II VERSION COPYRIGHT 1984 ATARI CORP.A. DISK DIRECTORY I. FORMAT DISKB. RUN CARTRIDG*}E J. DUPLICATE DISKC. COPY FILE K. BINARY SAVED. DELETE FILE(S) L. BINARY LOADE. RENAME FILE M. RUN AT ADDRES+}SF. LOCK FILE N. CREATE MEM.SAVG. UNLOCK FILE O. DUPLICATE FILEH. WRITE DOS FILES P. FORMAT SINGLEL !N',}#"&))9(&*)/h)''-&؆莟R'S  vL/ˢ L }Insert DOS 2.0s, type Y Λx -}DEfHI 1莏#q! @ y0ɛ8A0,' ȅ 1 1ild! 1L!NO SUCH ITEMSELECT.} ITEM OR FOR MENU! 0 .z:*{}.|{ 1 0 0JB 18L%|DL/}%DIRECTORY--SEARCH SPEC,LIST FILE?[# 0 0 &|D3" 1L!NOT A DISK FILEN !B 1L!E# 1 !BD0}ED:}:1BJ|DE 1DEBHI 1 h0ߢ 0.1}  0?詛 1 y0YЛ 1 ;#L" ;#L! BL1TYPE "Y" TO DELETE...DELETE FILE SPEC2}COPY--FROM, TO?OPTION NOT ALLOWED697 FREE SECTORS COPYING---D8:COPY32.COMl# 0|D .L/%#3}##JB|DE 1BHID#E 1#0: B 1L!#͑### B 1#c$0SY4}S1}:## # # .#Ƚ# # 𩛙## 1,#PD#ELJ- <.BJD#E 5}1 1HH 0hh|DL%1}:̳# L% #D#EL% 1 0 . .0O% 1L!WILD CARDS NOT A6}LLOWED IN DESTINATION 0 <.|K}N 2 FORMAT. t* 5) 1L!`) 0NΞ 0 L1) 1 L!BAD LOAD FILELOAD FROM WHAT FILE?) 0 ?}0#B 1L!WHAT FILE TO LOCK?) 0 0$B 1L!WHAT FILE TO UNLOCK?DUP DISK-SOURCE,DEST DRIVES?TYPE "Y" IF OK TO US@}E PROGRAM AREACAUTION: A "Y" INVALIDATES MEM.SAV.FE! +L1   `*  70 2 2A} 0.* 1 y0 0)INSERT BOTH DISKS, TYPE RETURN^, 1 y038逍 N, 1L! ,B}C, t*  Lx+, 0 ^, 1 y0 , ,0,0 ,L+ ,I0 ,Vǭ0C}Ξ, 0 }, 1 y0C,ШC, 0K'!" H H 'h h Lx+!EF 5L1L!D,I,HhD}` NOT ENOUGH ROOMINSERT SOURCE DISK,TYPE RETURNINSERT DESTINATION DISK,TYPE RETURNE}`  `8 rL1`-* 1P* 1 y0Y`hhL!NAME OF FILE TO MOVE?- 0 0|DL% <.F},^ 1 70 0 .@L# .BJ 1  DEHIB V L1 ,} 1 70,L.  G}JB|,#P#DE 1 HI BDEHHII 1 B 1 ,^ 1 70,0La- B V,#PH},^ 1 70 0L#L!-* 1P* 1 y0Yj383}mm ݭI}}`8}``|* ? ɛ,`|:-)| / 1L!`DESTINATION CANT BE DOJ}S.SYS0 0H{ 24Δ 28/L!/) 2 Π 2 0 ξK}hAΞB,0 J 1 BDEHI,HÝDE 1HIHIDELSAVE-GIVE L}FILE,START,END(,INIT,RUN)O S0 1`BDEPHI V` S0H 1 L!M}0 0 1L~0`PLEASE TYPE 1 LETTER,0`hhL! 70 1L0L<1 ,;ɛ7,"ɛ:ݦ1ݥN}A"D|ݤD|ȩ:|ȩ|ɛ,,(/+.ީ1 1,ɛ`轤{NAMEO} TOO LONG B VL!` L1I H1EΝDL1|mDiE` V0`8d/8 i:222 1 LP}!ERROR- 144ɛ+,' 20*.. өr2 1``2TOO MANY DIGITSINVALID HEXAQ}DECIMAL PARAMETER800 0 8 00`,0'D800 H,ɛh`2L1NEED D1 THRU D8uR} ECIMAL PARAMETER800 0 8 00`,0'D800 H,ɛh`2L1NEED D1 THRU D8uԌҌDԌЄ0񘢐 = Lt/ J nʈ0`.%70/+%T} '225.$-%.5 @OUUUU@WUPUPUU@U}_PUWP~PUꪫT@V}몿@WT@_PW@W}~@^UUUP@^WUUPzU_@_PWX}{U_^TmUW^PP^@Y}z@P@Z}WTP^P[}PU@^@PP^@Pz@tW@\}_zW@~P@_@PV_@~T]}UEW{Ty@W^PWW_{P^}W^PW_T^m@_^U~Pzm_^zPW_}^z^^ޫ@^z@^W^^U@zQ@@^Py_~UW^C^`}@z^{PU~^zZUU@Ejzzz~UUT@zza}_~UU^@z@zz@[Pz~z@{@z~~b}k@@Tzzm@Tz@PPzc}^^P@_~PP@~zPPPd}@~z@_@^@{@^@^@z@{Az{^z@e}Azy~A{P^EmE{Z֔G@zUjVWVkPf}~U_WzG_Z{W_~PzzPz^ꪫ@~g}@~^P^Pꪪ@_PzW@WWP@h}T_P}P@_@~PU@TW{_UTz@UT{PPU@i}@{@^@k@Wi@Tj}i@Pk}l}^m}^Zzn}~no}P@@p}@uTq}Pr}|}}|}}|s}}}|}}||t}}|l;v BDuEJ V BDEHI V B V  ҍԪ8u}9:;Ӣ89:;Ýĝ23 ;u2᝔2H3᝔3Щ0ԩv}ЩgЩ{ЩЩЩЍЍЍЩ @.ԩrD𩀅nmmnԩpԩԅ w} n n m)LHHH, lhhh@ n mL{mqq} qȥ}Hq?ߥi(Xx} @` err``H Iee8ri}sinjn*y}.jninjnijnhHihД`\pppKvv0)0vI 1vI`2vI 3vhhz} iiLpp`ЭЭТq ԍoL{m q ԍJo-ԩ ԩL{m{}/ԥԩx ԩЩЩvЩ6ЩzoL{m| ԩoL{m.ԥԢ  ԍЊ8 ƍoL{m|}  ԍЊ8 n ԩ ԍL{mNNNNNNNNNNNNNNNNNNNNNNN}}NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN@pp~}BppvTvppp\ApX H8(Pxh0X Hp8`(Px@h}X p8    !$'*-0369"UDTGtuTUUEUwwT"""!UQeV"""""""23#02 #2#XUDDtwDP}EvweuUH""!U%]UuU"""""2"""2#0"02 UDUWtUTGveUEE""%UUQUUQUP}UU"""""# #"20##3 "3# UUDDUUUEVUWPT""UQUV0""""."#22""2"23"" "0#3DEDDDUDTFUUU{P}"Q"""""**#2#""""#302 #""UUTTuwtTUUew "UQ]]UUn""*"""#P}?"#"0# 222""#UDDwuUDT[{0 UQ^Q..""."#"#"2 """0UTDDDDDDD[f[P}8QQVU..*"""2""""" "".2"3TETTtEUDEUUU[QQ]UUU^""""*.2""3"#""""P}"""#ETDwDDGUDUTU[UQ^...""""22#0"""""333"DWwwuDwTwuTE[P}U]]QQ^".""""""#2#3""""23"#TGUwEUUDwUTE[QQUQ"j***#"#""" #23"""DUwD[P}UTEUUeTUKQnUQUUr.."""""*"""2.#""":32"""TDwUyUTEUUEDe{ QUeUUP}Ur"".ꪪ"""."22"#"3:2 "DDTUuUTUWUUfU U]QWQU2"""*ꪪ""2#"2###3.".DDDEDUDTEUU[P};QQ;V".ꪪ""""""""3+2" DDUEEUGDFVnQQU]Q{"*P}ꪪ"""32/#+""".UEDDUewTTe^UQQ5U.ꪪ"".""""""DDETEUtGuEU;P} UUQ."2""""2""".TETwUUUwUde;;QQUQl""*""P}3"#2"""EUGtDTUUeTF@QQUQR"""".""*#"33""".DDGGDDDSuUV{P}QRn""""".""*2">.TTDwuSUU5QV""""ꪪ"""32"P}TDGwU[U3?UUU V.""ꪮ"..TEGU K?QUP}|".ꮮEDEU| 35UU| ".ꪪEUUU P}UUU UUP}]| ?3/?P}333ꪪ?3333?P}33333??P}?33?33?13P}OUTL33?WP}Q?WT|GϿP}33?QqW?3WDuBD̻31U3.>UWP}uEUϻ35UU]U_33UUwu TU3]]_P}_?>3?3>UDUwu T_TUϻϻ35]]U?>?333TEUwE }VF_P}ϻ˻QU]]5U.>?3>>UUTDuE UV_ϿUUQQ_??P}?3??TDtEwu UWD_QQ]3?>?3.???DWuwWTDUwTWP}̻U]]U?>3??EGUTDT UUtUQ]UQQ???>P}?UtDETT UMUUe_˼PUUQ3?.?DUWUP \UWtUeP}]UPUU_?????UWwU7P UTwTTUϼUQPUUUU???3??P}UTU_uP DUWuUEgQ_P Q?3?3?3???T_o EUPVEG_SPP}-Q_?3????_p|\\>\*\*\>>\>(}>\A@\AA@\AA@<.b \A:#"!40!#+"y"ill(alsallfor.ew!tari5ser/(}0Ԣ+ 4+!51Щ!oҩҩ0"1"*/># \Ԣ;"3`&HЩ4 h@0B3(}BC"D:D;DD?D@DADBDCDDDEDFDGDHDIDJDKDLDMDNDODPDQA" $ . . .ݍ"Lb7̩ˠ.̥(}h8̠ )i̩̠ )i&̥h©ˆͽ$8έ 88iˑȑˑȑˑȑˑ(}ưũ.7 )eP3 )$`3襰iݢ`3iνP3˅͠ W$ Π W$ W$ f$`ˑȩˑ(}` )8}P3˝1 )}`31̠A `8>DJPV\b7p3H8D3h`8E"93"H(} Y,y.y.`%x) '%x) >%x) U%x) l%`%Ʒ %` %`% %Ʒ` %` %ƶ %(}` %`0% %ƶ` %`%&%e!<2!2I%`̥ %.J iJJJ`(}`˅ȱ˅̈˅ȱ˅` ҅˅ )?8i8 %`A& %114 1 B&`̥˥iˈ(}iiȑ`&I& K 5`k 5`01```````˥̩ȑ(}̑ˈ`11L&˥ % & &11 1 B& '` )0101`A& 1P1101 .18(} &L'1i &L'18 &L'1i &z.y.`01)H1˽1 % & )011 % & (})01` )  )i01` ((̝@1˝X1 ұ%̱혝L1Ӣ'4(5`8>DJPV\b>JP\<<<<<<<<<<(}<<<<<< ¦0X1W36-F:A-}2,!6-F:B2d,>F:Ad,AUA(AP""F:AV,)@A`)6-+",)-}$%$+",+AV@!AB+ A"@A%6-8<,%6-8<@,' 6-}-%! )!@8'6-"' 6-%! )!@"'6-,"*"A6 6-6-@>6-%-}%$@@6-F:,>6-@b%+!A',$A(J= 6-!AB3AV@= A]-}ҠŠ^"Ah APr)B2y@)!@$A| 6- A!!A(-}*@cA"A0C#6-A(&+"A(,$@eC6-@b%A($+!A',<6-@-}&%6-&16-@#'@<6-F:%, 6-N:&A', %%$" 6-R:," A`9-}Ԡ:< 6-F:,*6-<6-@b%+!A',$A(?6-$DZ-@'@ *(@P-}RESS H<-@'@!R(@FOR HELPW(Z$Nd%Ai%Ar3-@@G-@)@2-}Y%%$@@] a d$WĠŠXL#6-F:Ad,(0@W*BAdAUL A-}b2 ""6@(AdAU2 AlAqAPv9 A  #AdAU/6-}-@9 AKK6,650,7,650,14,770,15,750,33,800,28,950,40,970,57,3200,0,3400,62,3400̠Ǡ'-}6-@"@'6-?P-@6-F:%,6-$ P:,6-%A'P!AU6- }-&AU % $̠Ǡ16-F:%@,1-@@6@%%F:%&@-!}, "%$ 6-F:, -@ -%F:%%@, *%@-$٠ 6.DAT-"}A *G-@%6.=:F:%,,1 @G67B:,%@,.,4( 6-B:,$67%@<%B:,,.( >0"-@-#}&B:,'@@#0(@H.'6-@$AdAU. ARj6-!-@@#267@-$},. C67@6,. R67@,.`(@j A РC -@6@<2@P-%}@@ C$ҠҠ,-@%%) ,$ŠҠ#A`%$-&}@*-@"#%' *$ҠԠ #A6-A52"6@"6-%@-'}(2 A$$6-?:A6<BsD<$AV,!!104,104,133,213,104,133,212!!104,133,215,104,133,214,162-(}4,160,0,177,212,145,214$!!200,208,249,230,213,230,215.202,208,240,96,-18%6-A6-Ag% APB -)}BR AL/ BP-@@/( PLEASE WAITV%6-Ah6-A0% AP`AYj-*}%6-A16-A#% APt$~-$AV%$AV%"  $d(>:A%,"-@@-+}>(PRESS FOR DEMO SCREENP-@@ d(OR FOR EDITOR##@@K:<)@6-&-,}@I<*@A $@6-!(>:A%,$$0,124,16,16,16,16,124,00,60,126,102,102,1--}26,60,00,126,66,66,66,66,126,041,82,41,82,41,82,41,82!!164,82,164,82,164,82,164,82!!82,164,82,164,82,164,-.}82,16474,37,74,37,74,37,74,3773,73,73,73,73,73,73,73%%148,148,148,148,148,148,148,148 8,16,36,130,65,36,-/}8,1632,80,160,0,0,82,5,2 33,66,33,16,8,66,33,66*164,66,164,16,0,66,164,82466,164,66,0,16,164,66,164>-0}66,37,66,0,8,37,66,37H5,144,32,64,32,64,144,10R0,16,40,69,40,16,0,16\!!84,148,146,130,52,18,148,84f16,40,1-1}6,10,5,2,4,8p21,82,16,32,16,8,20,82z0,0,16,36,0,82,164,662,5,136,82,37,136,80,32!!148,72,136,73,148,84,14-2}8,730,82,40,82,40,82,40,00,82,36,82,36,82,36,00,36,82,36,82,36,82,00,36,74,36,74,36,74,0!!168,21,-3}168,21,168,21,168,2142,69,42,69,42,69,42,69!!162,84,162,84,162,84,162,84!!21,168,21,168,21,168,21,168!!82,1-4}64,82,164,164,82,164,8241,82,41,82,82,41,82,4182,41,82,82,41,82,41,41 ""164,82,164,73,164,82,164,164 !!170,-5}65,170,73,170,73,162,85 16,40,84,84,84,84,40,16$ 20,82,21,82,0,0,0,0. 10,72,72,33,33,207,72,208 160,18,36,16-6},160,2,4,2B 2,160,18,132,16,160,2,132L ##164,144,160,130,132,18,36,146V 74,33,66,9,10,40,72,41` 20,18,22,84,152-7},34,196,18j 82,0,164,82,180,82,0,164t 41,0,82,57,82,41,0,82~ 82,0,41,90,41,82,0,41 164,0,82,180,82,164,0,82-8} ##144,144,148,148,148,148,20,20 !!148,0,148,148,180,148,0,148 73,73,74,148,74,148,73,73 41,42,41,42,41,42,41,-9}40 82,85,82,85,82,85,82,85 ""164,21,164,21,164,21,164,164 8,36,74,164,82,37,74,36 37,82,84,82,37,34,36,82-:} 36,18,36,18,0,36,18,36 40,82,8,32,82,36,82,8 0,0,74,160,64,4,10,164 0,0,64,168,168,84,138,36 0,66,5,1-;}8,0,72,160,66 20,42,85,170,85,170,84,40 !!73,170,136,73,73,170,73,170( %%255,211,169,211,169,211,169,2552 %%255,2-<}11,165,211,165,211,165,255< %%255,165,211,165,211,165,211,255F %%255,165,203,165,203,165,203,255 Š-=} 6-@'6-@'6-@136-@?6-@K6-A`W6-@bc6-@;@6,;@,->};@ ,;@,#A0 u BP@@d1B7t@TS6-F:@,%F:@,$AVc6. CHAR-?}ACTERu@@& /6-@6-/-@dA' -@ %%%$@@ %-@}%%@@%$@@ ; 6-%@!"@%-6-@;6-%@ % 6-%6-%%$@@ -A}9@<@, -@@ "& %68<,-%68<@,-0   $: 331,1,1,-1,1,0,0,0,-1,1,--B}1,-1,-1,0,0,0,0,1,0,-1 РΠ A2 -@&@ V(@ CLEAR'(@>(@-C} RESTOREK(@V(@ j(@ נ/(@SCROLL<(@R(@UP,DOWN,j(@-D} LEFT,RIGHT F(@ SHOWS)(@;(@DATAF(@ k(@ SAVES.(@-E}MODIFIEDB(@ SETW(@ LOADSk(@ SET <(@&(@ TRIGGER TO<(@CONT-F}INUE T:,A2p , A2AdAU"', A @ @2!-@%@8-,@9/@"-G}= @$ ϠΠ S(@>:A%,##A3/6-@;6-A`G6-@2S6-@ "-H} "6@A3@ h 6-&@""6@,@2>,@9@P/@9@\6-@'h6-@-I} A3 aAdAU'-@@!O(@PRESS SPACE BAR FOR EDITORaAY@4 F:Ad,-J}@3A3P .6- A +AdAU.$* 55118,103,61,9,106,50,252,120,33,114,14,52,1,2,334 55119,-K}14,50,99,20,37,100,100,51,120,8,53,-1,-1,-1G ĠĠŠҮԠH 8'&6-+"@b,$@%@8AdA-L}UR A2\ )-@&@)"@A5f (@ A5Pp  4C:(@.z I(-M}@$(@TO LOAD,?(@ PRESS RETURN.I A4 :)@%&6-%@: A$A4`-N} -@@# A2- A = A6 6-'6-$AV00C:=)@ @-O}$ (@ A5P 0 4C:(@0(@ AND RECORD. I(@$(@TO SAVE,?-P}(@ PRESS RETURN.I A4 =6-F:%,*@)6-%@= A$A50 A4p r(@&-Q}(@ CASSETTE:(@ DISKE(@e@@K:r)@ &@h*@g-R}'& A4p ""@g6.C:" A6 d(@%(@ FILENAME?7-@%@H(@D:U@-S}d4A4p& 6.D:67@,.&(@R(@INSERT "4C:6(@TAPE &O(@-T} PRESS PLAYR$(@DISK.$$, A2 A ! A ,@.4-@&@4(@ERROR -U}F:A,8U(@)(@ PRESS ANY KEY6)@A@K A2U A:!!ΠԠ-V}Š:!!USE 15000-15290 IN YOUR OWN:PROGRAMS.::ŠŠҮ:{ +A1A-W}R@?(>:A%,KAVm6-F:@,%F:@,$AV{6-&@:%@:E!A6A-X}&+$@,3A7AEA8A:T-@#3A9%$@@D6-P:'AV,T6-Y}-&$AV:/A@%$@/AA%$@:6-%@@ :WA9%$@@e;A@%$-Z}@WAA%$@@:HBBv!A`3Aa@EA @H$:-[}ǠŠ:,6-P:'@,,6-&$@&@;-BBv-A6A&+$@,;$_; Ҡ-\}ԠΠ`;p BPAR@"(6-@@J-@@ %l(  -]}p j;((( 䠠  t;c-@@=(#PRESS NUMBERS FROM TO UNTIL ALLc(! THREE COLOURS -^}ABOVE ARE CORRECT~;a&( THEN PRESS THE Š.8-@@a($THIS PROGRAM USES ARTIFACTED COLOURS;Y+(# TO-_} SEE THEM PROPERLY YOU MUST TURN=-@@Y(YOUR TV COLOUR UP HIGH!;##@@K:;*)@-`}"@2'@*$;/6-&@H/ @)!@BR`; 6- BQ; BR`D2:ARTIF-a}ACT.BAS"@2'@*$;/6-&@H/ @)!@BR`; 6- BQ; BR`D2:ARTIF,11 REM *****************************12 REM *GRAPHICS DRAW PROGRAMME * *MUST STATE FILE NAME F$ FOR* *PICT1c}URE TO BE SAVED *13 REM *****************************29999 REM *** INITIALISE CHANNEL FOR *** CIO PUT US1d}ING IOCB #130000 CH=1:OPEN #CH,8,0,F$30009 REM *** SAVE GRAPHICS MODE30010 PUT #CH,PEEK(87)30019 REM *** SAVE COLOUR DATA1e}30020 FOR C=0 TO 8:PUT #CH,PEEK(704+C):NEXT C30029 REM *** FIND RAMTOP/DISPLAY LIST30030 RAMTOP=PEEK(106)*25630040 ADRHI=1f}PEEK(561):ADRLO=PEEK(560)30050 DLIST=ADRHI*256+ADRLO30060 SIZE=RAMTOP-DLIST+130069 REM *** USE CIO TO TRANSFER 1g} *** SCREEN DATA30070 IOCB=832+CH*16:POKE IOCB+2,1130080 POKE IOCB+4,ADRLO:POKE IOCB+5,ADRHI30090 SIZEHI=INT(SIZE/256):S1q}bŠb堠b렣bb%DOS SYSb*)DUP SYSbGSAUTORUN SYSbINTRO DATbBATPACK BASb)MENU b$BATPACK OBJb[ARTIFACTBASbbSCRSAVE LSTbrSCRLOAD LSTb SLIDES BASb-STRINGS BASbQUICKIE BASb/BDF BASb_BATPACK SAVbKTUTORIALBASB>HIGHLANDPICB>jMARCUS PICb zFONT SETIZELO=SIZE-SIZEHI*25630100 POKE IOCB+8,SIZELO:POKE IOCB+9,SIZEHI30110 I=USR(ADR("hhhLV"),CH*16)30120 CLOSE #CHZE/256):S0t11 REM *****************************12 REM *HOST DISPLAY PROGRAMME * *MUST STATE FILE NAME F$ FOR* *PICT5s}URE TO BE SAVED *13 REM *****************************29999 REM *** INITIALISE CHANNEL FOR *** CIO GET US5t}ING IOCB #130000 CH=1:OPEN #CH,4,0,F$30009 REM *** RETRIEVE GRAPHICS MODE30010 GET #CH,GR:IF GR>0 AND GR<9 THEN GR=GR+1635u}0015 GRAPHICS GR30019 REM *** RETRIEVE COLOUR DATA30020 FOR C=0 TO 8:GET #CH,COL:POKE 704+C,COL:NEXT C30029 REM *** FIND R5v}AMTOP/DISPLAY LIST30030 RAMTOP=PEEK(106)*25630040 ADRHI=PEEK(561):ADRLO=PEEK(560)30050 DLIST=ADRHI*256+ADRLO30060 SIZE=RA5w}MTOP-DLIST+130069 REM *** USE CIO TO TRANSFER *** SCREEN DATA30070 IOCB=832+CH*16:POKE IOCB+2,730080 POKE IO5x}CB+4,ADRLO:POKE IOCB+5,ADRHI30090 SIZEHI=INT(SIZE/256):SIZELO=SIZE-SIZEHI*25630100 POKE IOCB+8,SIZELO:POKE IOCB+9,SIZEHI305y}110 I=USR(ADR("hhhLV"),CH*16)30120 CLOSE #CH30200 RETURN =SIZE-SIZEHI*25630100 POKE IOCB+8,SIZELO:POKE IOCB+9,SIZEHI304>888888pp8?Z}WkFABSCRNLOADELA$$*******************9}***********$$*** SLIDESHOW ***$$*** by IAN FINLAYSON ***$$*** August 1985 ***$$9}*** Modified July 91 ***$$******************************X&;@,;@,;A,26-AVL69}7@<@,.D:X6-BVV* Π ĠŠ ӠȠàҠ ¤29} A02@@D:*.PIC(6-2e@6-%@A67@$&@<@$,.9}e7@<@,4FREE@p< @PF"@""@A0O* ԠŠŠ͠¤P6-9} @ZX6-%@46.7@$&@<@$,X67@<@,. dd+67@<@9},.7@<@,?-@@L7<,4 d67<%@,..PICn  7-@A -@w9}7 @* Ǡáb +2( }NO PICTURE FILES ON THIS DISK_((SELECT PICTURE DATA DI9}SC AND AGAINb D2:SLIDES.BASáb +2( }NO PICTURE FILES ON THIS DISK_((SELECT PICTURE DATA DI8)Z[KTIKENAMEPHONESEARCHWORDABTONSDCOMSTDEDATPET1PET2PPASSTRYCOUN=} =}@%%*************************=}******%%* STRING VARIABLES *%%* by *%%* Ann O'Driscoll *%%* =}--------------------------- *%%* NEW ATARI USER - OCT. 1991 *%%******************************* !!̠Š=}ӠŠŠA;@ ,+,-@@A(STRING VARIABLES[ #@p!-@@%"A-@=}@%$@W(LISTING  [ (1-@@ 1(Pick a number 1 to 7 -.@.@@=}K:2.)@. @I)!@U@P<$@$ A$+&@H,FkkSEARCH AND COMPARE,ANAGRA=}MS,WORD SWOPS,DATE CHECK,CODES WITH ASC/CHR$,STORING SUBSTRINGS,SECRET INPUTd""ǠȠŠn&&;@=},;@,;@,x` +-@@1( PHONE NUMBERSC-@@`(INPUT NAME TO SEARCH FOR=}: #A!-@@'"-40': Ap =-@@3( isn't in the data list= A=};-@@1('s phone number is ; A44PAGE 6,0785-213928,JOHN,123-456789,MARY,999999=}ǠӠ&&;@,;@,;@,p +-@@,(ANAGRAMS>-@@^(INPUT=} WORD TO BE SCRAMBLED:p-@@-B:,@6@6-P:H:,$,%@67B:,%@=},.7<,(@(6.7@<&@, 1"@*B:,'6.7%@,1 A"B:,A""6=}7B:,%@,.7%@, 6. "R-@@2(THE SCRAMBLED VERSION ISD-@@ H(R A,=}##ǠĠԠ611;@`,;@,;@,;@`,;--6.#THE TEXT IS: THE CAT SAT ON THE M=}AT@D +-@@.( WORD SWOPS@-@@D(B/-@@+(INPUT OLD WORD: /D/-@=}@+(INPUT NEW WORD: /F 6.6-J>-@@>(Press a key to replace  with O=} F:Ad,"AUA5T/6-%@/!B:,&B:,%@A^##7<%B:,&@,0A@h" 67,."=}B:, %B:,Apm67B:,%@,.7%B:,,r 6.| A@5-@@ (+AdAU5 A=}ǠŠˠ;@,c +-@@.( DATE CHECK1(Q(INPUT DATE IN FORMAT DDMM=}YYc-@@B:,@AC-@B:,6@:7,, @H)@:7,,!@W9'C A=} IIA:7@<@,,")A:7@<@,,!@1AIIA:7@<@,,!@)*A:7@<@=},,"@AA:7@<@,,"@1*+A:7@<@,,"@)A:7@<@,,"@)A:7=}@<@,,"@ )A:7@<@,,"@,AIIA:7@<@,,")A:7@<@,,!@=}AA:7@<@,,"@)*A:7@<@,,"@*+A:7@<@,,'@,P:A:7@<@=},,'@,A0( (&(OK - you can continue...0 A,("(Not accepted! try again, A0""=}ǠӠïҤ11;@,;@P,;@P,;@P,'6.PAGE66-'6-p +=}-@@)(CODES;-@@Z(INPUT MESSAGE TO BE CODED:l-@@p&6-%@!B:=},&6-@ "6-%@"!B:,AU>7<,2A)7<,3Z467B:,%@,.7<,> A%6-@:7,,%=}@:7,,'!@6-&@&' A@!67B:,%@,.>:,& A +-@@(0[Ad=}AU'-@@C(Press any key to decodeO6-[6-5 F:Ad,"AUAe:&6-%@=}!B:,&6-@<"6-%@"!B:,A?>7<,2A)7<,3Z467B:,%@,.7<,> ArD6-=}@:7,,&@:7,,F' @e6-%@&' AI67B:,%@,.>:,K ApP5-@@(+Ad=}AU5 AX""ǠŠӠb99;@,;@$,;@,9@<@,g467@=},. %67@$,. 467@,.lL #A!-@@%"H67@$+&@,%@,.L v% #A=}!-@%"{68<,-B:,%@67B:,%@,.68<@,-B:, 1 +=}-@@.(PET1$: 1(q-@@m(N= PET1$(8*(-1)+1,8*) = 7@$+&@,=}%@<@$,q '-@@$(PET2$: '(o-@a(N= PET2$(P(,0),P(,1=})) = 78<,<8<@,,e o ADOG,CAT,GOLDFISHǠԠԠ);@,;@=},)6.STRINGS:@.@@K::6-\ +-@@-( PASSWORDS0(Y(=}$Input the password and press RETURN:\(6-%@3)@)"AU)B:,"@3 A67B:,%@=},.>:, A0 6 4,(OK! you can run the program ..6 A6 @%(Wrong - try again,6.6 =}A% (Access denied! A -@A % D:STRINGS.BAS%(Wrong - try again,6.6 <Z$$******************************$$* QUICKIE TITLE DEMO *$$* A} BY *$$* SUE DONYM *$$* -------------------------- *$$* NEW ATARI USER - OCT A}1991 *$$****************************** 4-A6AU"!% 46-?:A6,kk169,0,32,63,6,169,A}255,133,20,173,11,212,10,101,19,101,19,48,5,32,42,6,169,0,141,10,212,141,26,208,165kk20,208,5,133,77,76,0,6,76,9,6,173,13A},6,201,101,240,9,169,101,141,13,6,141,15,6,96,169,229,76,51,6,141(jj197,2,169,78,141,48,2,169,6,141,49,2,96,112,112,112,11A}2,112,112,112,112,71,103,6,112,112,112,112,1122^^112,112,112,112,71,103,6,65,78,6,0,0,0,110,101,119,0,97,116,97,114,105,0,A}117,115,101,114D2:QUICKIE.BAS,112,1122^^112,112,112,112,71,103,6,65,78,6,0,0,0,110,101,119,0,97,116,97,114,105,0,@&'(hwDISKDRIVECONSODELAFORMAROUTINER%%##E}#############################%%# BULK DISK FORMATTER #%%# by #%%# Paul HoE}llins #%%# --------------------------- #%%# NEW ATARI USER - OCT. 1991 #%%##############################E}# +@@;@,(6-@ A 2/( ( (/( WHICH DRIVE TO FORME}AT >ı<C( ( (((((C(&F//('| Ԉ TO INCREASE DRIVE NUMBER |P/E}/('| Έ TO DECREASE DRIVE NUMBER |Z//('| Ԉ FOR NEXT MENU |d//('E}n-@0@ (x6-F:B2y,-@@ "@A "@AE}"@A"@A A ** INCREASE DRIVE No. **6-%@_%2E}@@@G2@@@@[-@@P_ G%2G2@E}1"@!-@0@ '(1 A 1"@!-@0@ '(1 A E}1"@!-@0@ '(1 A %!@6-@% A** DECREASE DRIVE No.""E}6-&@,_%2@@@G2@@@@[-@@P_ 6G%2E}G2@@= @6-@--@0@ 3(= A J"@E} AT1"@!-@0@ '(1 A ^1"@!-@0@ '(1 A h1"@E}!-@0@ '(1 A r** HOW MANY DISKS **| + A "@6.D1:"@E}6.D2:"@6.D3:"@6.D4:.( ( (.( HOW MANY DISKS TO FORMAT >j( ( (((E}((A($j($| PLEASE TYPE THE NUMBER OF DISKS |U,($| TO FORMAT AND PRESS E} |U($| OR PRESS TO RETURN TO MENU |,,($AdAU F:AdE},"AUAF:Ad,"@(%* F:Ad,AUA* A9AR'-@0@ E}9@@0 A@@@&"%0 A@:D** INPUT ERRE}OR TRAP **N@@X'F:A,"@$-'%b Alv ** START FORMAT PROCESS **E} + A @@5( ( (5($,,($|DRIVE TO FORMAT IS E} : |,,($|No. OF DISKS TO FORMAT IS : |-@0@(-@0@(,,($E}>( ( ((((>($,,($| PRESS Ԉ TO PROCEEE}D |,,($| OR TO QUIT TO MAIN MENU |,,($AdAU F:BE}2y,"@A F:Ad,"@(% Ap  ** START FORMAT ROUTINE ***%-@+% E}A 45( ( (5($>,,($| FORMAT DRIVE : |H,,($| DISK No. E} : |R,,($\;( ( (((;($E}f,,($| PUT THE DISK TO FORMAT IN THE |p,,($| APPROPRIATE DRIVE AND PRESS |z,,($|Ԉ TO FORMAT OR TO E}CANCEL|,,($-@@(-@@(AdAUE}B2y@ F:B2y,"@A F:Ad,"@(% A P-@ @(CURRENE}TLY FORMATTING $-@@$(DISK No.((AT@c%2@A@E}9-@@P= _2c ** ALL FORMATTING DONE ** + A .E}( ( ((.( FORMATTING COMPLETE$_%2@@@G2@@@@[-@E}@P_ .G%2G2@8_%2@@@G2@E}@@@[-@@P_ BG%2G2@E}L>( ( ((((>($V,,($| PRESS Ԡ FOR MAIN MENU |`,,($| PRESS E}Έ FOR DOS |j,,($| PRESS Ԉ FOR BOOT |t,,($~B2yE}@F:B2y,"@%F:B2y,"@.'F:B2y,"@'6-?:B, A`E}** SET UP GR.0 SCREEN **/0@/AR@B-B((E}B-@B((ˠˠҠB-@B((E}B-@B((󠠠B-@B((E}$ ** ALL ERRORS CAUGHT! ** + A ( ( (((,,($E}2--(%|ERROR: HAS OCCURRED. |<-@ @F6-F:A,P(Z,,($E}d>( (2($ PLEASE REFER TO YOUR ATARI HANDBOOK5(8(;(>(n,,($E}x,,($| PRESS Ԉ TO MAIN MENU |,,($F:B2y,"@E}% A  D2:BDF.BASԈ TO MAIN MENU |,,($F:B2y,"@D!o?/U/LINEALINCNCHKSUCHDLN I}%%*******************************%%* BAT PACK *%%* by *%%* I}Bill Halsall *%%* --------------------------- *%%* NEW ATARI USER - OCT. 1991 *%%***********************I}******** ffԠůԠŠŠ ҠĠΠҠ ٠ˠӠI}H;@,;A,'6-A 46-6@H> AH A467@,.0%67A,.0467@,.(:I}6-%@6-%@H%":( LINE 26-?:A6:AS,<n( Ġ Ax6((D)ISK OR (T)APE" A6"@hA@I}Q'(READY CASSETTE AND PRESS RETURNG@@A(C:Q A`A#(READY DISK AND PRESS RETURN- AI}AAUA@..@@ D:BATPACK.OBJ/!(@7@<AD,,@/I@I}.@@K:;)@F@I$(-A6AX"!% ($QQ216,104,104,133,2I}04,104,133,203,104,133,206,104,133,205,169,0,141,127,6,141II128,6,160,255,140,125,6,140,126,6,173,126,6,201,47,208,11,173I},127,6KK133,212,173,128,6,133,213,96,172,125,6,200,140,125,6,177,203,32,111,6GG10,10,10,10,141,123,6,172,125,6,200,14I}0,125,6,177,203,32,111,6,24JJ109,123,6,172,126,6,200,140,126,6,145,205,24,109,127,6,141,127,6,173MM128,6,105,0,141,12I}8,6,76,30,6,96,201,58,144,4,56,233,55,96,56,233,48,96,%%6-F:A,$AV%F:A,6' $( =:, I}'@, )( IN DATA AT LINE =:,,J$kk002300202720A9008D2F02A93C8D02D3A9008DE702850EA9388DE802850FA9288I}50AA920850B18604CB42F0000000000,3638kk000000000008080F03000300008888FCF0C0F0080008080F0300030000000C0F0F373F000000C0C0C07I}0F0FEFFFFF0C0,3562kkC00000FCFCFC3C0C0C0000C0C0F0FCFFFFF73F0C0C3CFCFCFC7CF03F0E030000000000F0C000000000000002080A1555,4570I}kk4455448020A0555545554555445544554455005545554555455400020A2528A41592A280A06848AAA88AAAAAAA2A282A,4180kk0A0000AAE2A8I}A0A0800000FFFFF5FAFAFAFFFFFCFFDDEEEEEEFFFFF7F5F7F7F7FFFF3FF7D777F7F7FFFFFFBFBBAEBBAE,9548kkBBAEAAFFBBEFBBEFBBEFAA00000000I}00330C330000D511040000000C0C0C0C0C0C0C0C0C0C1504040400004411440000,2888$kk000000441100000000000044114400000000004411441000J}000000441144110000000044114411441000004411441144,1069.jj110400441144114411441000000000000044110000000000000011000000000000J}441100000000001044110000000000,6488kk114411000000104411441100000411441144110010441144114411441144114411441144114411FFFFFC3J}C000000FF00,2337Bkk00000000C030FF30C000001C3E1D7F5C0000001C3E5C7F1D0000001C2A1D7F5C0000001C2A5C7F1D0000001C3E1C1C1C,2221LJ}kk1C00001C3E1D7F5C0000001C3E1C1C1C1C00001C3E5C7F1D00000000001D41401C141000005C41011C140400081D4140,1504Vkk1C141000085C41J}011C140400001C000808081800001D41403C2E6200001C000808080C00005C41011E3A232221340030,1232`kk21232B00000022790022696C6C002861J}6C73616C6C00666F72002E6577002174617269003573657200000000A9008D2F,3092jkk02A9308D07D4A200BD2B209D0034BD2B219D0035A9009D1031J}E8D0ECA9028D1DD0A9218D6F02A9008D08D2A9038D0FD2,4827tkkA9EA8D3002A9228D3102A208BDD4229DC002CA10F7A92A8D2F02A03EA223A907205CJ}E4A9C08D0ED4A207BD3B229D1033,5161~kkCA10F760061A0000BA1C0826A048A9088D18D0A9348D09D4684030420033424322901044013A44013B4401J}3C44013D44,3460kk013E44013F44014044014144014244014344014444014544014644014744014844014944014A44014B44014C44014D44,2216J }kk014E44014F44015044015141EA2220B62420BD2E20CC2E20E92EA9DD8D0002A9228D01024C62E4A93785CCA90085CBA0,4477kk00A92E91CBC8D0FJ }9E6CCA5CCC968D0EFA93885CCA013AD0AD2290718691E91CBC8C0ECD0F1A204E6CCA900A01391CBC8,7037kkC0ECD0F9CAD0F0E6CCA014AD0AD229071J }8692691CBC8C0ECD0F1E6CCA5CCC968D0C2A90885B0A20086CB86CDBD942485,7522kkCC38E90185CEAD0AD238E93890F86919A8A90091CB91CDC891CJ }B91CDC891CB91CDC891CB91CDE8E008D0D1C6B0A5B0D0,7626kkC5A92EA2009D0037E8D0FAA91885B0A200AD0AD229031865B09D5033AD0AD22907A8BJ }994249D6033E8A5B018691085B0,5475kkC9E8D0DDA200BD603385CC18690585CEBD503385CB85CDA000205724C00CD0F9E6CCC6CEA000205724A00A2J}05724E8E0,6074kk0DD0D320662460A91891CB91CDC8A91991CB91CDC860A200AD0AD22907F0F9387D503385CB9DAE31AD0AD22903F0F918,6047kJ}k7D60339DBD3185CCA000A94191CBE8E00DD0D560383E444A50565C62A200A9379D7033E8E048D0F8A200A03898994433,5840kkC8C068D0F760A5B1J}05B2F00FA5B638E913A2459DF422CACACA10F8A5B305B4F012A000A6B7BD393399F522E8C8C8C8C0,7067kk48D0F2A90085B185B285B385B420592CADJ}792EF003CE792E60A9008DB025AD78022901D003202725AD78022902D00320,4914kk3E25AD78022904D003205525AD78022908D003206C2560A9008DJ}8325C6B720B125A5B8F003E6B760E6B420842560A910,4730kk8D8325E6B720B125A5B8F003C6B760E6B320842560A9208D8325C6B620B125A5B8F003J}E6B660E6B220842560A9308D83,6173 kk25E6B620B125A5B8F003C6B660E6B12084256000ADB025D026AD83251865B5AAA000BDBB21993C32BDFB2199J}BC32E8C8,6044kkC008D0EEA5B5490885B5A9018DB0256000A5B785CCA5B685CB20DE25A20086B8B5B9C92EF0154AC90CF0101869014A4A,5841kkJ}4AC902F006E8E004D0E660E6B860A000B1CB85B9C8B1CB85BAE6CC88B1CB85BBC8B1CB85BC60AD0AD285CB85BDAD0AD2,7495(kk293F38E91390F6693J}885BE85CC20DE25A000B9B900D0DFC8C004D0F660A90F8D4126A20020F625A5BD9DE331A5BE9D10,60412kk31A93485BF9D2031204226E8E010D0E4600J}0A5BE85CCA5BD85CBA5BFA0001891CBC8690191CB88E6CC18690191CB6901,6050<kkC891CB60A21FAD842649018D8426D00ABD4B209DA035CA10F760BJ}D6B209DA035CA10F76000A90085B8BD3031F01DC901,5512FkkF012C902F007A5B905BBD01660A5BA05BCD00F60A5BB05BCD00860A5B905BAD00160E6BJ}860A00084B8B9B900D006C8C0,6104Pkk04D0F660E6B860A5BD85CBA5BE85CCA900A891CBC891CBE6CC91CB8891CB60BDE33185BDBD103185BE4CC726AJ}5C085CB,7411ZkkA5C185CC20DE25208526A5B8D01D20DF26A5C085BD9DE331A5C185BE9D1031BD203185BF204226208B2760AD0AD22903,5556dkkJ}DD3031F0F69D303160AE4126BD2031F050BDE33185C0BD103185C1BD3031F00CC901F016C902F02EC903F01CBD103138,5664nkkE90185C120EC264C81J}27BD103118690185C120EC264C8127BDE33138E90185C020EC264C8127BDE33118690185C020EC,5188xkk26CA10A8AD7A2E8D792E60BD30312902F048J}BDE33185CBBD103185CCE6CCE6CCE6CC20DE2520B526A5B8D00CAD0AD229,6049kk03D005A9019D3031BD103185CCC6CCC6CCC6CC20DE2520B526A5B8J}D00CAD0AD22903D005A9009D303160AD0AD22907D0,5366kk0B18AD0AD2290169029D303160A20BBD282885CC9D4031A90085CB9D5831AC0AD2B1CBC9J}25D0F7E6CCB1CBC6CCC900D0,5865kkED989D4C31A9AF91CBCA10D3A227BD34289DC035CA10F760383E444A50565C623E4A505C3C3C0000000000003CJ }3C3C3C,4521kk0000000000003C3C3C3C0000000000003C3C3C3C0000000000003C3CA20B86C2A6C2301CBD5831C900F016C901F057C9,3056kk0J!}2F01DC903F033C904F03CC6C24C602860A6C2AD0AD2293FD0F1FE58314C7B28205D29A9B991CBC6CCA5CCDD2828F004,6091kkA90091CBFE58314C7B2J"}8205D29A9BA91CBFE58314C7B28205D29A9BB91CBA9019D58314C7B28205D29BD4031DD2828F0,5228kk04A9BC91CBFE4031E6CCB1CBD00AA9B891CBFJ#}E58314C7B2838E9044A4A4AC906F0034C3929A9B891CBAE4126BD2031C9,6027kk34D019BDE33185CBBD103185CC20DE25A003B9B900C9B8F0098810FJ$}6CA10DD4C7B28A9B49D203185BFBDE33185BDBD10,6114kk3185BE2042264C3929A6C2DE4031BD4031DD2828F00F85CCBD4C3185CBA900A891CB4C3B2J%}9A9009D58314C7B28A6C2BD,5334kk4C3185CBBD403185CCA00060AE8F2920F625A5BD9D683185CBA5BE9D783185CCA930A00091CBC8A93191CBCA10EJ&}16001,6078kkA20520F625A5BD85CBA5BE85CCA901A00091CBC8A90291CBCA10E76020F625A5BD8DC029A5BE8DC129A91485BF4C4226,6272kk00J'}00A20520F625A5BD9D8831A5BE9D9431A90C85BF204226CA10E960A5B785CCA5B685CB20DE25A5B9C901F02FC914F0,6034kk4CC90CF055C930D0034CJ(}7D2AC934D0034CB82AC9B4D0034CF12AC941D0034C662BA5BBC901F005C930F06260A5C3F01C,5842kkA5C6D018C6C3206C2920062CA9148DC802A9FAJ)}85C6A5C3D0038D1A3360A90385C320062CA92D8D1A3360A200BD8831C5,5261kkB6D007BD9431C5B7F006E8E006D0ED60BD883185BDBD943185BEA901J*}85C5A90085C4A9238D183320062C4CC726A208BD,5989kk683185CBC5B6D010BD783185CCC5B7F00B38E901C5B7F004CA10E460A900A891CBC891CB20J+}062CA90185C4A90085C5CE,6393"kk8F29A9248D183360AE4126A5C5F011BDE331C5B6D007BD1031C5B7F004CA10EB60BDE33185BDBD103185BE20C726J,}A900,5885,kk9D20318D183385C5208D2DA90A8DE03160A5C4F019A5C6F015A200BDE331C5B6D007BD1031C5B7F006E8E010D0ED60BD,62446kkE33J-}185BDBD103185BE20C726A9009D203185C48D1833EE1C33208D2DEE1C33208D2D208D2DA91E8DE23160A900A899A0,5045@kk31C8C00DD0F8A202AD0ADJ.}2290F38E90390F6A8B9A031D0F08A99A031E8E0078C652BD0E4600020FA2BA6C7BDA031D003,6293Jkk4C182CC905F01AC904F012C903F01AC902F012AJ/}D1C33C910D002E6CF60A905D00AA904D006A903D002A90285C820062C,4969TkkA20CBDA031C5C8F004CA10F660BD50338DF82BBD60331869028DF92BAJ0}DF82B38E5B6F014B005C6B64CCD2BE6B6A90185,6216^kkB1A5B1D0FC4CBC2BADF92B38E5B7F014B005C6B74CE92BE6B7A90185B3A5B3D0FC4CD82B8D1J1}ED0600000A5B638E9184A,6636hkk4A4A4A85C760A9328D00D2A90A8DE13160A00091CBE6CC60A5C9D03A20FA2BA6C786CAAD0AD229071869027D50338J2}D57,5662rkk2C85CBA901187D60338D582C85CCA9C420112CA9C520112CA9C620112CA9C720112CA93085C9600000A6C9F040A000B9,4957|kk0B21J3}9D1036E8C8C010D0F4C6C9C6C9A5C9D02AAD572C85CBAD582C85CCA90020112C20112C20112C20112CA6CABDAE31,5380kk85CBBDBD3185CCA000A941J4}91CB60A227A9009D0033CA10FA60A900AA9D2833E8E028D0F8A9288DEF22A9338DF022A910,6062kkA2059D2D339D35339D3D339D4533CA10F160A205J5}BD6F2D9D0233CA10F720042DAD1FD0C905D015EE022DAD022D29038D,4587kk022D20042DAD1FD0C905F0F9AD8402D0DF600000AD022D1869118D0033J6}60AD812D1869108D1C3360AD032D1869118D12,4057kk3360209E2CAD8402F0F8A211BD6F2D9D0B33CA10F720182D200E2DAD7802C90EF00CC90DF018J7}AD8402F0234C3B2DAD81,4880kk2DC909F0E6EE812D20822D4C382DAD812DC903F0D6CE812D20822D4C382D60302C213925320000002D292E292D352DJ8}1D,4000kk1303A9058D1C02AD1C02D0FB60AD032D0A0A0A8DC82D1869058DC92DAC812DAEC92DCAFE2D33BD2D33C91AD00AA9109D,4673kk2D33EJ9}CC82DD0EB88D0E5AD1C33C910F003CE1C338D1ED0600004A900A2089D1433CA10FAA9548D14338D15338D163360,5092kkA5C6F01A29E0D008ADC8024J:}9028DC802C6C6A5C6D008A9A08DC80220FF2D60AE182EBD683185CBBD783185CCA900A891,6077kkCBC891CBCA10EB6008AD04D00D05D02908F054A5CJ;}4F017A5C6F01320B125A203B5B938E9B8B007CA10F68D1ED060CE78,6236kk2E207B2EA5C6F00620E02D4C442EAE782EA9009D14338D183385C585C48J<}5C38D1A33E000D009AE032D69019DCC3160A2,4942kk0620AD2B8D1ED060030106A2648E00D28E13D0A9A88D01D2A9018D1C02AD1C02D0FBE8D0E88E0J=}1D28E00D260A9088D01,5206kkD2A23C8E00D28E18D0A9028D1C02AD1C02D0FBCAD0ED8E00D28E01D260ADE131F009CEE13118699F8D01D260ADE231FJ>}0,6210kk17A91E38EDE2318D00D2ADE2314A4A1869608D01D2CEE23160ADE031F00CCEE03118699F8D01D28D00D260A5C4D044AD,5965kk0AD229J?}01D03DA200BD2031C9B4D02FBD30312902D014BD103138E5B7F00C9005A9004C3B2FA9014C3B2FBDE33138E5B6,4914kkF00C9005A9034C3B2FA9029DJ@}3031E8E008D0C560AD1C33C910D00AAE652B208D2CA91A91CB60065676C6A2008A9D0032,4921kkE8D0FA60616E6400666F72002E69636F6C61209E2CJA}206C22209C24205723A9C88D1C02AD1C02D0FBA9648D1C02A900AA,4753&kk9D00339D43229D0836E8E028D0F2A200BD642F9D5022E8E00ED0F5AD1C02JB}D0FB20A92C60205A2FA2008A95B0E8E020D0,58160kkF9209E2C20722FA94485B7A91385B6209E2C20C822209C24205723203B2BA20620AD2B20D22C20JC}A92CAE022DA9009DCC,4442:kk31CA10FAA9088D7A2EA9008D032DAD7A2EC901F003CE7A2EAE032DBDCC31F0034CCB30BD562F8DC0028DC60220222D20JD},4896DkkCA2DA9038D782E209C24A90085CF85B58D832585C585C485C385C685C98DB025A9A08DC802205723203B2B20902920AC,5469Nkk2920ED2JE}7A97C8D00D08D01D0A20620AD2B201D26A9088D182E8D8F2920C2298D1ED0A910186D812D8D1C332084252019,4185Xkk2EAD782EF045A5CFF006209C2JF}E4CCB3020F92420DC2920442FA9038D1C02205C28205C2820642620E02DAD792ED01220,4370bkk292720DC2920FB2E205C28AE652B208D2CAD1C02D0EJG}4854D4C7E30205A2FAE032DEC022DF006EE032D4C0830BDCC31D0,4488lkk034CF92FCA10F5A208BDFF309D1E33CA10F7AD8402D0FBAD8402F0FB4CCF2JH}FA7A1ADA580AFB6A5B20000000000000000,5591vhh0000000000000000000000000000000000000000000000000000000000000000000000000000000JI}00000000000000000,0hh000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000,0JJ}hh000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000,0D2:BATPACK.SAVH} 1 +AdAU1@@ <-@@<(" ΠůΠĠNL}//(&These files are intended to be used**(! with other programs - see the..(% Tutorial Time article in thisNM} issue.--($The programsare in LIST format ready..(% to be combinedwith your own routinesV-@@ 6(NN}START will take you to BasicV(ANY KEY returns to the Menu%F:B2y,"@"+%#F:Ad,AU#%NO}D:MENU @&D:TUTORIAL.BASturns to the Menu%F:B2y,"@"+%#F:Ad,AU#%L+<033333333333?333333?2?3?333?L< 33?033?33?33333>333RQ}>3"?3?333??UL< Ͽ˿Q3?003333333333;.⪪:""""3?3333333E< ̻RR}Q3330 33333333333"*.""""3.#33?D {̻3?0 3333336"""""."""""""""RS}"""""DW8 ϼb""  ffffffffb""".""""""""""""""D[8RT}QR"" """"ff""""&b""ꪮ""""""""""""""EW8 "" """""""""""."""""""""""""""D[8RU}b"" !"""""""""""."".""""""""""""""E{Ub""U"""RV}"""""""""""""""""""""""""E[Eb""Q?"""""""""""".""""""""""""""D{E{RW}U" Q%""""""""""""..""""""""""""""DU{euQb Ua"""""""""""RX}".."""""""""""""""TE{ FFe[Qb QV"""""""""""*""""""""""""""DE{ DEkRY}b E"".""""""""".""""""""&""""&DE[ DDUR!EU""""""""""".""""""RZ}"""""""""fDU{%UUV"%AQ""""""""""⪪""""""""""""""DK%EfTgR[}"E"""""""""".**"""""""""""&"""E[)fEeUj%Ua""""""""""""*"""""""""""""""R\}Uz%EDU{3*%QU"""""""""""""ꪪ"""""":"%TW{￿0 !R]}U"b"""""""*"ꪢ""""""";"( (A*￫ """""*3 "n⪪"""""";"R^}20#*33*#".""""":"( 0#"2 +*;3R_}0."&""""""""""""(* ; 3 33"*&b"""""""""" (R`}2 # #3000""&fjb""""""""""" (#033"0"""""&"nRa}."""""""""""""   23""""""&ffꪪb""""""""""";Rb}430""""""&f&nꪢ.ff"""""""""#0;03"""""""""ffnꮪ.ff""""""Rc}""" *;0 030""""""""".f*"f""""""*"0(Rd}0 3""""""""""fjꪮ*""&f"330;;020*""""""""""".".f"""f**330 *Re}( 0#"""""""""""".f*""" # :0+  330#*""Rf}"""""".nf"0000( 30"""""""""fn*"j33:23*0Rg}000"""""""fnꮢ". *030*3; 33#"""""fnRh}ꪪ.#300 33  :30"..*s03330; Ri} 33 "3"33330""*""*333#33333303333  :30"..*s03330; P7U[UU^UUUVk}UUUUUUU{UUUUnVl}UUUU{UUUUUnUUUUU{Vm}UUUUU^UUUUUUWUUUUUUVVn}UUUUUUU{UUUUUUUnUUUUUUU{UVo}UUUUUnUUUU{UU{UUUUUUnUUUUUWVp}U{UUUnUUUUUUU_UnUUUUWUUUUUUUUU^U[UUUUUUnUUUUUUUUU^U^Vq}UUUUUUWUUUUUUUUUUzU[UUUUUUUUUUUUUUUUUUU^UUUUUUUUUUUUUUUUUWU[Vr}UUUUUUUUUUUUUUUUU^U^UUUUUUUUUUUUUUUUU~U[UUUUUUUUUUUUUUUUUUzꮯU^Vs}UUUUUUUUUUUUUUUUUU{U[UUUUUUUUUUUUUUUUUUU^UUUUUUUUUUUUUUUUUW뻫U[UUVt}UUUUUUUUUUUU_U^UUUUUUUUUUUUUU~U[UUUzUUUUUUUUUUUU^UUU{Vu}UUUUUUUUUU[UUU~UUUUUUUUUU^UUU_UUUUUUUUW뻻U[UUU^UUUUUVv}UUUU^UUU_UUUUUUUWU[UUU_UUUUUUWꪪUVUUUWUUUUUUVw}UWUUUWUUUUꪭUVUUWUUWUUWVx}UUUUWUUUUUUUUUUUUVy}UUUUUnUUUU{UUUUnVz}UU꫻UU[UUUU^UUꪻ뻻UUWV{}UUꪮUUUUUꪫUUU[UUꪮUUU^V|}UUꪫUUU[UUꪪ/ꪮUUU^UU~UUU[UU^V}}/UUUUUUWUUUUUUW/UUUUnUUWV~}UUUU{UUU?/UUUU^UUzUUUUWUUz?.V}UUUUUmnUU{UUUUU{yuUUz>UUUUUUUeUUUzV}UUUUUUUUUUz>UUUUUUUUUUzUUUUUUUUUUz.UUUV}UUUUUUUzUUUUUUUUUU_UUUUUUUUUWUUUUUUUV}UU^UUUUUUUUU^UUUUUUUU^UUUUUV}UU^UUUUUUU_UUUUUUWUUUUV}UUWUUUUUUW_UUUUUWUUUUUWV}UUUUU_ UUUU_UUUU_V}UUUU?UUUU~PUUUTPV}ȻUUUoP ?WUUUP_UUUPU^>V}ջUUPWUUP_>UU˫TWV}UU2W3?UUU_UUU~3>V}UUU{UU.f33?UU{V}UU2ꪯn?UUȈT{UU_32>V}UUWwtUUW33>3/?UUWwtȏUUWV}333?/UUWȈwwUUW23?UUW˻V}wwUUW>s3UUWwϻUUW?V}32UUWt߻UUW????UUW|V}UUW?UUWUUW3V}UUWUUW/UWV}UWUWUWV}UUWUU_UU_V}UU_UU_UU_UU_V}UU_UU_UU_V}UWUWUWV}UUUUUUV}UUUUUUV}UUUUUUV}UWUWUWV}UUWUUWUUWV}UUWUUWUUWUUWV}UUWUUWUWV}UUWUUWUUVV}UUWUUWUUWV}UUWUWUUV}UUUUUUV}UUWWUU}UU}V}UU}_UUWUUV}UU_WUUWUUWUUV}WUUUUUUUUUV}UUUUUUUUUUUV}UUUUUUUUUUUUT745A@,B2w,6-?:C: h`,, U1;@,;@,;@0,9@0&},=6-I6-U6- *-@@0&68,-* e6. D:FONT.SET6.52)6-AS5&}6-@XA6-@M6-@sY6-e6-<<;@,;A ,;@,;@,;@,6&}.  6.D:5#@@K:5@@( A0ab***** READ TIT&}LES *******cd AP#A@n "G6-%@%67B:,%@,.;67B:,%@,.\G68,-B:, &} A A""**** DISPLAY TITLES ********j6-6-,-@B:,?6-%+7<,&}4\,C O6-@\6-6@j6-'@ G6-@6-@ )6-%@/;6-G6-'6&}-&+$@ ,! @ '6--@&6-%@&6-%8$@ %,7-@%@7(@&} 7<&@, ^-@@H(@% press to continue T6-@0^ A7S&}F:B2y,"@,-@@8-@E(@I S A***** READ CHOICE *****6&}-F:Ad,6-@$+"@1,%@$+"@0,%@$+"@&,%@$+"@$,%@$+"@),%@&}$+"@',%@$+"@Q,%@$+"@S,%@ $+"@H,"A@AdAU!&}A@ "@*". "@*"7#A@%+$@ %,"#"767B:,%@,.&}<-@B:,"6-@:7<,,867<,.>:%A(,< "$-@%@$(@, A%TA%@&}%-@A  A5.-@@.(@ ERROR +-@@+(@&}F:A, .-@@.(@ IN LOADING+-@@ +(@7@,6-AP A7&}DB-@AP $6.D:. A58 A!B A A C6-F:A`,!6-F:Aa,C6-&}F:A`,%AV$F:Aa,f #A!%@@qB%@F:%@,%@V-@@3Z"b%&}f M%@4%@56@F:%@,M@F:%@, A!.t-5(@&} page 6 magazineR(@ t(@B$LHH7,7,48,6,48,6,48,6,48,6,48&},6,48,6,48,6,48,6,48,6,48,6,6,6,6,6,6,65?AA 'A3A?A*B7tA&}'@@d*$4HA!A3A@EBBAH$  ""*** FILES IN LIST FOR&}MAT ***  TRAP 500 # A56-@P# A7 .-@@.(@ FILE IS IN /-@@&}/(@ FORMAT /-@@/(@ PRESS  .-@@ .(@ TO LOAD OR&} .-@@.(@ ANY KEY FOR .-@@.(@ MENU  ?F:Ad,AU" A5&}+6.D:5 A!? A F:B2y,"@A& A%P( . +-@@.( HIT RETURN< A-&}@@>(ENTER >:@4,>:@4,A !!**** LOAD CHARACTER SET ***  @ A%6-F:A&},*6-&@6A@+@ @@ WAP@'AR3ASEA&}VAUWAWAU 6-?:C:hhhLV,<@, bAS'AV9AWKA&}P@V@bAV 7 #A0e!-@ %"3A6%7  HH72,169,0,141,10,212,141,26,20&}8,169,32,141,0,2,169,6,141,1,2,104,64 A8 #A0e --@ ")Ah%-  !Ap&}!Ax $ Z-@@#-@0(@4 F-@@W(@Z$ta"-@&}@6'A82@< ^2a$**** ENTER TITLES ******&} DOS,***BASIC,***BAT PACK,BATPACK.BAS""ARTIFACT EDITOR,ARTIFACT.BAS##SCREEN SAVE/LOAD,TUTORIAL.BAS&}SLIDESHOW,TUTORIAL.BAS!!STRINGING ALONG,STRINGS.BASTITLE DEMO,QUICKIE.BASBULK DISK FORMAT,BDF.BASD:M&}ENUDESHOW,TUTORIAL.BAS!!STRINGING ALONG,STRINGS.BASTITLE DEMO,QUICKIE.BASBULK DISK FORMAT,BDF.BASD:M$ww<~~~<x`x`~<~~~|8|8|~ 8p<~~<Z}~x|nf8x8~~~|8888>~|8|8|~ 8p<~~<X