@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`  `8  ɐ     `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.D8:MEM.SAV J y08 B|DEHI$} V0 0`B;DEL`?<0LV`@ʆ v s? F0Ξ05: [ BDEHI%} VY8 B V  @  /DE `E:D8: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 ALLOWED351 FREE SECTORS COPYING---D8:AMAC.AUTBJl# 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- 170ɛ+,' 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 ORG $8400CHRSET EQU $CBPMAREA EQU $CDPCOUNT EQU $CFTEMP EQU $D1INIT PHA TXA PHA T} TYA PHA JSR $7000 LDX #$60 LDA #3 STA $342,X LDA #SCR&255 STA U}$344,X LDA #SCR/256 STA $345,X LDA #12 STA $34A,X LDA #2 STA $34B,X JV}SR $E456 LDA #1 STA $2F0;; NOW PRINT; LDA #0 STA $55 LDA #3 STA $54 W} LDX #$60 LDA #STRING&255 STA $344,X LDA #STRING/256 STA $345,X LDA #$9 STA X}$342,X LDA #255 STA $348,X STA $349,X JSR $E456 LDA $10 STA OLD LDA Y}$D20E STA OLD+1 LDX #$00 LDA #$00 STA $10 STA $D20E STA $2C6; JSR PMZ}SET; LDA #$80 STA $2F4; LDA #$62 STA PMAREA+1 LDA #$0 STA PMAREA; [}LDA #8 STA BYTE; LDA #PSTR&255 STA PCOUNT LDA #PSTR/256 STA PCOUNT+1; LDA #\}0 STA CHRSET LDA $2F4 STA CHRSET+1; LDA WAITS STA TOGG LDY #0 LDX #1]}81 STY COUNT DEC COUNTDO CPY $D40B BNE DO INY DEX CPX #255 B^}NE DO1 LDX #180DO1 LDA TABWAVE,X STA $D000; LDA #15 CPY #18 BPL DRIT TY_}A SBC #2DRIT CPY #111 BMI DRIT2 TYA ADC #2 AND #15 EOR #15DRIT2; `} ADC TMPCOL STA $D40A STA $D012; TYA ADC COL STA $D01A TYA EORa} #128 STA $D016 TYA ADC $14 AND #15 EOR #15 STA $D013 STA $D014 b} STA $D015 STA $D019 LDA (PMAREA),Y; PHA; LDA TOGG; CMP WAITS; BNE DO2 c} DEYDO2; PLA STA (PMAREA),Y; LDA TOGG; CMP WAITS; BNE DO3 INY Cd}PY #48 BNE DOPPY LDA #0 STA $D009 STA $D00ADOPPY CPY #50 BNE DO3 LDAe} HPOS+1 STA $D001 EOR #255 STA $D002;DO3 CPY #125 BEQ SK2 JMP DO;SK2 f}LDA #3 STA $D009 STA $D00A INC HPOS+1 INC HPOS+1; LDX #4DOLO1 INC HPOS g} DEX BNE DOLO1 LDX HPOS CPX #180 BNE DOLO2 LDX #0 STX HPOSDOLO2; h} INX; INX; INX; INXDOLO3 LDA TABWAVE,X SEC SBC #40 STA $D001 i} CLC ADC #32 STA $D002 ADC #32 STA $D003 ADC #32 STA $D007 ADC #8 j} STA $D006 ADC #8 STA $D005 ADC #8 STA $D004; DEC TOGG; BNE DO4 k} JSR DONEXTBYTE; LDA WAITS; STA TOGGDO4 LDY #0 DEC COL; INC COUNT LDX COUNT l} CPX #182 BNE SKP1 LDA TMPCOL ADC #15 STA TMPCOL LDX #255 STX COUNT m} LDX #0SKP1 LDA $D01F CMP #6 BEQ ENDIT; LDA (PCOUNT),Y CMP #$9B BNE SKIn}P LDA #PSTR&255 STA PCOUNT LDA #PSTR/256 STA PCOUNT+1SKIP JMP DOENDIT LDA #o}0 LDA OLD STA $10 LDA OLD+1 STA $D20E LDA #0 STA $2F0 LDY #$5F p} LDX #$E4 LDA #6 JSR $E45C LDA #0 LDX #8STSOUND STA $D200,X STA $D000,X DEXq} BPL STSOUND PLA TAX PLA TAY PLA RTS;HPOS DB 0,0TMPCOL DB 0,0r}WAITS DB 3BYTE DB 0,0TOGG DB 4COUNT DB 0OLD DB 0,0COL DB 0SCR DB 'S:'STRING DB ' PRESENTS s} ' DB ' THE WAVY DEMO! ',$9B;DONEXTBYTE;; GET NEXT BYTE; TXA PHA LDX BYTE t} CPX #8 BNE FINTHISGETNEXT LDY #0 STY BYTE LDA (PCOUNT),Y SBC #32 STA TEMPu} STY TEMP+1 INC PCOUNT BNE SKPCHI INC PCOUNT+1SKPCHI; ASL TEMP ROL TEMP+1 v} ASL TEMP ROL TEMP+1 ASL TEMP ROL TEMP+1 LDA TEMP CLC ADC CHRSET w} STA TEMP BCC NH1 INC TEMP+1NH1 LDA TEMP+1 ADC CHRSET+1 STA TEMP+1FINTHIS x}LDY BYTE LDA (TEMP),Y LDY #125 STA (PMAREA),Y INC BYTE PLA TAX RTSPSy}TR DB ' HELLO' DB ' AND WELCOME TO THE VERY FIRST DEMO EVER TO APPz}EAR FROM A NEW NORWEGIAN CREW ... WE' DB ' CALL OURSELVES POKEY SOFT ' DB ' THIS LITTLE WAVY SCROLL {}WAS WRITTEN BY PINK AND HAWK ON THE 25TH OF MAY 1991 ' DB ' IF ANYBODY WANT TO CONTACT US GET A PEN AND SOME |}PAPER CAUSE HERE COMES THE ADDRESSES' DB ' }} ' DB 'VIDAR OLAVESEN * HAWK * STEVNEVEIEN 7 N 1720 GREAKER NORWAY OR ' DB ~}'ODD K SKANCKE * PINK * UTSIKTSVEIEN 44B N 1700 SARPSBORG NORWAY' DB ' ' DB ' } NOW LET',$27,'S GET TO THE GREETINGS FROM HAWK HI UMUT HAVE YOU STARTED YOUR' DB ' MEGA DEMO YET } ' DB 'JAAP MORSSINK THANX FOR TAKING OVER FOR ARNOLD' DB ' RENE VAN MIERLO GREAT SWAPPER } MICHAEL R HUTTON THANX FOR EVERYTHING AND ' DB 'KEEP ON SUPPORTING THE GREAT 8 BIT MY FRIEND TOMMY HERMANSE}N' DB ' WELCOME TO THE WORLD OF DISK DRIVES AND ASSEMBLY PROGRAMMING' DB ' WE AWAIT YOUR WORKS SO CODE ON } ' DB 'MILES R REDFORD WHERE ARE YOU MY FRIEND MAKE CONTACT PLEASE WARREN WHITEMAN PLEASE WRITE A }LETTER SOON' DB ' AND FINALLY A GUY FROM KRONOS TITAN AND LATEBAR ALON COHEN YOUR MUSIC SUCKS HE HE HE H}E' DB ' ' DB 'AND ANYBODY I MIGHT HAVE FORGOTTEN' DB ' NOEN GANGER KAN MAN DET SE } OOPS THAT WAS NORWEGIAN' DB ' WELL NOW TO SOME OTHER STUFF SOON .. WELL HOPEFULLY SOON TO BE AVAILABLE'} DB ' THE FIRST CHRONICLES OF THOMAS' DB ' COVENANT .. LORD FOULS BANE IT WILL BE RELEASED IN AUTUMN }OR SO IF ALL GOES WELL' DB ' IT KIND OF DEPENDS ON THE GRAPHICS AND SOUNDS' DB ' ANYHOW THE GAME WIL}L BE SOMETHING LIKE THIS .... ' DB ' A FANTASY ROLE PLAYING GAME BASED ON THE BOOKS WRITTEN BY STEPHEN DONALDSON' } DB ' DO YOURSELF A FAVOUR AND READ THESE BOOKS AT LEAST IF YOU LIKE TOLKIEN BECAUSE THEY ARE BETTER' DB '} THAN TOLKIENS LORD OF THE RINGS ANYHOW THE GAME WILL FIRSTLY BE BASED ON THE FIRST BOOK IN THE' DB ' FIRST CHRON}ICLES AND MAYBE SOME MORE LATER ON THE GAME WILL PROBABLY BE SOMEWHAT' DB ' LIKE THE ULTIMA SERIES BUT WITH MODE} 15 GRAPHICS AND DISPLAY LIST INTERRUPTS WITH SOME' DB ' VERTICAL BLANK INTERRUPTS CONTROLLING THE TIME OF DAY AND SU}CH THINGS' DB ' THERE WILL MOST PROBABLY BE SOME ARCADE SEQUENCES IN THERE ALSO AT FINALLY IT WILL BE DISK ONLY'} DB ' BECAUSE THE GRAPHICS WILL PROBABLY TAKE UP A COUPLE OF DISK SIDES ALONE AND THE CODE WILL BE DONE IN' DB} ' ASSEMBLY OF COURSE' DB ' NOW I LET THE SCROLL LINE OVER TO PINK' DB ' ' DB '}HELLO THERE THIS IS PINK SPEAKING MY PARTNER HAWK REFUSED TO USE COMMAS AND PUNCTUATIONS ' DB 'SO HERE WE GO ...},,,., .,.,.,.,. ,.,. ' DB 'NOW, LETZ GET ZERIOUZ ..,.,.,.,. THIS IS NOT VERY FUNNY AT ALL' DB ' }WELL, THIS IS AS HAWK MENTIONED EARLIER OUR FIRST LITTLE PIECE OF CODE ' DB 'WRITTEN FOR THE 8 BIT ATARI, SO IT IS NO}T THE BEST EVER SEEN ..... YET' DB ' NOW LETZ GET TO THE GREETINGS FROM ME *PINK* AND THEY WALKS TO' DB} ' ANITA *MY LOVE* ,' DB ' ANITA *MY LOVE* ANITA *STILL MY LOVE* ANITA *YET} MY LOVE* AND ' DB ' ANITA *LOVE* ' DB ' AND NOW THE GREAT MOMENT HAS COME ......... WELCOME TO T}HE WORLD OF SCROLL LINES IS MY LADY ANITA' DB ' ... TAKE IT AWAY, GIRL' DB ' ' DB }'THANK YOU BOYS I LOVE PINK ... AND I WISH LINUS AND HER BABY EVERYTHING GOOD FOR THE FUTURE' DB ' I LOVE OD}D' DB ' THIS IS PINK AGAIN AND ITZ TIME TO WRAP THIS MEANINGLESS SCROLL ...... BYE BYE BYE BYE ....' }DB $9BTABWAVE DB 110,110,111,112,113,114,115 DB 116,116,117,118,119,120,120 DB 121,122,123,123,124,1}25,126 DB 126,127,127,128,129,129,130 DB 130,131,131,132,132,132,133 DB 133,133,134,134,134,134,134 } DB 134,134,134,135,134,134,134 DB 134,134,134,134,134,133,133 DB 133,132,132,132,131,131,130 D}B 130,129,129,128,127,127,126 DB 126,125,124,123,123,122,121 DB 120,120,119,118,117,116,116 DB 115,11}4,113,112,111,110,110 DB 109,108,107,106,105,104,103 DB 103,102,101,100,99,99,98 DB 97,96,96,95,94,93},93 DB 92,92,91,90,90,89,89 DB 88,88,87,87,87,86,86 DB 86,85,85,85,85,85,85 DB 85,85,85,85,85},85,85 DB 85,85,85,85,86,86,86 DB 87,87,87,88,88,89,89 DB 90,90,91,92,92,93,93 DB 94,95,96,96},97,98,99 DB 99,100,101,102,103,103,104 DB 105,106,107,108,109,110,110 DB 111,112,113,114,115,116,116} DB 117,118,119,120,120,121,122 DB 123,123,124,125,126,126,127 DB 127,128,129,129,130,130,131 } DB 131,132,132,132,133,133,133 DB 134,134,134,134,134,134,134 DB 134,135,134,134,134,134,134 DB 134,}134,134,133,133,133,132 DB 132,132,131,131,130,130,129 DB 129,128,127,127,126,126,125 DB 124,123,123,}122,121;PMSET; LDX #0 LDA #0CLRIT STA $6100,X STA $6200,X STA $6300,X INX } BNE CLRIT;; SET UP STUFF; LDA #$60 ; PMBASE STA $D407 LDA #46 ; DOUBLE LINE } STA $022F ; RES PM'S; LDA #3 ; TURN ON PLAYER STA $D01D ; 0-3 & MISSILES; LDA }#14 ; SET PMCOLORS STA $02C0 LDA #18 STA $2C1 STA $2C2 STA $2C3 STA $2}C7; LDA #3 ; SET SIZE STA $D008 ; OF PLAYER LDA #3 STA $D009 STA $D00A} STA $D00B LDA #255 STA $D00C; LDA #17 ; SET PRIORITIES STA $26F; LDX} #0DOPM1 LDA PM1,X STA $6290,X LDA PM2,X STA $6310,X LDA PM3,X STA $6390,X } LDA PM4,X STA $6190,X INX CPX #21 BNE DOPM1; LDX #0DOPM2 LDA PM5,X } STA $62C0,X LDA PM6,X STA $6340,X INX CPX #47 BNE DOPM2; RTS;; PM D}ATA;PM1 DB 120,77,69,77,121,65,65 DB 65,65,0,0,0,7,13,8,12 DB 7,1,0,13,7PM2 DB 228,180,20,21,}23,21,20 DB 180,228,0,0,0,28,182 DB 34,34,34,162,162,182,28;PM3 DB 95,80,208,144,28,144,208 DB }80,95,0,0,0,251,128,128 DB 128,224,128,128,128,128;PM4 DB 68,68,108,56,16,16,16 DB 16,16,0,0,0,224,128,}128 DB 128,128,128,128,128,128PM5 DB 127,65,65,127,65,65,65 DB 0,0,0 DB 127,8,8,8,8,8,8 } DB 0,0,0 DB 127,65,65,127,65,65,65 DB 0,0,0 DB 127,65,65,127,68,66,65 DB 0,0,0 D}B 8,8,8,8,8,8,8PM6 DB 127,65,65,127,68,66,65 DB 0,0,0 DB 65,65,65,65,65,65,127 DB 0,0,0 } DB 64,64,64,64,64,64,127 DB 0,0,0 DB 127,64,64,124,64,64,127 DB 0,0,0 DB 127,64,64,127,1,}1,127 END INIT64,127 DB 0,0,0 DB 127,64,64,124,64,64,127 DB 0,0,0 DB 127,64,64,127,1,pw7UtztҩҩqtwtstutWtWttXtuYtZtXt Zt\tt[t]t^tZtm_tsu mX }tJu`t`tat`tbtҭZtm_tsuat`t Ztm_tsuat_tm[ttct_tmYtvdtct8 dthtmtgt }ҩL!q^tcttgtt轎tҭot tVtUtUtqtIqtvtL!qUt tVtUt tVtxtotytL/qot }ytytxt otytUtIt tVtt tVtt tVtt tVt~tt}tt|ttttttL!qtLrtt~tt }tttttt́tt}tt|tttL/qUt tVtUtetIetetUt8 tVtttUt8 .ptUtwtUtq }tetҭwtJ8ҩttqtvttL)ttatiҭtҭftiҭft{tftetpt  pt8fttvt }rtmwtҭptiҭgtmmtҭhtҭhtmkthtct8 gtgtgtct gt8gt^tltktjthtktntmtitgtlt{tI }{ttL)ttat8atatqt{tvtvtvt^tttLr_t_t _t\tI\tptpt]t]tL^pWtWt| }L0pttet\totqtwtL+p5mtvmtVttittit`ztLwhLbzttE \`HHHtLrLpsU  }ssU         }         g3ss9?C!U*g3ss9? }C!U*`*`0l0C?s9l } /*(*/*(*(/(#/(#/(/*(*/*(*(/(#/(#/(#/#QH@<@HUl`UQU`` }Q`Uf`QU`frf`Uf`Q`HU@QQQQVTVTVTLTLTLTԭWTiWTU(i i i i=Y}DLIST = $230;PHA;LDA #DLDATA&255STA DLISTLDA #DLDATA/256STA DLIST+1;LDA #EMP1&255STA DLDATA+1STA DLDATA+4}LDA #EMP1/256STA DLDATA+2STA DLDATA+5;LDA #MESS1&255STA MESS+1LDA #MESS1/256STA MESS+2;LDA #POKEY&255STA S}CRV1+1STA SCRV1+4STA SCRV1+7STA SCRV1+10STA SCRV1+13STA SCRV1+16STA SCRV1+19STA SCRV1+22LDA #POKEY/256STA S}CRV1+2STA SCRV1+5STA SCRV1+8STA SCRV1+11STA SCRV1+14STA SCRV1+17STA SCRV1+20STA SCRV1+23;LDA #EMP2&255STA }SCRH1+1LDA #EMP3&255STA SCRH1+5LDA #EMP4&255STA SCRH1+9LDA #EMP5&255STA SCRH1+13LDA #EMP6&255STA SCRH1+17LD}A #EMP7&255STA SCRH1+21;LDA #EMP2/256STA SCRH1+2LDA #EMP3/256STA SCRH1+6LDA #EMP4/256STA SCRH1+10LDA #EMP5/2}56STA SCRH1+14LDA #EMP6/256STA SCRH1+18LDA #EMP7/256STA SCRH1+22;LDA #PICY&255STA PICT+1LDA #PICY/256STA P}ICT+2;LDA #DLDATA&255STA JMPDL+1LDA #DLDATA/256STA JMPDL+2;PLARTS;DLDATADB 87,0,0DB 87,0,0DB 0,0PICTDB} 82,0,0DB 18,18,18,18DB 18,18MESSDB 66,0,0DB 2,2DB 0,0SCRH1DB 86,0,0,32DB 86,0,0,32DB 86,0,0,32DB 86,0,0,32}DB 86,0,0,32DB 86,0,0,32SCRV1DB 102,0,0DB 102,0,0DB 102,0,0DB 102,0,0DB 102,0,0DB 102,0,0DB 102,0,0DB 70,}0,0JMPDLDB 65,0,06,0,0,32SCRV1DB 102,0,0DB 102,0,0DB 102,0,0DB 102,0,0DB 102,0,0DB 102,0,0DB 102,0,0DB 70,LDA #6LDY #VBI&255LDX #VBI/256JMP $E45C;VBIPHATYAPHATXAPHA;LDA #0; ATTRACT OFFSTA 77;DEC HPOSBN}E SDL0LDA #8STA HPOSSTA $D404LDA DLDATA+1STA $CDLDA DLDATA+2STA $CELDY #25LDA ($CD),YCMP #255BNE CSCR1}LDA #SC1B&255STA DLDATA+1STA DLDATA+4LDA #SC1B/256STA DLDATA+2STA DLDATA+5CSCR1INC DLDATA+1INC DLDATA+4BNE }SDL1INC DLDATA+2INC DLDATA+5BNE SDL1SDL0LDA HPOSSTA $D404SDL1;LDA HPOS+1SECSBC #2STA HPOS+1BNE SDL2L}DA #8STA HPOS+1;LDA SCRH1+1STA $CDLDA SCRH1+2STA $CELDY #25LDA ($CD),YCMP #255BNE CSCR2LDA #SC2B&255ST}A SCRH1+1LDA #SC2B/256STA SCRH1+2CSCR2;INC SCRH1+1BNE SDL2INC SCRH1+2SDL2;LDA HPOS+2SECSBC #3STA HPOS+2}BCS SDL3AND #7STA HPOS+2;LDA SCRH1+5STA $CDLDA SCRH1+6STA $CELDY #25LDA ($CD),YCMP #255BNE CSCR3LDA }#SC3B&255STA SCRH1+5LDA #SC3B/256STA SCRH1+6CSCR3;INC SCRH1+5BNE SDL3INC SCRH1+6SDL3;LDA HPOS+3SECSBC #}4STA HPOS+3BNE SDL4LDA #8STA HPOS+3;LDA SCRH1+9STA $CDLDA SCRH1+10STA $CELDY #25LDA ($CD),YCMP #255B}NE CSCR4LDA #SC4B&255STA SCRH1+9LDA #SC4B/256STA SCRH1+10CSCR4;INC SCRH1+9BNE SDL4INC SCRH1+10SDL4;LDA HP}OS+4SECSBC #5STA HPOS+4BCS SDL5AND #7STA HPOS+4;LDA SCRH1+13STA $CDLDA SCRH1+14STA $CELDY #25LDA ($C}D),YCMP #255BNE CSCR5LDA #SC5B&255STA SCRH1+13LDA #SC5B/256STA SCRH1+14CSCR5;INC SCRH1+13BNE SDL5INC SCRH}1+14SDL5;LDA HPOS+5SECSBC #6STA HPOS+5BCS SDL6AND #7STA HPOS+5;LDA SCRH1+17STA $CDLDA SCRH1+18STA $C}ELDY #25LDA ($CD),YCMP #255BNE CSCR6LDA #SC6B&255STA SCRH1+17LDA #SC6B/256STA SCRH1+18CSCR6;INC SCRH1+17}BNE SDL6INC SCRH1+18SDL6LDA HPOS+6SECSBC #7STA HPOS+6BCS SDL7AND #7STA HPOS+6;LDA SCRH1+21STA $CDLDA} SCRH1+22STA $CELDY #25LDA ($CD),YCMP #255BNE CSCR7LDA #SC7B&255STA SCRH1+21LDA #SC7B/256STA SCRH1+22CSCR7};INC SCRH1+21BNE SDL7INC SCRH1+22SDL7;INC PSCRLLDA PSCRLCMP #4BNE SDL8LDA #0STA PSCRLSDL8;INC VSCROL}LDA VSCROLCMP #8BNE SKVSCLDA #0STA VSCROLSKVSCSTA $D405;LDA XSPRCLCADC #6TAYCPY #180BNE BB1LDY #0}BB1STY XSPRLDA WAVE,YSBC #40STA $D001CLCADC #32STA $D002CLCADC #32STA $D003CLCADC #32STA $D007CL}CADC #8STA $D006CLCADC #8STA $D005CLCADC #8STA $D004;DEC SPRCOL+1BNE COLNO;LDA SPRCOLCLCADC #16}STA SPRCOL;STA $2C1STA $2C2STA $2C3STA $2C7;LDA #20STA SPRCOL+1COLNO;LDA POSICLCADC #3CMP #180BNE N}WA2LDA #0NWA2STA POSITAYLDA WAVE,YCLCADC #15STA $D000;;LDA POSI+1CLCADC #2CMP #180BNE NWA1LDA #0}NWA1;STA POSI+1TAY;STY $2C0;LDA WAVE,YSECSBC #60TAYLDX #0DOAPMLDA PMDAT,XSTA $8200,YINYINXCPX }#55BNE DOAPM;PLATAXPLATAYPLAJMP $E45FVSCROLDB 0HPOSDB 8,8,8,8,8,8,8,8,8PSCRLDB 0XSPRDB 0,0SPRCOLDB 6},1PMDATDB 0,0,0,0,42,42,42,42,73DB 0,0DB 0,124,130,130,254,130,130,130DB 0,254,16,16,16,16,16,16DB 0,124,130,130,2}54,130,130,130DB 0,252,130,130,252,136,132,130DB 0,16,16,16,16,16,16,16DB 0,0,0,0POSIDB 0,0COUNTDB 0,124,130,130,2oORG $3000MESS1DB 0,0,0DB 0,0,0,0,0,0,0,0,0,0DB 52,'his',0,'demo',0DB 'was',0,'written',0,'by'DB 0,0,0,0,0,0,0,0,0 },0DB 0,0,0,0,0,0,0,0,0,0DB 0,0,0,0,0,0,0,0,0DB 40,'awk',0,'and',0,48,'ink'DB 1,0,0,0,0,0,0,0,0,0,0DB 0,0,0,0,0,0,0,!}0,0,0,0,0,0DB 0,0,0,46,'o',0,35,'opyrights'DB 0,17,25,25,17,0,48,'okey'DB 0,51,'oft',1,0,0,0,0,0,0,0POKEYDB 0,0,0,'p!}',0,'o',0,'k',0DB 'e',0,'y',0,0,'s',0,'o'DB 0,'f',0,'t',0,0,0EMP1DS 255SC1BDB 0,'the',0,'greetings',0DB 'goes',0,!}'to',0,'detail'DB 0,'of',0,'the',0,'turkish'DB 0,'atari',0,'cracking'DB 0,'force',0,0,0,'code',0DB 'on',0,'pal',0,0,0!},0DB 'frankenstein',0,'of',0DB 'the',0,'high',0,'tech',0DB 'team',0,0,0,'good',0,'luck'DB 0,'with',0,'the',0DB 'pla!}tinum',0,'demo',0,0,0,0DB 'michael',0,'hutton',0,0,0DB 'keep',0,'the',0,'software'DB 0,'rolling',0,'in',0,0,0,0DB 'ja!}ap',0,'morssink',0,0,0DB 'how',0,'is',0,'the',0DB 'conversion',0DB 'of',0,'smartworks',0DB 'getting',0,'along',0,0,0,!}0DB 'tommy',0,'hermansen',0,0,0DB 'keep',0,'coding',0,0,0,0DB 'rene',0,'van',0,'mierlo'DB 0,0,0,'where',0,'are',0DB!} 'you',0,0,0,0,'and',0,'all'DB 0,'real',0,'atarians',0DB 'out',0,'there',0,0,0,0,0,0DB 0,'well',0,'i',0,'guess',0DB '!}it',0,'is',0,'time',0,'to'DB 0,'wrap',0,0,0,0,0DB 0,0,0,0,0,'byyyyeeeee'DB 0,0,0,0,0,0,0DB 'the',0,'greetings',0DB ! }'goes',0,'to',0,'de'DB 255;EMP2DS 255SC2BDB 0,'well',0,'hello',0,'there'DB 0,'i',0,'am',0,'scrolline'DB 0,'two',! }0,'in',0,'the',0DB 'pokey',0,'soft',0,'demo',0DB 52,40,37,0,51,37,35,47,46,36DB 0,51,35,50,47,44,44,0,0,0DB 0,0,0,0,'! }atari',0,'compute'DB 'rs',0,'can',0,'really'DB 0,'scroll'DB 0,'or',0,'what',0,0,0,0,0,0DB 0,0,0,0,'if',0DB 'you',0,! }'like',0,'this',0DB 'demo',0,'please',0,'write'DB 0,'to',0,'the',0,'address',0DB 'in',0,'scrolline',0,'seven'DB 0,0,0! },'that',0,'is',0,'the'DB 0,'one',0,'you',0,'get',0DB 'a',0,'headache',0,'from',0DB 'reading',0,0,0,'just',0DB 'tell',!}0,'us',0,'what',0DB 'you',0,'think',0,0,0,0DB 0,'well',0,'i',0,'guess'DB 0,'i',0,'will',0,'wrap',0DB 'now',0,0,0,0,0,!}0DB 'well',0,'hello',0,'there'DB 0,'i',0,'am',0,'sc'DB 255;EMP3DS 255SC3BDB 0,'want',0,'some',0,'really'DB 0,'!}great',0,'metal',0,0,0,0DB 0,'try',0DB 'listening',0,'to',0DB 'arcth',0,0,0,0,0,0,'both',0DB 'the',0,'debut',0,'album!}',0DB 'called',0,0,0,'another',0DB 'return',0,'to',0,'church',0DB 'hill',0,0,0,'and',0,'the',0DB 'new',0,'album',0,0,!}0,'for'DB 0,'the',0,'sake',0,'of',0DB 'mankind',0,0,0,'it',0,'is'DB 0,'really',0,'excellent',0DB 'and',0,'heavy',0,'m!}usic'DB 0,0,0,0,0,0,0,0DB 'want',0,'some',0,'really'DB 0,'great',0,'m'DB 255;EMP4DS 255SC4BDB 0,'welcome',0,'t!}o',0DB 'scrolline',0,'four',0DB 'atarian',0,0,0,0DB 0,'this',0,'will',0,'be',0DB 'pretty',0,'short',0,'so',0DB 'i',!}0,'just',0,'throw',0DB 'some',0,'shit',0,'about'DB 0,'those'DB 0,'lousy',0,'computers'DB 0,'called',0,'commodore'DB!} 0,0,0,0,'not',0,'really'DB 0,'suitable',0,'as',0,'a',0DB 'doormat',0,0,0,0,0DB 'where',0,'is',0,'the',0DB 'colors',0!},'located',0,0,0DB 0,0,0,0,'on',0,'the',0DB 'wires',0,'inside',0,'or'DB 0,'what',0,0,0,'wont',0DB 'do',0,'much',0,'go!}od',0DB 'there',0,0,0,0,0,0,'atari'DB 0,'rules',0,'forever',0,0,0DB 0,0,0,0,0,0,0,0,0,0,0DB 'welcome',0,'to',0DB 's!}crolline',0,'fou'DB 255;EMP5DS 255SC5BDB 0,'thislineistotallywithout'DB 'spacesandidonotthink'DB 'itsmuchsensein!}prolonging'DB 'theagonyofthepersonstrying'DB 'toreadthisscrollinesoi'DB 'guessiquitthisfuckingshit'DB 0,0,0,0,0,0,0,0!},0,0,0,0,0,0DB 'w',0,0,0,0,0,0,0,0,0,0DB 'o',0,0,0,0,0,0,0,0,0,0DB 'w',0,0,0,0,0,0,0,0,0,0DB 0,0,0,0,0,0,0,0,0,0,0D!}B 'thislineistotallywithout'DB 255;EMP6DS 255SC6BDB 0,'welcome',0DB 'to',0,'scrolline'DB 0,'six',0,'and',0,0,0,0!}DB 'this',0,'one',0,'is',0DB 'just'DB 0,'another',0,'scroll',0DB 'filler',0,'and',0,'the'DB 0,'time',0,'to',0,'fini!}sh'DB 0,'this',0,'demo',0,'is'DB 0,'very',0,'short',0DB 'so',0,'i',0DB 'guess',0,'i',0,'wrap',0DB 'this',0,'shit',0!},'now'DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0DB 'welcome',0,'to',0,'scroll'DB 'ine',0,'six'DB 255;EMP7DS 255SC7BDB 0,'p! }lease',0,'contact',0DB 'us',0,'on',0,'the',0DB 'following',0,'address'DB 0,0,0,0,0,0,0,0DB 0,0,0,0,0,0,0,0DB 'vidar!!}',0,0,0,0,'olavesen'DB 0,0,0,0,0,0,0,0,0,0DB 'stevneveien',0,0,0,0,23DB 0,0,0,0,0,0,0,0,0,0DB 17,23,18,16,0,0,0,0DB!"} 'greaker'DB 0,0,0,0,0,0,0,0,0,0DB 'norway',0,0,0,0,0,0DB 0,0,0,0,0,0,0,0,0,0DB 'please',0,'contact',0,'us'DB 0,'on!#}',0,'the'DB 255,0,0,0,0,0,0,0,0DB 'norway',0,0,0,0,0,0DB 0,0,0,0,0,0,0,0,0,0DB 'please',0,'contact',0,'us'DB 0,'on PMAREAEQU $CDPCOUNTEQU $CFTEMPEQU $CC;PHATXAPHATYAPHALDX #0LDA #0CLRITSTA $8000,XSTA $8100,XSTA $8%%}200,XSTA $8300,XINXBNE CLRIT;LDA #$80STA $D407LDA #3STA $D01D;LDA #14STA $2C0STA $2C1STA $2C2STA $2%&}C3STA $2C7;LDA #0STA $D008LDA #3STA $D009STA $D00ASTA $D00BLDA #255STA $D00C;LDA #49STA $26F;LDX #%'}0DOPMLDA PM1,XSTA $8299,XLDA PM2,XSTA $8319,XLDA PM3,XSTA $8399,XLDA PM4,XSTA $8199,XINXCPX #20BNE DOP%(}M;PLATAXPLATAYPLARTSPM1DB 125,69,69,69,125,65,65DB 65,65,0,0,15,8,8,8DB 15,0,0,0,15PM2DB 244,20,20,21,23%)},21,20DB 20,244,0,0,190,34DB 34,34,162,162,162,162,190PM3DB 190,160,160,160,56,160,160DB 160,190,0,0,251,128,128DB %*}128,224,128,128,128,128PM4DB 136,136,136,248,32,32,32DB 32,32,0,0,224,128,128DB 128,128,128,128,128,12851,128,128DB $nPICYDB 87,87,87,87,87,87,87,87,87DB 87DB 87,87,87,87,87,87,87,87,87DB 87DB 87,87,87,87,87,87,87,87,87DB 87DB 87),},87,87,87,87,87,87,87,87DB 87DB 87,87,87,87,87,87,87,87PICENDDB 83,83,83,83,83,83,83,83,83DB 83DB 83,83,83,83,83,8)-}3,83,83,83DB 83DB 83,83,83,83,83,83,83,83,83DB 83DB 83,83,83,83,83,83,83,83,83DB 83DB 83,83,83,83,83,83,83,83,83).}DB 83DB 83,83,83,83,83,83,83,83,83DB 83DB 83,83,83,83,83,83,83,83,83DB 83DB 83,83,83,83,83,83,83,83,83DB 83DB )/}83,83,83,83,83,83,83,83,83DB 83DB 83,83,83,83,83,83,83,83,83DB 83DB 83,83,83,83,83,83,83,83,83DB 83DB 83,83,83,83)0},83,83,83,83,83DB 83DB 83,83,83,83,83,83,83,83,83DB 83DB 83,83,83,83,83,83,83,83,83DB 83DB 83,83,83,83,83,83,83,8)1}3,83DB 83DB 83,83,83,83,83,83,83,83,83DB 83DB 83,83,83,83,83,83,83,83,83DB 83DB 83,83,83,83,83,83,83,83,83DB 83)2}DB 83,83,83,83,83,83,83,83,83DB 83DB 83,83,83,83,83,83,83,83,83DB 83DB 83,83,83,83,83,83,83,83,83DB 83DB 83,83,)3}83,83,83,83,83,83,83DB 83DB 83,83,83,83,83,83,83,83,83DB 83DB 83,83,83,83,83,83,83,83,83DB 88,88,88,88,88,88,88,88,)4}88DB 88DB 88,88,88,88,88,88,88,88,88DB 88DB 88,88,88,88,88,88,88,88,88DB 88DB 88,88,88,88,88,88,88,88,88DB 88)5}DB 88,88,88,88,88,88,88,888,88,88,88,88DB 88DB 88,88,88,88,88,88,88,88,88DB 88DB 88,88,88,88,88,88,88,88,88DB 88(WAVEDB 110,110,111,112,113,114,115DB 116,116,117,118,119,120,120DB 121,122,123,123,124,125,126DB 126,127,127,128,129,-7}129,130DB 130,131,131,132,132,132,133DB 133,133,134,134,134,134,134DB 134,134,134,135,134,134,134DB 134,134,134,134,1-8}34,133,133DB 133,132,132,132,131,131,130DB 130,129,129,128,127,127,126DB 126,125,124,123,123,122,121DB 120,120,119,11-9}8,117,116,116DB 115,114,113,112,111,110,110DB 109,108,107,106,105,104,103DB 103,102,101,100,99,99,98DB 97,96,96,95,94-:},93,93DB 92,92,91,90,90,89,89DB 88,88,87,87,87,86,86DB 86,85,85,85,85,85,85DB 85,85,85,85,85,85,85DB 85,85,85,85,86-;},86,86DB 87,87,87,88,88,89,89DB 90,90,91,92,92,93,93DB 94,95,96,96,97,98,99DB 99,100,101,102,103,103,104DB 105,106,-<}107,108,109,110,110DB 111,112,113,114,115,116,116DB 117,118,119,120,120,121,122DB 123,123,124,125,126,126,127DB 127,1-=}28,129,129,130,130,131DB 131,132,132,132,133,133,133DB 134,134,134,134,134,134,134DB 134,135,134,134,134,134,134DB 13->}4,134,134,133,133,133,132DB 132,132,131,131,130,130,129DB 129,128,127,127,126,126,125DB 124,123,123,122,121COLTABDB -?}0,0,0,0,16,18,20,22,24,26DB 28,30,28,26,24,22,20,18,16,0DB 0,0,2,2,2,2,2,4,4,4DB 4,6,6,6,8,6,6,6,4,4DB 4,4,2,2,2,2,2,-@}0DB 2,4,6,8,2,4,6,8DB 2,4,6,8,8DB 144,146,148,150,152,154DB 254,252,250,248,246,244DB 162,164,166,168,170,172DB 3-A}4,36,38,40DB 2,34,114,162,18,0DB 10,42,170,250,26,0DB 112,113,114DB 115,116,117,118,119,120,121DB 122,123,124,125,1-B}26,126,125DB 124,123,122,121,120,119,118DB 117,116,115,114,113,112DB 115,116,117,118,119,120,121DB 122,123,124,125,1,GORG $5000INIT;LDA #0STA 710STA 712STA $10STA $D20ESTA 559;JSR DISPLAYJSR PMGRAPH;LDA #0LDX #0CLR11D}STA EMP1,XSTA EMP2,XSTA EMP3,XSTA EMP4,XSTA EMP5,XSTA EMP6,XSTA EMP7,XDEXBNE CLR1;JSR STARTVBLJMP LINEWA1E}IT;DISPLAYINCLUDE D8:SECDL.ASM;LINEWAITINCLUDE D8:SECLW.ASM;STARTVBLINCLUDE D8:SECVB.ASM;INCLUDE D8:SECBACK.AS1F}M;INCLUDE D8:SECTAB.ASM;PMGRAPHINCLUDE D8:SECPM.ASM;INCLUDE D8:SECMESS.ASMEND INITB.ASM;INCLUDE D8:SECBACK.AS0_LDX #0WA1DEXBNE WA1;LDA #$98STA 756;LDA #47STA 559;; TURN ON MUSIC;JSR $7000;LDX #0LDY #0VCWAITC5H}PX $D40BBNE VCWAIT;CPX #70BPL M70;CPX #90BMI U90JMP SLUTTU90;CPX #12BNE NOUPLDA #4STA $D401JMP SLUT5I}TNOUP;CPX #20BNE SKP0LDA #0STA $D401LDA PSCRLSTA DOSCRLJMP SCRLITSKP0;CPX #61BNE SKC0LDA HPOS+1STA 5J}DOSCRLCLCBCC SCRLITSKC0CPX #66BNE SKC1LDA HPOS+2STA DOSCRLCLCBCC SCRLITSKC1BNE SLUTTM70CPX #72BNE SK5K}C2LDA HPOS+3STA DOSCRLCLCBCC SCRLITSKC2CPX #78BNE SKC3LDA HPOS+4STA DOSCRLCLCBCC SCRLITSKC3CPX #82B5L}NE SKC4LDA HPOS+5STA DOSCRLCLCBCC SCRLITSKC4CPX #88BNE SKC5LDA HPOS+6STA DOSCRLCLCBCC SCRLITSKC5;CLC5M}BCC SLUTTSCRLITLDY DOSCRLLDA COLTAB,XSTX $D40ASTY $D404STA $D017INXSLUTTLDA COLTAB,XSTX $D40ASTA $D0175N};INXCPX #124BMI NORESETLDX #0;CONSOLLDA $D01FCMP #6BNE NORESETJMP $E477NORESETJMP VCWAITHPDB 0,0,0,0,05O}DOSCRLDB 0124BMI NORESETLDX #0;CONSOLLDA $D01FCMP #6BNE NORESETJMP $E477NORESETJMP VCWAITHPDB 0,0,0,0,04 888888ffffff~~`~~fl0fF>6xo~{>>888>|||f<c6>8pp8?9U}w><~~~<||`x`~<~9V}~<0~0 ~ <~~<~~f~``~~f~~~``~~~f~~f~`~~~~f~~``~~ff8888<>>``f||f889W}<<wwk~~fff~~ff~~~f~``~~f~~~```~`~~~~fff~~ff~<ckwf~<~fff~~~~~0~<~~<9X}~x|ng8x8f~``~~f~~~```~`~~~~fff~~ff~<ckwf~<~fff~~~~~0~<~~<8iiZTYTiSTYTZTTiɴTUiЭTiɴTU8<[T7hhhL_=Z}****I||WWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWSSSSSSS=[}SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSTUSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS=\}SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSXXXXXXXXXXXXXX=]}XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXnnopUVqrsttuvwxxyz{{|}~~~~}|{{zyxxwvuttsrq=^}ponnmlkjihggfedccba``_^]]\\[ZZYYXXWWWVVVUUUUUUUUUUUUUUUUUVVVWWWXXYYZZ[\\]]^_``abccdefgghijklmnnopqrsttuvwxxyz{{|}~~=_}~~}|{{zVWy=`}"$&("r *pqrstuvwxyz{|}~~}|{zyxwvutsrqpHHH񩀍ԩЩЩ Ѝ Ѝ Щ Щ1o=a}WWWXhhh`}EEE}AAAAW#X"""8 0=b}04hisdemowaswrittenby(awkand0ink.o#opyrights=c}0okey3oftpokeysoft12thegreetingsgoestodetailoftheturkishataricrackingforcecodeonpa=d}lfrankensteinofthehightechteamgoodluckwiththeplatinumdemomichaelhuttonkeepthesoftwarerollingin=e}jaapmorssinkhowistheconversionofsmartw2t3orksgettingalongtommyhermansenkeepcodingrenevanmierlo=f}whereareyouandallrealatariansouttherewelliguessitistimetowrapbyyyyeeeeethegreetin=g}gsgoestodet4o5wellhellothereiamscrollinetwointhepokeysoftdemo4(%3%#/.$3#2/,,ataricomputerscanrea=q}b%DOS SYSb*)DUP SYSbcSWAVYDEMOASMbBLACK MUSb WAVYDEMOFNTb%WAVYDEMOOBJb SECDL ASMbSECVB ASMb&SECMESS ASMb$SECPM ASMb +SECBACK ASMb 6SECTAB ASMbCSECOND ASMb GSECLW ASMb PSECOND FNTb#SECOND OBJb%WOBTAB ASMb)WOBVB ASMbWOBBLY ASMb WOBDL ASMbWOBLW ASMb WOBPM ASMb7 WOBMESS ASMb WWOBDLINTASMbbJETSET MUSb vSPACE FNTb SCRIPT FNTb FANCY FNTbWOBPICA4ASCbWOBPIC LODb1WOBLOAD 1ST#<WOBBLY OBJ#/XXXDEMO ASM#7XXXDL ASM#=XXXDLINTASM#BXXXVB ASM#UXXXDEMO OBJ#jhXXXPICS PAC# RAMDISK COMllyscrollorwhatifyoulikethisdemopleasewritetotheaddressinscrollineseventhatistheoneyougeta=r}headachefromreadinp55gjusttelluswhatyouthinkwelliguessiwillwrapnowwellhellothereiamsc67w=s}antsomereallygreatmetaltrylisteningtoarcthboththedebutalbumcalledanotherreturntochurchhilland=t}thenewalbumforthesakeofmankinditisreallyexcellentandheavymusicwantsomereallygreatm89welcom=u}etoscrollinefouratarianthiswillbeprettyshortsoijustthrowsomeshitaboutthoselousycomputerscalledcommod=v}orenotreallysuitableasadoormatwhereisthecolorslocatedonthewiresinsideorwhatwontdomuch9:=w}goodthereatarirulesforeverwelcometoscrollinefou;;thislineistotallywithoutspacesandidonotthinkit=x}smuchsenseinprolongingtheagonyofthepersonstryingtoreadthisscrollinesoiguessiquitthisfuckingshitwo=y}wthislineistotallywithout<=welcometoscrollinesixandthisoneisjustanotherscrollfil=z}lerandthetimetofinishthisdemoisveryshortsoiguessiwrapthisshitnowwelcometoscrollinesix>W?={}pleasecontactusonthefollowingaddressvidarolavesenstevneveiengreak=|}ernorwaypleasecontactusonthePolavesenstevneveiengreak<AʅDϩЩ˭̭Ʌ̅ͅͅ yЩo0i)ImDž ԍИmЅИIИe)IЍЍЍб͈0~} Ѝ 2 ƅI}L Ѝ ƅƅŅŅŅy8(i i i iii Ѕͅͅ}DžiDžͅɛDϩL΅υҩ_ \ҝhhh`S: PRESENTS }THE WAVY DEMO! Hʅ0ʅ ф&&&ҥe˅ѐҥe̅ҬʅѠ}ʅh` } HELLO AND WELCOME TO THE VERY FIRST DEMO EVER TO APPEAR FROM A NEW NORWEGIAN CREW ... WE CALL OURSELVES POKEY} SOFT THIS LITTLE WAVY SCROLL WAS WRITTEN BY PINK AND HAWK ON THE 25TH OF MAY 1991 IF ANYBODY WANT TO CON}TACT US GET A PEN AND SOME PAPER CAUSE HERE COMES THE ADDRESSES } VIDAR OLAVESEN * HAWK * STEVNEVEIEN 7 N 1720 GREAKER NORWAY OR ODD K SKAN}CKE * PINK * UTSIKTSVEIEN 44B N 1700 SARPSBORG NORWAY NOW LET'S GET TO THE GREETINGS FROM H}AWK HI UMUT HAVE YOU STARTED YOUR MEGA DEMO YET JAAP MORSSINK THANX FOR TAKING OVER FOR ARNOLD } RENE VAN MIERLO GREAT SWAPPER MICHAEL R HUTTON THANX FOR EVERYTHING AND KEEP ON SUPPORTING THE GREAT 8 BIT MY F}RIEND TOMMY HERMANSEN WELCOME TO THE WORLD OF DISK DRIVES AND ASSEMBLY PROGRAMMING WE AWAIT YOUR WORKS SO CODE }ON MILES R REDFORD WHERE ARE YOU MY FRIEND MAKE CONTACT PLEASE WARREN WHITEMAN PLEASE WRITE A LETTER SOO}N AND FINALLY A GUY FROM KRONOS TITߋAN AND LATEBAR ALON COHEN YOUR MUSIC SUCKS HE HE HE HE AND ANYBO}DY I MIGHT HAVE FORGOTTEN NOEN GANGER KAN MAN DET SE OOPS THAT WAS NORWEGIAN WELL NOW TO SOME OTHER STUFF } SOON .. WELL HOPEFULLY SOON TO BE AVAILABLE ی THE FIRST CHRONICLES OF THOMAS COVENANT .. LORD FOULS BANE IT WI}LL BE RELEASED IN AUTUMN OR SO IF ALL GOES WELL IT KIND OF DEPENDS ON THE GRAPHICS AND SOUNDS ANYHOW THE GAME WILL B}E SOMETHING LIKE THIS .... A FANTASY ROLE PLAYING GAM܌׍E BASED ON THE BOOKS WRITTEN BY STEPHEN DONALDSON DO YOURSELF A} FAVOUR AND READ THESE BOOKS AT LEAST IF YOU LIKE TOLKIEN BECAUSE THEY ARE BETTER THAN TOLKIENS LORD OF THE RINGS ANYHO}W THE GAME WILL FIRSTLY BE BASED ON THE FIRST BOOK IN THE FIR؍ӎST CHRONICLES AND MAYBE SOME MORE LATER ON THE GAME WIL}L PROBABLY BE SOMEWHAT LIKE THE ULTIMA SERIES BUT WITH MODE 15 GRAPHICS AND DISPLAY LIST INTERRUPTS WITH SOME VERTICAL BLANK} INTERRUPTS CONTROLLING THE TIME OF DAY AND SUCH THINGS THERE WILL ԎϏMOST PROBABLY BE SOME ARCADE SEQUENCES IN THERE ALSO } AT FINALLY IT WILL BE DISK ONLY BECAUSE THE GRAPHICS WILL PROBABLY TAKE UP A COUPLE OF DISK SIDES ALONE AND THE CODE WILL }BE DONE IN ASSEMBLY OF COURSE NOW I LET THE SCROLL LINE OVER TO PINK Џː HELLO THERE THIS IS PINK SPEA}KING MY PARTNER HAWK REFUSED TO USE COMMAS AND PUNCTUATIONS SO HERE WE GO ...,,,., .,.,.,.,. ,.,. NOW, LETZ GET ZERIO}UZ ..,.,.,.,. THIS IS NOT VERY FUNNY AT ALL WELL, THIS IS AS HAWK MENTI̐ǑONED EARLIER OUR FIRST LITTLE PIECE OF CO}DE WRITTEN FOR THE 8 BIT ATARI, SO IT IS NOT THE BEST EVER SEEN ..... YET NOW LETZ GET TO THE GREETINGS FROM ME *PINK* }AND THEY WALKS TO ANITA *MY LOVE* , ANITA *MY LOVE* ANITAȑÒ *STILL MY LOVE* ANITA } *YET MY LOVE* AND ANITA *LOVE* AND NOW THE GREAT MOMENT HAS COME ......... WELCOME TO THE WORLD OF SCROLL LINE}S IS MY LADY ANITA ... TAKE IT AWAY, GIRL THANK YOU BOYS I LOVE PINK Ē... AND I WISH LINUS AND HER }BABY EVERYTHING GOOD FOR THE FUTURE I LOVE ODD THIS IS PINK AGAIN AND ITZ TIME TO WRAP THIS MEANINGLESS SCROLL .}..... BYE BYE BYE BYE ....nnopqrsttuvwxxyz{{|}~~~~}|{{zyxxwvuttsrqponnmlk}jihggfedccba``_^]]\\[ZZYYXXWWWVVVUUUUUUUUUUUUUUUUUVVVWWWXXYYZZ[\\]]^_``abccdefgghijklmnnopqrsttuvwxxyz{{|}~~}~~}|{{zyabc`ԩ./ЩЩ Ѝ Ѝ м Щo}bc#c8aMb|@c/`xMEMyAAAA   """_PАP_DDl8}AAAAAAAAAAAADBAAADBAAAAAAA@@@@@@@@|@@@@DDl8gCHRSET EQU $CDPMAREA EQU $CFPCOUNT EQU $D1TEMP EQU $D3WAVE DB 110,110,111,112,113,114,115 DB 116,116,117,118A},119,120,120 DB 121,122,123,123,124,125,126 DB 126,127,127,128,129,129,130 DB 130,131,131,132,132,132,133 A} DB 133,133,134,134,134,134,134 DB 134,134,134,135,134,134,134 DB 134,134,134,134,134,133,133 DB 133,132,132,1A}32,131,131,130 DB 130,129,129,128,127,127,126 DB 126,125,124,123,123,122,121 DB 120,120,119,118,117,116,116 A} DB 115,114,113,112,111,110,110 DB 109,108,107,106,105,104,103 DB 103,102,101,100,99,99,98 DB 97,96,96,95,94A},93,93 DB 92,92,91,90,90,89,89 DB 88,88,87,87,87,86,86 DB 86,85,85,85,85,85,85 DB 85,85,85,85,85,85,85 A} DB 85,85,85,85,86,86,86 DB 87,87,87,88,88,89,89 DB 90,90,91,92,92,93,93 DB 94,95,96,96,97,98,99 DB 99,A}100,101,102,103,103,104 DB 105,106,107,108,109,110,110 DB 111,112,113,114,115,116,116 DB 117,118,119,120,120,1A}21,122 DB 123,123,124,125,126,126,127 DB 127,128,129,129,130,130,131 DB 131,132,132,132,133,133,133 DB 13A}4,134,134,134,134,134,134 DB 134,135,134,134,134,134,134 DB 134,134,134,133,133,133,132 DB 132,132,131,131,130A},130,129 DB 129,128,127,127,126,126,125 DB 124,123,123,122,121COLTAB DB 0,0,0,32,32,34,34,36,36 DB 38,38A},40,40,42 DB 42,44,44,46,46,46,46,46 DB 46,46,46,46,46,46,46 DB 20,244,116,164,132,212,196,36 DB 0 A}DB 16 DB 16,18,20,22,24,26,28,30 DB 0 DB 238 DB 238,234,230,226,226,230,234,238 DB 0 DB 126 A} DB 126,124,122,120,118,116,114,112 DB 0 DB 160,162,164,166,168,170,172,174 DB 0FLASH DB 152,168,184,24A},216,104,248,56LOWSPRITE DB 250,234,218,202,186,170,154 DB 138,122,106,90,74,58,42,26 DB 250,234,218,202,186,A}170,154 DB 138,122,106,90,74,58,42,26 DB 250,234,218,4SSCOL DB 2,4,6,8,10,12,14,12,10 DB 8,6,4SECWAVEA} DS 256RESCOUNT DB 0HPOS DB 8,8,8,0,0,0WOBP DS 255STARTLINE DB 2XOFSET DB 0,0COMPL DB 2,0SPOS A}DS 256SPEED DS 256;HPM1 DB 99,99,99,127,127,99,99,99 DB 0,0,0,0;APM2 DB 127,127,99,127,127,99,99 DB 0,0A},0,0;WPM3 DB 99,99,99,107,127,127,119,99 DB 0,0,0,0;KPM4 DB 99,103,110,124,124,110,103,99 DB 0,0,0,0 DB A}0,0,0,0;PPM5 DB 124,126,127,127,127,127,127 DB 127,119,119,119,119,119,119 DB 119,119,119,119,119,119,119 DA}B 119,119,119,119,127,127,127 DB 127,127,127,126,124,112,112 DB 112,112,112,112,112,112,112 DB 112,112,112,112A},112,112,112 DB 112,112,112,112,112,112,112 DB 112;OPM6 DB 28,62,127,127,127,127,127 DB 127,119,119,119,119A},119,119 DB 119,119,119,119,119,119,119 DB 119,119,119,119,119,119,119 DB 119,119,119,119,119,119,119 DB A}119,119,119,119,119,119,119 DB 119,119,119,119,119,119,119 DB 127,127,127,127,127,127,62 DB 28;KPM7 DB 119,A}119,119,119,119,119,119 DB 119,119,119,119,119,119,119 DB 119,119,119,119,119,119,119 DB 119,119,127,127,126,1A}26,124 DB 120,120,124,126,126,127,127 DB 119,119,119,119,119,119,119 DB 119,119,119,119,119,119,119 DB 11A}9,119,119,119,119,119,119 DB 119;EPM8 DB 127,127,127,127,127,127,127 DB 127,112,112,112,112,112,112 DB 112,A}112,112,112,112,112,112 DB 112,112,112,112,124,124,124 DB 124,124,124,124,124,112,112 DB 112,112,112,112,112,1A}12,112 DB 112,112,112,112,112,112,112 DB 127,127,127,127,127,127,127 DB 127;YPM9 DB 119,119,119,119,119,119A},119 DB 119,119,119,119,119,119,119 DB 119,119,119,119,119,119,119 DB 119,119,119,119,62,62,62 DB 62,62,6A}2,62,62,28,28 DB 28,28,28,28,28,28,28 DB 28,28,28,28,28,28,28 DB 28,28,28,28,28,28,28 DB 28BYTE DB 0THEA}POS DB 0WOBWAIT DB 0COUNT DB 0,0CHANGE DB 3,0TOPSCR DB 7CURLINE DB 2NOTIMES DB 10WHA}ICH DB 0NCHAR1 DB 40,162,48,162,56,162,64,162 DB 56,162,48,162 DB 0,0NCHAR2 DB 168,162,176,162,184A},162,192,162 DB 0,0NCHAR3 DB 0,162,8,162,16,162,24,162 DB 32,162,24,162,16,162,8,162 DB 0,0NCHAR4 A}DB 72,162,80,162,88,162,96,162 DB 104,162,112,162,120,162 DB 128,162,120,162,112,162 DB 104,162,96,162,88,162,A}80,162 DB 0,0NCHAR5 DB 136,162,144,162,152,162,160,162 DB 152,162,144,162 DB 0,0 DB 255,255TPSPR A} DB 0,0,0,0,0,0,0,0R5 DB 136,162,144,162,152,162,160,162 DB 152,162,144,162 DB 0,0 DB 255,255TPSPR @ LDA #$84 STA PMAREA+1 LDA #0 STA CHRSET STA PMAREA LDA #$8A STA CHRSET+1 LDA #8 E}STA BYTE LDA #PMSCREMP&255 STA PCOUNT LDA #PMSCREMP/256 STA PCOUNT+1 LDA #6 LDY #VBI&255 E}LDX #VBI/256 JMP $E45CVBI PHA TYA PHA TXA PHA DEC CHANGE BNE NORAND LDX #7 E} LDA #3 STA CHANGE INC CHANGE+1 LDA CHANGE+1 CLCRANDCOL STA FLASH,X ADC #2 DEX BPLE} RANDCOLNORAND LDY CURLINE LDA SPOS,Y CMP #30 BPL NONEW CMP #220 BMI NONEW LDA 53770 E} AND TOPSCR CLC ADC #1 CMP #2 BNE NOT2B LDA #1NOT2B STA SPEED,Y INC CURLINENONEW CE}PY #86 BNE NOYRES LDY #0 STY CURLINENOYRES LDA #63 STA 559 LDA 20 STA 708 LDA #1E} STA $D008 LDA #0 STA $D009 STA $D00A STA $D00B LDA #170 STA $D00C LDA #0 STA 77E} STA RESCOUNT DEC HPOS BNE SDL1 LDA #8 STA HPOS LDA SMES1+1 STA $D5 LDA SMES1+2 E} STA $D6 LDY #25 LDA ($D5),Y CMP #255 BNE CS1 LDA #SCR1&255 STA SMES1+1 STA SMES6+1 LE}DA #SCR1/256 STA SMES1+2 STA SMES6+2CS1 INC SMES1+1 INC SMES6+1 BNE SDL1 INC SMES1+2 INC E}SMES6+2SDL1 LDA HPOS+1 CLC ADC #2 STA HPOS+1 CMP #8 BNE SDL2 LDA #0 STA HPOS+1 E} LDA SMES2+1 STA $D5 LDA SMES2+2 STA $D6 LDY #0 LDA ($D5),Y CMP #255 BNE CS2 LDA #SCE}R2&255 STA SMES2+1 STA SMES5+1 LDA #SCR2/256 STA SMES2+2 STA SMES5+2CS2 LDA SMES2+1 BNE CE}S2B DEC SMES2+2 DEC SMES5+2CS2B DEC SMES2+1 DEC SMES5+1SDL2 LDA HPOS+2 SEC SBC #3 E}STA HPOS+2 BCS SDL3 AND #7 STA HPOS+2 LDA SMES3+1 STA $D5 LDA SMES3+2 STA $D6 LDY #2E}5 LDA ($D5),Y CMP #255 BNE CS3 LDA #SCR3&255 STA SMES3+1 STA SMES4+1 LDA #SCR3/256 STE}A SMES3+2 STA SMES4+2CS3 INC SMES3+1 INC SMES4+1 BNE SDL3 INC SMES3+2 INC SMES4+2SDL3 LE}DA THEPOS CLC ADC #4 STA THEPOS TAX CPX #180 BNE SKYP1 LDX #0 STX THEPOSSKYP1 LE}DA WAVE,X CLC ADC #10 STA 53250 TXA CLC ADC #15 TAX LDA WAVE,X CLC ADC #10E} STA 53251 TXA CLC ADC #15 TAX LDA WAVE,X CLC ADC #10 STA 53255 ADC #2 E}STA 53254 ADC #2 STA 53253 ADC #2 STA 53252 LDA HPOS STA HPOS+5 LDA HPOS+1 STA HPOS+E}4 LDA HPOS+2 STA HPOS+3VERTSCR INC VERTSCR+4 LDA #0 CMP #2 BNE NOVSCROL LDA #0 STA VE}ERTSCR+4VSCR INC VSCR+4 LDA #0 CMP #16 BNE SKVSC INC HPOS+6 LDA HPOS+6 AND #7 STA HPOS+6E} LDA DLDATA+1 CLC ADC #24 STA DLDATA+1 STA $CB LDA DLDATA+2 ADC #0 STA DLDATA+2 SE}TA $CC LDY #96 LDA ($CB),Y BPL NVRES LDA #MESS1&255 STA DLDATA+1 LDA #MESS1/256 STA DLDATAE}+2NVRES LDA #0 STA VSCR+4SKVSC STA $D405NOVSCROL INC WOBWAIT LDA WOBWAIT CMP #4 BEQ DRE}UTWOB JMP SKIPWOBDRUTWOB LDA #0 STA WOBWAIT INC COMPL LDX COMPL CPX #11 BNE DOCCOL E}LDX #0 STX COMPL LDA COMPL+1 CLC ADC #16 STA COMPL+1DOCCOL LDA SSCOL,X CLC ADC COMPLE}+1 STA 704MWOB LDX COUNT LDA NCHAR1,X STA DOWOB+1 INX LDA NCHAR1,X STA DOWOB+2 INXE} STX COUNT LDA DOWOB+2 CMP #255 BNE CKWOB1 LDX #0 STX COUNT STX COUNT+1 CLC BCC E}MWOBCKWOB1 LDA DOWOB+2 BNE DOWO3 LDA NOTIMES BNE GOON1 LDX COUNT STX COUNT+1 LDX #10 E} STX NOTIMESGOON1 DEC NOTIMES LDX COUNT+1 STX COUNT CLC BCC MWOBDOWO3 LDY #0DOWOB LDAE} $A2E0,Y STA $A040,Y INY CPY #8 BNE DOWOBSKIPWOB LDX BYTE CPX #8 BNE FINTHIS LDY #0E} STY BYTE LDA (PCOUNT),Y CMP #$9B BNE SKRESPM LDA #PMSCROLL&255 STA PCOUNT LDA #PMSCROLL/2E}56 STA PCOUNT+1 LDA (PCOUNT),YSKRESPM SEC SBC #32 STA TEMP STY TEMP+1 INC PCOUNT BNEE} NPHI INC PCOUNT+1NPHI ASL TEMP ROL TEMP+1 ASL TEMP ROL TEMP+1 ASL TEMP ROL TEMP+1 E}LDA TEMP CLC ADC CHRSET STA TEMP LDA TEMP+1 ADC CHRSET+1 STA TEMP+1FINTHIS LDY BYTE E}LDA (TEMP),Y LDY #174 STA (PMAREA),Y INC BYTE LDY #0 LDX #174DOMAINPM INY LDA (PMAREA),YE} DEY STA (PMAREA),Y INY DEX BNE DOMAINPMSKIPPM PLA TAX PLA TAY PLA JE}MP $E45F STA (PMAREA),Y INY DEX BNE DOMAINPMSKIPPM PLA TAX PLA TAY PLA JD ORG $6000INIT LDA #$A0 STA 756 JSR $9000 LDA #17 STA 623 LDA #0 STA 559 STA $1I}0 STA $D20E STA 712 LDX #0MAKESP LDA 53770 AND TOPSCR CLC ADC #1 CMP #2 BNE NOI}T2 LDA #1NOT2 STA SPEED,X LDA 53770 STA SPOS INX BNE MAKESP LDX #0 SECCOPYWAVE I} LDA WAVE,X SBC #24 STA SECWAVE,X INX BNE COPYWAVE LDX #0 LDA #0CLWOB STA WOBP,X II}NX BNE CLWOB LDA #DOSCR2&255 STA $D8 LDA #DOSCR2/256 STA $D9 LDY #0 CLVFOO1 LDA ($I}D8),Y STA $8200 LDA $D9 CMP #SCR2E/256 BNE FOO2 LDA $D8 CMP #SCR2E&255 BEQ FOO10FOO2 I} INC $D8 BNE FOO3 INC $D9FOO3 INC FOO1+3 BNE FOO1 INC FOO1+4 BVC FOO1FOO10 LDA #DOSCR2&I}255 STA $D8 LDA #DOSCR2/256 STA $D9 LDA FOO1+3 STA FOO11+1 LDA FOO1+4 STA FOO11+2FOO11I} LDA $8200 STA ($D8),Y LDA #$82 CMP FOO11+2 BNE FOO12 LDA FOO11+1 BEQ FOO20FOO12 INC I}$D8 BNE FOO13 INC $D9FOO13 LDA FOO11+1 BNE FOO14 DEC FOO11+2FOO14 DEC FOO11+1 BVC FOO11I}FOO20 LDA #MESSAGES&255 STA $CB LDA #MESSAGES/256 STA $CC LDY #0LOOP LDA ($CB),Y CMP #25I}4 BEQ DONE CMP #32 BNE SKIP LDA #0 STA ($CB),YSKIP INC $CB BNE SKCC INC $CCSKCC I} CLC BCC LOOPDONE JSR DISPLAY JSR PMGRAPH JSR DLINTERRUPT JSR STARTVBL LDA #63 STA 559I} JMP LINEWAITDISPLAY INCLUDE D8:WOBDL.ASMLINEWAIT INCLUDE D8:WOBLW.ASM INCLUDE D8:WOBDLINT.ASMSTARTVBLI} INCLUDE D8:WOBVB.ASMPMGRAPH INCLUDE D8:WOBPM.ASM INCLUDE D8:WOBMESS.ASM INCLUDE D8:WOBTAB.ASM END II}NIT INCLUDE D8:WOBVB.ASMPMGRAPH INCLUDE D8:WOBPM.ASM INCLUDE D8:WOBMESS.ASM INCLUDE D8:WOBTAB.ASM END IH LDA #DLDATA&255 STA $230 LDA #DLDATA/256 STA $231 LDA #MESSAGES&255 STA DLDATA+1 LDA #MESN}SAGES/256 STA DLDATA+2 LDA #SCR1E&255 STA SMES6+1 STA SMES1+1 LDA #SCR1E/256 STA SMES6+2 N}STA SMES1+2 LDA #SCR2E&255 STA SMES5+1 STA SMES2+1 LDA #SCR2E/256 STA SMES2+2 STA SMES5+2 N} LDA #SCR3E&255 STA SMES4+1 STA SMES3+1 LDA #SCR3E/256 STA SMES4+2 STA SMES3+2 LDX #0 LDN}Y #66DXL1 TYA STA PICT,X INX LDA #224 CLC ADC #40 STA PICT,X STA DXL1+6 INXDXL2 LDN}A #$87 ADC #0 STA PICT,X STA DXL2+1 INX CPX #27 BNE DXL1 LDA #65 STA PICT,X LDAN} #DLDATA&255 INX STA PICT,X LDA #DLDATA/256 INX STA PICT,X RTSDLDATA DB 103,0,0 DB 3N}9,39,7,0,128,0SMES1 DB 87,0,0,0,128,0SMES2 DB 87,0,0,0,128,0SMES3 DB 87,0,0,0,128,0SMES4 DB 87,0,0,0,N}128,0SMES5 DB 87,0,0,0,128,0SMES6 DB 87,0,0 DB 0,128,0,128PICT DS 4087,0,0,0,128,0SMES4 DB 87,0,0,0,LWDOAGAIN CLV LDY STARTLINE LDA #0 STA $D401 DEC XOFSET LDX XOFSET CPX #255 BNE KKK R } LDX #180 STX XOFSETKKKVCWAIT CPY $D40B BNE VCWAIT INX CPX #181 BNE KKK2 LDX #0KKK2R } LDA WAVE,X STA $D000 LDA SPOS,Y CLC ADC SPEED,Y STA SPOS,Y STY $D40A STA $D001 R } LDA COLTAB,Y STA $D017 INY CPY #87 BMI VCWAIT JMP DOAGAINS,Y STY $D40A STA $D001 PV LDX #0 LDA #0CLRIT STA $8000,X STA $8100,X STA $8200,X STA $8300,X STA $8400,X STA $V }8500,X STA $8600,X STA $8700,X INX BNE CLRIT LDA #$80 STA $D407 LDA #3 STA $D01D V} LDA #14 STA $2C1 LDA #212 CLC STA $2C2 ADC #2 STA $2C3 ADC #2 STA $2C7 LDA V}#1 STA $D008 LDA #0 STA $D009 STA $D00A STA $D00B LDA #170 STA $D00C LDX #0DOPM1 V} LDA #1 STA $8500,X INX CPX #172 BNE DOPM1 LDX #0DOPM2 LDA PM5,X STA $84B6,X LDA V}PM6,X STA $85B6,X LDA PM7,X STA $86B6,X LDA PM8,X STA $87B6,X LDA PM9,X STA $83B6,X IV}NX CPX #57 BNE DOPM2 LDX #0DO1ST LDA SPT1,X CMP #$9B BEQ DON1 SEC SBC #32 STA V}TPSPR INX LDA #0 STA TPSPR+1 ASL TPSPR ROL TPSPR+1 ASL TPSPR ROL TPSPR+1 ASL TPSPRV} ROL TPSPR+1 LDA TPSPR CLC ADC #0 STA $80 LDA #$9A ADC TPSPR+1 STA $81 LDY #0PV}UT1 LDA ($80),YPHR1 STA $8320,Y INY CPY #8 BNE PUT1 CLC LDA PHR1+1 ADC #10 STA PHR1+V}1 LDA PHR1+2 ADC #0 STA PHR1+2 JMP DO1STDON1 LDX #0DO2ND LDA SPT3,X CMP #$9B BEQ DV}ON2 SEC SBC #32 STA TPSPR+2 INX LDA #0 STA TPSPR+3 ASL TPSPR+2 ROL TPSPR+3 ASLV} TPSPR+2 ROL TPSPR+3 ASL TPSPR+2 ROL TPSPR+3 LDA TPSPR+2 CLC ADC #0 STA $80 LDA #$9AV} ADC TPSPR+3 STA $81 LDY #0PUT2 LDA ($80),YPHR2 STA $861A,Y INY CPY #8 BNE PUT2 CLV}C LDA PHR2+1 ADC #10 STA PHR2+1 LDA PHR2+2 ADC #0 STA PHR2+2 JMP DO2NDDON2 LDX #0DV}O3RD LDA SPT2,X CMP #$9B BEQ DON3 SEC SBC #32 STA TPSPR+4 INX LDA #0 STA TPSPR+V}5 ASL TPSPR+4 ROL TPSPR+5 ASL TPSPR+4 ROL TPSPR+5 ASL TPSPR+4 ROL TPSPR+5 LDA TPSPR+4 V} CLC ADC #0 STA $80 LDA #$9A ADC TPSPR+5 STA $81 LDY #0PUT3 LDA ($80),YPHR3 STA $8730V},Y INY CPY #8 BNE PUT3 CLC LDA PHR3+1 ADC #10 STA PHR3+1 LDA PHR3+2 ADC #0 V}STA PHR3+2 JMP DO3RDDON3 RTS CLC LDA PHR3+1 ADC #10 STA PHR3+1 LDA PHR3+2 ADC #0 T( ORG $4000MESSAGES DB ' ' DB ' ' DB ' Z!} ' DB ' 'MESS1 DB ' t w p t ' DB ' h e o h ' DB ' Z"} i l k i ' DB ' s c e s ' DB ' o y ' DB ' i m s Z#} ' DB ' s e s c ' DB ' o r ' DB ' t t f o ' DB ' h Z$} o t l ' DB ' e l ' DB ' w i ' DB ' t o s i 'Z%} DB ' h b s ' DB ' i b p ' DB ' r l r a ' DB ' d y Z&} o ' DB ' u l ' DB ' p d d i ' DB ' o e t ' Z'}DB ' k m t t ' DB ' e o o l ' DB ' y e ' DB ' p Z(} ' DB ' s r s ' DB ' o e h ' DB ' f w s o ' DB ' Z)} t r e r ' DB ' i n t ' DB ' d t t ' DB ' e t b Z*} ' DB ' m e t u ' DB ' o n h t ' DB ' i ' DB ' Z+} b s m ' DB ' i y a ' DB ' t l y ' DB ' h i b 'Z,} DB ' w a t e ' DB ' a w t ' DB ' s k l n ' DB ' Z-} e e ' DB ' f u x ' DB ' i s d t ' DB ' n i e ' Z.}DB ' i n m t ' DB ' s g o i ' DB ' h m ' DB ' e a o Z/} e ' DB ' d m n ' DB ' a i ' DB ' o c t ' DB ' Z0} n h w ' DB ' a e i ' DB ' a n l ' DB ' p d a l Z1} ' DB ' r t ' DB ' i t a c ' DB ' l e r o ' DB ' Z2} x i d ' DB ' t t e ' DB ' w p e ' DB ' e r i i 'Z3} DB ' n o g t ' DB ' t h ' DB ' y w t d ' DB ' s o Z4} i ' DB ' e r b f ' DB ' v d i f ' DB ' e t e ' Z5}DB ' n p r ' DB ' t r c e ' DB ' h o o n ' DB ' c m Z6} t ' DB ' e p l ' DB ' w s u y ' DB ' r s t ' DB ' Z7} a o e ' DB ' p r r ' DB ' ' DB ' t w p t Z8} ' DB ' h e o h ' DB ' i l k i ' DB ' s c e s ' DB 255SCRZ9}1E DB ' ' DB ' ' DB ' ' DB ' Z:} ' DB ' 'SCR1 DB 'hello and welcome to the ' DB 'third 0/+%9 3/&4 Z;}demo ' DB 'called 7/"",9 $%-/ it ' DB 'was written by hawk and it ' DB 'is the third demo to appear' Z<} DB ' from me hope you ' DB 'like it anyhow the ' DB 'greetinx goes to ' DB 'detail and lucifeZ=}r of 4!#&' DB ' jaap morssink ' DB 'michael r hutton frank' DB 'enstein of (44 paul ' DB 'gonZ>}tarek rene van mierlo' DB ' pimpf of $)',39,')4!,' DB ' "2%!4( ,4$ rune of the' DB ' ,!-%23 st coder Z?} rosaria' DB ' the most beautiful sexiest' DB ' funniest nicest girl in ' DB 'the universe you are in 'Z@} DB 'my every dream and i love ' DB 'you forever and ever ' DB 'and of course everybody ' DB 'i might hZA}ave forgotten' DB ' atari rules forever ' DB ' this is a wrap ' DB 'hello and welcome to the 'ZB} DB 255 DB 255DOSCR2 DB ' hello and welcome to the' DB ' backwards scrolling line ' DB 'of this demoZC} this is ' DB 'probably hard to read so' DB ' i keep it short and wrap ' DB 'this shit now byeeeeee' ZD} DB ' 'SCR2 DB ' hello and welcome to th'SCR2E DB ' ' DB ' ZE} ' DB ' ' DB ' ' DB ' ' DB ' ZF} ' DB 255SCR3E DB ' ' DB ' ' DB ' ZG} ' DB ' ' DB ' 'SCR3 DB 'wow lets talk aZH}bout the ' DB 'stuff used here in this ' DB 'demo the music is by ' DB 'a well known music programmer' ZI} DB ' called rob hubbard and it is' DB ' taken from the shitty game ' DB 'jet set willy the music is' DB ' tZJ}he only positive thing ' DB 'about this game i used ' DB 'three different fonts none ' DB 'of them is desigZK}ned by me ' DB ' i only modified the space ' DB 'font for the wobbler in soft' DB ' below very special thanxZL}' DB ' to detail of tacf for the' DB ' sinus rasters in the ' DB 'intro sequence let us' DB ' wrap hZM}ere ' DB 'wow lets talk about the ' DB 255LAST DB 254PMSCREMP DB ' ' DB ZN}' ' DB ' ' DB ' 'PMSCROLL DB 'WELLZO} HELLO THERE THIS IS ' DB 'THE THIRD DEMO FROM POKEY ' DB 'SOFT AND IT IS A COMBINATION ' DB 'OF THE FIRST TWZP}O DEMOS CALL' DB 'ED THE WAVY DEMO AND ' DB 'THE SECOND SCROLL I THINK ' DB 'I HAVE MANAGED TO PUT IT 'ZQ} DB 'TOGETHER PRETTY DECENTLY ' DB 'AND I HOPE TO SOON BE ABLE TO' DB ' MAKE A 3 D DEMO OR SOMETHING' DB 'ZR} MAYBE MAYBE NOT ANYHOW' DB ' PLEASE CONTACT ME ON THE ' DB 'FOLLOWING ADDRESS ' DB ' VIDAR OLAVZS}ESEN STEVNE' DB 'VEIEN 7 1719 GREAKER' DB ' NORWAY ALSO I ' DB 'HOPE TO RELEASE A GAMZT}E SOON ' DB 'BUT IT IS GOING SLOW ANY' DB 'BODY INTERRESTED IN HELPING ' DB 'PLEASE LET ME KNOW I ' ZU} DB 'NEED GRAPHICS FOR A ROLE ' DB 'PLAYING GAME HEEEEELLLLPPPP' DB ' ' DB $9BSPT1 DB 'POKEY SZV}OFT',$9BSPT2 DB 'PRESENTS',$9BSPT3 DB 'WOBBLY DEMO',$9BPP' DB ' ' DB $9BSPT1 DB 'POKEY SXDDLINTERRUPT SEI LDA #DLI&255 STA $200 LDA #DLI/256 STA $201 LDA #192 STA $D40E CLI ^X} RTSDLI PHA TXA PHA LDX RESCOUNT INC RESCOUNT CPX #3 BNE NOTURN LDA #4 STA $D^Y}401NOTURN CPX #6 BNE TURNBACK LDA #0 STA $D401 LDA #61 STA $D400TURNBACK CPX #7 BEQ^Z} PMS JMP NOPMSPMS PHA TXA PHA TYA PHA LDA #10 STA $D40A STA $D017 LDA #0 ^[} STA $D018 LDA #1 STA $D008 STA $D009 STA $D00A STA $D00B LDA #85 STA $D00C LDY #0^\} LDA XOFSET+1 SEC SBC #2 STA XOFSET+1 LDX XOFSET+1 BNE WOBMORE LDX #180 STX XOFSET+1^]}WOBMORE LDA LOWSPRITE,Y STA $D012 STA $D013 STA $D014 STA $D015 STA $D019 SEC SBC #4^^} STA $D01A LDA SECWAVE,X CLC STA $D000 ADC #18 STA $D001 ADC #18 STA $D002 ADC #^_}18 STA $D003 STX $D40A ADC #18 STA $D007 ADC #4 STA $D006 ADC #4 STA $D005 ADC #^`}4 STA $D004 INY INX INX CPX #180 BNE KKK2B LDX #0KKK2B CPY #34 BMI WOBMORE ^a} PLA TAY PLA TAX PLANOPMS LDA HPOS,X STA $D404 PLA TAX PLA RTIOBMORE \s \  `ҍ2 #Lbγ`,0P" LWP` ʽil񽔒L=bc}  LLwo򹋓 -./0L)Ș@H)H)bd}hJJJJh)? PQL%"ǒRϒSג&HhLbe} )L8"30uLڑ4&ޣLbf} }L8ޔ0L\` @`0xrke_ZUPKGC?<852/,*'%#!8 j jFAbg}n0R"zU'i?-j P # bh})     bi}`p7/E;vRamm[m~bj}bk}          bl}        --$%$ -bm}$%$  --%$-*'$ '$ $  "  " --" bn} " %$ $$$%$--      *(% (% %  '"bo}",,,,,,,,,,bp},,     bq} " "%% 'br} ' X[_  `"TAX[![!Y YY" Tbs}`1" S1]1%$"  ]1[A[A[A    %(% %  bt}  $ $(*($ ($ $     "bu}"%"%'-,,,,,+,,,,,,,,,,,,@`   "`R8888>>``~pppww``|l`cc>66wwcc0 0 ~~`0 fx}0`ccooo`?33sss~ffgggg`cc~ffwww``pp``pppc`oggssssss <<< n~fflggg000ppp~gwggggfy}wogggccgggccpppccggg~ffwww`ssggggggggggo>gggogsss>ggggggfl7g888>@`0 xfz}|6c8||88|||88|88~BBBB~<$$<88|||88|||88|||88||f{}88|888B$$BB$$B$$<~f<<~~<6f<6f<`<|fl0fF68of;p88pf< 80 0 ~~`0 j}0``<0`>?Xx>``od<f~v@~X~@ lxlx|| ?mxj}v~~ngpPP`ng v8pp8pPP|d0000|pPP|l8llll8j}f~:x`x`~<~j}~<0~0 ~  6dpPP`ng6` v(6<d~&ffd8|l< fff ~̙<~~<j}~x|nf8x8f 8L`|lm>d~&ffd8|l< fff ~̙<~~<hfffffff>`<|fl0fF68of;880  00f< 80 0 ~~`0 n}0`f``f<ffffbx`bbx``||ff~fff xlxxl```bn}v~nf`<|<fffff<fff<<f<f`f< |v000|000`~`|fff8<f<`lxxl8n}<fff`<|~fff;bt8|lf<|~L2~<~~<n}8x8f|`~| f``>`<|~fff;bt8|lf<|~L2~<~~<l\\\\\\\\\\\\\\\\\\\\\\r}\\\\\\\\\\\\\\\\\\\r}\\\\\\\\\\\\\\r}\\\\\\\\p\\\\\\\\\\\\\\\\\\\\\\\\\\v}\\\\\\\\\\\\\\\\\\\\\v}\\\\\\\\\\\\\\\\\\v}v}t \  `ҍ2 #Lbγ`,0P" LWP` ʽil񽔒L=z}  LLwo򹋓 -./0L)Ș@H)H)z}hJJJJh)? PQL%"ǒRϒSג&HhLz} )L8"30uLڑ4&ޣLz} }L8ޔ0L\` @`0xrke_ZUPKGC?<852/,*'%#!8 j jFAz}n0R"zU'i?-j P # z})     z}`p7/E;vRamm[m~z}z}          z}        --$%$ -z}$%$  --%$-*'$ '$ $  "  " --" z} " %$ $$$%$--      *(% (% %  '"z}",,,,,,,,,,z},,     z} " "%% 'z} ' X[_  `"TAX[![!Y YY" Tz}`1" S1]1%$"  ]1[A[A[A    %(% %  z}  $ $(*($ ($ $     "z}"%"%'-,,,,,+,,,,,,,,,,,,@`z}z}z}z}fz}ffffff>`<|fl0fF68of;880  00f< 80 0 ~~`0 0`f``f<ffffbx`bbx``||ff~fff xlxxl```bv~nf`<|<fffff<fff<<f<f`f< |v000|000`~`|fff8<f<`lxxl8<fff`<|~fff;bt8|lf<|~L2~<~~<8x8z}fffffff>`<|fl0fF68of;p88pf< 80 0 ~z}~`0 0``<0`>?Xx>``od<f~v@~X~@ lxlx|| ?mxz}v~~ngpPP`ng v8pp8pPP|d0000|pPP|l8lllz}l8f~:x`x`~z}<~~<0~0 ~  6dpPP`ng6` v(6<d~&ffd8|l< fff ~̙>>``~pppww``|l`cc>66wwccz}0 0 ~~`0 0`ccooo`?33sss~ffgggg`cc~ffwww``pp``pppc`oggssssss z} <<< n~fflggg000ppp~gwggggwogggccgggccpppccggg~ffwww`ssggggggggggo>gggogsss>gggz}gggfl7g888>@`0 x|6c8||88|||88|88~BBBB~<$$<z}88|||88|||88|||88||88|888B$$BB$$B$$<~f<<~~<6f<wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwwww>wwwwwwwwwwwwwwwwww}wwwww~~|xx|~~wwwwwwwwwwwwwwwwwwwwwwppppppppppppppppp|||||gX%Y|||ppppppppppppppppwwwwwwwwwwwwwwwwwwwwwwwww}>>>>>>>> (08@80 HPX`hpxxph`XP}` (08@80 HPX`hpxxph`XP| ORG $B000TEMP EQU $D7PCOUNT EQU $D9INIT LDA #PMEMP&255 STA PCOUNT LDA #PMEMP/256 STA PCOUNT+1 } LDX #0 STX $10 STX $D20E TXACLRPM STA PMAREA,X INX BNE CLRPM LDY #0DOHTAB TXA } STA HTAB,Y INY STA HTAB,Y INY DEX BNE DOHTAB LDA #STXT&255 STA $CB LDA #STXT/25 }6 STA $CC LDY #0DOMORE LDA ($CB),Y CMP #255 BEQ DONE CMP #32 BNE DONT LDA #0 S }TA ($CB),YDONT INC $CB BNE NOHI INC $CCNOHI JMP DOMOREDONE INCLUDE D8:XXXDL.ASM LDA #255 } STA 20 JSR VBLANK JSR DLINT; PM STUFF LDA #62 STA 559 LDA #14 STA 704 LDA #10 S}TA 705 LDA #0 STA $D00D STA $D00E LDA #1 STA $D008 STA $D009HERE LDX #2WVC CPX $D4}0B BNE WVC TXA AND #15 CLC ADC #62 STA $D40A STA $D017 INX CPX #12 BNE WV}C LDX #20 STX $D017 JMP HEREDLINT INCLUDE D8:XXXDLINT.ASMVBLANKSYSVB EQU $E45FSETVBV EQU $E45CSK}CTL EQU $D20FAUDF EQU $D200AUDC EQU $D201AUDCTL EQU $D208RANDOM EQU $D20ACONSOL EQU $D01FPAL EQU $D014N}MIEN EQU $D40EZPG EQU $CBI EQU $AF00TIMER EQU ICOLUMN EQU I+1ROW EQU I+2RCOUNT EQU I+3FREQ EQU} I+4WERT EQU I+5EFCOUNT EQU I+6FLAG EQU I+7VOL EQU I+8FRQ EQU I+9DIS EQU I+10DIST EQU $A0AMOUNT} EQU $06MAXIMUM EQU 9*8MAX EQU $06 LDA #3 STA SKCTL LDA #$63 STA AUDCTL LDA #AMOUNT-5 }STA TIMER LDA #0 STA COLUMN STA ROW STA FLAG LDA #2 STA RCOUNT LDA #$FF STA WERT } LDA #$A4 STA AUDC LDA #$80 STA DIS LDA #MAX STA VOL LDY #VBR&255 LDX #VBR/256 LDA #6} JSR SETVBV LDA #$C0 STA NMIEN RTSVBR JSR EF1 LDA PAL AND #14 BEQ KEEPON LDA #}1 AND 20 BEQ OUTKEEPON JSR VBR1 JSR VBR2OUT INCLUDE D8:XXXVB.ASM JMP SYSVBVBR1 LDA TI}MER CMP #AMOUNT-5 BEQ CONT1 LDA #DIST ORA TIMER STA AUDC+2 STA AUDC+6 DEC TIMER RTSC}ONT1 LDA #TABLE&255 STA ZPG LDA #TABLE/256 STA ZPG+1 LDA #AMOUNT STA TIMERREPEAT LDY ROW} CPY #8 BEQ CONT2 LDA ZPG CLC ADC COLUMN STA ZPG BCC CONT11 INC ZPG+1CONT11 LDA }(ZPG),Y STA AUDF+2 TAX INX TXA STA AUDF+6 INC ROW RTSCONT2 LDA #0 STA ROW }DEC RCOUNT BNE REPEAT LDA #2 STA RCOUNT LDA COLUMN CLC ADC #8 STA COLUMN CMP #MAXIMUM} BCC REPEAT LDA #0 STA COLUMN BEQ REPEATTABLE DB 144,144,72,144,144 DB 72,144,72 DB 144,1}44,72,144,144 DB 72,144,72 DB 144,144,72,144,144 DB 72,144,72 DB 144,144,72,144,144 DB 72,144,72 } DB 182,91,91,182,91,91 DB 182,91 DB 144,144,72,144,144 DB 72,144,72 DB 121,60,60,121,60,60 DB 121!},60 DB 144,144,72,144,144 DB 72,144,72 DB 162,81,81,162,81 DB 81,162,81EF1 LDA FLAG BNE EF10 "} LDA RANDOM CMP #5 BEQ EF0 RTSEF0 LDA #$FF STA WERT STA FLAGEF10 LDA FREQ SEC #} SBC WERT STA FREQ STA FREQ STA AUDF BCC EF2 RTSEF2 DEC WERT BNE EF3 LDA #0 S$}TA FLAG STA AUDFEF3 RTSVBR2 LDA VOL BNE CONTY1 STA FRQ LDA RANDOM STA AUDF+4 LDA #%}MAX STA VOLCONTY1 ORA DIS STA AUDC+4 DEC VOL RTSWHERE DB $11,$31,$51,$71,$91,$71,$51,$31POS &} DB 0WAITING DB 1,1SPEED DB 5HPOS DB 8VPOS DB 0VTAB DB 0,1,2,3,4,5,6,7,8,9,10,11,12 DB 13,14,15 DB 1'}4,13,12,11,10,9,8 DB 7,6,5,4,3,2,1BYTE DB 8COL16 DB 8CHRSET DB 0,$E0PMAREA DS 256HTAB DS 256PM(}EMP DB ' ' DB ' 'PMSCROLL DB 'YOH DUDES HERE COMES ' DB )}'ANOTHER SHITTY DEMO FROM ' DB ' POKEY SOFT IT WAS WRITTEN ' DB 'IN ABOUT 5 HOURS BY HAWK ' DB 'IT IS CA*}LLED SUCK MY D..K' DB ' AND YOU SHOULD BE ABLE TO ' DB 'FIGURE OUT WHY ANYHOW IF ' DB 'THERE IS ANY '+} DB 'EIGHT BITTERS OUT THERE ' DB 'WANTING TO SWAP DEMOS AND ' DB 'STUFF PLEASE CONTACT ME ON ' DB 'THE F,}OLLOWING ADDRESS' DB ' VIDAR OLAVESEN' DB ' STEVNEVEIEN 7' DB ' N 1719 GREAKER' -} DB ' NORWAY' DB ' NOW IT IS TIME TO WRAP' DB ' ' DB $9BSEMP DB 0,0,0,0,0,0,0,0,0,0,.}0,0,0,0 DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0STXT DB 'hello and welcome ' DB 'to suck' DB ' my dNNk ' /}DB 'this is demo number four ' DB 'from pokey soft and has nasty' DB ' pictures because that was ' DB 'the onl0}y animation i had ' DB 'access to it is really ' DB 'only a ultra shitty ' DB 'page flipping routine ' 1}DB 'running in a vertical blank ' DB 'interrupt NNNN speed is ' DB 'adjustable with select and ' DB 'start 2}well memory is ' DB 'running low so i guess i ' DB 'wrap after the greetinx ' DB 'which goes to ' DB '3}detail and lucifer of tacf ' DB ' frankenstein of htt ' DB 'pimpf of digital breath ltd' DB ' jaap mor4}ssink michael' DB ' r hutton pink and anita ' DB ' rune of the lamers and ' DB 'a special greeting 5}to the ' DB 'girl of my dreams NNN rosaria' DB ' and all i might have for' DB 'gotten byeeee ' 6} DB 'hello',0,'and',0,'welcome',0 DB 'to',0,'suck' DB 255 END INITr' DB 'gotten byeeee ' T LDX #0 LDA #14DOIT STA $600,X INX BNE DOIT LDA #71+16+128 STA $600 LDA #SEMP&255 8} STA $601 LDA #SEMP/256 STA $602 LDA #78 STA $603 STA $663 LDA #71+16+32 STA $6B0 9} LDA #SEMP&255 STA $6B1 LDA #SEMP/256 STA $6B2 LDA #71+16+32 STA $6B3 LDA #SEMP&255 STA $:}6B4 LDA #SEMP/256 STA $6B5 LDA #71+16+32 STA $6B6 LDA #SEMP&255 STA $6B7 LDA #SEMP/256 ;} STA $6B8 LDA #65 STA $6B9 LDA #0 STA $6BA LDA #6 STA $6BB LDA #0 STA $230 L<}DA #6 STA $231A #65 STA $6B9 LDA #0 STA $6BA LDA #6 STA $6BB LDA #0 STA $230 LDLINTERRUPT SEI LDA #DLI&255 STA $200 LDA #DLI/256 STA $201 LDA #192 STA $D40E CLI >} RTSDLI PHA TXA PHA TYA PHA LDX #0DOPM LDA HTAB,X STA $D40A STA $D000 ?}EOR #255 STA $D001 LDA PMAREA,X STA $D00D STA $D00E CPX #169 BMI NOCOLS CPX #200 BPL@} NOCOLS TXA STA $D017NOCOLS INX CPX #250 BNE DOPM LDA #0 STX $D40A STA $D00D SA}TA $D00E PLA TAY PLA TAX PLA RTI BNE DOPM LDA #0 STX $D40A STA $D00D S@ PHA TAY PHA TAX PHA LDA 20 BNE DONTCOL LDA COL16 STA $D012 CLC ADC #6C}4 STA $D013 LDA COL16 CLC ADC #16 STA COL16DONTCOL LDA #16 STA 708 STA $D017 LD}DA #20 STA 709 LDA #24 STA 710 LDA #0 STA 712 DEC WAITING+1 LDA WAITING+1 BNE NOT2E} LDA $D01F CMP #6 BNE NOSTART LDX SPEED INX STX SPEED CPX #30 BNE NOSTART LDX #29F} STX SPEEDNOSTART CMP #5 BNE NOSELECT LDX SPEED DEX STX SPEED BNE NOSELECT LDX #1 G} STX SPEEDNOSELECT LDA #5 STA WAITING+1NOT2 DEC WAITING BNE NOTYET LDA SPEED STA WAITINGH} LDA #20 STA $604 STA $664 LDX POS LDA WHERE,X STA $605 CLC ADC #$0F STA $665I} INC POS LDX POS CPX #8 BNE NOTYET LDX #0 STX POSNOTYET DEC HPOS BNE SDL1 LDA J}#8 STA HPOS LDA $601 STA $D5 LDA $602 STA $D6 LDY #25 LDA ($D5),Y CMP #255 BNE CK}S1 LDA #STXT&255 STA $601 LDA #STXT/256 STA $602CS1 INC $601 BNE SDL1 INC $602SDL1 L}LDA $601 STA $6B1 STA $6B4 STA $6B7 LDA $602 STA $6B2 STA $6B5 STA $6B8 LDA HPOS M} STA $D404 LDX VPOS LDA VTAB,X STA $D405 INX CPX #30 BNE NOVRES LDX #0NOVRES STX VN}POS; PM STUFF LDX BYTE CPX #8 BNE FINTHIS LDY #0 STY BYTE LDA (PCOUNT),Y CMP #$9B O}BNE SKRESPM LDA #PMSCROLL&255 STA PCOUNT LDA #PMSCROLL/256 STA PCOUNT+1 LDA (PCOUNT),YSKRESPM P}SEC SBC #32 STA TEMP STY TEMP+1 INC PCOUNT BNE NPHI INC PCOUNT+1NPHI ASL TEMP ROL TEQ}MP+1 ASL TEMP ROL TEMP+1 ASL TEMP ROL TEMP+1 LDA TEMP CLC ADC CHRSET STA TEMP LR}DA TEMP+1 ADC CHRSET+1 STA TEMP+1FINTHIS LDY BYTE LDA (TEMP),Y LDY #169 STA PMAREA,Y LDA S}#0 INY STA PMAREA,Y INC BYTE LDY #0DOMAINPM INY LDA PMAREA,Y DEY STA PMAREA,Y T}INY CPY #170 BNE DOMAINPMSKIPPM PLA TAX PLA TAY PLAEA,Y DEY STA PMAREA,Y X;٩ڢҊ;;ș;0˩̠ L.׍NcwwV}wA01 G >/  ЍЩЍ Т )i> ԍ LՓW}xX`HHH; ԍIн; Ѝ0ة ԍ Ѝhhh@ҩcҩX}ҩ  \` )%  HHH8i@Э8i8Щ.Y}ʎ,d ie)խ֠ 0Z}Ԯ7=7ɛ k٩ڱ8 ׄ&&&إm9ץm:ج7[}נ;ș;7ﳹ;;hhhL_ ҍ`p˩̩mː̱ˍҪ芍`ԩ\}iH©𻐐HHHHHHHHHHHH[[[[[HHHy< L :::: :Lr:::IEL[::i:iIIL[:`:i::i}::L:`L{:w:w: C`L:L: D8:TP40XD8: 8| 9 '9`L:L: D:DUP.SYS:̩ 8} x:ɀL: '9`88 |9Y:X: '9L); D8:DUP.SYS; 8::88 9 '98? :`;WL`; 9}Ln; ` :Y;Y;L;L;)} Setting Up ATARI 130XE Ram Disk; 9L; ; -9  } L;D8:; :9 :Y;L