@L}5 _$% l0$)$$Hȱ$ UhL" `e$$%`$%`  R@P!( 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`  `1  ɐ     `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.D1:MEM.SAV J y08 B|DEHI$} V0 0`B;DEL`?<0LV`@ʆ v s? F0Ξ05: [ BDEHI%} VY8 B V  @  /DE `E:D1: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 ALLOWED736 FREE SECTORS COPYING---D1:DIRECK.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- 138ɛ+,' 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 D8uL;RCCCCCCCCCCC2MAMODOFWAIFILENAMEKEYBGG2SEQSCRIPTSRADPICBADIOCADRHADRLOLDOLDCURCURT}KEFRAMESCRMEICOSECTRSECTIDELAPAUSFRAMNNMHNMLBRC10U} V} !"#$%&W}'()*+,-./012d??ICON ANIMATION SYSX}TEM, LISTING 1, THE ANIMATORgBY JIM JOHNSONj##(c)1989 ANTIC PUBLISHING INC.n6-6-@'6Y}-@36-@?6-@K6-@W6-@c6-@o6-@{6-@ 6-@ 6-%x! 6-6Z}-B!6-@;@ ,;,((;A(,;A,;A$,##;A,;@$@,DD6-C[}:7hhhh h hhhhR Sʭխ`,KK6-C:>hhhhhhhhhhhФψ͑ˈeЅːeυ\}`,, 6.67A(,.#67,.,6-C:,# 6.67A,.#67,.>6-A2%@+6-P:C:,'A]}V,>6-C:,&$AV! B  A0!-7 ( -( || CREATE ANIMATION FILE7( 5 ( ^}+( | | LOAD ANIMATION FILE5( "5 ( +( | | SAVE ANIMATION FILE5( ,+ ( !( | | SEQUENC_}ER+( 60 ( &( | | VIEW ANIMATION0( @* (  ( | | SCRIPTER*( J AT 6-`}6-6-6-^K:)h%"@E*!6-&% APr+"@a* @!6-%+ APa}|"AU*"Ap"AU*"A`4A@!!"AU*"@A0!!"AU*"b}@Ap!!"AU*"@A `6"AU*"@# A`6%D:SCRIPTER.BAS) -( -c}(#6-)6- AP# A0 A#AR\(-(" How many pictures do you wish toI( load (mad}ximum=)M\4A`9 6-A:,6.-)67<,.>:,- 3!96-\AR-@"B("INSEe}RT GRAPHICS DISK, PRESS GUK:\)C6-?:<<Aa<<,C7<@,4PRINT SHOP:CLK!A0f}E -)(* ԠԠР *7-A; E Ap A: 6-C:,:6-F:@,%F:@,$AVg}%%$@ 0LOAD ICONS: 6-D(-AbA(6-?:<<<<,N`-@@2`If B$(X+19,X+19)<>"h}X" And B$(X+20,X+20)<>"x" Then Pop :Pop :Goto 570X 6-%bCC6-@:7%@<%@,,%AV$@:7%@<%@i},,l*-AxA&*6-?:<<<<,v_#67%<%A&,.7<A&,[6-@:7A'<A',,%AV$@:7A(j}<A(,,_ 66-?:<<<<,667A<Ar,.7<@h,6-?:<<<<,""6-?:<<<@<@R<,k}67%A$+&,,."A p   DISPLAY IMAGES A: 6-C:,:6-F:@,%F:@,$Al}V%%$@ -B:,%@:7<,," A% A ""6-C:,%A$+@:7<,,&,""6-?:<<<@m}<@R<,* - F:Ad,AU* A` @w"F:Ad,AU" A` Adn}AU A $K:).K"AU*"K6-%%$+!@),%$+!@E,%@$+!@,8o}]"AU*"@Q6-&&$+!@0,&$+!@P,&@$+!A,W ]6-B "AU*"@ 6-(Lp}##"AU*"@%*ApV)"AU*"@2'') A``M"@B* @2!6-%-AW4( q}@AWG(M6-jG"@C*!6-&'AW.( :AWA(G6-tA`~$ r}A`SEQUENCER A0 A'('(ENTER '0' TO PAUSE SEQUENCE. 6-6.((FRAME #:s}&4*46.>:,& A ` 46-& A `( 6-A:, )!(( A67<,.>:t}, 6-% AA 6-& A ` ADVANCE 6-%!B:,6- @:7<,,"A""6-u}C:,%A$+@:7<,,&,""6-?:<<<@<@R<,( A`-SAVE SEQUENCE FILE2! A0 A! Av}0<, -,(USE FORMAT: 'DEV:FILENAME.EXT'F>AR-,(FILENAME TO SAVE?>AdAUPY F:Adw},"AUA`5F:Ad,"@(:HK:O)Y A`Z) (4 A# ) APdx}n67B:,%,.>:,(x%@ %%26-A$"6-P:'AV,26-&$AVy} %%6-?:C:hhhLV,<@,"6.7AR-,(FILENAME TO LOAD?>AdAU{}Y F:Ad,"AUA5F:Ad,"@(:HK:O)Y A`) (4 A# ) |}A. 6-@:7B:,` }UUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUU}}?}x?`?`~ x0}? x0p` 0@@@}UUUUUUUUUUUUUUUUUUUUUU}}?} ??<0??` 0??`} 0` }UUUUUUUUUUUUUUUUUUUUUU}033775W \p}|} `0w~`?~}x 0@@@UUUUUUUUUUU}UUUUUUUUUUUUUUUUUUUUUU}w`j}?}?p??7?}7 `0UUUUUUUUUUU}UUUUUUUUUUU00} 8 UW0000}000000000x0`1?}?`00~0`{0|>}` UUUUUUUUUUUUUUUUUUUUUU}UUUUUUUUUUU`ff}ŀnnj}?x=`?}a~} x0}? x0p`} 0@@@UUUUUUUUUUUUUUUUUUUU}UU@UUUUUUUUUUUUUUUUUUUU9rs%1%BRSLVMXZDP2PMYBRBLXZDP3YSXYP0R1WLR2L2L1P1PWHTMFF2MDNUDLICHCMOOFF}SE }} !"#$%&'()*+,-.}/ DOOMEDBY TONY BARNES$$(c)1989, ANTIC PUBLISHING INC. I +@ @P! B+ B5} B? AUI @@L-@@%(@&'7-@@L(@()**+,-8-@ }8(@tony barnes antic A(<A@'A@"9A @<$2.+6-?:C:h}Mhhp`,<@,.$<\ -@6@<2A@X2@@G@\ AE}6-%@#B2x@5-@B(@E$dLF:@,@*@86-%@L}!@Ai 6-(An++ @W)!A)"@A0s? 6-%B2P<2@F:B7p,}@@?$L -AA6@<2@@HAL SB2P'A}A36-96.S6-P:H:,$@,q#6-$+",&$+!,O6-@W$+",%A$+!},q6-P:H:,$@,%@[C6-@1$+"@,%@9$+"@,%@G$+"@,O X67},.[$!67,.$++ @W)!A)"@A ? 6-%B2Q<2@F:B7p,@}@?$L -AA6@<2@@HAL SB2Q'AA}36-96.S6-P:H:,$@,q#6-$+",&$+!,O6-@W$+",%A$+!},q6-P:H:,$@,%@[C6-@1$+"@,%@9$+"@,%@G$+"@,O X67,.}[$!67,.$}%6-P:H:,$@,%@31@}6-A2$+"A2)"Ab,%Ab$+}"Aa,%@5$+"@5,,@$M6-F:A2, A.B2x@CF:B2`,!M A}!@ AP**F:AD,"* @A]6-P:+&@D,'@,96-P:+&@,'@},I1%@]"A2AP2"@26-%@)!@267,.77+"@)"@)"@},*@2API+6-&+!@* @,%+ @,I @)!@A5B;6-&@$+!@* @},%@$+ @,B6-(  @A` !@A"67,."@67,}.B2H A$"67,.)"@67,.3B2H AL{%2AC@}@G2@AG@@{B2I&@$+!@,%@ $+ @,Q6 A!@"}67,.667%@,.UV, @67,.,67%@,.U[CAF:@ ,-F:B2a,"@96-@}C @``.F:B2a,"@$6-@. @`e4B2x@*F:B2`,@4 Aj{%2}G2@M6._B2IAUqB2x@{ A~Y-}@;2A@@&Y @W)!AAe!!6-&+"@,%+"@,&6-&@}"@&67,."!@* @"67,. @67,.>B2x@ A4F:B2`,@}> AB2H  AC -@6@?2@F:B7p,@C &6-&@}& 6@AP$ @2!,@%@$$:'-@62: Y-}@62F:B7p,@U2@F:B7p,@Y ? -@6@?2F}:B7p,@D"2@F:B7p,@6-AA<@ D =-A !6.'6.}-6.36.= Ad -A@A&6?0<2@@X2@@@dA}O  6.6.6.6.3-@O2QB2H% -AY?}AAFQ-#&&(@############(&&(@# # -&&(@}# 2&&(@## 7&&(@### <&&(@}AW67@6,.!67@9,.3B2Q@EB2HA WAY@FF9AAU)-}A- 96-K? @`!-@?(@YOU HAVE EARNED PI!@`* A +-}@I(@YOUR FREEDOM UI!A * A+-@I(@Ϳ ZI!A}* AP+-@I(@I WAS INNOCENT _I!AP* A+-@I(@TO BEG}IN WITH d=!A!-@=(@HA HA HA HA HAiT6-%@@AAH%@$+H:},$@,T AAUn A`|jAYj;@,;+P:C:,'A$,%@,$A$&C:,&@},;A,;A(,11;A(,;A(,;A(,;A(,I 6.67A,.+67@,.16.76}.=6.C6.I6.PBByC:,'AV,B2w@>A#@$PB2W@RR;@,;@},;@,;@,;@,;@,;@,6.0lr7cc6.}p8xp 6N<2v{{;|6. <~~<6. <~~<6. <~?$@UAY}@F @@1-CAAFUB2HA E&&(@############J&&(@}# O&&(@# T&&(@## Y&&(@### } ^&&(@cwB2Q@$67@6,.367@9,.U2A!@}@w2@Ab@@hg%2@@d@@9-@P= OAY@Fc}-@Pg mM-A(A@?P+AI2@@&A(M rM-ARAU?}P+AI2@@&ARM wt -@6?0<2A@X2@A}D@t2@@d@|5 )2@56-J<AAH%@$}++H:,$@,!@,J6-%@M!A!-@C(@ŠM AJ}!@`* @+-@J(@GUILTY AS CHARGEDJ!@* A +-@J(@}J!A * A`+-@J(@ GUILTY B!A`!-@}B(@TO THE DOOM CHAMBER$F:AD,"$6-A Ae` -A@A(6?0,A}J2@@&A(N `AQ<AAH%@$++H:,$@,!@,QF:AD},A`6-6-@ '6-36-@9?6-K6-W6-@`67,.]AAp}'AY9B2QKB2H]-&&(@####&&(@ } &&(@ #&&(@ &&(@  } #`%(@#########7-@N(@ 0 `AY@FX A },@ @1/@@N-@@6@X@2d,,-@@6?PH2 }A7@d2@A@O  '-@H@d?PC2@@@OB2H }N -@@%@1,N-@6?0e2A7@;2@A}@? C e2@A@2 A' #B"'%%6-F:A`,%A}V$F:Aa,$'.-@"*%F:%,%A(. .'B6-P:C:,'AV,*6-C:,&$AV6ABA}8'$BBA!AV$$*?;@U,?6.(H )h@'h@+%"67@A,.Э}Щ h@%$\+3,10,11,12 NGAY!6-B56-AV$A$GAVAR%N;A&,&NZZ67}@<@c,.?Æ?<?<<'NZZ67@d<A&,.?N<< ~} 0dsw> kff >ch{6 ng3{ 08<80 *N;;6-C:.hhhhhhh`,/N$$6-?:<BsD}<B<A$,4N-@B:,@ >N6-@:7<,,CN406-?:N6-@:7<,,CN406-?: B!}!}!}TUUTPT?! }_?AWU8@UWT|WU=O??G@G ?@_!!}_|U_>UU@!"}!#}!$}TUUTPT?!%}_?AWU8@T|*~?U=@ ?@**!&}|>@!'}!(}!)}TUUTPT?_!*}?AWU8@T|U@U=_P?T ?UU|!+}>WUTT!,}!-}!.}TUUTPT?_!/}?AWU8@T|U? ?~>!0}*!1}!2}!3}TUUTPT?_?!4}AWU8@T|U=# ?|>!5} B!6}!7}!8}TUUTPT?_?AW!9}U8@T|U=@ ?|> !:}B!;}!<}!=}TUUTPT?_?AWU8@!>}T|U=@ ?@>@!?}!@}!A}!B}TUUTPT?_?AWU8@(T|!C}U?j ?J |>*@!D}!E} U DOG FIREPLAC %G} $Q@ JT*JBJ@P  @(P @)I}ÕB$B*T8@ 88||?K?@)J}ǼO|@xK@HH@DDw_BD(B ADAPi`a! C>B?@D BD@)K}x 8@@@@@?@@@? @@0C ?0ˆ )L}@TQ@g P@ `@UQ@0ʪ @US)M}@ JT*JBJ@P ( @P (@)N}ÕB$B*T8@ 88||?K?@ǼO|@)O}xK@HH@DDw_BD(B ADAPi`a! C>B?@D BD@x 8@)P}@@@@?@@@? @A@0 ?0DS @)Q}@Pg @UP`@@0US @ʪ@)R} JT*JBJ@P  @(P @Õ)S}B$B*T8@ 88||?K?@ǼO|@xK)T}@HH@DDw_BD(B ADAPi`a! C>B?@D BD@x 8@)U}@@@@?@@@?@ @!@0S ?0ˆ @Q@)V}g TP@`@UQ@0ʪ @US@ J)W}T*JBJ@P ( @P (@ÕB$B)X}*T8@ 88||?K?@ǼO|@xK@H)Y}H@DDw_BD(B ADAPi`a! C>B?@D BD@x 8@@@)Z}@@?@@@? @@@0# ?0S @@Pg)[} @UP`@@0US @ʪ @@Pg(abc# FNFN1MASKSEARCHWINSTRCASEBUFRFOUNDLISPTSLEWINSTBUFSEARCFPTFLEINMAKEUBEGIEN-]} -^} LOCATORJEFFREY A. SUMMERS, MD$$(c)1989, ANTIC PUBLISHIN-_}G INC.dRR;@ ,;@ ,;@ ,;@P,;AC,;@,;B,m B6-n@@-`}.@@E:@A@xt%6-F:A`,%AV$F:Aa,9%@@qM%@@-a}t(" LOCATOR 9-@@,(Files to search: 9@>-@@ 1(-b}String to search for: >@T-@@1(Case sensitive (Y/N): >@T0Y*0NAP-c} 46.D:*.*006-?:C:,:@'-s},7<,C O6-@FAR@(4(ext file xit ontinueFARZ@.@@-t}K:;)@F@Z"@xA"@iA@gA06-?:<<<<-u}<%@, A0@ AX( (( Not Found.b (Done.+(!(Illegal directory name-v}+ A ;-@A &@1@; A'886-C:+hhh BhEhDhIhH VHԽI`,-w}'bb67@<@q,.Ghhhhhhhhhhh8eօeׅee$'cc67@r<AC,.H-x} 8օԥׅեiԥi` ԅ`ii.'OO6-C:Bhhhhh֥eօإeׅ٠aiԥ-y}i`8 ,8'$D1:LOCATOR.BAS`ii.'OO6-C:Bhhhhh֥eօإeׅ٠aiԥ,6 !ADDXXA@A6dNULL HANDLER INSTALLATIONnBY BOB MARTINx##(c)1989,ANTIC PUBLISHIN1{}G INC.# Ap6-A6%" 6-%@% A` A6-?:A6,#( (N: HANDLER INST1|}ALLED!#104,162,0,189,26))3,240,7,232,232,232,208,246,240,242%%169,78,157,26,3,169,31,157,27,3!!169,6,157,1}}28,3,96,43,6,43,6 43,6,43,6,43,6,76,44,6,1691,168,96,226,2,227,2,0,6D1:NULLHAND.BAS7,27,3!!169,6,157,0g0100 ; ADD A NULL HANDLER0110 ; BY BOB MARTIN0120 ; (c)1989, ANTIC PUBLISHING INC.0130 ;0140 HATABS = $031A0150 ;0160 5} *= $06000170 ;0180 ;INSERT THE N: DEVICE IN HATABS0200 ; LOOK FOR EMPTY SPOT IN HATABS0210 ;0220 INSERT0230 LD5}X #00240 NEXTPLACE0250 LDA HATABS,X0260 BEQ ESPOT0270 INX 0280 INX 0290 INX 0300 BNE NEXTPLACE5}0310 BEQ INSERT0320 ;0330 ; FOUND AN EMPYT SPOT0340 ;0350 ESPOT0360 LDA #'N0370 STA HATABS,X0380 LDA5} #NULLT&$FF0390 STA HATABS+1,X0400 LDA #NULLT/$01000410 STA HATABS+2,X0420 RTS 0430 ;0440 ;HANDLER TABL5}E0450 ;0460 NULLT0470 .WORD NULL-10480 .WORD NULL-10490 .WORD NULL-10500 .WORD NULL-10510 .WORD NU5}LL-10520 JMP NULL0530 ;0540 ;NULL HANDLER0550 ;0560 NULL0570 LDA #10580 TAY 0590 RTS 0600 ;0610 ; R5}UN INITIALIZATION STEP0620 ;0630 *= $02E20640 .WORD INSERT0650 .END TAY 0590 RTS 0600 ;0610 ; R4V"# 5 APUPSIDPRGCOUNNUMCOXFN@ 9} MODIFIED PRINTER HANDLER$$BOB MARTIN & MARTIN MERCORELLI$$(c)1989, ANTIC PUBLISHING INC.#&9}&;@ ,;A,;@ ,(` +(-( What type of Printer0(3(6(E( 1 - Epson`(2 - C. Itoh ProW9}riter2%( 3 - Other(%6-<6-F"@ A Z2AR@2(} Wor9}king...d:"6-%@"6@067<,.>:,: A255,255,0,6,90,6,0,0,0,00,0,0,0,0,0,0,0,0,0 9}0,0,76,16,6,162,0,189,26,3**201,80,240,5,232,232,232,208,244,189''27,3,133,205,189,28,3,133,206,169##0,157,27,3,9}169,6,157,28,3,160&&15,177,205,153,0,6,136,16,248,24""173,6,6,105,1,141,17,6,173,7##6,105,0,141,18,6,169,43,141,69}"""6,169,6,141,7,6,96,226,2,227,!!2,19,6,19,6,229,6,173,186,66%%172,187,6,174,188,6,32,16,6,152@%%48,7,142,189,6,9}140,190,6,96,104J((104,96,141,186,6,140,187,6,142,188T&&6,174,255,6,240,21,174,254,6,208^((4,201,155,240,12,201,96,29}40,12,201h$$32,144,8,201,123,176,4,32,19,6r%%96,162,0,142,185,6,189,225,6,32|&&22,6,174,185,6,232,236,229,6,144((9}238,173,186,6,32,165,6,133,204,169''0,133,205,133,206,162,2,24,38,204**38,205,202,16,248,24,169,224,101,205((1339},205,162,128,142,185,6,32,191,6$$32,22,6,169,0,133,206,78,185,6))174,185,6,208,238,174,189,6,172,190''6,152,96,419},127,201,96,176,13,201$$32,144,6,56,233,32,56,176,3,24105,64,96,0,0,0,0,0,0,169&&1,133,203,160,7,138,49,204,2409},6((165,203,5,206,133,206,6,203,136,1611240,165,206,44,186,6,16,4,73,255,133,206,9627,76,8,0,4,-1 @9}A C.ITOHC#67A<A,.>:A1,C67A<A,.>:A1,C#67A<A,.>:A(,C679}A<A,.>:@p,@ 67A<A,.S0008@67A <A ,.>:@,L@AOTHERV9}767A<A,.>:,767A<A,.>:,`G'67A<A,.>:A(,G67A<A,.>:@p,j9}67A<A%,.36. D:EPSON.EXE!"@36. D:CITOH.EXE!"@!6. D:OTHER.EXE" (} ((9}"( Creating V@+@@9(@D@VAR( (( 9} DONE!@AH(H(= NOTE: If this handler prints characters upside down,(change line 60 t9}o:(( 60 UPSIDE=1( &&( Then RUN this program again.T (} ((0( Type in the codes to putT(9}YOUR printer into graphics modeG(+( (You can find this informationG(in your printer manual)U(C(8 Type in th9}e decimal codes one at a time. End with -1UAR@h((EXAMPLE:((?27&(?76-(?84(?0<(?-1?(9}B(h( (Press the SPACEBAR to begin)AdAU F:Ad,@3A P 9AdAU'AR9}36-6(9( A  )6-%@67<,.>:,) A p*6-A$%4$ 9}D2:PRHAND.BAS6(9( A  )6-%@67<,.>:,) A p*6-A$%4$ 80100 ; MODIFIED PRINTER HANDLER0102 ; BY BOB MARTIN0104 ; (c)1989, ANTIC PUBLISHING0110 ;INITIALIZATION ROUTINE FOR0120 ;=} SPECIAL PRINTER HANDLER0140 HATABS = $031A0150 ZPAGE1 = $CD0160 ;0170 *= $06000190 ;PRINTER HANDLER TABLE0210 NPT=}BL0220 .WORD 0,0,00230 NPTBLPC0240 .WORD 0,0,0,0,00260 ;OLD PRINTER PUT BYTE0280 OLDPNT0290 JMP OLDPNT0300=} ;0320 ;INITIALIZE NEW PRINTER HANDLER0340 INSERT0350 LDX #0 :FIND P: HANDLER0360 PLOOP0370 LDA HATABS,X03=}80 CMP #'P0390 BEQ PFND0400 INX 0410 INX 0420 INX 0430 BNE PLOOP0440 ;0450 ;MOVE P: HANDLER TA=}BLE TO NEW0460 ; LOCATION0480 PFND0490 LDA HATABS+1,X0500 STA ZPAGE10510 LDA HATABS+2,X0520 STA ZPAGE1+=}10530 LDA #NPTBL&$FF0540 STA HATABS+1,X0550 LDA #NPTBL/$01000560 STA HATABS+2,X0570 LDY #150580 PMV=}LP0590 LDA (ZPAGE1),Y0600 STA NPTBL,Y0610 DEY 0620 BPL PMVLP0630 ;0640 ;STORE OLD PUT BYTE ADDRESS THEN=}0650 ; CHANGE PUT BYTE ADDRESS TO0660 ; POINT TO MODIFIED PUT BYTE0670 ; ROUTINE0690 CLC 0700 LDA NPTBLPC0710 =} ADC #10720 STA OLDPNT+10730 LDA NPTBLPC+10740 ADC #00750 STA OLDPNT+20760 LDA #[NPUTCH-1]&$FF077=}0 STA NPTBLPC0780 LDA #[NPUTCH-1]/$01000790 STA NPTBLPC+10800 RTS 0810 ;0820 *= $02E20830 .WOR=}D INSERT0850 ;0860 ;MODIFIED PRINTER HANDLER0870 ;0880 ;INTERCEPTS THE PRINTER HANDLER0890 ; AND SENDS UNPRINTABLE0900 =}; CHARACTERS AS DOT GRAPHICS0910 ; OTHER CHARACTERS ARE SENT AS0920 ; NORMAL MODE CHARACTERS0940 ;0950 ;POKE 1791 ($6FF) =}WITH A "0"0960 ; TO ENABLE. ANY OTHER VALUE0970 ; WILL DISABLE THIS OPTION.0980 ;0990 *= INSERT1000 ;1010 ;JUMP T=}O OLD PRINTER PUT BYTE1020 ;1030 PNTPUT1040 LDA HA1050 PNTPUT21060 LDY HY1070 LDX HX1080 JSR OLDPNT10=}90 TYA 1100 BMI ERROR1110 STX RX1120 STY RY1130 RTS 1140 ERROR1150 PLA 1160 PLA 1170 =}RTS 1180 ;1190 ;MODIFIED PRINTER PUT BYTE1210 NPUTCH1220 STA HA ;CK FOR1230 STY HY ;UNPRINTABLE1240 =} STX HX ;CHARACTERS1250 LDX $06FF1260 BEQ PNTOK1270 LDX $06FE1280 BNE CRGR1290 CMP #1551300 =} BEQ PNTOK1310 CRGR1315 CMP #961320 BEQ NOPNT1330 CMP #321340 BCC NOPNT1350 CMP #1231360 BC=}S NOPNT1370 PNTOK1380 JSR PNTPUT1390 RTS 1400 ;1410 ;HANDLER FOR UNPRINTABLE1420 ; CHARACTERS1430 ;1440 NOPNT=}1450 LDX #01460 GRLOOP1470 STX HBIT1480 LDA GRCODE,X1490 JSR PNTPUT21500 LDX HBIT1510 INX 152=}0 CPX CODELN1530 BCC GRLOOP1550 ;1560 LDA HA ;GET INTERNAL1570 JSR ASC2SCN ;CODE # AND1580 STA =}$CC ;CALC ADDR1590 LDA #0 ;OF FONT1600 STA ZPAGE11610 STA ZPAGE1+11620 LDX #21630 ALOOP1635 =} CLC 1640 ROL $CC1650 ROL ZPAGE11660 DEX 1670 BPL ALOOP1680 CLC 1690 LDA #$E01700 ADC ZPA=}GE11710 STA ZPAGE11730 ;1740 LDX #$80 ;CALC THE 81750 STX HBIT ;BYTES1760 BLOOP1770 JSR SLICE178=}0 JSR PNTPUT21790 LDA #01800 STA ZPAGE1+11810 LSR HBIT1820 LDX HBIT1830 BNE BLOOP1840 LDX R=}X1850 LDY RY1860 TYA 1870 RTS 1880 ;1890 ;CONVERT ASCII TO DISPLAY1900 ; MEMORY VALUE1910 ;1920 ASC2SCN1=}930 AND #$7F1940 CMP #961950 BCS OUT1960 CMP #321970 BCC GRCHR1980 SEC 1990 SBC #322000 =} SEC 2010 BCS OUT2020 GRCHR2030 CLC 2040 ADC #642050 OUT2060 RTS 2070 HBIT2075 .BYTE 02080 HA =}.BYTE 02090 HY .BYTE 02100 HX .BYTE 02110 RX .BYTE 02120 RY .BYTE 02130 ;2140 ;CALCULATES THE VERTICAL-BYTE2150 ; =}FROM THE CHARACTER FONT2160 ;2170 ;ADDRESS OF CHARACTER2180 ; IN $CC & ZPAGE12190 ;2200 ;BIT TO BE SENT TO PRINTER2210 =}; IN X REGISTER2220 ;2230 ;RESULTING "SLICED" BYTE IS2240 ; RETURNED IN A AND HELD IN2250 ; #CE2260 ;2270 SLICE2280 =} LDA #$01 ;C.ITOH LDA #$802290 STA $CB2300 LDY #$072310 LOOP2320 TXA 2330 AND ($CC),Y2340 BEQ N=}OTSET2350 LDA $CB2360 ORA ZPAGE1+12370 STA ZPAGE1+12380 NOTSET2390 ASL $CB ;C.ITOH LSR $CB2400 =}DEY 2410 BPL LOOP2420 LDA ZPAGE1+12430 BIT HA ;CK FOR INVID2440 BPL NOTINV2450 EOR #$FF2460 =} STA ZPAGE1+12470 NOTINV2480 RTS 2490 ;2500 ;PUT THE CONTROL CODE TO CAUSE2510 ; YOUR PRINTER TO ACCEPT 82520 ; DO=}T GRAPHICS BYTES HERE2530 ;2540 ;C.ITOH CONTROL CODE2550 ; GRCODE .BYTE 27,"S0008"2560 ;2570 GRCODE .BYTE 27,76,8,02580=} ;2590 CODELN .BYTE CODELN-GRCODE2600 ;2610 .END 50 ; GRCODE .BYTE 27,"S0008"2560 ;2570 GRCODE .BYTE 27,76,8,02580<9_\!s!CCCCCCCCCCC2MAMODOFWAIFILENAMETEMPDEVICEDPATHGG2SEQFILESCRIPTCYCLEFNLPICRAMDISOLDOA}LDCURCURKEFILSESCRMEDELAPAUSFRAMEIOCADRHADRLNNMHNMLNREBRA} A}@@@ !"#$A}%&'()*+,-./0123d??A}ICON ANIMATION SYSTEM, LISTING 2, THE SCRIPTERgBY JIM JOHNSONj##(c)1989 ANTIC PUBLISHING INC.n6-A}6-@'6-@36-@?6-@K6-@W6-@c6-@o6-@{6-@ 6-@ A}6-%x5 6-6-B!6-@+ B5 B11;@ ,;@ ,;@,;@,;A,A};A$,DD;A,;@ $@,9A,9@,9@,KK6-C:>hhhhhhhhhhhФψ͑ˈA}eЅːeυ͐`,) 6.67A,.)67@,.  A-/ ( %( || CREATE A}SCRIPT/( - ( #( | | LOAD SCRIPT-( "- ( #( | | SAVE SCRIPT-( ,, ( "( A} | | RUN SCRIPT,( 6+ ( !( | | SEQUENCER+( @; ( 1( | | LOAD SEQUENCES TO RAMDISK;( A}J*"@!-@@'(X*(T AP^ 6-6-6-6-hK:)r%"@EA}*!6-&% A`|A/"@a* @&+@$+"@,,76-%A A`"AU*"A"A}AU*"Ap&&"AU*"@*0A@&&"AU*"@*0A6"AU*"@# AA}`6%D:ANIMATOR.BAS!!"AU*"@AP) -( -(#6-)6- A`CREATE SA}CRIPT A AP; 6.D?:'67@<@,.=:,1 A; A ,( K:"), A}A`G-@%(SEQUENCE CYCLES1-@G( % 6-6-%$6-6-%6-A}K:)&%"@E*!6-&% A0)"@a* %$6-%) A:"AU*"%$A`A}D##"AU*!* %$AN) -( -(#6-)6-X A@b3 6.36.7$++',&,%<$++A}',&,%8'&,,l68,-'&-( v=-@%(#-@(%1( =AR8 A0A}AR (8 )!AA0. 68,-6-6-%."@A` -( A@LOAD SCRIA}PTO A06.D?:167@<@,.=:,; AE AO AP, -,(USE FORMAT: 'DEV:FILENAME.EXT'A}>AR-,(FILENAME TO LOAD?>AdAUY F:Ad,"AUA5F:Ad,"@(:HA}K:O)Y A`) (4 A# ) AH)@-)(68,-A}/)868,-< CH, -&6.7$+&,%<$+&,%,,6-"7<,4 6-&" A' 68,-A}  A`SAVE SCRIPTV A0 A! AP3-@@V(USE FORMAT: 'DEV:FILENAME.EXT'>A}AR-,(FILENAME TO SAVE?>AdAUY F:Ad,"AUAV5F:Ad,"@(:HA}K:O)Y A`) (4 A# ) AU B *-6-8,"*+6-8,2*A}6 =(B A` RUN SCRIPT*7 6.D?:'67@<@,.=:,1 A`76.4 -6-8,A} A`>-8, A p H @w A RLOAD RAMDISK\ A APf! 6.D1: AA}! A p,( K:"), A`z F:B2y,"@A |1AT9@:1,1LOAD DUP.SYA}S FROM DRIVE #1D6.D?:*.**67@<@,.=:,4 A 9D%@3% A4A}-@!@#( *LOADING*--%$4( " 6.--%$"(! 6.D1: A`! A@" -%A}$(  " A`DISPLAY IMAGES A`: 6-C:,:6-F:@,%F:@,$AV%%$@ -BA}:,%@:7<,," Ap% A@""6-C:,%A$+@:7<,,&,""6-?:<<<@<@R<,* - F:A}Ad,AU* A` @w"F:Ad,AU" A` $$/K:)/AA}dAU.K"AU*"K6-%%$+!@),%$+!@E,%@$+!@,8]"AU*"@Q6-&&$+A}!@0,&$+!@P,&@$+!A,W ]6-B "AU*"@ 6-(L##"AU*"@%*ApVA})"AU*"@2'') A``M"@B* @2!6-%-AW4( @AWG(M6-jM"A}@C*!@!6-&-AW4( @AWG(M6-tA`~$ A` ADVANCE4A}A` 6-%!B:,6-@:7<,,"A""6-C:,%A$+@:7<,,&,""6-?:<<<@<@R:,(A}+6-A2%@+%@@ *6-P:C:,'AV,*6-C:,&$AV %%26-A$"6-A}P:'AV,26-&$AV( %%2C6-?:C:hhhLV,<@,C+F:%,$AV%F:%,,AE<6A}.7:AS,z @( ()( TWO-COLUMN PRINTER PROGRAM,(@( By Earl Haley6-@@$@Y5;,;,N};,;@A,;@,;@,A6-M6-@Y6-(:67@,. 67,. .67@,.46.N}:6.2! A A! ApdA A0@5@@A6-n A0xN}-@@6-@6-@@5-@5(NL DEFINED IN LINES 740 AND 750)W@B:,"@N}W7@<@,4XXX)7@<@,4APApA67<,. A67<,.6N}-%@6-%@9   APPF:A,"Ap%(>:A%,((;(FILE NOT FOUNDF@P N}A>F:A,"A`)( DRIVE# ERROR4@> A@RF:A,"AD%(>:A%,((=(DISK DRIVE N}ERRORH@R A.F:A,"A6$6-@. AP'( DISK ERROR@' A6-%@N}.@.@@P:6-@6-@@-@"(@7<,7<,,N}6-%@6-%@96 @ 6.6.J8(@8(@7@<@6,-  -TAEUN}`+(@7@<@5,- END -76-C(}DONE !S( Press a Key] A``%Y@APZeQ(IPN}ause for Paper Change - Check Your Pprinter- Press Any Key When Ready[ A`e A^6"@'-@&&N}@2(@6 h Ar7@+*A@P7(>:A%,w7"@(7( < LEGAL SIZE N }8 1/2 x 14 INCHES >x:"@f(:(#< STANDARD SIZE 8 1/2 x 11 INCHES >|)()(Be Sure ANTIC DISK Is In Drive~.(N!}.(#Be sure Printer and Paper are ready,( (,(What File do you wish to print"( ("((1) ANTIC HELP FILE0(N"}( (2) OTHER'AR@*(0(? A`&@HA0A5)6. D:DOC.TXT6-@) AN#}(>:A%,^( ( (4(#(Press RETURN for disk directory)^(%(Lists only files with .TXT extender),(,(!ENTEN$}R NAME OF 40-COLUMN TEXT FILE((D:XXXXXXXX.XXX), A04" A, A@8B:, @+(FILENN%}AME TOO SHORT !.(8 AP6.7@<@,8!0D:*0D1*0D2*0D8.(DRIVE #?8 AP7B:,!@N&}*(FILENAME TOO LONG !-(7 AP+@+@@! AP!-@@P@N'}B:,!@@8(NOT A 40-COLUMN FILE;'F@P A`9B:,!@@)6-@,'/(9 AN(} &4@((4(NOT A 40-COLUMN TEXT FILE !0$($(PRESS ANY KEY TO CONTINUE: A`D AN)}Nh A0@;@@D:*.*G6-[-@@h@X67@<@N*},4TXT,6-%@6( b v F:A,"A6AP( DISK ERROR7 @(4(NO 40 COLUMN N+}TEXT FILES FOUND7(@$I@.@@K:;)@F@I$i(*(BE SUN,}RE SOURCE DISK IS IN DRIVE-(J(BE SURE PRINTER IS READYM(P(f(SELECT PAPER SIZEi(,,($ (1) Standard 8 1/2 x 11N-} inches.G(.(# (2) Legal size 8 1/2 x 14 inches@AR@G(? A`*"@I6-@f'6-N.}@R*$*"@P6-@'6-@h*$ A0 )(>:A%,()(WHICH DO YOU WANT*.(.(# (1) ChN/}ange paper after each page40('( (2) Continuous feed paper*(0(?> A`H"@I6-@$R"N0}@P6-@$\ A0D1:TWOCOLMN.BAS paper*(0(?> A`H"@I6-@$R"L;