lm""CODEBYTEAHALDUMMBYTLHHITMISSESPACBASPPCCLOOTTYYXXWAICLEAIMAGLINBLASEXPLODAT@bA&?D%eyA@c @H @ AR A6B6BA3A@AAyRI@t@@@EAB @@ @!@"re"0(V@ll... S A U C E R L A U N C H ... by Mike DoughertyFrom Nov/81 ϛkkӺ Use joystick #1 to aim the laser cannon cross hair at the launching saucers.rrThe laser fires automatically when a target is in your sights. To win you must destroy at least\\60 percent of the robot saucers. Otherwise your Starfleet will be destroyed.d;A,;@, +AR@... LOAD USR FUNCTION# 6-C:,#ADDR OF USR FUNCTION 6-P:'AV, HIGH BYTE6-&$AVLOW BYTE  Loading USR function. ALOAD FUNCTION Loading USR data base. ALOAD DATA BASE$%%2.## Press trigger to continue.816-H:@,'T:,1 AB A ... READ/POKE USR$"$READ A BYTE OF OBJECT CODE 4..$4**A% A%CONVERT BYTE$ TO BYTE 6-%@ A... RELOCATE ADDRESS... RELOCATE ADDRESS/" A6-%"' A/6-%,5!AU6-&AV+6-%@5 A$25 6-%@+6-%@5 Axy... BYTE$ --> BYTEz6-6-@:7@,, AP6-@:7@,, AP$' @X'6-$@%&@H'!@W'6-$@%&@U"2@@"$... USR OBJECT CODE68,F0,0A,C9,07,F0,07AA,68,68,CA,D0,FB,6068,8D,01,06,68,8D,00,0668,8D,03,06,68,8D,02,0668,68,8D,04,0668,68,8D,05,0668,68,8D,06,0668,68,8D,07,0668,68,8D,08,06A9,01,85,CE... MAIN USR LOOP20,**,9F,00,F0,0E20,**,60,00,AD,0C,D0##D0,0F,20,**,0A,01,4C,**,3B,00 A9,00,85,D4,A9,00,85,D5,60 A9,01,85,D4,A9,00,85,D5,60!!... MOVE PLAYER SUBROUTINEAD,00,06,85,D0AD,01,06,85,D1A2,00,AD,00,D3,29,0F##85,CF,29,01,D0,03,20,**,2D,01##A5,CF,29,02,D0,03,20,**,16,01##A5,CF,29,04,D0,03,20,**,5D,01##A5,CF,29,08,D0,03,20,**,45,01 BD,0B,06,A8,A2,40"20,**,F8,00,60$&!!... MOVE TARGET SUBROUTINE'*06,CE,D0,04,A9,01,85,CE,AD,02,06,85,D0.AD,03,06,85,D1,A2,010//AD,04,06,25,CE,F0,06,20,**,2D,01,D0,01,602//AD,05,06,25,CE,F0,06,20,**,16,01,D0,01,604//AD,06,06,25,CE,F0,06,20,**,45,01,D0,01,606//AD,07,06,25,CE,F0,06,20,**,5D,01,D0,01,608A2,01,BD,0B,06,A8,4A,4A:29,38,AA,20,**,F8,00<A9,01,60@A!!... MOVE OBJECT SUBROUTINEBFA9,08,8D,0D,06HBD,0E,06,91,D0,E8,C8JCE,0D,06,D0,F4,60LN... DELAY SUBROUTINEPRAC,08,06,A2,05,CA,D0,FDT88,D0,F8,60VX... DOWN SUBROUTINEZ\BD,0B,06,C9,BA,F0,0D^FE,0B,06,EA,EA,A8`A9,00,91,D0,A9,01,60bA9,00,60df... UP SUBROUTINEhjBD,0B,06,C9,1C,F0,0ElDE,0B,06,18,69,07,A8nA9,00,91,D0,A9,01,60pA9,00,60rt... RIGHT SUBROUTINEvxBD,09,06,C9,CC,F0,0EzFE,09,06,BD,09,06|9D,00,D0,EA,EA,A9,01,60~A9,00,60... LEFT SUBROUTINEBD,09,06,C9,2D,F0,0EDE,09,06,BD,09,069D,00,D0,EA,EA,A9,01,60A9,00,60.. ... LOAD USR DATA BASE )6-AP)BASE ADDRESS OF TARGETS"4..$0+ A!6-%@+ A lm... TARGET PATTERNSnp00,00,00,08,1C,00,00,00r00,00,00,18,3C,18,00,00t00,00,18,24,3C,18,00,00v00,00,1C,2A,3E,1C,00,00x00,08,1C,2A,3E,1C,08,00z00,1C,3E,55,7F,3E,1C,00|00,1C,3E,55,7F,7F,1C,08~00,3C,7E,A5,FF,FF,7E,18... CROSS HAIR AIM00,38,10,92,FE,92,10,38... EXPLOSION PATTERNS00,00,24,18,18,24,00,0081,42,2C,A6,65,3C,42,8110,00,44,90,02,10,02,8900,00,00,00,00,00,00,00..... INITIALIZE THE PLAY6-6-. +@AR@.SET HIGH RES" Ap"DRAW REST OF WORLD*AY@b*SET PLAYFIELD SIZE4A@4COLOR REGISTER FOR PLAYER #04A@$4COLOR REGISTER FOR PLAYER #1*6-F:A,&@*GRAPHICS PAGE 6BBy6PLAYER/MISSILE BASE ADDRESS REGISTERUB2w@UENABLE PLAYER MISSILE GRAPHICS DIRECT MEMORY ADDRESS REGISTER )B2V)SIZE OF PLAYER #0*)B2W)SIZE OF PLAYER #14'6-@$AV'USR DATA BASE>16-$AV%A$1BIT MAP FOR PLAYER #0H16-$AV%A1BIT MAP FOR PLAYER #1.6-A3%@ .INITIALIZE AIM6-A%@  ... GAME LOOP  -@A 0@@ 0"6-H:@,$@`%A0%@ 0"6-H:@,$@%Ap0%@ %%6-P:H:@,$AU%@, 6- %%6-P:H:@,$AU%@, %%6-P:H:@,$AU%@, B2HF:%@ , B2IF:%@,H 0B2x0INIT COLLISION REGISTERh'@w'NO ATTRACT MODE&"-@H:@,$@P& 0I%2@@I2@AU&@@b'6-A&'VARIABLE DELAY LOOP6-?:C:,<<<<<<<,"@ AP " A`\   f 6-%6-%+@&,p&&  Targets HIT:  MISSED: z33  Percentage: P:'+%,$A,'@% $%... ROIND OVER&.i%2G2@i2@8&B2w&NORMAL DISPLAYV# @` A# A ` A A ... HIT THE TARGET$6-%@$6-%F:%@, -@@6@0@@$@''2@P@$@''2@@`$@-@%F:,6-%@  G%2G2@0@@$pq... MISSED THE TARGETrz6-%F:%@,-@%%%2A@@ %%2$XY... DRAW LAUNCH BASEZb @l',@AY'/A`Av',A0AY'/A`A',AF'/A`A',AAF'/A`A',A '/A`A',AA '/A`A',A6'/AA6',A!'/AA!',A'/AA',A'/AA',A'/AA ',A'/AA',AY'/AAY </A'/9/AY<$@A... MISSION FAILED !!!BJ4  4 &S T A R F L E E T S U R R O U N D E DO%%2@A@@T-@@^%%6-P:H:@,$@,%@`A"6-H:@,$A%@PA6-H:@,$@P%@h55-@6+H:@,$@%@,r2@w0@|//,%H:@,$@%H:@,$@~//,%H:@,$@%H:@,$@  G%2G2@A@@0@2  2 "% -- M I S I O N A B O R T E D-@AP %%2@ +AR@/ / $Well HOTSHOT, ... want to try again?% % Press trigger to continue."T:," A@ $(#)#... MISSION SUCCEEDED*#2#+  + % -- MISSION WELL DONE.<#-@@F#33-H:@,$A%A@6@P#2@@Z#0@@'@ d# n# x#%%2# +AR@#"" Press trigger to continue.#"T:," AT$$ D:SAUCERL