@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 D8u &8өө<өӭ01 ?䄍儩 焩@愩脩ꄍ넍섍턍鄭߂T} LzT U'񄨽HH` -`U"' U'` Ӡ/LဠӠ`ჹ წU}&`T⃥UラTU`⃅TヅU  ` 7 ` `} `HH ]M)LY mhh@䄱i`V}䄭 ƀI鄬䄩` Ɓ QMꄍ L `넬儱脐8Ln`䄱L偩`W}儱脐  3󂂬儱焐 ` `8n넭 nL`( [L5?LKI `儱mX}mLv w`nnnnnnnm焍焩` Codewriter III BY STEVE STUNTZ Y};mm"*shj)?><80 !#'/GU1L      BY STEVE STUNTZ f10 ;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 a} POINTRI0450 STA POINTRO0460 LDA #$200470 STA CWSPC0480 LDA #$400490 STA CWMAX0500 LDA #$0F051 b}0 STA CWAVG0520 LDA #$000530 STA I23X370540 STA HILO0550 STA NBITS0560 STA RXCW0570 STA IAM c}REDI0580 STA CTAVG0590 STA CWTOT0600 STA CWTOT+10610 LDA #20620 STA PREVHILO0630 LDA MRX0640 d} STA MEMRX0650 LDA MRX+10660 STA MEMRX+10670 LDA #$C00680 STA NMIEN0690 ;0700 ;SEARCH FOR KEYBOARD CH e}ARACTER0710 LP1 JSR RXCH0720 JMP LP10730 ;0740 ; DEVICE HANDLER0750 GOVEC CPX #60760 BNE GOV10770 LDY ROWC f}RS0780 CPY #230790 BNE GOV10800 LDY COLCRS0810 CPY #390820 BNE GOV10830 LDY #10840 STY I23 g}X370850 GOV1 TAY 0860 LDA VTBASE+1,X0870 PHA 0880 LDA VTBASE,X0890 PHA 0900 TYA 0910 RTS 0920 h} ;0930 ; SCROLL0940 SCROLL LDY I23X370950 CPY #10960 BNE SCROL10970 JSR HEAD30980 LDY #00990 STY I i}23X371000 SCROL1 RTS 1010 ;1020 ; RX WORD WRAP1030 RXWRA LDY COLCRS1040 CPY #341050 BCC RXWR91060 CPY #39 j}1070 BEQ RXWR91080 RXWR1 LDA #$A01090 JSR RXPNT1100 LDY COLCRS1110 CPY #391120 BNE RXWR11130 RXWR9 k}RTS 1140 ;1150 ;SET PIN1 AND SOUND1160 ONOFF CMP #$021170 BNE OFF1180 LDY #$001190 STY PORTA SET PIN1 LOW l}1200 LDY #$2F1210 STY AUDC1 TURN SOUND ON1220 JMP ONOF11230 OFF LDY #$011240 STY PORTA SET PIN1 HIGH m}1250 LDY #$001260 STY AUDC1 TURN SOUND OFF1270 ONOF1 RTS 1280 ;1290 ;HEADING1300 HEAD LDY #$001310 STY C n}OPYI1320 CR1 LDA COPYR,Y1330 LDX #61340 JSR GOVEC1350 INC COPYI1360 LDY COPYI1370 CPY #381380 o}BNE CR11390 RTS 1400 ;1410 ;SET CURSOR AT 0,01420 HEAD00 LDA ROWCRS1430 STA ROW1440 LDA COLCRS1450 STA p} COL1460 LDA #$001470 STA ROWCRS1480 LDA #$021490 STA COLCRS1500 RTS 1510 ;1520 ;SET CURSOR AT ORI q}GINAL POSITION1530 HEADORG LDA ROW1540 STA ROWCRS1550 LDA COL1560 STA COLCRS1570 LDA #$1E1580 LDX # r}61590 JSR GOVEC1600 LDA #$1F1610 LDX #61620 JSR GOVEC1630 RTS 1640 ;1650 ;KEYBOARD HEADING1660 HE s}AD1 JSR HEADCLR1670 JSR HEAD1680 RTS 1690 ;1700 ;CHANGE SPEED HEADING1710 HEAD3 JSR HEAD001720 JSR HEAD173 t}0 JSR HEADORG1740 RTS 1750 ;1760 ;1770 HEADCLR LDA #$7D1780 LDX #61790 JSR GOVEC1800 RTS 1810 ;1 u}820 ; RX INTERRUPT LOOP1830 RXLOOP = *1840 PHA 1850 TYA 1860 PHA 1870 JSR CWCOUNT1872 LDA #01874 v} STA ATRACT1880 LDA PORTA1890 AND #$021900 CMP PREVHILO1910 BNE RI11920 JMP RI21930 RI1 JSR CHANG w}E1940 RI2 PLA 1950 TAY 1960 PLA 1970 RTI 1980 ;1990 ; RX CW COUNT BY 12000 CWCOUNT LDY POINTRI2010 LD x}A (MEMRX),Y2020 CMP CWMAX2030 BEQ RC12040 CLC 2050 ADC #$012060 STA (MEMRX),Y2070 RC1 RTS 2080 ;2 y}090 ; DETECT CW CHANGE2100 CHANGE INC POINTRI2110 LDA PREVHILO2120 JSR ONOFF2130 EOR #$022140 STA PREVHI z}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 CTAVG *= *+14100 CWTOT *= *+24110 I23X37 *= *+14120 RXINDX *= *+14122 *= $02E &EF&&BRINOUTMPMIAIMAAADHADLFLSRDESFCOUNMAINJNCNN} } ))RAPID GRAPHICS CONVERTER, LISTING 1BY CHARLES JACKSON (c) 1985, ANT}IC PUBLISHING(B@e!6-@6F:B2y,"@B6-2 @<=AR@+@}A=B7tAF$Pq +@ @`)AR@;AAMAA_A@(}qA @Z@-@@((@RAPID<-@AP@ \C-@@+(@GRAP}HICS?-@APC ^D-@@,(@ CONVERTER@-@APD d=(%( By Charles} Jackson9-@AP= i4(*( (c) 1985, Antic Publishing4 @`n<<;@,;@,;Av,;}Ay`,;@,x\67@,.#67Ay`,.267@,.86.D6-AHP6.\6-@- 6-C:,}6-P:'AV,-6-&$AV'-@A '6-e AP+)A@&;A @}E AH(a(Type of SOURCE filee%0@@%6-"@#" A@# AP}!) AP"((Filename" @`&B:, @ A@& A` A A)A}A;A >(\(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.BAS@4$>+@+@@H0"(@7@<Av,- * SPECIAL BONUS * >>> FOR ANTIC DISK SUBSCRIBERS <<'AdAU'A@A@AN-+F:Ad,"@C)F:Ad,"A,?AdAUN% D:ROBOHELPCI-+F}:Ad,"@5)F:Ad,"@,?AdAUI AF @edA9@ <@`,9@ <@`,9}@,;@,K+@]@@doB7t@d-@@(@Πn5-@}@((@A/W/A5;@,xie(\ENTER THE NAME OF YOUR DUNGEON, EXCLUDING ALL PUCTUATION, AND LIMITED TO} 15 CHARACTERSia(>:A%,a(LENTER FILENAME. CASSETTE OWNERS USE SIMPLY C: DISK USERS USE D:DUNJIN.DATI A}0I7@<@,0C*7@<@,0DA0U-@@ +-@@`<68<,-}M68<,-Q U [-@@%6-$@ 36-&@?6-@[6-P:H:,$@ ,%-@}AH@w(+6-H6-+'@"P:'@,,? !"8<&@,"06-}%@?68,-@?  "8<%@,"06-%@?68,-@W+!)",* @ :8%}@<&,"H6-%@W68,-@a+ )"@,* @ D8%@<%+",,"R6-%@}a68,-@W+!)",*!@:8&@<&,"H6-%@W68,-@a+!)"@},*!@D8&@<%+",,"R6-%@a68,-@!AC6-%@!}6-+6-%@7!@ C6-@8<,"A` A"""6-8P:H:,$,%@,,W}"@'68<,-8<,%@56-&@M68<,-8<,%@W A`6W"@'68<,-8<,%@56-}%@M68<,-8<,%@W A`@_"@'68<,-8<,%@256-%@=6-&U68<,-8<,%@}_ A`Ji"@'68<,-8<,%@d56-%@G6-%+",_68<,-8<,%@i A`T_}"@'68<,-8<,%@56-&@=6-&U68<,-8<,%@d_ A`^i"@'68<,-8<,%@}56-&@G6-%+",_68<,-8<,%@2i A`h@  (>:A%,1( IS ABOUT HALF-WAY@( COM}PLETED.r5-@@+-@@%5 A|48<,&A(!*6-&@4 A68<,-}8<,%A(   ^-@@+-@A5 AF8<,!T6-&@^ A06}8<,-8<,%@   ^-@@+-@A5 AF8<,!@T6-&@^ A`}68<,-8<,%@   ^-@@+-@A5 AF8<,!@T6-&@^} A68<,-8<,%@   ^-@@+-@@5 AF8<,!@T6-&@}^ A 68<,-8<,%@   ^-@@+-@@%5 AF8<,!@T}6-&@^ AP68<,-8<,%@&   0^-@@+-@@%5 AF8<,!@}1T6-&@^ A:68<,-8<,%@2D   NK-@@ +-@@`C68<,-8<},%@dG K X^-@@+-@A5 AF8<,!A'T6-&@^ A b68<,- }8<,%A(l  AdAUvAdAU|7@<@,4C_(>PRESS į ON RECORDER } AND THENPRESS ON KEYBOARD|@@7@<@,4D)(>:A%,\(. DISK AND TH }EN PRESS ON KEYBOARDf Ap@@ AF:Ad, AU$ ApK }-@@ +-@@`66-8<,C*@G K K-@@ +-@@`66-8<, }C*@G K f-@A "(*@, <*@B:,M-@B:,b*@@:7<,,f }*@@) @<*@O*@b @u*@*@}@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,}0,0CC0,0,0,0,14,31,14,4,0,0,0,170,85,0,0,0,0,0,108,146,146,108,0,0113,4,9,11,11,9,4,3,252,2,249,13,13,249,2,252YY}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,10}2,60,24,126,219,153,0,0,254,254,65,127,119,127 T%6-P:H:,$@ ,%@Q6-P:H:,$@ ,%$@ &@}T$D1:DUNGEON.CRT254,65,127,119,127 T%6-P:H:,$@ ,%@Q6-P:H:,$@ ,%$@ &@PQ!0A@Paa0!`Q0P1!! PA0APQP!P!0aPPa PBBDABP2DRDPA2D4P`PA"PPDPDAB`@&2"}pBP$1BP""`0`0!"D!B !PA"`A2"0!""A!QD!BA!D``P"B$P$TTDDPEP$@BTDDDD@Q$d`@B#!}"$0RCDPpPA`0!B!2BRAd0ABB"RA!DBBADDPQCB2!PBADATp@bPB0BBA!BD"`P `""`b}!""$A!B0"`P!APD!fB@6BRA!"B!D!"Td"D!DPBDP@DDPr@B"0A"P""PA!DP0A"0A@a!`}b`R"PCAP"0!$$``0!"ADD`ApPC&APAPBDBDDAP"!RQBBAePDBDP"!B@BBPP!$``""2!"""0BpA}DAR"`"$"B!2!` "2A AD0!T`""@BpDDDPdDAP0B6AB@DD$$D$DP0AB$PD!DDb`"BA`PA`"BAPb!`!AB}R"DDD0A4!!!"D`RABPD@RD0@"BFPA2D!DPABABD0@FQAFB@`BAB""P!$0AB$pBP"0!!P!"!"""B`"&0}PA0rA`"B!@BVD`B4`"D`BTABDAT4BD$`BA"FPAB1B`""RP0BB`Ba!#"0P$P!BPP}0P` "`0!B!` P`BE!†BDPDAP`RAPQABTAPABD`0$D`BdD!Db$"PA2A!`D0@B`0AP!"`"APApBA"B`"BB"""}$@`@FB&"""B@GBA@ADJE`MACD@ACAJ@CC@CICH}G@I@CBCF[`Eo@EcAK@CCBSCBCOqBOBBCCDCjEeGRCCIBBACC@NN@@JCCH}FAC@ACCQGIACAGKkNLMEHPCCMCBAAEA@Q@LFHADAAFC[BDEFBEB@JKIBEVAB }AC`CMIADCAIFSAB@@dBE`BACNBEHA@PMCDJB@HCRC@QQACMLGKF@ODGPPJB@dFOGKCAI!}BBOCM@CBBIGAYLEZBBCA@E@BFDODGJAGHAACSW@@S@CKB@BFBHBAI@CAGBI@AACJAFC"}CEOD^BEC@AAIMJASQAEAJDIFDM@CIRCCAcEBcBFIA@HAC@CCABE@GAIGCNBQEtJ#}XDaF@AAAAACGEBIL@AMAEAa@CDGFAFJAG@IBADCGGABR]YCF@JGD@BC@HN@bAEBGBGJ$}A`@AABBMBA[OCDBA@BFBB@C`ADfB@AFD@ChCKAa@HLBB@HCBCBE@CBA%}CAFCBCBjCCKCRBcIBABICJzCCB@HCAC@I`CQFC@Ba@K@AACGCFEjC`FABA&}CI`ENDBB`BMBbIE@YA@GDBCAQ@GHIEAFCBFEN@@gGaAB@J`S@DCBJJIH@I@ACR@'}ABCEPCAGG@BC`Aݪwww88888888HUll  ~~}d to0910 ; ; DOSINI vector0920 ; ; by INIT0930 ;0940 ;After returning from the0950 ;DOS init%?}ialization, we have to0960 ;re-establish the vectors in0970 ;DOSINI, and DOSVEC. In this way0980 ;we make Fast Moves "pers%@}istent".0990 ;1000 INIT21010 LDA # REINIT1040 STA DOSINI+11050 L%A}DA # CALL.DOS1080 STA DOSVEC+11090 ;1100 ;Move lo mem up to create safe%B}1110 ;place for Fast Moves.1120 ;1130 LDA # FINIS1160 STA MEMLO+11170 ;%C}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%E} ;the OS routine for setting1290 ;vertical blank routines!1300 ;1310 LDA #71320 LDX # >VBLANK1330 LDY # 0,1970 ; %S} ; all done1980 VBLANK.31990 LDA FASTFLG ;Equals $FF if2000 BMI VBLANK.1 ; not cursor ctl2010 LDA %T}SKSTAT ;Bit 3 is on if2020 AND #4 ; key is still2030 BNE VBLANK.1 ; held down2040 LDA #6 ;If timer %U}has2050 CMP SRTIMR ; already been2060 ; ; set with 62070 ; ; (Fast Moves'2080 BCS VB%V}LANK.2 ; speed),branch2090 STA SRTIMR ;Else, set timer2100 VBLANK.22110 DEC SRTIMR ;Subtract 12120 VBLANK.1213%W}0 JMP ADDR ;Addr is changed2140 ; ; to OS's VBI2150 ; ; routine by INIT2160 ;2170 ;FIN%X}IS marks the end of pro-2180 ;tected memory.2190 ;2200 FINIS2210 ;2220 ;DOS jumps here after auto load-2230 ;loading Fa%Y}st Moves. Several2240 ;addresses within Fast Moves are2250 ;modified. This routine is not2260 ;protected as it is needed o%Z}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 ue initi-2570 ; ; alization2580 ;Autoru$Fr  BOPOK )b} MINEFIELDBY PERSING AND O'NEILLANTIC PUBLISHING($ (} ((($AR@2oo(f In MINEFIE)c}LD you have just escapedfrom a Communist prison camp. You havestumbled onto a minefield <]](Uand must escape! You may )d}interscreen but your object is to get to the right edge.Ann(fYou may fire a stolen laser that will destroy one pixel of a)e} mine.Be thriftyfor you only have 5 shots.F( Best of luck!P ( (Press START to begin.Z F:B2y,@@)f}d6-@`' +@'0@L!-@@e!@VG%6-P:AE$H:,,%@)g}G6-P:@p$H:,%@,`A ,/%@-/%@%@;/%@A/j 6-@@)q}3B%DOS SYSB*)DUP SYSBSCODEWRITEXEBAZCODEWRITM65BNCONVERT BASBDOC B)DUNGEON CRTBDUNJIN DATB)FASTMOVEEXEB6+FASTMOVEM65BaMINE BASB"yROBO TXTBROBOHELP BROBOTS BASB(SDT2P LSTB6SWITCHERBASBITHUNDER BASBOTYPOIICGBASB7fVAMPRAT BAS@)-AX)AR@==2%P:H:,$@,%@@@ ,&R)r}:,"@&6-&@&R:,"@&6-%@'1%@'"@A "@y)s}6-@"6-@x**T:,"*@A0 2(YOU FINISHED!!$6-%@ 26)t}-%@%(PRESS FIRE BUTTON%6-##( YOU FINISHED  ROUND(S)%%2 )u}T:,"@A  A7-@)AC32@@7 <<(YOU COMPLETED P:'A)v}X$A,% OF MINEFIELD Ap 6-  @, 2@@@ '1%@')w}"@A0P %6-%@%"AXA0P A0 ) ,%@)/%@ %%2@)x} 16-%@6-'@1 AP D1:MINE.BAS)/%@ %%2@(X >>> 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 room-{}s each. Rooms arearranged in a 20 x 20 grid on eachlevel.XXXThe object of the game is totraverse from the lower-left r-|}oom ofeach level to the upper-right roomwhile collecting as many lives andpoints as possible. Upon reachingthe upper-rig-}}ht room of Level 1,touch the staircase to get to Level2.Here, you'll see a cartoon that willgive you time to relax. Sit-~} backand enjoy the figure as he jumpsdown the stairs and slips throughthe door just in time!XXXComplete Level 2 the sa-}me way youcompleted Level 1. (The upper-rightroom is #800). Remember to touch thestaircase to see the cartoon andadvance -}to Level 3.If you manage to get to theupper-right room of Level 3 (room#1200), touch the key and you'll seeanother carto-}on!XXXROBOT DUNGEON is no ordinarydungeon, either! It is a 3-levelmaze with only one escape route oneach level. (We -}recommend you mapeach level.)XXXROBOT DUNGEON has many treasures andtraps which with you must beacquainted. The most -}abundent ofthese is the "SYMBOL OF LIFE." (Itlooks like a sideways figure eight).Touching this symbol will increaseyour -}hit point total by one. Thehit point total (on the lower-rightof the score window) decreases byone every time you touch a-} robot,touch a wall, or touch teleport(more on teleports later). It'svery important to get "SYMBOL OFLIFE" in each room -}or you'll have avery short adventure!XXXA symbol closely related to the"SYMBOL OF LIFE" is the "TREASURECHEST". Each o-}ne holds 5 hitpoints.Another symbol is the "ASSORTEDGOLD". This pile is worth 250points! The "DIAMOND," like"ASSORTED G-}OLD" is worth 1000points.XXXThe most useful symbol is the "ROBOTZAPPER." It looks like a zig-zagline and kills every -}robot in a roomwhen touched!Stay away from "TELEPORTS." Theseare shaped like black pits andreturn you to the first room-} of thecurrent level. They also cost youone hit point.XXXYou are not defenseless as youwander ROBOT DUNGEON. You have-} apistol! Aim and fire it with yourjoystick. Each blue robot youdestroy is worth 10 points. Orangerobots are indestructi-}ble. Level 1has one orange robot and four bluerobots in each room. Higher levelshave more orange robots and fewerblue on-}es!XXXNOTE: When you pick up symbol, it'sgone forever, but robots areresurrected each time you enter aroom.By pressi-}ng any key during thecourse of play, you can freeze theaction.Press another key and play resumes.To save a game in progre-}ss, press aconsole key (START, SELECT, orOPTION)!XXXSaving a game will overwrite theprevious version of your maze. I-}fyou want to save several differentstages of your progress, you willhave to change disks. Be sure tosave your game very -}frequently!When your hit point total reacheszero, the game is over. Pressingthe START button gives you thechoice of loa-}ding a new dungeon orreplaying the old one from the lastSAVE.NOTE: All symbols the previous gameare lost.XXXTo play RO-}BOT DUNGEON, you firstneed to make a maze with the MAZECREATOR PROGRAM, DUNGEON.CRT!This program will ask you to nameyour-} dungeon. This is NOT the diskfilename. Type in a name for thedungeon, and press return. Next,you are asked to give a d-}iskfilename for your dungeon data.After pressing [RETURN], there willbe a 15-20 minute wait for the mazeto be created.X-}XXDon't worry about the numbers beingprinted. For those of you who areinterested, the first column standsfor the level, -}the second is theroom number, and the third andfourth are used for determiningexits.XXXOnce the program is through, yo-}u canRUN the main game, ROBOTS.BAS.When the computer asks you for afilename, type in the same name yougave it in the Maze-} creator program.Load the maze by pressing RETURNseveral times.You do not need to make a newdungeon every time you play,-} use thesame one over and over until youcomplete it. When you're done withone maze, you can create a new one!e you play,,rLINEA ;A ,;@,< (}@<@@ D:ROBO.TXT1} A(@2lB:,!@-7@<@,4XXX0(3(E-@@"X( ӠΠ\b(1}}l @@<( @@dJ@ B*-@@"F(ΠϠΠ͠Jn*F:A@,"A@1}*% D:DUNGEON.CRTx% D:ROBOTS.BAS D:ROBOHELP@"F(ΠϠΠ͠Jn*F:A@,"A@0:CCMEAABBMMOAOBDMCFSRLYASTASLXXNXNXNLNNNSZJSCCZZRNXNXQQRGNSQDTD5}WWWYYSPPSMEWNPTE@@@@@ 5} 5} !"#$%&'()*5}+,-./01234567895}:;<=>?@ABCD ROBOT DUNGEON''BY ANSCHUETZ/W5}EISGERBER/ANSCHUETZ (c) 1985, ANTIC PUBLISHING(++(#}WARNING! ԠΠ WRITES TO2( YOUR DISK!!!<+(+(5}Do you want instructions (Y/N)?>'AdAU'A@@AN-+F:Ad,"@C)F:Ad,"A,?Ad5}AUN% D:ROBOHELPCI-+F:Ad,"@5)F:Ad,"@,?AdAUI AF @ed A`n5} +@B7t@d1@@d@6-F:A,9@,9@,9@,9@,9@,;@5},;@,6. x6-&@16-+&@,$AV&@Q6-+&@ ,$AV&@cB2w5}uAR@0@A@O-A2$AV%F:BsD%,6 BAV5}O(>:A%,oo(gENTER DEVICE NAME - CASSETTE USERS SIMPLY USE C: - DISK USERS USE SAME FILENAME AS USED IN CREATO5}RA A@*7@<@,4C7(>:A%,A A37@<@,0D)(>:A%,3 A@b(>:5}A%,F(1READY DISK AND THEN PRESS ON KEYBOARDXAdAUb A* @@* 5}AuF(>PRESS ON RECORDER AND THEN PRESS ON KEYBOARDXAdAUu@@5}^ B!-@@ 5-@@`B)@^%+&@,$@`%d  -@@ 5}3-@@`@)@\%+&@,$@`%` d g-@A'$)@4$AV%8 5}E)@L;,Z-@g)@{67<,.>:, ")@/@<)@I)@V@5}c)@p)@{@>@" 6-&6-,6-26-86->6-mAY5})-AA-"=%$AVA U-AVAcY"i%$AVm /-A$A1"+%$5}AV/  A "68,-Ap768@,-AqL68@,-Ara68@,-Asv68@,-A5}t A0#-@#6-@"(8,"6-( A`,Q68,-8,68,-8,=6-P:H5}:,$@,%@QAA06T'F:AP, +8,$@,%@HJ68,-8,&@$+8,!,T A5}P@BB2x868,-8,%@$+8, @ ,B APJT'F:A, +8,$@,%@2J68,-8,&@5}$+8,!,T APT&&68,-8,%@$+8, @,^K18,8,@'368,-8,?685},-8,K6-h>6-F:B2R,!6-F:AP,06-F:A,>*A@rF:AR, A|"F:B2S,"5}B2xP"@-8,8,1(@>:,=-8,8,P(@>:8,,4F:Ad, AU*A5}dAU4 A 5+F:B2y,!*F:B2y, @5 AQ 6-@%BBAG25}Q AAR'AY1@3C,@U/@g/@5}@y/@@/@l68,-Ap-68@,-AqB68@,-ArW68@,-5}Asl68@,-At= !-@@-,@9/@= j"6-F:+&@,$@`%%,(5}6-4!A'F-@@\(@>:@,j6-&A(K A0!@c+,@=/@5}K6-&@dA!@1!,@3/@A6-&@2K A1!@+,@@5}=/@@K6-&@K A0!@+,@@=/@@K6-&@A!@5}!,@@3/@@A6-&@= A1!+,@@=/@@("6-F:+&5}@,$@`%%,(6-o @3!A'+,@@=/@@O,@@a/@@o5}6-&A(&9!@c@+,@ @96-&@d09!@1@+,@@96-&@25}:K!@@+,@ @=/@@K6-&@DU!@A6+,@ @5A5}7G,@@U6-&@N9!@@+,@@96-&@XK @3!@+,@5}@=/@@K6-&@b3!!,@@3/@@l)B2x)-5}@vo(68,-P:H:,$@,%@M68,-P:H:,$@,%@[18,8,oA0R5}-8,8,"(@>:8,,& R-@+!@@,%+!@ ,%@m6-P:H:,$@,,8,!A@65}8,-8,&A(L-8,8,_(@>:8,,c m Ap6-&@ 0%@@;0@5}%@@G6-6-+%A`,$+!@@,%+%A,$+!@ * @A,%$+ @!,6-+&@,$@ 5}%A"A)"A+-@@A(@>:A$,7"A!-@@7(@>:AU5},vAV@'AW@(,(>AV@PAW@[( mAW@3v( 55}AV!AV5"A0@w'AU@99B2HKAdAUW5}APcAoB2HAY@b$q'BB@d*B7eA<AY@bHA5}TB2HqF:B2y,"@AP A0A(>:A%,/@@KAAdAUZM5}(EDO YOU WANT TO EPLAY THIS SAME DUNGEON OR OAD IN ANOTHER ONE?Z)@."@v!B2w++5}.% /"@*"@%6-@/ AI"@6-6-!6-'6--6-36-?6-@I A5} ,AdAU"(>:A%,, A`*4B2H'B2I*#4 A 4jBB@d'B75}eA<F:Ad, AUNAdAU`BBAj A> A Hw-"@)"@)"@5})"@ ?BB@dQB7eAcAYm APw A pRK7"@*!A* A7*!@5}I* @A A K A p\O-"@*!Aw* @f*"A7 APE6-%@O APf#"@5}*!Aw* @f/6-@=6-%@G APU6-%@_ A@k6-@w6-AE A0 A5}pa"@!AY3BB@dEB2IWAa A`z-6-+&@,$@`5}%%-6-&A Ht"@* A'6-%AP9-@@O(@>:,Y A jF:,&@5}t A ~#"@*!AE* @16-%AC-@@Y(@>:,c A tF:,&@25}~ A `-"@*!Aa* Av*!A;6-%@E A@VF:,&A(` A t"@*5}!A+-@ @A(@>:,O6-%@Y AjF:,&@dt A t"@* A5}+-@ @;(@ E AY-@h68,-t6-@C6--8,8,.(5}@ 2 CF:,&@ A AAPA% A07B2xA ApB2x5} Ap%2@%@@96-@#@[2mAV@5}AW@(($%2A@@96-@#@[2mAV5}@AW@3($%2AP@@A6-@#@#@c25}q6-%AAV@AW@(($6-@6-AE)6-&@K2A5}@@m2@A@@6-@#@#@#@225}@Z 6-6-@W6-+ @!,%@!$+!@ * @A,%@A$+!@@,Z$5}-@@+(@>:,M2A@@a6-@#@25}AV@AW@3($BB@d'B2H9AKAY65}-&@kB2x}B2I$$| +@B7t@d1@@d@6-F:A,Z0@5}|6-F:A`,%AV$F:Aa,.%@@#+%@@=BBv@W0@5}@i-@@ (@ ROBOT DUNGEON8u-@@7(@ start I-@ @5}u(@ANSCHUETZ/WEISGERBER/ANSCHUETZB.F:B2y,"@$A. AL AV''6-P:+F:AS5},&@E,'@,`''6-P:+F:AT,&@','@,jq 1-@("8,768,-C-8,85},Y(@>:,g6-%@q APtW AV@+AW@(0(BB2xTAR5}W$~^%2A@@96-@#@[2^$WAV5}'B7eA66-F:AP,E6-F:A,WAYI @d6-&@)6-A56-@? A05}I AI!A6-%@)6-@d56-@? A0I A A(A h A(5}.6-%+'@P:'@,,<6-%@H6-@T6-AI^ A0h A\"6-%+'@P:'@,,065}-&@<6-@H6-@GR A0\ Ah A(.6-&+'@"P:'@,,<6-%@H6-Aa5}T6-AI^ A0h A\"6-&+'@"P:'@,,06-&@<6-AaH6-@GR A0\ A5}9BB@d'B7eA9AY} @3!-@ -,9/@= G5}Y,k/@}/@@/@@',@9/@@K/@5}@]/@@o,@/@@/@@,@@g/@@',@5}@9/@@CA1U,@@g/@@uA@f'AY@bC-@H5}@@OB2HY Apm-@@uq u  k-@AF@+A7B2HA5} ApO6-%@c-@@ug k  -@1@$6@6$AV%J-@@5}N r2%@P@@v 2OB2H Ap--@A1 5}EB2H%@O Ap(-@$@1-$AV%@VA-@@E i2%@P@5}@m 22Q-ARA@+B2H5 ApI-@@uM 5}Q <jAY1,C/@ U/@@ g/@j$FEBB5}@d'B7eA9AYE6-@Pw @3!-@ -,9/@= G5}[-@g,@s/@w Zm-@@#,//@3 =A1Q-@@5}],@i/@m d4'-P:+@ &B:,,'@,@ 4(@nuAAF'AY@b6}C-@HA@OB2HY Apm-@@uq u x -@1@$6@6$AV%6}J-@@N r2%@P@@v 2Q-AAD6}@+B2H5 ApI-@@uM Q -@$@1-$AV%@VA-@@6}E i2%@P@@m 2B2HAR Apo-@@6}&(@8-@@J(@\-@@o(@Լy-@@)A6}A9=-@@A SAAF] Apq-@@u y  A`_%2@f6}@@9-@@= _2Q6-&@' @ *!9-6}@Q(@7<@,$4BB@d'B7eA4(>:A%,$$7@<@,4DA06}YO(GPRESS AND ON RECORDER AND THEN PRESS ON KEYBOARDY A@U9(1READY DISK AND THEN PRESS 6 } ON KEYBOARDKAdAUU AAdAU2@@F-@@ Z-@6 }@`y6-F:%+&@,$@`%,*@ c -@@ /-@@`N6-F:%+&@6 },$@`%,[*@_ c ;-@A'*6-F:$AV%,7*@; "P*@B:,$-@6 }B:,9*@@:7<,,= P*@,x @*@**@7 @D*@Q*@6 }\@f A0xBBA6$@F:Ad, AU$J AT_6-+&@,$AV+-6}%@/"59 Q-%AV%AaU"[_ ^c-A6A"!% Y-+&@,$AV+&6}@,$AV%AH]"ch"@&@rE ;-+&@,$AV+&@,$AV%@h?"6}E|"@&@/ /+&@,$AV%AC&@{-AA #' 96}A#@MA'AV_B2w@{BBy'AV&@A@'A@9A6}P@KAAE]A@RoAAAR6-?:A,#-%@6}# u%6-F:A`,%AV$F:Aa,9%@AM%@A0a%@A0u%@ A06}AA)A&@;AR@MAV@Q]6-@i6-AEu6-@6-6}@6-@6-n(>:A%,26-F:A`,%AV$F:Aa,F-@9T%@j%%A 6}@n G-@@@@@-%@C%%@9@G _AV@'AW@6},(>AV@PAW@!_(SCORE: zAV@'AW@?( ROOM NUMBER  QA6}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,6}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,66},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,16}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,2006},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&mm66},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,46}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,126}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,866 },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,26"},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,146#}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,26$}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,6%}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,6&}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,166'}9,0,141,0,2169,86,141,1,2,104,64 D1:ROBOTS.BAS,169,90,141,4,210,169,193,141,5,210,169,0,141,219,6,141,10,212,164<32000 REM SUPER TYPOII32010 REM BY BARTON, DELL'ERA, MCLAUGHLIN & SOLOMON32015 REM (c) 1985, ANTIC PUBLISHING32020 CLR :DI:)}M LINE$(120),B$(75):CLOSE #2:CLOSE #332025 B$="hhhhhϩ˅б̅m `"32030:*} OPEN #2,4,0,"E":OPEN #3,5,0,"E"32040 ? "}":POSITION 11,1:? "Ϡɠ"32050 TRAP 32040:POSITION 2,3:? "Type in a program li:+}ne"32060 POSITION 1,4:? " ":INPUT #2;LINE$:IF LINE$="" THEN POSITION 2,4:LIST B:GOTO 3206032065 IF LINE$="ERASE" THEN 32250:,}32070 IF LINE$(1,1)="*" THEN B=VAL(LINE$(2,LEN(LINE$))):POSITION 2,4:LIST B:GOTO 3206032075 IF LINE$(1,1)="+" THEN POSITION:-} 2,5:? " ":GOTO 3223032080 POSITION 2,10:? "CONT"32090 B=VAL(LINE$):POSITION 1,3:? " ";32100 POKE 842,13:STOP 32110 POKE :.}842,1232120 ? "}":POSITION 11,1:? "Ϡɠ":POSITION 2,15:LIST B32130 C=0:ANS=C32140 POSITION 2,16:INPUT #3;LINE$:IF LIN:/}E$="" THEN ? "LINE ";B;" DELETED":GOTO 3205032150 ANS=USR(ADR(B$),ADR(LINE$),LEN(LINE$)):ANS=PEEK(1789)+256*PEEK(1790)+65536:0}*PEEK(1791)32160 CODE=INT(ANS/676)32170 CODE=ANS-(CODE*676)32180 HCODE=INT(CODE/26)32190 LCODE=CODE-(HCODE*26)+6532200 H:1}CODE=HCODE+6532210 POSITION 0,16:? CHR$(HCODE+128);CHR$(LCODE+128)32220 POSITION 2,13:? "If CODE does not match press :2}Π and edit line above.":GOTO 3205032230 B=B+1:POSITION 2,4:LIST B:POSITION 2,5:INPUT #3,LINE$:IF LINE$="" THEN 3223032240:3} GOTO 3208032250 ? "}":? :FOR ZZ=32000 TO 32140 STEP 10:? ZZ:NEXT ZZ:? 32015:? 3202532260 ? "CLR:POKE 842,12:CONT";:POSITIO:4}N 2,0:POKE 842,13:STOP 32270 ? "}":? :FOR ZZ=32150 TO 32280 STEP 10:? ZZ:NEXT ZZ:? 32065:? 3207532280 ? "CLR:POKE 842,12:CO:5}NT";:POSITION 2,0:POKE 842,13:END :? :FOR ZZ=32150 TO 32280 STEP 10:? ZZ:NEXT ZZ:? 32065:? 3207532280 ? "CLR:POKE 842,12:CO8#Y  STARLOODSCSCSCSC130XE MEMORY MANA>7}GEMENTBY IAN CHADWICK (c) 1985, ANTIC PUBLISHING (})) !130XE EXTENDED BANK DEMONSTRATION BY IAN C>8}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:@>:},!6-F:@,:SCREEN POINTERS IN RAM(PRESS A CONSOLE KEY*B2y@*CLEAR CONSOLE KEYS7 F:B>;}2y,"@A@7TEST FOR CONSOLE KEY$AA($LOWER RAMTOP*F:B2y,"@" A*START><}+F:B2y,"@" A +SELECT3F:B2y,"@" A%3START & OPTION+F:B2y,"@" A0>=}+OPTION3F:B2y,"@" A@3START & SELECT.F:B2y,"" AE.ALL THREE A@))>>}START PRESSED: SHOW EXTENDED BANK 0+%@+%@@d'@'@@dB>?}@A $**SELECT PRESSED: SHOW EXTENDED BANK 1+%@+%@@d'@>@}'@@dB@A$ ..OPTION & START PRESSED: SHOW MAIN BANK 1 +%@+%@>A}@d '@'@@d B@AS $ **OPTION PRESSED: SHOW EXTENDED BANK 2 +%>B}@+%@@d '@'@@d B@A $22START & SELECT PRE>C}SSED: SHOW EXTENDED BANK 3+%@+%@@d'@'@@dB@A>D}!$EEALL THREE PRESSED: RESTORE RAMTOP AND SHOW ORIGINAL SCREEN AREA1AA`#%@1%@>E}@@B@AS$++FILL A SCREEN EQUIVALENT WITH A VALUE-@>F} (FILLING EXTENDED BANK B@A%%$@! A`!!@AP@  Ae$p>G}-%A z@%&@ $cMAIN BANK FILLd1B@AS1(FILLING MAIN BANK 1i>H}-%A n@  sAA(x$D1:SWITCHER.BASAS1(FILLING MAIN BANK 1i<RSCTHUNDER STORMBY ALPHONSO CARIOTIANTIC PUBLISHING  +BJ}AR@'@@d'B7tA,-@@,(LISTEN TO THE RAIN<-@@<("PBK}RESS THE ŠҠ FOR THUNDER!(<-@@<("PRESS ANY OTHER KEY FOR RAIN AGAIN2*-@@*(DON'T BL}GET WET!!!dB-AEB2O:@&+'@,,n/AA/A %@xBM}%F:Ad,@3'% A}6-6-F:A`,%F:Aa,$AV%@66-F:,C=%+ @h,$+P:H:,$BN}@%@,%@8,C  A D1:THUNDER.IO%@66-F:,C=%+ @h,$+P:H:,$@F-. LINEOUTFILEXAANCODHCODLCODRTBxx A8FP} A +FK TYPO II CODE GENERATORBY ANDY BARTON(C) 1985,FQ} ANTIC MAGAZINE2??;A ,;A(,;@,;@,;@,7];@u,]6.FhhhhhϩFR}˅б̅m `<& (} (&(TYPOII CODE GENERATORP8(.(#Choose a file: [Dn:filename ORFS} C:] 1(4(8Z5 A@5@@d A`@n;6-@:7@<@,,;FT} @H)!@WA`xg B(*(CHOOSE OUTPUT DEVICE:Q("creen rinter isk assetteT(W(c( FU} g 4S6.E A; 4D(((GIVE [Dn:file name] ,;0Ap0P*0CA  FV}A)-@B:,)7<,4.A   67B:,%@,..TYP| AP@5@@FW}? BG4CO6. `67A(,. o67@,.|(@ A $ A@@$ BFX}-7B:,,4 -6.7@:,&67@<@,.>:,?67@<@,. ,)-@B:,)7<,4 A 6 @%%67@F[},.7@<&@,J(@ AT7F:A,A6(4( ERROR- F:A,7^((^^^ FINISF\}HED ^^^h$($( is not a BASIC programr!(in LIST format.! A| 6.6-A A`t6.D1:*.F]}* AL7@<@,3D1*7@<@,2D5t67@<@,.7@<@,a A@(@F^}8@@;(^(7@<@, DIRECTORYa(9@,7@<@,4FREE/(9 @F_}6.7@<@,:67@,.7@<@,M67@,. f7@<@,0 67@ <@ F`},..( A6-@ A`6-A Y(6-F:A,!"A07( DOES NOT EXISTM(Fa}TYPE filenameY6-@3"A8'( DOES NOT RESPOND36-@2"A`&(DRIVE NUMBER ERROR26-@Fb}C"Ab7(#THIS DISK IS FULL. USE ANOTHER ONEC6-@:"Ae.( IS AN INVALID FILE NAME:6-@Fc},"Ag ( IS LOCKED,6-@Z"AiN(:THE DISK DIRECTORY IF FULL. USE ANOTHER DISKETFd}TEZ6-@."Ap"(FILE NOT FOUND.6-@@(ERROR- &6-( D1:TYFe}POIICG.BAS."Ap"(FILE NOT FOUND.6-@@(ERROR- &6-( D1:TYD 23SSFAFFFXYSBVBXYB1B2CHBAS@@A A@@Jg}A ` @2 @P @P@@BA@@Jh}@B$@VAMPIRE RATS!BY TOM ZARBOCK (c) 1985, ANTIC PUBLISHING B  ACTIONSM6Ji}-R:,!6-R:@,76-8%@%8,,M6-8%@%8,,PLYR 1 NEW FACING? !@APIJj}@%,$T:,"$6-@PLYR 1 MOVES OR JMPS? !!@*@APt'6-@Jk}"@'6-@3 APt31%8<,$%8@<,$@2APts @2,(6Jl}-%8<,$=6-%8@<,$I@%O,aB7a@sB7a6-&@$+"@,Jm}PLYR 1 BITES? & WHO? %%1%8<,%8@<,]!A* A%6-@/@2O,%8<,Jn}%8@<,]6-%@i!@A* @P'6-&@56-%@GAAVi2@@@Jo}@OPLYR 2 NEW FACING? P!@ARZ@B%,_$T:@,"$6-@cPLJp}YR 2 MOVES OR JMPS? d!!@*@ARYi'6-@"@'6-@n3 ARY31%8<,$Jq}%8@<,$x@2ARYs @2,(6-%8<,$=6-%8@<,$I@B%O,aBJr}7a@sB7a6-&@$+"@,PLYR 2 BITES? & WHO? %%1%8<,%8@<,Js}]!A* A%6-@/@2O,%8<,%8@<,]6-%@i!@ * @'6-&Jt}@56-%@GA Ai2@@@@ UPDATE BLOOD LEVEL PLAYER 1 AJu}!@Ah%,36-&@A6-&@A @A%,36-%@A6-%@Jv}' 6-'6-@%!@6-@% A"&A`%P:%?P,&,IPLAYERJw} 2 ^A!@Ah%,@36-&@A6-&@hA @A%,@36-%@A6-Jx}%@j' 6-'6-@l%!@6-@% ArA`%,@|6-&?Jy}6-&?  RANDOM VICTIMS  F:B7p,!@ AY@c%6-P:@$H:,%@,G6-P:Jz}@$H:,%@,O1c@2AY ;#P:@$H:,,%A),;@w4!!SOUNDJ{}S >E2@@-6-&@9 E6-HG%2@@J|}G2@@\a)AAP&@$+!@,OA A&@$+!@,aB7hJ}}Ap AP(# GAME ENDS -#%2G2@J~}i2@2@AAPA AF# @2,J},P#?6-@6-6-'"@36-@B96-?6-Z#+-@@+-@d#! %,J}  !#Ax# ""6@Ap#g2@@C2@%@@@Y-@J}'@] 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,-1J}6$G%2G2@;$k-@5(@J}GAYA@kA@@$##T:,*T:@,AE$6-6-J$ BPJ}UINITIALIZE TV..9@,9@<@,9@ ,V #B"V(-@"$68J},-( V((0,0,0,0,0,1,1,1,0,-1,-1,-1,0,0,0,0V+-@+-@V"68<,-  V0,J}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 BpaCJ}USTOM CHARACTER SET a9F:A6,"AT/6-F:A6,$AV9 BQPai$6-+F:AB,&@,$AVAABJ}F:AB,&@UA6'AViAV'AVa=-A*%F:BsD%,. =MOVE ROM SET bJ})-%@%A"%) >b)+@%@)AV'AVHbCUSTOM CHARACTER DATA Rb0,0,0,0,0J},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!!J}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!J}!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,4bJ}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,16b0J},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,2J}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,J}138,207,252,254,124,40,108c0,69,213,247,127,62,0,0eDRAW ARENA euAAP'A AJ}9AA@KAA]A@i6-@u6-@es AF,@)AG;/@J}EAHW,@aAIs/@@e; AP,@@)AG;/@@J}e; AQ,@@)AI;/@@e; @,@)@@;,@@eU J}Ah,@1/C,@@U/@e]6-@6-@'6-@36-J}@=@C,M@BS,] APxiTITLE SCREEN i3+@%@'A@H36-@J}iu%2AP@@G2@AQ@@i2@AR@@u6-@iJ}V-@@!@B-,A/@&@VAF:B7p,iS-@@1(@J} ӡS(T:,)(T:@,Bqi- ,-/@&@i iV-@@!@BJ}-,@A/@&VAF:B7p,iaB7h6-%@)"@@56-a6-@$+@J},%@$+@,i- ,@-/@&iS-@@1(@ŠӡS(TJ}:,)(T:@,Bqi  Bp i%2G2@i2@J}{A@P BP@j$ D:VAMPRAT.BASG2@i2@HR