@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`  `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 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 D8uEiͩkΩ͙kCop`j`j {j`Hi͝Νh`T}L" "?:" SYS.2REMIRP:D" NUR`m #KE@ (}AR@ ,-@@,(COMPUTER PRIMER #29-@@9( < V} A > PLAYER FOREGROUND DEMO7-@@7( < B > HORIZONTAL SCROLLING(5-@@ 5( < C > VERTICA W}L SCROLLING25-@@5( < D > DIAGONAL SCROLLING<9-@@9( < E > SCROLLING STREET SCENE=0 X}-@@0( < F > MOVIE CARTOONI8-@@#8(Press to return to menu.K AP#!@p Y}) @e# @uZ""@e"%D:EXAMPL12.BASd""@f"%D:HORSCROL.BASn""@g"%D:VERSCROL.BAS Z}x""@h"%D:DIASCROL.BAS""@i"%D:EXAMPL13.BAS""@p"%D:EXAMPL14.BAS##@@ [}K:)@@$ D:PRIMER2.SYSS""@p"%D:EXAMPL14.BAS##@@ C$$HIBYTLOBYTPLRHPLRVPLRRATEPMWIDTHFRMLSTPTRMOVERATESPEETEMPMOVEALLINITANIMATSNSNDSCONVVOWAL]}INITAUTOMOVFST2BYTMFILFLAOBJECLST2NSPFRSTPLNUMPLRSPOINTEROBJFRMDATAFRAMESFRMSIZEPLRFRMMEMFRMLSTSIZETEMPTE^}MPTEMPFRAMEMETOTFRMLSTSIZBUFFERFRAMEMEMFRMLSTMEMPMOVERANIMATANIMATEAUTOMOVAUTOMOVEMFILLBUFFEPLRFRAMEFRMLSTMEP_}MBASOFFSEOFFSETFRAMELISTPARAMBASPMBAPMBUVVBLKCRITICAPPPP@qBI@sAAA0AH`}A`AxA  @ @ @5 Bh"@A'@AA@@3333Aa}A(@@Bsv@@@A$@ A!A"k#@A$A%b}A&A'A()@*@+@,AR-@@.?/`0(12Bp3b&&4Bs5c}JJ6))7BwA8Bxi9B!:B;@@@?@@A$AA$BA%CAHD@fd}E@F@G@H@ $$*** PLAYER FOREGROUND DEMO ***$$*** Example 12 ***F A@dHi/Le}o Byte Calculationn6-P:'AV,x6-&$AV$InitializeRR9@,9@,9@,9@f},9@,9@,9@,8 +@AR@8 One moment please... B AP g}Ap B B " B0,** "}ҠĠϠ6*-@&8,@h}* @6-6@J A AT6-@^6-?:<,h r A|5#@@i}K:5ATAUMain Animation Loop36-O:F:Ad,&A(,+6-'@36-%K6-+A(&,'@ j}52@@K2@@+!!6-&+@,+ Ap-" 6-?:<,-k}6-6@\F:A,"@:2@@@\25+F:Ab,!Al})F:Ab, @ 5 AP5+F:Ad,!A))F:Ae, @5 ACOLD RESTART'F:B2y,"@m}'6-?:B, F:AT,"AUAH)@6-&@H0ATAU< H6- n} A AXSelect a New Objectb(6-P:,"(6-@lK6-&?P+2@@o}A2@@K A v''6-?:<8@,<AV<,%%6-P:H:@,$@%@,6-p}F7AAAAAAC"F$6-?:<, Set Horizontal Velocitieq}s/"@%6-A(&$@/ A@'"@6-A%&' A@6-A2&'8@,!r}8@,'6-D8,A)&18@,A)&>"6@D6-  $Parameters for Plas}yers ManG%A@$@%@GA@$@%@%6-6-@% A-t}8,@w-8@,@w"@Ap$c8,@ -8@,@(9!@Nu}8,Ac8@,A&.%%6-P:H:@,$A%@ ,8$L TreeV"$`G%A@v}$@%@GA@$@%@j-8@,A)-8@,At-8@,@2w}-8@,@~G6-@6-@% A16-@=6-@G A-8@,-8@x},@6-$ TruckU%A@$@%@UAP:H:@,$@,$@%@y}-8@,A-8@,A3-8@,@W-8@,@W%6-@6-@% Az}-8@,@-8@,@6-@6-A$ Car"@$(o6-P:H:@{},$@,G6-@&P:H:@,$@,$@W6-$@%cAoA2-8@,-8|}@,@<9!@$8@,A98@,A2F-8@,@v-8@,@vP%6}}-@6-@% AZ-8@,@-8@,@d6-@6-@@n$++Put Frame L~}ist Address in Param Table-8,&@6-8<, A8%,8%,%@ }$Set Up Memory Locations"++9<@,9,9,9,9,9,-@ " 68,-6}8,-68,-68,-8,$8,%@6-%8,$8, 68,-8,%@6-%8,$8, (;A(},;,;, 6-C:, 6-C:, 6-C:, 6-C:, 6-C:, 6-C:, 6-C:,$X((Initialize Player-}Missile Graphicsb6-F:A,&@lBByv6-AV$-@68,-%A($%A}68,-B2V% AY@BA#@B2w@''6-?:<8,<A<},$'Read in Frame Data'"6-6-"9,$'-@.'68,-%8'6-%+8,%@,}$8,B'-8,&@L'68<,-%V'6-%8,`'8<,8,j'-@8,&@t'"~'8<},%'   '$* INITIALIZE ROUTINE STRINGS$,Set PMOVER routine.,;A,8,mm67@,.ZPLb}&0ߝShhhF&B,mm67@,.ZFI}T`L*H *hMNNML,67A,.LP,Set ANIMATE routine,;}A,,mm67@,.ZPLbآY0H PN򩀍+. 23P0ֽ:,mm67}@,.Z>ɩ. %:IX.: 23>>,mm67A,.Z }>PPPHȱh∱QNPmQJnRR8eeP*RR,++67Aq,.QP..}P,Set AUTOMOVE routine,;@t,-]]67@,.JPLbح0N G𩀍GI}&(0 (}G&0P-Set MFILL routineZ-;@A,d-<<67@,.)hhhhhhh̥ͥ`-$.!!S}et Parameters for Routines.6-A$. 6-.6-%@/6-%@/6-%@&/-@}0/68,-%@%:/68,-%@%D/68,-%@%N/68,-%@%$@X/68,-%@2%b/ }/6-AH/6-@f/36-@6-@'6-@36-@/ 6-%/ 6-%6-%%%/6-?:}<<@<,/"6-8, A"/ 6- A/%@p0Set Up Frame Listsz0}9<@,0-@0-8,&@08<,-8,%$8,06-8<, A08<,0}8<,%@0-@8,08<,%%@0 0!!8<,%8,%@0   0$2 In}stall Interrupt Routines2@36-%@ A"3 ,3%@636-%@ A@3}%@J3%@T36-%@ A^3%@h3%@r33$ NFRAME DAT}A*NNumber of objects4N5HN33Number of Frames,Frame Size,Number of PlayersRN(Walking Man)\N 5,19,2fN(Tree }Trunk)pN 1,52,1zN(Tree Top)N 1,26,1N (Truck)N 1,25,2N (Car)N 1,13,2R Frame data for Walking Ma}nRFrame 1,Player 0R770,0,0,0,0,0,0,3,15,29,59,51,7,7,15,252,224,112,48&RFrame 2,Player 00R990,0,0,0,0,0,0,1,7,1}5,31,55,55,7,111,125,248,192,193:RFrame 3,Player 0DR;;0,0,0,0,0,0,3,7,15,31,31,31,31,222,254,251,231,206,15NRFrame }4,Player 0XR==1,3,3,3,1,7,15,31,30,62,62,63,63,60,124,120,112,112,252bRFrame 5,Player 0lR::0,0,1,1,1,0,7,31,31,31,31,}31,15,15,13,31,123,112,124vRFrame 1,Player 1RHH0,28,62,62,62,28,240,240,240,240,251,255,220,192,192,227,118,60,24R}Frame 2,Player 1RKK0,0,56,124,124,124,56,224,224,224,224,246,254,192,128,192,224,224,248RFrame 3,Player 1REE0,112},248,248,248,112,192,192,128,128,128,224,224,0,0,0,0,0,128RFrame 4,Player 1R55192,224,224,224,192,0,0,0,0,0,0,0,0,0,0},0,0,0,0RFrame 5,Player 1RII0,224,240,240,240,224,128,128,128,128,176,240,0,128,192,128,192,0,0UFrame data for T}reeUPlayer 2,Tree TrunkVNN2,2,132,128,64,0,149,165,210,211,219,251,255,254,126,126,126,126,126,126VUU126,126,126,1}26,126,126,126,126,126,122,126,126,126,126,126,126,126,126,126,126V55126,126,126,126,126,126,126,126,255,255,219,137"V}Player 3,Tree Top,VQQ24,24,60,60,126,126,126,255,255,255,255,255,255,255,255,255,255,255,255,1266V126,60,60,60,24,24TV}Frame data for Truck^VPlayer 2,Truck CabhVBB0,0,0,0,0,15,25,17,17,17,17,17,31,31,255,255,255,255,255,255rV255,25}5,255,28,28|VPlayer 3,Truck BodyVUU255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255V}255,255,255,12,12VFrame data for CarVPlayer 2,Car backV..7,9,17,17,17,31,63,127,255,255,255,56,16VPlayer }3,Car frontV22192,64,32,32,16,248,255,255,255,254,255,28,8D2:EXAMPL12.BAS31,63,127,255,255,255,56,16VPlayer U7HSCRODLISBBvBh@@ HORIZONTAL FINE SCROLLING +(6-BBv}<%%6-F:A`,%F:Aa,$AVF%@@PB-@@B 'This is a demo of horizontal scrollin}g!Z-@d n Ax  -@6@  ACOLD RESTA}RT'F:B2y,"@'6-?:B,  @-@@ $D2:HORSCROL.BASD RESTAvEHSCROVSCRODLISBBvBBwBh@@ VERTICAL FINE SCROLLING +}(6-BBv26-BBw<%%6-F:A`,%F:Aa,$AVF%@@4P@-@@@ %This is a }demo of vertical scrolling!Z-@d n Ax  -@6@  } ACOLD RESTART'F:B2y,"@'6-?:B,  @-@@ $}D2:VERSCROL.BASD RESTART'F:B2y,"@'6-?:B,  @-@@ $EHSCROVSCRODLISBBvBBwBh@@ DIAGONAL FINE SCROLLING +}(6-BBv26-BBw<%%6-F:A`,%F:Aa,$AVF%@@PP@-@@@ %This is a }demo of diagonal scrolling!Z-@d n Ax  -@6@ } ACOLD RESTART'F:B2y,"@'6-?:B,  @-@@ }$D2:DIASCROL.BASD RESTART'F:B2y,"@'6-?:B,  @-@@ }~8(N(HIBYTLOBYTCLSEGTEMPHICHRSPEESCRLSTEBYTCFLACHAPAINLFENCPTHEIGHWIDTGRNSCRLWILINELECLOUSC }RSPCFLAROOMLEFTEMMFILSCRNSZSTORCHIMNESHRUANTENNTREODDHOUSTRUNTREETOBDIDLSZMEHIBASLOBASDLBASSCRNHSCRNLS }CROLSCROLLDLIROUDLIROUTMFILLWINDOCHRBAOFFSECHARTOTADLITBLSZDLITABLEDLITABLPARAMBASSCRLINISCRLADSCRLLESCRLCL }DLIADVVBLKCRITICA }  } !"#$%&'()*+, }-./0123456789:; }<=>?@ABCD $$*** SCROLLING STREET SCENE ***$$*** E }xample 13 ***$$******************************F A@dHi/Lo Byte Calculationn6-P:'AV,x6- }&$AV$Initialize&&;@$,;@$,;@,B67@,.>:,367@$,.>:,B6 }7@,. B AP A` A& AAVAY@5 A( } A0 B " B0T6-@|5#@@K:5ATAUMain Anim }ation LoopCOLD RESTART'F:B2y,"@'6-?:B, F:AT,"AUAH)@6-&@H }0ATAU< H6-  AlConvert to Screen Valuev6-)!A' }6-&A()6-A(7 @6-&@2) 76-%@6-%%$@d$Send }Info to Screen) 6-B:, @$)67%@,.6-%@- A"-@ }  6-$%6-@:7<,, A +!%@$%%@#+ A!0*"A! 4"@ }6-%@d>)%%$@$%&@) A!0H%%$%&@R \ f6-%%O:,%p6- }z6-&@%&$Put In Fence @A"@j"@6-@:Q,$ A16-6@; A"P }F6-@:E,P AV6-` A"Pj A"@T6-@:A, A%6-6@/ A"P:6-@:D,D AJ6-T  }A"P$Poke In Data%%$%$` $$Copy First Page Onto Last Pagej -@t - }@$~ ""%$%&@%%F:%$%,     $( //Clear the Screen - Fill the Screen With 02 6-?:<< }<,< $ Put in Clouds and Sidewalk R6.ԽԽ$6-@06-@<6-@H6-@R A }  D6. Խ 6-@.6-%@:6-@D A  P"6..6-@:6- }F6-@$P A  $ CREATE RANDOM DISPLAY 6- 6-@ 6-6- %%6 }-P:H:@,$@%@, 6 H:@,$A@E,6-@6 A0 6 H:@,$@U@5,6-@ }6 A0 6-@ 6-+H:@,?`, ("(6-+H:@,?@,  @6-& } 6-+H:@,?P,0 6-+H:@,?P,: 7 6.-&@A5A7A97 A D  @ } A$$N Plant Some FoliageX 6-6-b H#"*"*!@<6-+H:@,?0,H }A4@l Make a treev 6-@6. 6 H:@,$@@,6-@6 A2` 6 H:@,$@ }@,6-@6 A2` 6 H:@,$@@,6-@6 A2` 6 H:@,$@@,6-@ }6 A2` 6-@ A)6-P:H:@,$+&@,%@,5"@A6- 1 6-&!@%6-& }@16-@ ##6-+@&,$@%@ 67,. "@A3@ -@&@ 6- }%@67,.tt   6-%@67,. "@A3 -@&@* 6-%@6 }7,.BV4  > ,H:@,?P,67%@,.KLR C%6-P:H:@,$@%@,C"@) @A4p }\ '"@6-%@' A4pf 6-@ A4pp Make a shrubz S%6-P:H:@,$@%@,+6. }7"@I67@ ,.S A4p 67@,.  %6-6-% A   @A1@ } A0@ Width 2 !@6-@ 6-@ "@6-@ 67,.INZU A5` } 67,.IOZX 56-%@5-%+&@,$@@ .H:@,?P$67,.. A5 67, }. 67@ ,."A6@$4H:@,?P*67@,.WW4 A6@.67@,. }EQ8$t Width 3~##6-+@&,$@%@&* @&67&@,.`67,.ZTX,H:@ },?P"6., A7` 6.56-%@5-%+&@,$@@ 67,. 67 }@,.67@,.WWW$< Width 4F##6-+@&,$@%@P'"@67,.HTTJ' }A@PZ,,!@))H:@,?33A@n6-@x)67@,.INZU) A967@,. }IOZX6-)67@ ,. ITTO) AA- *#67&@,.`HJYTTJ- A@P=67 }&@,.HJ%"367,.HTTJ= A@P0H:@,?P&67,.YTTJ0 A@P67,.HTTM56- }%@5-%+&@,$@@0H:@,?%&67,.0 A@67,. 67 }@,.67@!,.WEQW$Set Up Memory Locations6-6-@46-@H }!!6-@$@$%$@ 6-%2'6-%@'$AV AQp<6-F:A,&F6-P6-$ }AV%Z 6-%d 6- An 6-6-x6-%@H 6-C:, 6-C:, 6-C:,$pSet Up } the Display Listz+@%@AYA%@A%@A }%@@q%@%@%@@%A(-@ 6-%$6 }-@-"@)"@-6-@%A("@6-@q%@%@$ 6- A }%@%@$$%@ %@$. 8%@(@%A(B%@)@L% }@0@%A(V%@1@e`%@2j%@3t 6- A~AA }A`Aa0@@70@@@Q0@@k0@ }@0@@ @$@$$Set Up Alternate Character SetJ6-F:A,&&@T6-$A }Vh#6-@($@#6-@5r #B0|"6-!!-%%%$@&@" 6-% } 6 +3  In Character Set Data6-%@ $* INITIALIZE }ROUTINE STRINGS+Set SCROLL routine +;A,+mm67@,.ZPLbحHYZ01PQN }PJNQP-mF PYP +mm67@,.Z-FMԭPmDDED8mQDEE(DD }EPBCPgP*+mm67A,.ZDQDEBmPBRCCSA))P )ȭRmRȭSmS }P4+AA67Aq,..YZPFDEBCP\+Set DLI routinef+;@,p+mm67@, }.ZP LbKHHH]^$%KHȱȱȌKh ԍЎЌЭ]^hz+67@,.hh@+&&Rea }d Color Values Into DLI Table+6-@#BU+ ;,+ 6-C:,+-&@+"+ %, }P-Set MFILL routineZ-;@A,d-<<67@,.)hhhhhhh̥ͥ`-$.!!Set Parameter }s for Routines.6-A$/6-%@l/6-%@&v/6-%@(/6-%@0/6-%@1/6-% }@6/6-AH/6-@f/6-?:<<@<,/ 6- A0  0%@ 0 6- A }*0 40%@>0@H0 6- AR0 \0%@0$2 Install Interrupt Rout }ines2@26-%@ A2 2%@26-%@ A3%@3% }@r3|3@3BBA3$YCharacter Set DataY 38646Y0,3,15,31,63,63,127 },127Y##0,192,240,248,252,252,254,254Z127,127,127,63,63,31,15,7 Z%%254,254,254,252,252,248,240,224Z4,31,4,31,4, }4,4,4Z48,48,48,63,54,54,54,54(Z3,3,3,3,3,3,3,32Z%%255,195,219,219,219,219,219,219@?@@A@B@ C@D@4EA8F@AGAHlAIAJAKL@%}M@N@OARP@@Q R`S(TARUVBWARX@4YBXeZ<<[Ba\%}^^]^Bdv_C&&`BgpaiJJb))cBr dBs7eBvfBTgBxhBxi@@j@5kBF%}lARAm(n@o@pzqBburA$sA$tA%uA)vAPwARxATyA`zAH{@f%}|@}@~@@ ##** THE GREAT MOVIE CARTOON **##** Example 14 **##** %} **F A@dHi/Lo Byte Calculationn6-P:'AV,x6-&$AV$InitializeRR9@%},9@,9@,9@,9@,9@,9@,&&;@$,;@$,;@,B67@%},.>:,367@$,.>:,B67@,. B AP A` A& Ap A%} BAVAY@G A( A0 B " B06*-@%}&8,@* @6-6@J A AT6-@^6-?:<,h r A|5#@%}@K:5ATAUMain Animation Loop36-O:F:Ad,&A(,+6-'@36-%K6-%}+A(&,'@ 52@@K2@@+!!6-&+@,+ Ap-"%} 6-?:<,-6-6@\F:A,"@:2@@@\25+F%}:Ab,!A)F:Ab, @ 5 AP5+F:Ad,!A))F:Ae, @5 ACOLD RESTART'F:%}B2y,"@'6-?:B, F:AT,"AUAH)@6-&@H0ATAU< H%}6- A AXSelect a New Objectb(6-P:,"(6-@lK6-&?P+2%}@@A2@@K A v''6-?:<8@,<AV<,%%6-P:H:@,$@%@% },6-F7AAAAAAC"F$6-?:<, Set Horiz%!}ontal Velocities/"@%6-A(&$@/ A@'"@6-A%&' A@6-A2&'%"}8@,!8@,'6-D8,A)&18@,A)&>"6@D6-   $%#}Parameters for Players ManG%A@$@%@GA@$@%@%6-%$}6-@% A-8,@-8@,@"@Ap$c8,@ -8@,%%}@(9!@N8,Ac8@,A&.%%6-P:H:@,$A%@ ,8$L TreeV"%&}$`G%A@$@%@GA@$@%@j-8@,A)-8@,A%'}t-8@,@B-8@,@(~G6-@6-@% A16-@=6-@G A-8@%(},-8@,@6-$ TruckU%A@$@%@UAP:H:@%)},$@,$@%@-8@,A-8@,A3-8@,@w-8@,@w%6-%*}@6-@% A-8@,@-8@,@6-@6-A$ Car"%+}@$(o6-P:H:@,$@,G6-@&P:H:@,$@,$@W6-$@%cAoA2-%,}8@,-8@,@<9!@$8@,A98@,A2F-8@,@-%-}8@,@P%6-@6-@% AZ-8@,@-8@,@d6-@6-@@%.}n$++Put Frame List Address in Param Table-8,&@6-8<, A8%,8%/}%,%@ $lConvert to Screen Valuev6-)!A'6-&A()6-A(7 @%0}6-&@2) 76-%@6-%%$@d$Send Info to Screen) 6-B:, @$)6%1}7%@,.6-%@- A"-@  6-$%6-@:7<,, A%2} +!%@$%%@#+ A!0*"A! 4"@6-%@d>)%%$@$%&@%3}) A!0H%%$%&@R \ f6-%%O:,%p6-z6-&@%&$Put In Fenc%4}e @A"@j"@6-@:Q,$ A16-6@; A"PF6-@:E,P AV6-` A"Pj A%5}"@T6-@:A, A%6-6@/ A"P:6-@:D,D AJ6-T A"P$Poke In Data%%$%6}%$` $$Copy First Page Onto Last Pagej -@t -@$~ ""%$%&@%%F:%$%%7},     $( //Clear the Screen - Fill the Screen With 02 6-?:<<<,< $ Put in Clouds and Si%8}dewalk R6.ԽԽ$6-@06-@<6-@H6-@R A  D6. Խ 6-@.6-%9}%@:6-@D A  P"6..6-@:6-F6-@$P A  $ CR%:}EATE RANDOM DISPLAY 6- 6-@ 6-6- %%6-P:H:@,$@%@, 6 H:@%;},$A@E,6-@6 A0 6 H:@,$@U@5,6-@6 A0 6-@ 6-+H:@%<},?`, ("(6-+H:@,?@,  @6-& 6-+H:@,?P,0 6-+H:@%=},?P,: 7 6.-&@A5A7A97 A D  @ A$$N Plant Some FoliageX 6%>}-6-b H#"*"*!@<6-+H:@,?0,HA4@l Make a treev 6-@%?}6. 6 H:@,$@@,6-@6 A2` 6 H:@,$@ @,6-@6 A2` 6 H:@%@},$@@,6-@6 A2` 6 H:@,$@@,6-@6 A2` 6-@ A)6-P:H:%A}@,$+&@,%@,5"@A6- 1 6-&!@%6-&@16-@ ##6-+@&,$@%B}%@ 67,. "@A3@ -@&@ 6-%@67,.tt   6-%@%C}67,. "@A3 -@&@* 6-%@67,.BV4  > ,H:@,?P,6%D}7%@,.KLR C%6-P:H:@,$@%@,C"@) @A4p\ '"@6-%@' A4pf%E} 6-@ A4pp Make a shrubz S%6-P:H:@,$@%@,+6.7"@I67@ ,.S A4p%F} 67@,.  %6-6-% A   @A1@ A0@ Width 2 !@6%G}-@ 6-@ "@6-@ 67,.INZU A5` 67,.IOZX 56-%@5-%%H}+&@,$@@ .H:@,?P$67,.. A5 67,. 67@ ,."%I}A6@$4H:@,?P*67@,.WW4 A6@.67@,.EQ8$t Width 3~##6-+@&,%J}$@%@&* @&67&@,.`67,.ZTX,H:@,?P"6., A7` 6.%K}56-%@5-%+&@,$@@ 67,. 67@,.67@,.WWW%L}$< Width 4F##6-+@&,$@%@P'"@67,.HTTJ' A@PZ,,!@))H:@,?33%M}A@n6-@x)67@,.INZU) A967@,.IOZX6-)67@ ,.%N} ITTO) AA- *#67&@,.`HJYTTJ- A@P=67&@,.HJ%"367,.HTTJ%O}= A@P0H:@,?P&67,.YTTJ0 A@P67,.HTTM56-%@5-%+&@,$@@%P}0H:@,?%&67,.0 A@67,. 67@,.67@!,.WEQW%Q}$Set Up Memory Locations6-6-@46-A`!!6-@$@$%$@ 6-%%R} # "++9<@,9,9,9,9,9,-@ " 68,-68,-68,-68,-8,%S}$8,%@6-%8,$8, 68,-8,%@6-%8,$8, (;A(,;,;,2'6-%@%T}'$AV AQp<6-F:A,&F6-P6-$AV%Z 6-%d 6- An 6-6-x%U}6-%@H 6-C:, 6-C:, 6-C:, 6-C:, 6-C:, 6-C:, 6-C:, 6-C:, 6-C:,%V}$pSet Up the Display Listz+@%@AYA%@A%@%W}A%@@q%@%@%@@%A(-@ 6%X}-%$6-@-"@)"@-6-@%A("@6-@q%@%@$%Y} 6- A%@%@$$%@ %@$. 8%@(@%A(B%@)@%Z}L%@0@%A(V%@1@e`%@2j%@3t 6- A~A%[}AA`Aa0@@70@@@Q0@@%\}k0@@0@@ @$X((Initialize Player-Missile Graphicsb6-F:A,&&@%]}lBByv6-AV$-@68,-%A($%A68,-B2V% A%^}#@B2w@''6-?:<8,<A<,$@$$Set Up Alternate Character SetJ6-F:%_}A,&&@T6-$AVh#6-@($@#6-@5r #B0|"6-!!-%%%$@%`}&@" 6-% 6 +3  In Character Set Data6-%@%a} $'Read in Frame Data',6-6-"9,,#B$'-@.'68,-%8'6-%+8%b},%@,$8,B'-8,&@L'68<,-%V'6-%8,`'8<,8,j'-@8,&@t'"%c}~'8<,%'   '$* INITIALIZE ROUTINE STRINGS+Set SCROLL routine +;A,+mm67@%d},.ZPLbحHYZ01PQNPJNQP-mF PYP +mm67@,.Z-FM%e}ԭPmDDED8mQDEE(DDEPBCPgP*+mm67A,.ZDQDEBmPBR%f}CCSA))P )ȭRmRȭSmSP4+AA67Aq,..YZPFDEBC%g}P\+Set DLI routinef+;@,p+mm67@,.ZP LbKHHH]^$%KHȱȱȌKh%q} b%DOS SYSb*)DUP SYSbSAUTORUN SYSbUPRIMER2 SYSbJ\EXAMPL12BASbHORSCROLBASbVERSCROLBASbDIASCROLBASbQEXAMPL13BASbEXAMPL14BASb SCROLL DATbSCROLL STRbDLIROUT DATbDLIROUT STRbMFILL DATbMFILL STRbSTRNGLDRBAS ԍЎЌЭ]^hz+67@,.hh@+&&Read Color Values Into DLI Table+6-@#BU+ ;,+ 6%r}-C:,+-&@+"+ %, $,Set PMOVER routine.,;A,8,mm67@,.ZPLb&%s}0ߝShhhF&B,mm67@,.ZFI%t}T`L*H *hMNNML,67A,.LP,Set ANIMATE routine,;A%u},,mm67@,.ZPLbآY0H PN򩀍+. 23P0ֽ:,mm67@%v},.Z>ɩ. %:IX.: 23>>,mm67A,.Z >%w}PPPHȱh∱QNPmQJnRR8eeP*RR,++67Aq,.QP..P%x},Set AUTOMOVE routine,;@t,-]]67@,.JPLbح0N G𩀍GI}&(0 (G%y}&0P-Set MFILL routineZ-;@A,d-<<67@,.)hhhhhhh̥ͥ`-$.!!Set %z}Parameters for Routines.6-A$. 6-.6-%@/6-%@/6-%@/6-%@&/-%{}@0/68,-%@%:/68,-%@%D/68,-%@%N/68,-%@%$@X/68,-%@2%|}%b/ l/6-%@&v/6-%@(/6-%@0/6-%@1/6-%@6/6-AH/6-@f%}}/36-@6-@'6-@36-@/ 6-%/ 6-%6-%%%/6-?:<<@<,/"6%~}-8, A"/ 6- A/%@/ 6- A0  0%@ 0 6-%} A*0 40%@>0@H0 6- AR0 \0%@p0Set Up Frame Listsz0%}9<@,0-@0-8,&@08<,-8,%$8,06-8<, A08<,0%}8<,%@0-@8,08<,%%@0 0!!8<,%8,%@0   0$2 Ins%}tall Interrupt Routines2@26-%@ A2 2%@26-%@ A3%}%@3%@36-%@ A"3%@,3%@636-%@ A@3%@%}J3%@T36-%@ A^3%@h3%@r3|3@3BB%}A3$ NFRAME DATA*NNumber of objects4N5HN33Number of Frames,Frame Size,Number of PlayersRN(Walk%}ing Man)\N 5,19,2fN(Tree Trunk)pN 1,52,1zN(Tree Top)N 1,26,1N (Truck)N 1,25,2N (Car)N 1,13,%}2R Frame data for Walking ManRFrame 1,Player 0R770,0,0,0,0,0,0,3,15,29,59,51,7,7,15,252,224,112,48&RFrame 2,P%}layer 00R990,0,0,0,0,0,0,1,7,15,31,55,55,7,111,125,248,192,193:RFrame 3,Player 0DR;;0,0,0,0,0,0,3,7,15,31,31,31,31,22%}2,254,251,231,206,15NRFrame 4,Player 0XR==1,3,3,3,1,7,15,31,30,62,62,63,63,60,124,120,112,112,252bRFrame 5,Player 0%}lR::0,0,1,1,1,0,7,31,31,31,31,31,15,15,13,31,123,112,124vRFrame 1,Player 1RHH0,28,62,62,62,28,240,240,240,240,251,25%}5,220,192,192,227,118,60,24RFrame 2,Player 1RKK0,0,56,124,124,124,56,224,224,224,224,246,254,192,128,192,224,224,248%}RFrame 3,Player 1REE0,112,248,248,248,112,192,192,128,128,128,224,224,0,0,0,0,0,128RFrame 4,Player 1R55192,224%},224,224,192,0,0,0,0,0,0,0,0,0,0,0,0,0,0RFrame 5,Player 1RII0,224,240,240,240,224,128,128,128,128,176,240,0,128,192,1%}28,192,0,0UFrame data for TreeUPlayer 2,Tree TrunkVNN2,2,132,128,64,0,149,165,210,211,219,251,255,254,126,126,12%}6,126,126,126VUU126,126,126,126,126,126,126,126,126,122,126,126,126,126,126,126,126,126,126,126V55126,126,126,126,126,1%}26,126,126,255,255,219,137"VPlayer 3,Tree Top,VQQ24,24,60,60,126,126,126,255,255,255,255,255,255,255,255,255,255,255,25%}5,1266V126,60,60,60,24,24TVFrame data for Truck^VPlayer 2,Truck CabhVBB0,0,0,0,0,15,25,17,17,17,17,17,31,31,255%},255,255,255,255,255rV255,255,255,28,28|VPlayer 3,Truck BodyVUU255,255,255,255,255,255,255,255,255,255,255,255,255%},255,255,255,255,255,255,255V255,255,255,12,12VFrame data for CarVPlayer 2,Car backV..7,9,17,17,17,31,63,12%}7,255,255,255,56,16VPlayer 3,Car frontV22192,64,32,32,16,248,255,255,255,254,255,28,8YCharacter Set DataY 38%}646Y0,3,15,31,63,63,127,127Y##0,192,240,248,252,252,254,254Z127,127,127,63,63,31,15,7 Z%%254,254,254,252,252,2%}48,240,224Z4,31,4,31,4,4,4,4Z48,48,48,63,54,54,54,54(Z3,3,3,3,3,3,3,32Z%%255,195,219,219,219,219,219,219A}:,9$dInitializenGG;@,;@,9@,9@,;@,;@,x6.>:@4,?6-A}6-'6-@36-?6- " ABegin Printout%% @ DIM $A}()% 6-6-%@%!A6-%@%% @ $()= -6-%@A}!A-"6-%-"@4)"AUA`/ 6.>:,%7@<@,4E/ @` @A} A@ @ "@4(68,-66-%@@ A 68,-6-%@ "( @6A}-%@( A, @Verify Accuracy of DataH 0 "} - Please recheck your data.>  I getA} H AInsert Quotes"A-&@6-%@66 @ $(A}8,,8, )=CHR$(34)& X""Insert End of Line Characterb"Al-&@v6-%A}@77 @ $(8,,8, )=CHR$(155)  ##Choose and Open Output Device*'' } A}ǠҠ4-- %Please enter the storage device:>  E = Screen EditorH  D = DiskR  CA} = Cassette\)-@@%  (E,D,C): )f A`p 6-B:,z67%@,.:67%@,.6A}7B:,%@,..STR @@ B/7@<@,4D/  Writing to $A}D1:STRNGLDR.BASSTR @@ B/7@<@,4D/  Writing to $@