@L|}6CD l0C)HCC WhL/h `CmCDiD`  R@W1  Y0@R !L` D  C D     )16CS S)  C)D1 p p 0 C9DI pCDL~CiCDiD` D  C D     )16CS S)  C)D1 p p }0 C9DI pCDL~CiCDiD` DD˙` d J)L !}D L(( LL()  L| L( S LH 0p n  } CY?  q  L L  ` )} `A! d߰")-݆ "  $G@LLL&0") $G% }H0 3S8`G ȱG ȱG   Gȭ Gȭ GG}GHiH8(()) G$H% `(0 })8` d)L ݆ & LGȘ ݆LL d  ! LL d)N>Q  HH) }  hyhyB q L> Lm JJ  Ln*` dB%' }8  H H` 1 { LL   !L     Hh SY?  q  1L }  !? S   q 1 L   Ll  Lg E`L   !L)  q 1L}) `L0AM݊L݉ ML  N݆LLLNLMLHG!@}1F GȱGLLEEȩÑEȑEEȑE Ed E7EȩE  q} L !,0,0SGɛ L 1 !L EHEh W G gLLSROTCES EERF } G) *Gȩ GȽG GȌd q q G`  8   0G  `D}CEDC0X:Ȣ Y ȱC* ? 0.. , 0%n ?A[ 0 : L`L  `, 0`Y}`piH n0)բY? 08`0 }  0$L GGȽG L `8L`L}8`  05G)݁,G)ȱGȱGHh0})Hh` B! 8`8iiiLE`}E8FEh( l0`ɃLL L8^~jj8jHi hEEEiEȱEiE` dTE} H8EEȱEEȩEh J E8   . m  i`LI!)E1FR}1LJ舩9GIH`LJJ`HGHh l`} S gL   8 rii `дCDCG W  }C  Lq` X٨`DOS SYS IIIIIIIIIIIIIIIC`0 ߩ0}}} HE |||DDOS DOSDOS SYS }}}}CDOS SYS} 0`BDELV !B }`LVUQ   ]   TU J ]L!T  #      TU  } L ? .  t`GBJ V~DEHI B V0dV!}QDEHI VF9 ,0 ,0 s0hhL  L` H hDHEh"}DEL8HI   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;DELV䌚 !B y`@ʆ 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 V (` 9 V⪍ ઍ  -'}LLu DEHILV 9 .l 9 .l  `` s$B VBH(}I|DE V BLV nB,DE J V* \*` B V BLVDEHI BLVL)}1u H232435; 1 ;  hh@2 e1i1LHҍ 00) 08 109hh@ Ҡ2e*}1i1232435ޥ<<8} 3E:}DISK OPERATING SYSTEM II VERSION 2.0SCOPYRIGHT 1980 ATARIA. DISK DIRECTORY I. FORMAT DISKB. RUN CARTRIDGE J. D,}UPLICATE DISKC. COPY FILE K. BINARY SAVED. DELETE FILE(S) L. BINARY LOADE. RENAME FILE M. RUN AT ADDRESSF. LOCK F-}ILE N. CREATE MEM.SAVG. UNLOCK FILE O. DUPLICATE FILEH. WRITE DOS FILES9!&x#!7&p))'&X*./)L''-؆莟.}R'S  vW DEHHI 1A#! @ ~0ɛ8A0.) ȅ 1 1i/}il ! 1L NO SUCH ITEMSELECT ITEM OR FOR MENU! 0 .{z:*{}.|~ 1 0 00}JB 18L^%|DLl%DIRECTORY--SEARCH SPEC,LIST FILE? # 0 0 n&|D! 1L NOT A DISK FILE1}N !B 1L " 1 !BDED:}:1BJ|DE 1DEBH2}I 1 h0ߢ 0.  0?詛 1 ~0YЛ 1 "L<" "L 3} BL1TYPE "Y" TO DELETE...DELETE FILE SPECCOPY--FROM, TO?OPTION NOT ALLOWED COPYING---DN:4}# 0|D .L$A#B#C#JB|DE 1BHIDD#E 1D#0: B5} 1L B#C#C#B# B 1N#$0SYS1}:e#D# d# D# .d#ȽD# d# 𩛙d#X# 1,A#6}PdD#ELO- A.BJdD#E 1 1HH 0hh|DL^%1}:e# Lt% e#dD#EL%7} 1 0 . .0% 1L WILD CARDS NOT ALLOWED IN DESTINATION 0 A.|K@C}//3Hu ξL/L DRIVE TO WRITE DOS FILES TO?WRITING NEW DOS FILESTYPE "Y" TO WRITE DOS TO DRIVE 1.?}D1:DOS.SYSERROR - NOT VERSION 2 FORMAT. , &* բ( 1L `[) 0NΞ 0 L1M) 1@} L BAD LOAD FILELOAD FROM WHAT FILE?) 0 0#B 1L WHAT FILE TO LOCK?) 0 0$B 1L WHAT FILE TO UNLOCK?DUA}P DISK-SOURCE,DEST DRIVES?TYPE "Y" IF OK TO USE PROGRAM AREACAUTION: A "Y" INVALIDATES MEM.SAV. h  ,B}  `)  <0 2 2 0  ,   ,,ޢ* 1L ,K* 1 ~0 0C}FINSERT BOTH DISKS, TYPE RETURNERROR - DRIVES INCOMPATIBLE., 1 ~038  , 1L D}, &*  Lz+, 0 , 1 ~0 + Y,0!,0 ,L+ ,mm  v,"ǭE}0Ξ, 05,Lt+L +,Hh` NOT ENOUGH ROOMINSERT SOURCE DISK,TYPE RETURNF}INSERT DESTINATION DISK,TYPE RETURN`    `L,8,0( rG}L1(`ߢ) 1* 1 ~0Y`hhL S SL1) 8`NAME OF FILE TO MOVE?- 0 0|DLtH}% A., 1 <0 0 .@L# .BJ 1  DEHIB V L1 ,5 1 <0,L. I} JB|,A#Pd#DE 1 HI BDEHHII 1 B 1 , 1 <0,0Lf- B VJ},A#P, 1 <0 0L#L ߢ) 1* 1 ~0Yj383}mm ݭK}}`8}``|* ? ɛ,`|:(|/ 1L `DESTINATION CANT L}BE DOS.SYS0 0H{ $22Δ $28/L /) $2 Π $2 0 ξM}hAΞB,0 J 1 BޝDEHI,HDE 1HIHIDELSAVE-N}GIVE FILE,START,END(,INIT,RUN)O X0 1`BDEPHI V` X0H 1 L O}0 0 1L0`PLEASE TYPE 1 LETTER,0`hhL <0 1L0LA1 ,;ɛ7,"ɛ:ݦ1ݥP}A"D|ݤD|ȩ:|ȩ|ɛ,,(/+.ީ1 1,ɛ`轤{Q}NAME TOO LONG B VL ` L1I H1EӝDL1|mDiE` V0`8d/8 i:"2!22 1R} L ERROR- 128ɛ+,' 20*.. өw2 1``2TOO MANY DIGITSINVALIDS} HEXADECIMAL PARAMETER800 0 8 00`,0'D800H,ɛh`2L1NEED D1 THRU D4uT} HEXADECIMAL PARAMETER800 0 8 00`,0'D800H,ɛh`2L1NEED D1 THRU D4uEiͩkΩ͙kCop j`j {j`Hi͝Νh`V}L"UNEM:D"NURͩkΩ͙kCop j`j {j`Hi͝Νh`@ST6 D AXLPB0NZ  X} +AdAUuA@'A @9A@K@@]@@7c( Y}}uAR@++(#++(#| ANTIC MONTHLY DISK NOV. 1985 |++(# Z}(++(# @ -@A $ GG;@ [}@,;@ ,;@@,;A,;@,;@@, "D1:MENU" &&@@D:*.* 6,6." \} 6 @0i6-%@(6.7@<@,A67@ <@ ,..i67@<@ ]},.7@<@,3 6.|67B:,%@,.367B:,%@,.G67@<@,.(--@B:,:7 ^}<,4 G67<,..] 6.=:, @D67@<@,.7@<@,]67@<@,.0$ _}@(''7@<@,4FREE@- @ 2() <@F''7@<@,4FREE `}@K @ P(7@<@,)|U @0W'!-@6+'@,%@' |Z++(#| a} |[ ( |  |\++(#d**(" Select HELP.BAS for b} information.xAR[@@9'-@@#C( FILE NUMBERM A0Q[ B c}P:,A00"@&6.7@<@,0 AELB6.7+&@,$@%@<+&@,$@ d}%@,L B37@<@,4 36.7@<@,!7@<@,4DOS!.0 6.-@ e}B:,07<,4 AH67B:,%@,.7<,   6.! 6.D1:!67B:,%@,.?AR@'- f}@@"?  LOADING ? A@@91@@5%? BK-@@"- g} CANNOT RUN 7 @A BK A0D:MENUOC .TXT .TXTA0EN|DOC......TXT(... h}.TX58T6 D AXLPB0NZ  iwLINEAxx ;A ,;@,; (}@;@@ D:DOC.TXTj} A(@2lB:,!@-7@<@,4XXX0(3(E-@@"X( ӠΠ\b(}k}l @@<( @@da@ B*-@@"R("ΠҠՠҠˠҠVa%D:MENUl}D:HELPLINEAxx ;A ,;@,; (}@;@@ D:DOC.TXT WELCOME TO THE ANTIC MONTHLY DISK Most of the n}programs on this disk arewritten in Atari BASIC. Some requirespecial hardware or specific instruc-tions. We recommend you o}refer to thecorresponding issue of ANTIC forcomprehensive documentation. If youwish to order a back issue, or needsubscrip}ption information, contact usat (415) 957-0886 or, for credit cardorders, dial (800) 227-1617, Ex. 133.In California,(800)q} 722-3545, Ex. 133XXX * SPECIAL BONUS * >>> FOR ANTIC DISK SUBSCRIBERS <<(\(Type of DESTINATION file`/0@@! @`/6-"@#"} A@# A!) A((Filename&B:, @ A@& AP66(+"@}*7B:,&@(A(D(o(&Insert destination disk, press Ԡ F:B2y,@AD -@}6@,A0 : @`D BWWAA0AA AAAA}ApA!%# (} #(DISK DIRECTORY4AB&@@+AB)@4R}ESTON=@1@@D:*.*=6-@$$7@<@,0 A !!(} 7@<@,  ( 6-( Ap ( ( (@QAdAU((-( Press any k}eyQ(or RETURN for another directory&;#@@K:0)@;@0"AUA@:<}AdAU'AB&A9AB)@<$DH @`'(} (1) MicropainterH((2) Micro Illustrator/Koa}laN0((3) Fun With Art0((4) Paint (Atari)X/((5) Paint (Reston)/((6) Visualizerbc((7) Moviemaker0(}(8) Graphics MasterG((9) Atarigraphicsc((10) Graphics Machinel$v6. (MP TO MI COMPRESSED};7Av<Av,4;67Av<Av,.5l+67@<@,.7Av<Av,S67@<@,.}7Av<Av,l67@<@,. 67@<@ ,.W% #A!-@!@(%"67<,.>:,} !!0,0,155,155,155,155,162,255-@@`/6-$A(&@/6-$A'&A&G#67<%A&},.7<%A&,G67%A'<%A',.>:AU, ##67Aw<Aw,.>:A,##67Aw ,.7Av!<Av},. @@.(@ @$+@+@@ KEEP AN }MP FILE*(@@4$>;AB,HLOAD AN MI PICTURER #A\-A6AVf "} p zGG162,16,169,1,157,72,3,169,0,157,73,3,32,86,228,48,1,96,104,104,96@@6.6hBDEHI}  <OO67@U,.<    ĩOO67A,.:AU,QQ67A),.>`RɥPee`/eeGG67A},.4(eeЕee@@2 @@2AY}6-?:C:,,&&67Av<Av,.>:F:A,,D-@@67%Av<%Av,.>:F:A%,,}D *@+*AY@4 @`$+@+@@GET A MP/GM FI}LE$[%@@%%@3%@G%@@[%@ @0.*6-?:C:hhhLV,<@,}*@8$B,6-AH,@@LFWA to MPV- 6-C:,6-P:'AV,-6-&$AV`3}%@@%%@3%@j+%@@$+%@ @1t6-?:C:hhhLV,<@,~}@++67@<A@,.7Ac<ACB,++67A@<Av,.7ACY<AyX,++67Av<Av,.7@}<@,$: 6.67@,.+67Ay`,.:67@,.MP to FWA\\67@<@e,.Ay5}pppNP^^67@f<A2,.C}N`__67A3<A,.D}YY67A<Ab,.>Ahhhh@L_++67Ac<ACB,.7@<A@},++67ACY<AyX,.7A@<Av,67AyY<Ay`,. ++67@<@,.7Av<Av,M }@@?(@7@<Ay`,J@M$MP TO VIS( 6.2l+67@<@,.7}Av<Av,D67@<@,.l67@<@,.7Av<Av,<6-@F-@Af@}PE367<%@9,.7$@@&@9<$@@,A6-%@@E ZM @@?(@7@<}A3&,J@M$dVIS TO MPn- 6-C:,6-P:'AV,-6-&$AVx @@[%@}@%%@3%@G%@AT[%@ @*6-?:C:hhhLV,<@,*@}6-@S+67Av<Av,.7@<@,S67Av<Av,.7@<@,-A@};;67$@@%@<$@@%@@,.7<%@9,;;67$@@%@A<$@@%@,.7<%@9,}6-%@@ $MM TO MP- 6-C:,6-P:'AV,-6-&$AV+@+@@}[%@@%%@3%@G%@@[%@ @*6-?:C:hhhLV,<@,*}@-@A8@@@a6-@$&@967<%@9,.7<%@9,a67%@@<%@y,.7<}%@9," ,++67Av<Av,.7A8A<A8D,6$@MP TO MMJ267@,.#67A8V,.267@},.T-@AAvA`^6-'@&@Ph##67<%@y,.7<%@y,r |++67A8A<A8D},.7Av<Av,J @@?(@7@<A8V,J@$MP TO GM+@}+@@#(@ @#$AG TO MP A@[ 6. 367@<@},.7Av<Av,[67@<@,.7Av<Av,67Av<Av,.$MP TO AG[ 6. 367@}<@,.7Av<Av,[67@<@,.7Av<Av,67Av<Av,.+@+@}@(@267@,.#67Av,.267@,.&/$(@7@<A,/}@0$:0AB&@@'AB)@0RESTONDPAINT TO MPN- 6-C:,6-P:'AV,-6-&$AVX}+@+@@b[%@@%%@3%@G%@AD[%@ }@l*6-?:C:hhhLV,<@,*@v6.7@<@,J+67@<A2,.7@<A2,36.}J6.7@<A2,-@A2@@a6-@$&@967<%@9,.7<%@9,a67%@@}<%@y,.7<%@9, ++67Av<Av,.7@<@,'AB&A'AB)@$0}AB&@@'AB)@0RESTONMP TO PAINT267@,.#67A2,.267@,.6.7Av}<Av,-@AAbA`6-'@&@P##67<%@y,.7<%@y,  A 6.6.}267@<@,. @1(D(3(p0nHA67@,. J @@?(@7@<A2,J@}*'AB&A'AB)@4$>+@+@@H0"(@7@<Av,-}@0$ D:CONVERT.BASIMAAADHADLFLSRDESFCOUNMAINJNCNN 10 ;CODEWRITER III20 ;BY STEVE STUNTZ30 ;(c) 1985, ANTIC PUBLISHING40 ;50 *= $800055 START60 MEM = $B070 VT}BASE = $E40080 SETVBV = $E45C90 PACTL = $D3020100 PORTA = $D3000110 AUDC1 = $D2010120 CH = $02FC0130 CDTMA1 = $0}2260140 ROWCRS = $540150 COLCRS = $550160 VDSLST = $02000170 NMIEN = $D40E0180 SDLSTL = $02300185 ATRACT = $4D0190 MEM}INT = $B40200 MEMRX = $B20210 JSR HEAD10220 LDA #$380230 STA PACTL0240 LDA #$010250 STA PORTA0260 } LDA #$3C0270 STA PACTL0280 LDA #$010290 STA PORTA0300 LDA SDLSTL0310 STA MEMINT0320 LDA SDL}STL+10330 STA MEMINT+10340 LDA #$820350 LDY #120360 STA (MEMINT),Y0370 LDY #280380 STA (MEMINT)},Y0390 LDA #RXLOOP&2550400 STA VDSLST0410 LDA #RXLOOP/2560420 STA VDSLST+10430 LDA #$FF0440 STA} POINTRI0450 STA POINTRO0460 LDA #$200470 STA CWSPC0480 LDA #$400490 STA CWMAX0500 LDA #$0F051}0 STA CWAVG0520 LDA #$000530 STA I23X370540 STA HILO0550 STA NBITS0560 STA RXCW0570 STA IAM}REDI0580 STA CTAVG0590 STA CWTOT0600 STA CWTOT+10610 LDA #20620 STA PREVHILO0630 LDA MRX0640 } STA MEMRX0650 LDA MRX+10660 STA MEMRX+10670 LDA #$C00680 STA NMIEN0690 ;0700 ;SEARCH FOR KEYBOARD CH}ARACTER0710 LP1 JSR RXCH0720 JMP LP10730 ;0740 ; DEVICE HANDLER0750 GOVEC CPX #60760 BNE GOV10770 LDY ROWC}RS0780 CPY #230790 BNE GOV10800 LDY COLCRS0810 CPY #390820 BNE GOV10830 LDY #10840 STY I23}X370850 GOV1 TAY 0860 LDA VTBASE+1,X0870 PHA 0880 LDA VTBASE,X0890 PHA 0900 TYA 0910 RTS 0920} ;0930 ; SCROLL0940 SCROLL LDY I23X370950 CPY #10960 BNE SCROL10970 JSR HEAD30980 LDY #00990 STY I}23X371000 SCROL1 RTS 1010 ;1020 ; RX WORD WRAP1030 RXWRA LDY COLCRS1040 CPY #341050 BCC RXWR91060 CPY #39}1070 BEQ RXWR91080 RXWR1 LDA #$A01090 JSR RXPNT1100 LDY COLCRS1110 CPY #391120 BNE RXWR11130 RXWR9 }RTS 1140 ;1150 ;SET PIN1 AND SOUND1160 ONOFF CMP #$021170 BNE OFF1180 LDY #$001190 STY PORTA SET PIN1 LOW}1200 LDY #$2F1210 STY AUDC1 TURN SOUND ON1220 JMP ONOF11230 OFF LDY #$011240 STY PORTA SET PIN1 HIGH}1250 LDY #$001260 STY AUDC1 TURN SOUND OFF1270 ONOF1 RTS 1280 ;1290 ;HEADING1300 HEAD LDY #$001310 STY C}OPYI1320 CR1 LDA COPYR,Y1330 LDX #61340 JSR GOVEC1350 INC COPYI1360 LDY COPYI1370 CPY #381380 }BNE CR11390 RTS 1400 ;1410 ;SET CURSOR AT 0,01420 HEAD00 LDA ROWCRS1430 STA ROW1440 LDA COLCRS1450 STA} COL1460 LDA #$001470 STA ROWCRS1480 LDA #$021490 STA COLCRS1500 RTS 1510 ;1520 ;SET CURSOR AT ORI}GINAL POSITION1530 HEADORG LDA ROW1540 STA ROWCRS1550 LDA COL1560 STA COLCRS1570 LDA #$1E1580 LDX #}61590 JSR GOVEC1600 LDA #$1F1610 LDX #61620 JSR GOVEC1630 RTS 1640 ;1650 ;KEYBOARD HEADING1660 HE}AD1 JSR HEADCLR1670 JSR HEAD1680 RTS 1690 ;1700 ;CHANGE SPEED HEADING1710 HEAD3 JSR HEAD001720 JSR HEAD173}0 JSR HEADORG1740 RTS 1750 ;1760 ;1770 HEADCLR LDA #$7D1780 LDX #61790 JSR GOVEC1800 RTS 1810 ;1}820 ; RX INTERRUPT LOOP1830 RXLOOP = *1840 PHA 1850 TYA 1860 PHA 1870 JSR CWCOUNT1872 LDA #01874 } STA ATRACT1880 LDA PORTA1890 AND #$021900 CMP PREVHILO1910 BNE RI11920 JMP RI21930 RI1 JSR CHANG}E1940 RI2 PLA 1950 TAY 1960 PLA 1970 RTI 1980 ;1990 ; RX CW COUNT BY 12000 CWCOUNT LDY POINTRI2010 LD}A (MEMRX),Y2020 CMP CWMAX2030 BEQ RC12040 CLC 2050 ADC #$012060 STA (MEMRX),Y2070 RC1 RTS 2080 ;2}090 ; DETECT CW CHANGE2100 CHANGE INC POINTRI2110 LDA PREVHILO2120 JSR ONOFF2130 EOR #$022140 STA PREVHI}LO2150 LDY POINTRI2160 LDA #02170 STA (MEMRX),Y2180 RTS 2190 ;2200 ;2210 ; RX CHARACTER FROM PIN 2222}0 RXCH JSR READY2230 LDA IAMREDI2240 CMP #12250 BNE RX022260 INC POINTRO2270 JSR COUNTAVG2280 L}DA #12290 EOR HILO2300 STA HILO2310 CMP #12320 BNE RX012330 JSR SHIFT2340 JMP RX022350 RX01 JS}R FINDCH2360 RX02 RTS 2370 ;2380 ; SHIFT ROR BUILD NBITS2390 SHIFT LDA NBITS2400 CMP #72410 BEQ SHIFT92420 } INC NBITS2430 LDY POINTRO2440 LDA (MEMRX),Y2450 CMP CWAVG2460 BCC SHIFT12470 SEC ;DASH2480} JMP SHIFT22490 SHIFT1 CLC ;DOT2500 SHIFT2 ROR RXCW2510 SHIFT9 RTS 2520 ;2530 ; READY TO READ COUNT2540 READY }LDX POINTRO2550 CPX POINTRI2560 BEQ READY12570 INX 2580 CPX POINTRI2590 BNE READY22600 LDY POIN}TRI2610 LDA (MEMRX),Y2620 CMP CWMAX2630 BEQ READY22640 READY1 LDA #02650 JMP READY32660 READY2 LDA #12}670 READY3 STA IAMREDI2680 RTS 2690 ;2700 ; FIND CW CHARACTER2710 FINDCH LDY POINTRO2720 LDA (MEMRX),Y2730 }CMP CWAVG2740 BCC FIND092750 JSR FINISHCH2760 JSR LOOKASCI2770 LDY POINTRO2780 LDA (MEMRX),Y2790 } CMP CWSPC2800 BCC FIND092810 JSR RXWRA2820 LDA #$A02830 JSR RXPNT2840 FIND09 RTS 2850 ;2860 ; PRINT }RECEIVED DATA2870 RXPNT LDX #62880 JSR GOVEC2890 JSR SCROLL2900 RXPN1 RTS 2910 ;2920 ; FINISH RXC2 CHARACTER29}30 FINISHCH SEC 2940 ROR RXCW2950 INC NBITS2960 FINISH1 LDA NBITS2970 CMP #82980 BCS FINISH92990 CL}C 3000 ROR RXCW3010 INC NBITS3020 JMP FINISH13030 FINISH9 LDA #03040 STA NBITS3050 RTS 3060 ;3070} ; LOOKUP AND PRINT CHARACTER3080 LOOKASCI LDX #403090 LOOK1 LDA CWCHA,X3100 CMP RXCW3110 BEQ LOOK33120 INX }3130 CPX #913140 BEQ LOOK23150 JMP LOOK13160 LOOK2 LDA #633170 JMP LOOK43180 LOOK3 TXA 3190 LOOK4 EOR }#$803200 JSR RXPNT3210 RTS 3220 ;3230 ; COUNT FOR AVERAGE3240 COUNTAVG LDX CTAVG3250 INX 3260 CPX #16}3270 BEQ COUNTA13280 INC CTAVG3290 LDY POINTRO3300 LDA (MEMRX),Y3310 CLC 3320 ADC CWTOT3330 } STA CWTOT3340 LDA #03350 ADC CWTOT+13360 STA CWTOT+13370 JMP COUNTA23380 COUNTA1 JSR CALCAVG3390 COUNT}A2 RTS 3400 ;3410 ; CALCULATE AVERAGE3420 CALCAVG CLC 3430 ROR CWTOT+13440 ROR CWTOT3450 CLC 3460 ROR }CWTOT+13470 ROR CWTOT3480 LDA CWTOT3490 STA CWMAX3500 CLC 3510 ROR CWTOT3520 LDA CWTOT3530 } STA CWSPC3540 CLC 3550 ROR CWTOT3560 LDA CWTOT3570 STA CWAVG3580 CLC 3590 ROR CWTOT3600 L}DA CWTOT3610 CLC 3620 ADC CWSPC3630 STA CWSPC3640 LDA #03650 STA CWTOT3660 STA CWTOT+13670 } STA CTAVG3680 RTS 3690 ;3700 ;ROM DATA3710 COPYR3720 .BYTE " Codewriter III BY STEVE STUNTZ "3730 MRX .W}ORD MEMRX13740 CWCHA3750 .BYTE 0,0,0,0,0,0,0,03760 .BYTE 0,0,0,0,0,0,0,03770 .BYTE 0,0,0,0,0,0,0,03780 .}BYTE 0,0,0,0,0,0,0,03790 .BYTE $FE,$003800 .BYTE $00,$00,$00,$00,$00,$003810 .BYTE $6D,$6D,$22,$2A,$73,$68382}0 .BYTE $6A,$29,$3F,$3E,$3C,$383830 .BYTE $30,$20,$21,$23,$27,$2F3840 .BYTE $47,$55,$FF,$31,$FF,$4C3850 .B }YTE $00,$06,$11,$15,$09,$023860 .BYTE $14,$0B,$10,$04,$1E,$0D3870 .BYTE $12,$07,$05,$0F,$16,$1B3880 .BYTE $0A, }$08,$03,$0C,$18,$0E3890 .BYTE $19,$1D,$133900 *= CWCHA+$01003910 ;3920 PND = * ; END OF BOOT FILE3930 ; }*=$10003940 COPYI *= *+13950 ROW *= *+13960 COL *= *+13970 MEMRX1 = *3980 *= *+$01003990 POINTRI *= *+14000 POI }NTRO *= *+14010 CWMAX *= *+14020 CWSPC *= *+14030 CWAVG *= *+14040 PREVHILO *= *+14050 HILO *= *+14060 NBITS *= *+1407 }0 RXCW *= *+14080 IAMREDI *= *+14090 CTAVG *= *+14100 CWTOT *= *+24110 I23X37 *= *+14120 RXINDX *= *+14122 *= $02E}04124 .WORD START4130 .END 30 ;(c) 1985, ANTIC PUBLISHING40 ;50 *= $800055 START60 MEM = $B070 VT& &8өө<өӭ01 ?䄍儩 焩@愩脩ꄍ넍섍턍鄭߂!} LzT U'񄨽HH` -`U"' U'` Ӡ/LဠӠ`ჹ წ!}&`T⃥UラTU`⃅TヅU  ` 7 ` `} `HH ]M)LY mhh@䄱i`!}䄭 ƀI鄬䄩` Ɓ QMꄍ L `넬儱脐8Ln`䄱L偩`!}儱脐  3󂂬儱焐 ` `8n넭 nL`( [L5?LKI `儱m!}mLv w`nnnnnnnm焍焩` Codewriter III BY STEVE STUNTZ !};mm"*shj)?><80 !#'/GU1L     鄭߂ f23SSFAFFFXYSBVBXYB1B2CHBAS@@A A@@%}A ` @2 @P @P@@BA@@%}@B$@VAMPIRE RATS!BY TOM ZARBOCK (c) 1985, ANTIC PUBLISHING B  ACTIONSM6%}-R:,!6-R:@,76-8%@%8,,M6-8%@%8,,PLYR 1 NEW FACING? !@API%}@%,$T:,"$6-@PLYR 1 MOVES OR JMPS? !!@*@APt'6-@%}"@'6-@3 APt31%8<,$%8@<,$@2APts @2,(6%}-%8<,$=6-%8@<,$I@%O,aB7a@sB7a6-&@$+"@,%}PLYR 1 BITES? & WHO? %%1%8<,%8@<,]!A* A%6-@/@2O,%8<,%}%8@<,]6-%@i!@A* @P'6-&@56-%@GAAVi2@@@%}@OPLYR 2 NEW FACING? P!@ARZ@B%,_$T:@,"$6-@cPL% }YR 2 MOVES OR JMPS? d!!@*@ARYi'6-@"@'6-@n3 ARY31%8<,$%!}%8@<,$x@2ARYs @2,(6-%8<,$=6-%8@<,$I@B%O,aB%"}7a@sB7a6-&@$+"@,PLYR 2 BITES? & WHO? %%1%8<,%8@<,%#}]!A* A%6-@/@2O,%8<,%8@<,]6-%@i!@ * @'6-&%$}@56-%@GA Ai2@@@@ UPDATE BLOOD LEVEL PLAYER 1 A%%}!@Ah%,36-&@A6-&@A @A%,36-%@A6-%@%&}' 6-'6-@%!@6-@% A"&A`%P:%?P,&,IPLAYER%'} 2 ^A!@Ah%,@36-&@A6-&@hA @A%,@36-%@A6-%(}%@j' 6-'6-@l%!@6-@% ArA`%,@|6-&?%)}6-&?  RANDOM VICTIMS  F:B7p,!@ AY@c%6-P:@$H:,%@,G6-P:%*}@$H:,%@,O1c@2AY ;#P:@$H:,,%A),;@w4!!SOUND%+}S >E2@@-6-&@9 E6-HG%2@@%,}G2@@\a)AAP&@$+!@,OA A&@$+!@,aB7h%-}Ap AP(# GAME ENDS -#%2G2@%.}i2@2@AAPA AF# @2,%/},P#?6-@6-6-'"@36-@B96-?6-Z#+-@@+-@d#! %,%0}  !#Ax# ""6@Ap#g2@@C2@%@@@Y-@%1}'@] g A#cc237,100,177,100,140,100,117,200,140,100,117,200,140,100,117,200,140,100,177,300,177,500,-1,-1%2}6$G%2G2@;$k-@5(@%3}GAYA@kA@@$##T:,*T:@,AE$6-6-J$ BP%4}UINITIALIZE TV..9@,9@<@,9@ ,V #B"V(-@"$68%5},-( V((0,0,0,0,0,1,1,1,0,-1,-1,-1,0,0,0,0V+-@+-@V"68<,-  V0,%6}1,1,1,0,-1,-1,-1V-1,-1,0,1,1,1,0,-1V(-@ "$68,-( V7,0,1,2,3,4,5,6,7,0Y BpaC%7}USTOM CHARACTER SET a9F:A6,"AT/6-F:A6,$AV9 BQPai$6-+F:AB,&@,$AVAAB%8}F:AB,&@UA6'AViAV'AVa=-A*%F:BsD%,. =MOVE ROM SET b%9})-%@%A"%) >b)+@%@)AV'AVHbCUSTOM CHARACTER DATA Rb0,0,0,0,0%:},0,0,126Sb0,0,0,0,0,0,126,126Tb0,0,0,0,0,126,126,126Ub0,0,0,0,126,126,126,126Vb0,0,0,126,126,126,126,126Wb!!%;}0,0,126,126,126,126,126,126Xb##0,126,126,126,126,126,126,126Yb%%126,126,126,126,126,126,126,126Zb0,0,0,0,0,0,0,0\b!%<}!40,56,40,146,124,56,124,130fb4,40,37,154,120,118,48,8pb!!136,80,119,122,119,80,136,0zb8,48,118,120,154,37,40,4b%=}65,62,28,62,73,20,28,20b16,12,158,30,89,164,20,32b0,17,10,238,94,238,10,17b32,20,164,89,30,110,12,16b0%>},127,68,68,79,124,75,74b0,255,34,34,255,72,255,0b0,254,34,34,250,30,234,74b74,74,78,74,122,74,78,122b74,2%?}02,46,26,250,18,254,0b74,75,122,76,79,72,127,0b##108,84,254,68,124,126,219,215c12,24,48,113,127,63,99,0c##12,%@}138,207,252,254,124,40,108c0,69,213,247,127,62,0,0eDRAW ARENA euAAP'A A%A}9AA@KAA]A@i6-@u6-@es AF,@)AG;/@%B}EAHW,@aAIs/@@e; AP,@@)AG;/@@%C}e; AQ,@@)AI;/@@e; @,@)@@;,@@eU %D}Ah,@1/C,@@U/@e]6-@6-@'6-@36-%E}@=@C,M@BS,] APxiTITLE SCREEN i3+@%@'A@H36-@%F}iu%2AP@@G2@AQ@@i2@AR@@u6-@i%G}V-@@!@B-,A/@&@VAF:B7p,iS-@@1(@%H} ӡS(T:,)(T:@,Bqi- ,-/@&@i iV-@@!@B%I}-,@A/@&VAF:B7p,iaB7h6-%@)"@@56-a6-@$+@%J},%@$+@,i- ,@-/@&iS-@@1(@ŠӡS(T%K}:,)(T:@,Bqi  Bp i%2G2@i2@%L}{A@P BP@j$ D:VAMPRAT.BASA A@@$R10 ; FAST MOVES, LISTING 220 ; BY PATRICK DELL'ERA30 ; (c) 1985, ANTIC PUBLISHING40 ;0100 ; EQUATES0110 ;0120 RUNAD = $)N}02E0 ;Auto run addr0130 MEMLO = $02E7 ;Lower limit of0140 ; ; free memory0150 DOSVEC = $0A ;Addr jump)O}ed to0160 ; ; when DOS called0170 DOSINI = $0C ;Initialization0180 ; ; addr for DOS0190 VV)P}BLKD = $0224 ;dlyd vbi vctr0200 SETVBV = $E45C ;set vbi0210 VKEYBD = $0208 ;Keyboard vctr0220 SKSTAT = $D20F ;Keyboard)Q} status0230 KBCODE = $D209 ;Pokey rgstr0240 CH = $02FC ;Current key--0250 ; ; KBCODE shadow0260 CH1 =)R} $02F2 ;Previous key0270 ATTRACT = $4D ;Atct mode flag0280 SRTIMR = $022B ;Auto-Repeat tmr0290 UP = $8E ;Har)S}dware codes0300 DOWN = $8F ; for key0310 LEFT = $86 ; pressed0320 RIGHT = $87 ;0330 DUMMY = $FF ;Variab)T}le byte0340 ADDR = $FFFF ;Variable word0350 ;0380 ;0390 *= $1D7C ;End of resident0420 ;0430 ;0440 DBOUNCE .B)U}YTE 10450 FASTFLG .BYTE $FF0460 TABLE0470 .BYTE UP,DOWN,LEFT,RIGHT0480 FAST.MOVES0490 TXA ;OS has alread)V}y0500 PHA ; saved reg A,0510 ; ; we also save X0520 LDA KBCODE ;Get key pressed0530 LD)W}X #4 ;Then search0540 ; ; TABLE for a0550 ; ; match0560 SEARCH0570 DEX 0580 STX)X} FASTFLG ;Save index into0590 ; ; TABLE0600 BMI NONE ;End of table...0610 CMP TABLE,X ;Found a ma)Y}tch?0620 BNE SEARCH ;No,keep looking0630 STA CH1 ;Key is a cursor0640 STA CH ; control, so0650 )Z}LDA #$0F ; update current0660 STA DBOUNCE ; and previous0670 STA ATTRACT ; key pressed,0680 PLA ; s)[}et our delay0690 TAX ; timer, reset0700 PLA ; attract mode0710 RTI ; and go back0720 )\}NONE0730 PLA ;No matches so0740 TAX ; let OS have key0750 VKEYBD.SAVE = *+10760 JMP ADDR ;)]}Addr is modi-0770 ; ; fied by INIT0780 ; ; to point to0790 ; ; OS's handler0800)^} ;0810 ;0820 ;The addr for REINIT is stored0830 ;in DOSINI. SYSTEM RESET will0840 ;come through here and then0850 ;thro)_}ugh INIT2 to re-establish0860 ;Fast Moves.0870 ;0880 REINIT0890 JSR ADDR ;Address is0900 ; ; change)`}d to0910 ; ; DOSINI vector0920 ; ; by INIT0930 ;0940 ;After returning from the0950 ;DOS init)a}ialization, we have to0960 ;re-establish the vectors in0970 ;DOSINI, and DOSVEC. In this way0980 ;we make Fast Moves "pers)b}istent".0990 ;1000 INIT21010 LDA # REINIT1040 STA DOSINI+11050 L)c}DA # CALL.DOS1080 STA DOSVEC+11090 ;1100 ;Move lo mem up to create safe)d}1110 ;place for Fast Moves.1120 ;1130 LDA # FINIS1160 STA MEMLO+11170 ;)e}1180 ;Insert Fast Moves into the1190 ;keyboard service routines.1200 ;1210 LDA # FAST.MOVES1240 STA VKEYBD+11250 ;1260 ;Install our vertical blank1270 ;routine the safe way, through1280)g} ;the OS routine for setting1290 ;vertical blank routines!1300 ;1310 LDA #71320 LDX # >VBLANK1330 LDY # 0,1970 ; )~} ; all done1980 VBLANK.31990 LDA FASTFLG ;Equals $FF if2000 BMI VBLANK.1 ; not cursor ctl2010 LDA )}SKSTAT ;Bit 3 is on if2020 AND #4 ; key is still2030 BNE VBLANK.1 ; held down2040 LDA #6 ;If timer )}has2050 CMP SRTIMR ; already been2060 ; ; set with 62070 ; ; (Fast Moves'2080 BCS VB)}LANK.2 ; speed),branch2090 STA SRTIMR ;Else, set timer2100 VBLANK.22110 DEC SRTIMR ;Subtract 12120 VBLANK.1213)}0 JMP ADDR ;Addr is changed2140 ; ; to OS's VBI2150 ; ; routine by INIT2160 ;2170 ;FIN)}IS marks the end of pro-2180 ;tected memory.2190 ;2200 FINIS2210 ;2220 ;DOS jumps here after auto load-2230 ;loading Fa)}st Moves. Several2240 ;addresses within Fast Moves are2250 ;modified. This routine is not2260 ;protected as it is needed o)}nly2270 ;once.2280 ;2290 INIT2300 LDA DOSVEC ;Save DOS vector2310 STA DO.DOS.V+12320 STA DOS32330 LDA)} DOSVEC+12340 STA DO.DOS.V+22350 STA DOS42360 ;2370 LDA DOSINI ;Save DOS initi-2380 STA REINIT+1 ; aliz)}ation2390 STA DOS1 ; vector2400 LDA DOSINI+12410 STA REINIT+22420 STA DOS22430 ;2440 LDA VKEYBD )} ;Save keyboard2450 STA VKEYBD.SAVE ; handler2460 STA VKEYBD.L ; vector2470 LDA VKEYBD+12480 STA VKEYB)}D.SAVE+12490 STA VKEYBD.H2500 ;2510 LDA VVBLKD ;Save VBI2520 STA VBLANK.1+1 ; routine2530 LDA VVBLKD+1 )}; vector2540 STA VBLANK.1+22550 ;2560 JMP INIT2 ;Continue initi-2570 ; ; alization2580 ;Autoru)}n2590 ;2600 *= RUNAD2610 .WORD INIT2620 ;2630 .END IC PUBLISHING40 ;0100 ; EQUATES0110 ;0120 RUNAD = $(F|hH Ңʎ}0~|Mhh@hL  څ  ( L\ '& \ -} L||}0) +++L     $&%'L( ,|r  BOPOK 1} MINEFIELDBY PERSING AND O'NEILLANTIC PUBLISHING($ (} ((($AR@2oo(f In MINEFIE1}LD you have just escapedfrom a Communist prison camp. You havestumbled onto a minefield <]](Uand must escape! You may 1}interscreen but your object is to get to the right edge.Ann(fYou may fire a stolen laser that will destroy one pixel of a1} mine.Be thriftyfor you only have 5 shots.F( Best of luck!P ( (Press START to begin.Z F:B2y,@@1}d6-@`' +@'0@L!-@@e!@VG%6-P:AE$H:,,%@1}G6-P:@p$H:,%@,`A ,/%@-/%@%@;/%@A/j 6-@@1}@)-AX)AR@==2%P:H:,$@,%@@@ ,&R1}:,"@&6-&@&R:,"@&6-%@'1%@'"@A "@y1}6-@"6-@x**T:,"*@A0 2(YOU FINISHED!!$6-%@ 261}-%@%(PRESS FIRE BUTTON%6-##( YOU FINISHED  ROUND(S)%%2 1}T:,"@A  A7-@)AC32@@7 <<(YOU COMPLETED P:'A1}SCTHUNDER STORMBY ALPHONSO CARIOTIANTIC PUBLISHING  +5}AR@'@@d'B7tA,-@@,(LISTEN TO THE RAIN<-@@<("P5}RESS THE ŠҠ FOR THUNDER!(<-@@<("PRESS ANY OTHER KEY FOR RAIN AGAIN2*-@@*(DON'T 5}GET WET!!!dB-AEB2O:@&+'@,,n/AA/A %@x5}%F:Ad,@3'% A}6-6-F:A`,%F:Aa,$AV%@66-F:,C=%+ @h,$+P:H:,$6}X$A,% OF MINEFIELD Ap 6-  @, 2@@@ '1%@'1}"@A0P %6-%@%"AXA0P A0 ) ,%@)/%@ %%2@2}Y  STARLOODSCSCSCSC130XE MEMORY MANA9}GEMENTBY IAN CHADWICK (c) 1985, ANTIC PUBLISHING (})) !130XE EXTENDED BANK DEMONSTRATION BY IAN C9}HADWICK %B@AS%DEFAULT VALUE-6-Bc-FIRST BYTE OF ACCESS WINDOW(6- AP2=%6-9}F:A`,%F:Aa,$AV=START OF DISPLAY LIST<;6-F:%@,%6-F:%@,;START OF SCREEN RAMF:6-F:@9},!6-F:@,:SCREEN POINTERS IN RAM(PRESS A CONSOLE KEY*B2y@*CLEAR CONSOLE KEYS7 F:B9}2y,"@A@7TEST FOR CONSOLE KEY$AA($LOWER RAMTOP*F:B2y,"@" A*START9}+F:B2y,"@" A +SELECT3F:B2y,"@" A%3START & OPTION+F:B2y,"@" A09}+OPTION3F:B2y,"@" A@3START & SELECT.F:B2y,"" AE.ALL THREE A@))9}START PRESSED: SHOW EXTENDED BANK 0+%@+%@@d'@'@@dB9}@A $**SELECT PRESSED: SHOW EXTENDED BANK 1+%@+%@@d'@9}'@@dB@A$ ..OPTION & START PRESSED: SHOW MAIN BANK 1 +%@+%@9}@d '@'@@d B@AS $ **OPTION PRESSED: SHOW EXTENDED BANK 2 +%9}@+%@@d '@'@@d B@A $22START & SELECT PRE9}SSED: SHOW EXTENDED BANK 3+%@+%@@d'@'@@dB@A9}!$EEALL THREE PRESSED: RESTORE RAMTOP AND SHOW ORIGINAL SCREEN AREA1AA`#%@1%@9}@@B@AS$++FILL A SCREEN EQUIVALENT WITH A VALUE-@9} (FILLING EXTENDED BANK B@A%%$@! A`!!@AP@  Ae$p9}-%A z@%&@ $cMAIN BANK FILLd1B@AS1(FILLING MAIN BANK 1i9}-%A n@  sAA(x$D1:SWITCHER.BAS130XE MEMORY MANA8RCCMEAABBMMOAOBDMCFSRLYASTASLXXNXNXNLNNNSZJSCCZZRNXNXQQRGNSQDTD=}WWWYYSPPSMEWNPTE@@@@@ =} =} !"#$%&'()*=}+,-./0123456789=}:;<=>?@ABCD ROBOT DUNGEON''BY ANSCHUETZ/W=}EISGERBER/ANSCHUETZ (c) 1985, ANTIC PUBLISHING(++(#}WARNING! ԠΠ WRITES TO2( YOUR DISK!!!<+(+(=}Do you want instructions (Y/N)?>'AdAU'A@@AN-+F:Ad,"@C)F:Ad,"A,?Ad=}AUN% D:ROBOHELPCI-+F:Ad,"@5)F:Ad,"@,?AdAUI AF @ed A`n=} +@B7t@d1@@d@6-F:A,9@,9@,9@,9@,9@,;@=},;@,6. x6-&@16-+&@,$AV&@Q6-+&@ ,$AV&@cB2w=}uAR@0@A@O-A2$AV%F:BsD%,6 BAV=}O(>:A%,oo(gENTER DEVICE NAME - CASSETTE USERS SIMPLY USE C: - DISK USERS USE SAME FILENAME AS USED IN CREATO=}RA A@*7@<@,4C7(>:A%,A A37@<@,0D)(>:A%,3 A@b(>:=}A%,F(1READY DISK AND THEN PRESS ON KEYBOARDXAdAUb A* @@* =}AuF(>PRESS ON RECORDER AND THEN PRESS ON KEYBOARDXAdAUu@@=}^ B!-@@ 5-@@`B)@^%+&@,$@`%d  -@@ =}3-@@`@)@\%+&@,$@`%` d g-@A'$)@4$AV%8 =}E)@L;,Z-@g)@{67<,.>:, ")@/@<)@I)@V@=}c)@p)@{@>@" 6-&6-,6-26-86->6-mAY=})-AA-"=%$AVA U-AVAcY"i%$AVm /-A$A1"+%$=}AV/  A "68,-Ap768@,-AqL68@,-Ara68@,-Asv68@,-A=}t A0#-@#6-@"(8,"6-( A`,Q68,-8,68,-8,=6-P:H=}:,$@,%@QAA06T'F:AP, +8,$@,%@HJ68,-8,&@$+8,!,T A=}P@BB2x868,-8,%@$+8, @ ,B APJT'F:A, +8,$@,%@2J68,-8,&@=}$+8,!,T APT&&68,-8,%@$+8, @,^K18,8,@'368,-8,?68=},-8,K6-h>6-F:B2R,!6-F:AP,06-F:A,>*A@rF:AR, A|"F:B2S,"=}B2xP"@-8,8,1(@>:,=-8,8,P(@>:8,,4F:Ad, AU*A=}dAU4 A 5+F:B2y,!*F:B2y, @5 AQ 6-@%BBAG2=}Q AAR'AY1@3C,@U/@g/@=}@y/@@/@l68,-Ap-68@,-AqB68@,-ArW68@,-=}Asl68@,-At= !-@@-,@9/@= j"6-F:+&@,$@`%%,(=}6-4!A'F-@@\(@>:@,j6-&A(K A0!@c+,@=/@=}K6-&@dA!@1!,@3/@A6-&@2K A1!@+,@@=}=/@@K6-&@K A0!@+,@@=/@@K6-&@A!@=}!,@@3/@@A6-&@= A1!+,@@=/@@("6-F:+&=}@,$@`%%,(6-o @3!A'+,@@=/@@O,@@a/@@o=}6-&A(&9!@c@+,@ @96-&@d09!@1@+,@@96-&@2=}:K!@@+,@ @=/@@K6-&@DU!@A6+,@ @5A=}7G,@@U6-&@N9!@@+,@@96-&@XK @3!@+,@=}@=/@@K6-&@b3!!,@@3/@@l)B2x)-=}@vo(68,-P:H:,$@,%@M68,-P:H:,$@,%@[18,8,oA0R=}-8,8,"(@>:8,,& R-@+!@@,%+!@ ,%@m6-P:H:,$@,,8,!A@6=}8,-8,&A(L-8,8,_(@>:8,,c m Ap6-&@ 0%@@;0@=}%@@G6-6-+%A`,$+!@@,%+%A,$+!@ * @A,%$+ @!,6-+&@,$@ =}%A"A)"A+-@@A(@>:A$,7"A!-@@7(@>:AU=},vAV@'AW@(,(>AV@PAW@[( mAW@3v( 5=}AV!AV5"A0@w'AU@99B2HKAdAUW=}APcAoB2HAY@b$q'BB@d*B7eA<AY@bHA=}TB2HqF:B2y,"@AP A0A(>:A%,/@@KAAdAUZM=}(EDO YOU WANT TO EPLAY THIS SAME DUNGEON OR OAD IN ANOTHER ONE?Z)@."@v!B2w++=}.% /"@*"@%6-@/ AI"@6-6-!6-'6--6-36-?6-@I A=} ,AdAU"(>:A%,, A`*4B2H'B2I*#4 A 4jBB@d'B7=}eA<F:Ad, AUNAdAU`BBAj A> A Hw-"@)"@)"@=})"@ ?BB@dQB7eAcAYm APw A pRK7"@*!A* A7*!@=}I* @A A K A p\O-"@*!Aw* @f*"A7 APE6-%@O APf#"@=}*!Aw* @f/6-@=6-%@G APU6-%@_ A@k6-@w6-AE A0 A=}pa"@!AY3BB@dEB2IWAa A`z-6-+&@,$@`=}%%-6-&A Ht"@* A'6-%AP9-@@O(@>:,Y A jF:,&@=}t A ~#"@*!AE* @16-%AC-@@Y(@>:,c A tF:,&@2=}~ A `-"@*!Aa* Av*!A;6-%@E A@VF:,&A(` A t"@*=}!A+-@ @A(@>:,O6-%@Y AjF:,&@dt A t"@* A=}+-@ @;(@ E AY-@h68,-t6-@C6--8,8,.(=}@ 2 CF:,&@ A AAPA% A07B2xA ApB2x=} Ap%2@%@@96-@#@[2mAV@=}AW@(($%2A@@96-@#@[2mAV=}@AW@3($%2AP@@A6-@#@#@c2=}q6-%AAV@AW@(($6-@6-AE)6-&@K2A=}@@m2@A@@6-@#@#@#@22=}@Z 6-6-@W6-+ @!,%@!$+!@ * @A,%@A$+!@@,Z$=}-@@+(@>:,M2A@@a6-@#@2=}AV@AW@3($BB@d'B2H9AKAY6=}-&@kB2x}B2I$$| +@B7t@d1@@d@6-F:A,Z0@=}|6-F:A`,%AV$F:Aa,.%@@#+%@@=BBv@W0@=}@i-@@ (@ ROBOT DUNGEON8u-@@7(@ start I-@ @=}u(@ANSCHUETZ/WEISGERBER/ANSCHUETZB.F:B2y,"@$A. AL AV''6-P:+F:AS>},&@E,'@,`''6-P:+F:AT,&@','@,jq 1-@("8,768,-C-8,8>},Y(@>:,g6-%@q APtW AV@+AW@(0(BB2xTAR>}W$~^%2A@@96-@#@[2^$WAV>}'B7eA66-F:AP,E6-F:A,WAYI @d6-&@)6-A56-@? A0>}I AI!A6-%@)6-@d56-@? A0I A A(A h A(>}.6-%+'@P:'@,,<6-%@H6-@T6-AI^ A0h A\"6-%+'@P:'@,,06>}-&@<6-@H6-@GR A0\ Ah A(.6-&+'@"P:'@,,<6-%@H6-Aa>}T6-AI^ A0h A\"6-&+'@"P:'@,,06-&@<6-AaH6-@GR A0\ A>}9BB@d'B7eA9AY} @3!-@ -,9/@= G> }Y,k/@}/@@/@@',@9/@@K/@> }@]/@@o,@/@@/@@,@@g/@@',@> }@9/@@CA1U,@@g/@@uA@f'AY@bC-@H> }@@OB2HY Apm-@@uq u  k-@AF@+A7B2HA> } ApO6-%@c-@@ug k  -@1@$6@6$AV%J-@@>}N r2%@P@@v 2OB2H Ap--@A1 >}EB2H%@O Ap(-@$@1-$AV%@VA-@@E i2%@P@>}@m 22Q-ARA@+B2H5 ApI-@@uM >}Q <jAY1,C/@ U/@@ g/@j$FEBB>}@d'B7eA9AYE6-@Pw @3!-@ -,9/@= G>}[-@g,@s/@w Zm-@@#,//@3 =A1Q-@@>}],@i/@m d4'-P:+@ &B:,,'@,@ 4(@nuAAF'AY@b>}C-@HA@OB2HY Apm-@@uq u x -@1@$6@6$AV%>}J-@@N r2%@P@@v 2Q-AAD>}@+B2H5 ApI-@@uM Q -@$@1-$AV%@VA-@@>}E i2%@P@@m 2B2HAR Apo-@@>}&(@8-@@J(@\-@@o(@Լy-@@)A>}A9=-@@A SAAF] Apq-@@u y  A`_%2@f>}@@9-@@= _2Q6-&@' @ *!9->}@Q(@7<@,$4BB@d'B7eA4(>:A%,$$7@<@,4DA0>}YO(GPRESS AND ON RECORDER AND THEN PRESS ON KEYBOARDY A@U9(1READY DISK AND THEN PRESS >} ON KEYBOARDKAdAUU AAdAU2@@F-@@ Z-@>}@`y6-F:%+&@,$@`%,*@ c -@@ /-@@`N6-F:%+&@> },$@`%,[*@_ c ;-@A'*6-F:$AV%,7*@; "P*@B:,$-@>!}B:,9*@@:7<,,= P*@,x @*@**@7 @D*@Q*@>"}\@f A0xBBA6$@F:Ad, AU$J AT_6-+&@,$AV+->#}%@/"59 Q-%AV%AaU"[_ ^c-A6A"!% Y-+&@,$AV+&>$}@,$AV%AH]"ch"@&@rE ;-+&@,$AV+&@,$AV%@h?">%}E|"@&@/ /+&@,$AV%AC&@{-AA #' 9>&}A#@MA'AV_B2w@{BBy'AV&@A@'A@9A>'}P@KAAE]A@RoAAAR6-?:A,#-%@>(}# u%6-F:A`,%AV$F:Aa,9%@AM%@A0a%@A0u%@ A0>)}AA)A&@;AR@MAV@Q]6-@i6-AEu6-@6->*}@6-@6-n(>:A%,26-F:A`,%AV$F:Aa,F-@9T%@j%%A >+}@n G-@@@@@-%@C%%@9@G _AV@'AW@>,},(>AV@PAW@!_(SCORE: zAV@'AW@?( ROOM NUMBER  QA>-}V@cAW@!w( HIT POINTS: z$LL0,0,0,224,160,191,170,234,3,3,15,15,63,63,255,255,0,24,24,24,24,0,>.}24,0??0,56,254,84,40,56,146,124,56,56,56,40,40,108,0,0,0,0,0,16ll162,3,189,244,6,240,89,56,221,240,6,240,83,141,254,6>/},106,141,255,6,142,253,6,24,169,0,109,253,6,24,109ii252,6,133,204,133,206,189,240,6,133,203,173,254,6,133,205,189,248,6,1>0}70,232,46,255,6,144,16,168,177kk203,145,205,169,0,145,203,136,202,208,244,76,87,6,160,0,177,203,145,205,169,0,145,203,200>1},202,208,244jj174,253,6,173,254,6,157,240,6,189,236,6,240,48,133,203,24,138,141,253,6,109,235,6,133,204,24,173,253&mm6>2},109,252,6,133,206,189,240,6,133,205,189,248,6,170,160,0,177,203,145,205,200,202,208,248,174,253,6,1690RR0,157,236,6,202,4>3}8,3,76,2,6,76,98,228,0,0,104,169,7,162,6,160,0,32,92,228,96:mm72,138,72,165,207,201,1,240,34,173,132,2,201,1,240,51,173,12>4}0,2,201,15,240,44,173,214,6,133,209,173,244Dkk6,141,245,6,173,120,2,133,208,169,1,133,207,216,24,166,208,165,209,125,79,86>5},133,209,141,1,208,24,173Ngg245,6,125,95,86,141,245,6,141,10,212,169,111,141,0,2,104,170,104,64,0,0,0,0,0,1,1,1,0,255,255,>6}255X330,0,0,0,0,0,0,0,0,1,255,0,0,1,255,0,0,1,255,0bee72,138,72,173,215,6,201,1,240,35,169,1,141,215,6,216,24,174,120,2>7},189,79,86,109,214,6,141,214,6ldd141,0,208,24,189,95,86,109,244,6,141,244,6,24,144,5,169,0,141,215,6,141,10,212,169,173,14>8}1,0,2vgg104,170,104,64,72,173,5,208,201,0,240,48,201,4,240,15,169,0,234,234,141,1,208,133,207,234,234,234hh24,144,29,2>9}01,4,208,25,165,209,141,217,6,173,245,6,141,218,6,169,0,234,234,141,1,208,133,207,169,1PP141,216,6,169,0,234,234,234,141,>}DSRSMADHLOJRE@@@ B;}  DUNGEON CREATOR''BY ANSCHUETZ/WEISGERBER/ANSCHUETZ (c) 1985, ANTB<}IC PUBLISHING(''(}WARNING! The ΠҠ2(WRITES TO YOUR DISK!!!<+(+(Do you want instructions (Y/N)?B=}>'AdAU'A@A@AN-+F:Ad,"@C)F:Ad,"A,?AdAUN% D:ROBOHELPCI-+FB>}:Ad,"@5)F:Ad,"@,?AdAUI AF @edA9@ <@`,9@ <@`,9B?}@,;@,K+@]@@doB7t@d-@@(@Πn5-@B@}@((@A/W/A5;@,xie(\ENTER THE NAME OF YOUR DUNGEON, EXCLUDING ALL PUCTUATION, AND LIMITED TOBA} 15 CHARACTERSia(>:A%,a(LENTER FILENAME. CASSETTE OWNERS USE SIMPLY C: DISK USERS USE D:DUNJIN.DATI ABB}0I7@<@,0C*7@<@,0DA0U-@@ +-@@`<68<,-BC}M68<,-Q U [-@@%6-$@ 36-&@?6-@[6-P:H:,$@ ,%-@BD}AH@w(+6-H6-+'@"P:'@,,? !"8<&@,"06-BE}%@?68,-@?  "8<%@,"06-%@?68,-@W+!)",* @ :8%BF}@<&,"H6-%@W68,-@a+ )"@,* @ D8%@<%+",,"R6-%@BG}a68,-@W+!)",*!@:8&@<&,"H6-%@W68,-@a+!)"@BH},*!@D8&@<%+",,"R6-%@a68,-@!AC6-%@!BI}6-+6-%@7!@ C6-@8<,"A` A"""6-8P:H:,$,%@,,WBJ}"@'68<,-8<,%@56-&@M68<,-8<,%@W A`6W"@'68<,-8<,%@56-BK}%@M68<,-8<,%@W A`@_"@'68<,-8<,%@256-%@=6-&U68<,-8<,%@BL}_ A`Ji"@'68<,-8<,%@d56-%@G6-%+",_68<,-8<,%@i A`T_BM}"@'68<,-8<,%@56-&@=6-&U68<,-8<,%@d_ A`^i"@'68<,-8<,%@BN}56-&@G6-%+",_68<,-8<,%@2i A`h@  (>:A%,1( IS ABOUT HALF-WAY@( COMBO}PLETED.r5-@@+-@@%5 A|48<,&A(!*6-&@4 A68<,-BP}8<,%A(   ^-@@+-@A5 AF8<,!T6-&@^ A06BQ}8<,-8<,%@   ^-@@+-@A5 AF8<,!@T6-&@^ A`BR}68<,-8<,%@   ^-@@+-@A5 AF8<,!@T6-&@^BS} A68<,-8<,%@   ^-@@+-@@5 AF8<,!@T6-&@BT}^ A 68<,-8<,%@   ^-@@+-@@%5 AF8<,!@TBU}6-&@^ AP68<,-8<,%@&   0^-@@+-@@%5 AF8<,!@BV}1T6-&@^ A:68<,-8<,%@2D   NK-@@ +-@@`C68<,-8PRESS į ON RECORDERBY} AND THENPRESS ON KEYBOARD|@@7@<@,4D)(>:A%,\(. DISK AND THBZ}EN PRESS ON KEYBOARDf Ap@@ AF:Ad, AU$ ApKB[}-@@ +-@@`66-8<,C*@G K K-@@ +-@@`66-8<,B\}C*@G K f-@A "(*@, <*@B:,M-@B:,b*@@:7<,,f B]}*@@) @<*@O*@b @u*@*@B^}@ii221,221,170,119,119,119,170,221,0,0,0,255,255,255,0,0,56,56,56,56,56,56,56,56,16,168,18,72,16,0,Bt}PQ!0A@Paa0!`Q0P1!! PA0APQP!P!0aPPa PBBDABP2DRDPA2D4P`PA"PPDPDAB`@&2"F`}pBP$1BP""`0`0!"D!B !PA"`A2"0!""A!QD!BA!D``P"B$P$TTDDPEP$@BTDDDD@Q$d`@B#!Fa}"$0RCDPpPA`0!B!2BRAd0ABB"RA!DBBADDPQCB2!PBADATp@bPB0BBA!BD"`P `""`bFb}!""$A!B0"`P!APD!fB@6BRA!"B!D!"Td"D!DPBDP@DDPr@B"0A"P""PA!DP0A"0A@a!`Fc}b`R"PCAP"0!$$``0!"ADD`ApPC&APAPBDBDDAP"!RQBBAePDBDP"!B@BBPP!$``""2!"""0BpAFd}DAR"`"$"B!2!` "2A AD0!T`""@BpDDDPdDAP0B6AB@DD$$D$DP0AB$PD!DDb`"BA`PA`"BAPb!`!ABFe}R"DDD0A4!!!"D`RABPD@RD0@"BFPA2D!DPABABD0@FQAFB@`BAB""P!$0AB$pBP"0!!P!"!"""B`"&0Ff}PA0rA`"B!@BVD`B4`"D`BTABDAT4BD$`BA"FPAB1B`""RP0BB`Ba!#"0P$P!BPPFg}0P` "`0!B!` P`BE!†BDPDAP`RAPQABTAPABD`0$D`BdD!Db$"PA2A!`D0@B`0AP!"`"APApBA"B`"BB"""Fh}$@`@FB&"""B@GBA@ADJE`MACD@ACAJ@CC@CICHFi}G@I@CBCF[`Eo@EcAK@CCBSCBCOqBOBBCCDCjEeGRCCIBBACC@NN@@JCCHFj}FAC@ACCQGIACAGKkNLMEHPCCMCBAAEA@Q@LFHADAAFC[BDEFBEB@JKIBEVABFk}AC`CMIADCAIFSAB@@dBE`BACNBEHA@PMCDJB@HCRC@QQACMLGKF@ODGPPJB@dFOGKCAIFl}BBOCM@CBBIGAYLEZBBCA@E@BFDODGJAGHAACSW@@S@CKB@BFBHBAI@CAGBI@AACJAFCFm}CEOD^BEC@AAIMJASQAEAJDIFDM@CIRCCAcEBcBFIA@HAC@CCABE@GAIGCNBQEtJFn}XDaF@AAAAACGEBIL@AMAEAa@CDGFAFJAG@IBADCGGABR]YCF@JGD@BC@HN@bAEBGBGJFo}A`@AABBMBA[OCDBA@BFBB@C`ADfB@AFD@ChCKAa@HLBB@HCBCBE@CBAFp}CAFCBCBjCCKCRBcIBABICJzCCB@HCAC@I`CQFC@Ba@K@AACGCFEjC`FABAFq}CI`ENDBB`BMBbIE@YA@GDBCAQ@GHIEAFCBFEN@@gGaAB@J`S@DCBJJIH@I@ACR@Fr}ABCEPCAGG@BC`Aݪwww88888888HUll  ~~:,&67@<@,.>:,?67@<@,. ,)-@B:,)7<,4 A 6 @%%67@N},.7@<&@,J(@ AT7F:A,A6(4( ERROR- F:A,7^((^^^ FINISN}HED ^^^h$($( is not a BASIC programr!(in LIST format.! A| 6.6-A A`t6.D1:*.N}* AL7@<@,3D1*7@<@,2D5t67@<@,.7@<@,a A@(@N}8@@;(^(7@<@, DIRECTORYa(9@,7@<@,4FREE/(9 @N}6.7@<@,:67@,.7@<@,M67@,. f7@<@,0 67@ <@ N},..( A6-@ A`6-A Y(6-F:A,!"A07( DOES NOT EXISTM(N}TYPE filenameY6-@3"A8'( DOES NOT RESPOND36-@2"A`&(DRIVE NUMBER ERROR26-@N}C"Ab7(#THIS DISK IS FULL. USE ANOTHER ONEC6-@:"Ae.( IS AN INVALID FILE NAME:6-@N},"Ag ( IS LOCKED,6-@Z"AiN(:THE DISK DIRECTORY IF FULL. USE ANOTHER DISKETN}TEZ6-@."Ap"(FILE NOT FOUND.6-@@(ERROR- &6-( D1:TYN}POIICG.BAS LINEOUTFILEXAANCODHCODLCODRTBxx A8L 10,212,169,0,141,0,2,169,94,141,1,2,104,64mm72,173,220,6,201,1,240,46,216,173,219,6,24,105,1,141,219,6,201,60,208,13,169,>}82,141,4,210,169,193,141,5nn210,24,144,19,201,120,208,15,169,90,141,4,210,169,193,141,5,210,169,0,141,219,6,141,10,212,16>}9,0,141,0,2169,86,141,1,2,104,64 D1:ROBOTS.BASXXNXNXNLNNNSZJSCCZZRNXNXQQRGNSQDTD<<LINEA ;A ,;@,< (}@<@@ D:ROBO.TXTR} A(@2lB:,!@-7@<@,4XXX0(3(E-@@"X( ӠΠ\b(R}}l @@<( @@dJ@ B*-@@"F(ΠϠΠ͠Jn*F:A@,"A@R}*% D:DUNGEON.CRTx% D:ROBOTS.BAS D:ROBOHELP,< (}@<@@ D:ROBO.TXTP: >>> ROBOT DUNGEON <<< ROBOT DUNGEON is known for itsdeadly robots, electric walls, andteleports. Rumor has it that Z}no onehas ever escaped! Nobody knows forsure, but most believe that ROBOTDUNGEON is comprised of three levelsof 400 roomZ}s each. Rooms arearranged in a 20 x 20 grid on eachlevel.XXXThe object of the game is totraverse from the lower-left rZ}126,153,153,126,24,60,66,165,24,36,255,189,60,60,60,231,60,66,219,66,60,231,129,231XX36,24,189,165,126,60,60,231,24,60,10B}2,60,24,126,219,153,0,0,254,254,65,127,119,127 T%6-P:H:,$@ ,%@Q6-P:H:,$@ ,%$@ &@B}T$D1:DUNGEON.CRTHLOJRE@@@ @oom ofeach level to the upper-right roomwhile collecting as many lives andpoints as possible. Upon reachingthe upper-rigZ}ht room of Level 1,touch the staircase to get to Level2.Here, you'll see a cartoon that willgive you time to relax. SitZ} backand enjoy the figure as he jumpsdown the stairs and slips throughthe door just in time!XXXComplete Level 2 the saZ}me way youcompleted Level 1. (The upper-rightroom is #800). Remember to touch thestaircase to see the cartoon andadvance Z}to Level 3.If you manage to get to theupper-right room of Level 3 (room#1200), touch the key and you'll seeanother cartoZ}on!XXXROBOT DUNGEON is no ordinarydungeon, either! It is a 3-levelmaze with only one escape route oneach level. (We Z}recommend you mapeach level.)XXXROBOT DUNGEON has many treasures andtraps which with you must beacquainted. The most Z}abundent ofthese is the "SYMBOL OF LIFE." (Itlooks like a sideways figure eight).Touching this symbol will increaseyour Z}hit point total by one. Thehit point total (on the lower-rightof the score window) decreases byone every time you touch aZ} robot,touch a wall, or touch teleport(more on teleports later). It'svery important to get "SYMBOL OFLIFE" in each room Z}or you'll have avery short adventure!XXXA symbol closely related to the"SYMBOL OF LIFE" is the "TREASURECHEST". Each oZ}ne holds 5 hitpoints.Another symbol is the "ASSORTEDGOLD". This pile is worth 250points! The "DIAMOND," like"ASSORTED GZ}OLD" is worth 1000points.XXXThe most useful symbol is the "ROBOTZAPPER." It looks like a zig-zagline and kills every Z}robot in a roomwhen touched!Stay away from "TELEPORTS." Theseare shaped like black pits andreturn you to the first roomZ} of thecurrent level. They also cost youone hit point.XXXYou are not defenseless as youwander ROBOT DUNGEON. You haveZ} apistol! Aim and fire it with yourjoystick. Each blue robot youdestroy is worth 10 points. Orangerobots are indestructiZ}ble. Level 1has one orange robot and four bluerobots in each room. Higher levelshave more orange robots and fewerblue onZ}es!XXXNOTE: When you pick up symbol, it'sgone forever, but robots areresurrected each time you enter aroom.By pressiZ}ng any key during thecourse of play, you can freeze theaction.Press another key and play resumes.To save a game in progreZ}ss, press aconsole key (START, SELECT, orOPTION)!XXXSaving a game will overwrite theprevious version of your maze. IZ}fyou want to save several differentstages of your progress, you willhave to change disks. Be sure tosave your game very Z}frequently!When your hit point total reacheszero, the game is over. Pressingthe START button gives you thechoice of loaZ}ding a new dungeon orreplaying the old one from the lastSAVE.NOTE: All symbols the previous gameare lost.XXXTo play ROZ}BOT DUNGEON, you firstneed to make a maze with the MAZECREATOR PROGRAM, DUNGEON.CRT!This program will ask you to nameyourZ} dungeon. This is NOT the diskfilename. Type in a name for thedungeon, and press return. Next,you are asked to give a dZ}iskfilename for your dungeon data.After pressing [RETURN], there willbe a 15-20 minute wait for the mazeto be created.XZ}XXDon't worry about the numbers beingprinted. For those of you who areinterested, the first column standsfor the level, Z}the second is theroom number, and the third andfourth are used for determiningexits.XXXOnce the program is through, yoZ}u canRUN the main game, ROBOTS.BAS.When the computer asks you for afilename, type in the same name yougave it in the MazeZ} creator program.Load the maze by pressing RETURNseveral times.You do not need to make a newdungeon every time you play,Z} use thesame one over and over until youcomplete it. When you're done withone maze, you can create a new one!e you play,Xr 16-%@6-'@1 AP D1:MINE.BAS 0X@%@,%@8,C  A D1:THUNDER.IO ALPHONSO CARIOTIANTIC PUBLISHING  +4F