@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 T} U}01 뷥𙀸i@/  01"#V}w \ Di !/) d L/   \W} 01`i ɘ `˷ _`X}*&i`L_L_ppppppppppppOA4(%!4!2)%80/$%-/Y}*&`ppppOA4(%!4!2)%80/$%-/5EXPO DEMO 1991 - INTRO----------------------This archive includes:EXPINTRO.SRC - Atmas II source codeSININTRO.COM - Sin [}us data fileEXPINTRO.COM - INTRO (runable)EXPINTRO.DOC - This textTo run the INTRO from Atmas II, you have to load the so \}urce and the sinus data file.The run/init. address is $B600.Greetz: -Frankenstein-To contact me, please write to:Mega ]}Magazinec/o FrankensteinP.O. Box 1648800 AD FranekerHollandeetz: -Frankenstein-To contact me, please write to:Mega A************************************** * ANOTHER EXPERIMENT OF FRANKENSTEIN * ************************************** ORG $B_}600 VECTORL EQU $B880 VECTORH EQU VECTORL+$40 SINUS EQU VECTORH+$40 LETRS EQU SINUS+$100 SCREEN EQU LETRS+$100 LOBYTE EQU $`}F0 (AND $F1) CHAR EQU $F2 PAULUS EQU $F3 SIN EQU $F4 (AND $F5) FONT EQU $F6 (AND $F7) LET EQU $F8 (AND $F9) ROMFNT EQU $a}E000 LDA $230 STA TPDL LDA $231 STA TPDL+1 LDX #0 STX 19 STX 20 STRZP LDA LOBYTE,X STA TPZP,X INX CPX #10 BNE STb}RZP LDA #SINUS STA SIN LDA #SINUS/256 STA SIN+1 ************************************* * CREATE VECTOR TABLE FOR PICTURc}E! * ************************************* LDY #0 ALLVEC STY NUMBER JSR MULTI LDA LOBYTE STA VECTORL,Y LDA LOBYTE+1 CLd}C ADC #SCREEN/256 STA VECTORH,Y INY CPY #64 BNE ALLVEC ************************************* * SETUP DISPLAY LIe}ST * ************************************* LDA #0 STA 709 STA 710 STA 712 STA 559 LDA #1 STA $220 BLEK LDA $2f}20 BNE BLEK LDA #DL STA $230 LDA #DL/256 STA $231 LDA $222 STA TMPVB LDA $223 STA TMPVB+1 LDA #6 LDY #VBI:L LDg}X #VBI:H JSR $E45C ************************************* * DELETE PICTURE MEMORY * ****************************h}********* LDX #0 LDA #0 WIS STA SCREEN,X STA SCREEN+$100,X STA SCREEN+$200,X STA SCREEN+$300,X STA SCREEN+$400,X INX i} BNE WIS ************************************* * SET LET,LET+1 WITH LETRS!! * ************************************* j} LDA #LETRS STA LET LDA #LETRS/256 STA LET+1 LDX #0 NO1 JSR PLUKFNT LDA LET CLC ADC #8 STA LET CPX #32 BNE NO1 Lk}DA #LETRS STA FONT LDA #LETRS/256 STA FONT+1 LDA #33 STA 559 LDA #128 STA PAULUS GO LDA $D01F AND #1 BEQ EINDE Ll}DA 19 CMP #3 BEQ EINDE LDA $D40B CMP #100 BNE GO JSR RUN JMP GO EINDE LDA #0 STA 559 LDA #2 STA $220 KUL LDA $220m} BNE KUL LDA #6 LDY TMPVB LDX TMPVB+1 JSR $E45C LDX #0 RESZP LDA TPZP,X STA LOBYTE,X INX CPX #10 BNE RESZP LDA n}TPDL STA $230 LDA TPDL+1 STA $231 RTS RUN LDA #0 STA CHAR NEXTCH LDY CHAR LDA (SIN),Y TAX LDY #0 LUSSE LDA VECTORL,o}X STA LOBYTE LDA VECTORH,X STA LOBYTE+1 LDA (FONT),Y STY DUMMY LDY CHAR STA (LOBYTE),Y LDY DUMMY INX INY CPY #8 Bp}NE LUSSE LDA FONT CLC ADC #8 STA FONT INC CHAR LDA CHAR CMP #32 BNE NEXTCH INC SIN LDA SIN CMP #152 BNE FUTJIRq} LDA #32 STA SIN FUTJIR RTS PLUKFNT LDY #0 LDA #0 STA FONT STA FONT+1 LDA TXT,X JSR MULTI8 LDY #0 NNY LDA (FONT),Y r}STA (LET),Y INY CPY #8 BNE NNY INX RTS MULTI8 STX DUMKUP LDX #3 ; ROL 3X CLC LOOP ROL ROL FONT+1 DEX BNE LOOP STs}A FONT LDA FONT+1 ADC #ROMFNT/256 STA FONT+1 LDX DUMKUP RTS VBI LDA PAULUS BNE DIEKRI INC 709 LDA 709 CMP #16 BNt}E WEK LDA #15 STA 709 WEK JMP $E45F DIEKRI DEC PAULUS JMP $E45F DL DFB 112,112,112,112,112,112 DFB 112,112,112,112,112,u}112 DFB $4F DFW SCREEN DFB 15,15,15,15,15,15,15 DFB 15,15,15,15,15,15,15,15 DFB 15,15,15,15,15,15,15,15 DFB 15,15,15,15v},15,15,15,15 DFB 15,15,15,15,15,15,15,15 DFB $41 DFW DL TXT ASC % THE ATARI EX% ASC %PO DEMO 1991 % *************w}********************** * MULTIPLY NUMBER WITH 32 ROUTINE * * MADE BY FRANKENSTEIN SOFTWARE! * ******************************x}***** MULTI LDA #0 STA LOBYTE STA LOBYTE+1 LDX #5 ; ROL 5X CLC LDA NUMBER LOPEN ROL ROL LOBYTE+1 DEX BNE LOPEN STy}A LOBYTE RTS NUMBER DFB 0 DUMMY DFB 0 DUMKUP DFB 0 TMPVB DFB 0,0 TPDL DFB 0,0 TPZP DFB 0,0 ;$F0,$F1 DFB 0,0 ;$F2,$F3 Dz}FB 0,0 ;$F4,$F5 DFB 0,0 ;$F6,$F7 DFB 0,0 ;$F8,$F9P DFB 0,0 ;$F0,$F1 DFB 0,0 ;$F2,$F3 DT |} }}  J l /  @%Щ$ԩ 򩐅Nȥȥiii(i}ѩ@"A"B"ɹʹ ԍҩөk./ԩ$ЩVЩxLӶ ,L ԍЩЩ L}t ԍЩvЩxЭHLӶ@LӶЗO GLӶԍҍԢҝLHHH,}lԥʹɹʹZ }/ԩ~ԩԩ$ЩVЩxЩЩԩ ԩ %˹ԭ} hhh@(Щ0ЩȍЩЍн ԍн̹I Խ ԍн̹Ѝ?ЍЍЍЩgL}Ԣ ԍLɹ 鸥ii ƹȭǹȭȹʹ 鸥ii ƹȱǹȱȹȩȩiÍi}``Ff ee&L `˹˹%˹O H`H}@`D `pp p`W@@V@p` BA~/04)/.%.',)3(3%,%#4.%$%2,!.$3  }        o* - ATARI EXPO DEMO 1991 - * DONE BY FRANKENSTEIN! ORG $B600 MUSIX EQU $B003 MUNEW EQU $B000 BEGGB EQU $4000 ENDGB EQU $4}800 BEGNL EQU $4800 ENDNL EQU $5000-20 XOSS EQU $8C00 SAMPLE EQU $8900 PMB EQU $2400 PM4 EQU PMB+$180 SCROL EQU $4000 MAIN}DL EQU $2000 RESTDL EQU 192+3 ;64*3 NMIVKT EQU $FFFA WAVE EQU $0600 PICTURE EQU $9000+16 PICEND EQU PICTURE+8040 DLZP EQU $F0} (AND $F1) PICZP EQU $F2 (AND $F3) X EQU $F4 (AND $F5) Y EQU $F6 (AND $F7) BITS EQU $F8 WAVTEL EQU $F9 BEGIN EQU $FA (AN}D $FB) DUMTEL EQU $FC OLDY EQU $FD NEWY EQU $FE PICOL0 EQU $24 PICOL1 EQU $56 PICOL2 EQU $78 WAVLEN EQU 90 BEGHI EQU $B4 EN}DHI EQU $BA PROGRAM JSR RIEZET * FIRST MAKE A FEASIBLE DL! JSR MUNEW LDA #0 STA 559 LDA #1 STA $220 IBM LDA $220 BN}E IBM * INIT. SCROLLER (GB) LDA #BEGGB:L STA SCRLO STA SCRLO2 LDA #BEGGB:H STA SCRLO+1 STA SCRLO2+1 LDX #0 LDA #25}5 FILMSL STA PM4,X INX BPL FILMSL LDA #3 STA 53277 LDA #PMB:H STA 54279 LDA #$FF STA $D00C * MAKE MAIN DL (128 SC}AN LINES) JSR INITDL LDA #PICTURE:L STA PICZP LDA #PICTURE:H STA PICZP+1 LDX #0 ;1ST LINE NOEND LDY #0 LDA #$4E }STA (DLZP),Y ;LMS INY LDA PICZP ;LO STA (DLZP),Y INY LDA PICZP+1 ;HI STA (DLZP),Y * ADD 3 BYTES, NEXT DL INSTRUCTION } LDA DLZP CLC ADC #3 STA DLZP LDA DLZP+1 ADC #0 STA DLZP+1 * ADD 40 BYTES, NEXT PICTURE LINE LDA PICZP CLC ADC #40} STA PICZP LDA PICZP+1 ADC #0 STA PICZP+1 INX CPX #192 BNE NOEND * TO END OF DL LDA #$01 STA MAINDL+576 LDA #END}L:L STA MAINDL+577 LDA #ENDL:H STA MAINDL+578 * SOME OTHER THINGS.... LDA #0 STA WAVTEL STA DUMTEL STA OLDJMP STA }NEWJMP JSR GETNEW STA $D40E STA $D20E LDA #$FE STA $D301 LDA #NMI:L STA NMIVKT LDA #NMI:H STA NMIVKT+1 LDA #DLI} STA $200 LDA #DLI/256 STA $201 LDA #46 STA 559 LDA #$C0 STA $D40E BOVEN LDA #PICOL0 STA $D016 LDA #PICOL1 STA $}D017 LDA #PICOL2 STA $D018 JMP LOOP * MAIN LOOP LOOP LDA $D40B BEQ BOVEN CMP #44 BCC LOOP CMP #44+32 BCS GROTER }LDA #4 STA $D40A STA $D016 LDA #6 STA $D017 LDA #10 STA $D018 JMP LOOP GROTER LDA #$74 STA $D40A STA $D016 LDA #$}76 STA $D017 LDA #$78 STA $D018 LDA $D01F CMP #5 BNE NSEL LDA #BEGNL:L STA SCRLO STA SCRLO2 LDA #BEGNL:H STA SCR}LO+1 STA SCRLO2+1 JMP LOOP NSEL CMP #3 BNE NOPT LDA #BEGGB:L STA SCRLO STA SCRLO2 LDA #BEGGB:H STA SCRLO+1 STA SCR}LO2+1 JMP LOOP NOPT CMP #6 BNE LOOP LDA SCRLO BPL LOOP LDA SCRLO+1 CMP #BEGNL/256+7 BEQ TOEGANG LDA SCRLO+1 CMP #B}EGGB/256+7 BEQ TOEGANG JMP LOOP TOEGANG LDA #0 STA $D40E STA $D20E STA $D400 LDX #8 STILTE STA $D200,X STA $D000,X D}EX BPL STILTE JMP SAMPLE NMI PHA TXA PHA TYA PHA BIT $D40F BPL VBLANK JMP ($200) VBLANK STA $D40F LDA WAVTEL }BNE ISWAVE INC DUMTEL LDA DUMTEL * CMP #32 BNE NMIEND ISWAVE LDA NEWJMP STA OLDJMP LDX WAVTEL LDA WAVE,X STA NEWJMP }* INX INX CPX #WAVLEN BNE BOEHOE LDX #0 DEC DUMTEL BOEHOE STX WAVTEL JSR PUGEPU NMIEND LDA 559 STA $D400 LDA #DL:L } STA $D402 LDA #DL:H STA $D403 LDA #DLI:L STA $200 LDA #DLI:H STA $201 LDA #PICOL0 STA $D016 LDA #PICOL1 STA $D017 } LDA #PICOL2 STA $D018 LDA #0 STA $D01A LDA #2 STA $D401 LDA #XOSS:H STA $D409 LDA #1+16 STA $D01B JSR SCRLR LDA S}MT STA $D404 LDA SCRLO STA SCRLO2 LDA SCRLO+1 STA SCRLO2+1 JSR MUSIX LDA #8 STA $D01F EXITDLI PLA TAY PLA TAX }PLA RTI DLI LDX #0 LDA #$28 STA $D004 LDA #$30 STA $D005 LDA #$C8 STA $D006 LDA #$D0 STA $D007 ALCOL LDA TUBCOL2,X } STA $D40A STA $D01A LDA TUBCOL,X STA $D019 EOR #$90 STA $D016 INX CPX #32 BNE ALCOL LDA #6 STA $D401 ALC2 LDA TU}BCOL2,X STA $D40A STA $D01A LDA TUBCOL,X STA $D019 STA $D016 INX CPX #63 BNE ALC2 * LDA #PICOL0 * STA $D016 * LDA #PI}COL2 * STA $D018 LDA #0 STA $D004 STA $D005 STA $D006 STA $D007 LDA #DLI2:L STA $200 LDA #DLI2:H STA $201 JMP EXI}TDLI DLI2 LDA #2 STA $D401 LDX #0 TXA ZOEWART STA $D40A STA $D018 INX CPX #8 BNE ZOEWART JMP EXITDLI * PUT OLD DMA} INTRUCTION PUGEPU LDA OLDJMP JSR MULTI LDA X CLC ADC #MAINDL:L STA X LDA X+1 ADC #MAINDL:H STA X+1 LDY #0 LDA OL}DMA STA (X),Y INY LDA OLDMA+1 STA (X),Y INY LDA OLDMA+2 STA (X),Y * GET NEW DMA INTRUCTION GETNEW LDA NEWJMP JSR MU}LTI LDA X CLC ADC #MAINDL:L STA X LDA X+1 ADC #MAINDL:H STA X+1 LDY #0 LDA (X),Y STA OLDMA INY LDA (X),Y STA OL}DMA+1 INY LDA (X),Y STA OLDMA+2 * PUT JMP INSTRUCTION LDY #0 LDA #1 ;DL JUMP STA (X),Y INY LDA #TUBEDL:L ;LO STA }(X),Y INY LDA #TUBEDL:H ;HI STA (X),Y LDA X CLC ADC #RESTDL:L STA RESTJMP LDA X+1 ADC #RESTDL:H STA RESTJMP+1 RT}S * MULTIPLY X WITH 3 (X=X*3) MULTI STA X LDA #3 STA Y LDA #0 STA Y+1 STA X+1 LDA #16 STA BITS LDX #0 LDY #0 LABE}L1 DEC BITS BPL LABEL2 STX X STY X+1 RTS LABEL2 LSR Y+1 ROR Y BCC LABEL3 CLC TXA ADC X TAX TYA ADC X+1 TAY LABEL}3 ASL X ROL X+1 JMP LABEL1 INITDL LDA #MAINDL:L STA DLZP LDA #MAINDL:H STA DLZP+1 RTS * ENGELS/NEDERLANDS SCROLLER S}CRLR DEC SMT LDA SMT BPL NOTHIN LDA #7 STA SMT INC SCRLO BNE NOSHI INC SCRLO+1 NOSHI LDA SCRLO CMP #ENDNL:L BNE MO}OINI LDA SCRLO+1 CMP #ENDNL:H BNE MOOINI * NEDERLANDSE TEXT OPNIEUW LDA #BEGNL:L STA SCRLO LDA #BEGNL:H STA SCRLO+1 }NOTHIN RTS MOOINI LDA SCRLO CMP #ENDGB:L BNE NOTHIN LDA SCRLO+1 CMP #ENDGB:H BNE NOTHIN * ENGELSE TEXT OPNIEUW LDA #}BEGGB:L STA SCRLO LDA #BEGGB:H STA SCRLO+1 RTS * RIEZET VEC. RIEZET LDA #0 STA 580 LDA #2 STA 9 LDA #PROGRAM:L ST}A 2 LDA #PROGRAM:H STA 3 RTS * START DL DL DFB 112,112,16 DFB 1 DFW MAINDL * 8 LINES SCROL TUBE DL TUBEDL DFB 128,11}2,96 ;1.5 DFB $47+16 ;2 SCRLO DFW SCROL DFB 64 ;1 DFB $46+16 ;2 SCRLO2 DFW SCROL DFB 112,96,32 ;1.5 DFB 1 RESTJMP DF}W RESTDL ENDL DFB 0,0,128,0,$42 DFW ENGNED DFB $41 DFW DL ENGNED ASC % OPTION=ENGLISH % ASC %SELECT=NEDERLANDS % } OLDMA DFB 0,0,0 OLDJMP DFB 0 NEWJMP DFB 0 SMT DFB 0 TUBCOL DFB 4,6,4,6,6,6,8,6,8,8,8,8 DFB 8,10,8 DFB 10,10,10,10,10 DFB} 12,10,12 DFB 12,12,14,12,14,14,14,14 DFB 14,14,14,14,12,14,12,12 DFB 12,10,12,10,10,10 DFB 10,10,8,10,8 DFB 8,8,8,8,6,8},6,6,6,4,6,4 DFB 0 TUBCOL2 DFB 4,6,4,6,6,6,8,6,8,8,8,8 DFB 6,4,2 DFB 0,0,0,0,0 DFB 0,0,0 DFB 0,0,0,0,0,0,0,0 DFB 0,0,0},0,2,4,2,4 DFB 4,4,6,4,6,6 DFB 6,6,8,10,8 DFB 8,8,8,8,6,8,6,6,6,4,6,4 DFB 0},6 DFB 6,6,8,10,8 DFB 8,8,8,8,6,8,6,6,6,4,6,4 DFB 0Y #',049=AFJOSW[_cfjmpsuwy{|~~~~|{ywuspmjfc_[WSOJFA=940,'#  `lllllll||00f8l8pvp88pl88l~00`~00$} 0`||x|| x | |||800||||~ x00000000` 0`0 ~~0 $} 00000>600| $}|YUU>Y@Z@@:@UUA:@T?AdTdTi?d0}?PdU@dd?PddP@>@OdTdOddOPdUdPdU@NPddU@0}dPddU@dUAOd@dUP@dPdOdUdU@U?UUPdO)Ad0}T)APd@JTd?UTJTdPEd?O@d@ꪕP@O@d>TdOOU@0}OY:FUejNP@OᤐjT>PP@Oᤐ?@eTO@NON>@eF@OY VNYUAOY 0}OAP@NY$@ONY$@NUTd@FOY*F@OAZAFOY*F@O@d@?FI@OV?FI@N0}UPdi?VH@ePi?VH@Obdd?I@dT?I@OUQdAUJAdUJAU@0}d?*?*Ud@d?ꪪ?ꪪeSP@?d?UT?UTdi>Pd0}dUdUdT9ddQddQdjP?ddUAddUAdT>@eP0}dd@ePd?@Y:@?Pdd@?PdTEP?i: ddF@i: dTAO>UR0}dd@>URdTeYNT8PddF@8Pdd)TdO@:U@dd@:U@ddJPO@?d0}@?dd@NP@d@dF@d@ddd@@OF@dAdF@dAddY%T@N@dFJd@d0}FJd>Y*@O@dFJdAdFJd?FJF@F@dFI@dQdFI@d>IT@dFITAdFIT0}?JA@d@0F@dAZjTPV@d2 "@0}@dUUUUR(HT!UUUUU UUUUTAd:  > O:)H: *0}OA?U$UbUa?%X``U>C9D>*@d"d:C>*::d"d0}?C:FK??dB:A?>B??dBO>K>?dB@0}?擪*?:dBd@Oc$O*dBd@OUUbUbO%Z`ULd0}L *Y   dUUUURHU!HdUUUUTdj@0} "@@ZjTPV@?=?jKƪPj0}ƪ񪪼ZƪjƪjjƪZEjjƪj*ƨjŪj*ƪj*0}jZjjƪjj jjƪjjZQjƪj”*j0}jƪjƩjjjZŪJZŪjZŪUjEZUZUjEZQVTUUU0}UUUPjAZTZjAZPVPUUUUPAZDZFEEDU@AZAFDUD0}@ZDED@ZZE@@Z@@0}A@@ꪰZꪰj@ꪰ ꪰjj@j0}jjj@jjTjjU@کjPکjj@T@jکjP0}کjj@@֥j @֥jj@@@֥jP֥jj@d@jѕj@Քj0}Zёj@ёjZ@@jQjPjjQj@Qj0}j@jPjF@jAj@jj@j*@j0}j@j@j*jjJ@j@@j0}JjjRjjjjj0}j@jjjjjjjj0}j?jjjjj*bjJj*d@0}jRj ijZj@jZjj0}jjpjjjjjj0}jj??jƪjƪ0}jjƪjƪjƪj*ƪjƪjƪjFƪ*jƪjƪj0}ƪjƪjƪjƪjjƪ*jƪ@jŪjkƪjjƪZ0} jTƪjjƪjiDYATZYZjŪjiZPZŕTUUTPUUTUUUUEUUUUTUUUUEPUUU0}Pﯿﻯnﯿ1}믻kn붻﮿w믻ym{[v非^絷n﮻gvkY坧Y坦y}mv[eٝ]٧e^]mgFu1}[gYѝcYѝadiIvGeXMMdv]]{vY]RqWfDbDa$iI6HHH`aYgvYYA VDH"DH! (H!FDHHaYI'bH @H1}"PH !D@@I"!DHA@D@DDDD@DAD!DA@@D@@A1}@@@@@@Dooooo1}oooo@kkkkkkkkkkkkkkkkkkU@UTU@TUTU@U1}UTU@U@Coooooo1}okQkkkkkkkkkkkkkk U@UUTUT@UUTU1}@ 3U@UUTUT@UUUTUU@<***@1}0???@0???0???0@1 }H ??? ??? ?1 }?? *** U@UUTUT@UUUTU@ ̄ 1 }  @0kkkkkkk 0kkk1 }kkkk 0kkkkkkk 0U@UUTT@UUUTU@@k1 } 00kkkkkkkk0kkkkkkk1}k@ @kkkkkkkk U@UUTTUDUUTU@U@@@@1}@@@D@A@DD@@A@DDA@D@AA!@I1}DA@DDDD@A!ADIa D@H !!B"@D!$PaedI! DH! (HHaarAee$evdI F1}! !!&Da$iI66ՖrMfueuuFqtq%gYѝadiIvGevGeײ]vyuvYgvtuvgY坦y}mv[ev[e۶zv^gvk1}ym{[v{[v뷞ݻk{k޻k뻹ﻯﻯ1}뻹ﻯﻯ0=EXPO DEMO SOURCES 1991----------------------'Waving Tube' and 'Digital ATARI'Done by Frankenstein.Files:TEXTGIGA.COM5} - Packed scroltextGIGA .COM - Giga unpackerSAMPSHIT.COM - Digital musicSPLAY .COM - Digi player (DMA on)FNT .CO5}M - Font in the tubePICT .COM - Atari expo pictureFLY .COM - Sine wave dataMUSIC .COM - Music from Benjy!EXPO 5} .COM - Waving tube programAppend all these files to create arunable expo demo.Sources (Atmas II format):SPLAY .SRC 5}- Digi player sourceEXPO .SRC - Waving tube sourceThe source of the Giga unpacker isnot released with this package.Re5}ad 'Mega Magazine' issue #5 forthe full details plus sources ofthis HUFFMAN packer/unpacker!Mega Magazinec/o Frankenstei5}nP.O. Box 1648800 AD FranekerHollandetails plus sources ofthis HUFFMAN packer/unpacker!Mega Magazinec/o Frankenstei4*PwyHxj{3zXewxWv<_/P 0t@3"3SUtwxoݼxVD0V 2dv޼xV43PCP9}#3AvWڻ޺ֿy($C#1!USTVvۍhvj[DuXFef̼FeC4@g0%T33333333Tevfʼ̼w6dc5eC9}UE4#"""""CEfxfwͻydjB%C0! ae4DvjlɈ̙ikȈzgXSf2$d!A B3UTgiޜꏷ73g#CTT9}2S0iivl|Y̻]zVjW$r &Se0phDg߻z|d|hDtF6BCEC!BP7tXu̻޸9}{SWT#TD!aFTVECW6܋̼κW%5eTR4tGxxݹ{|kEfEf5TEDt&T4EBUhyZޘ݉yVI 4DA2F9 }TSE XɌݫͻیfXwTg#R5#1vEtvݺ߫Xu02A3!uvgｙWug$3#"3De˼VE3""3"B#CETf9!}ܼg5C4"2!""CTUvwgegegEeETeUvfwxgfeeffVevwgfffefUfffVfvffffvww9"}xfffVUefefUewwwwwwgfffVUeVUevwwwwwwgfgfvggfwwwwwwwxwxwwwwww9#}wwvwwgfffwwwwvwxwwwxwxxpf a-7 (w&yHp/gxPaս9$}x 3G%4 @0'd=dJn&*feu9(}'yy5tHͩG56L÷+lw| 9!~qG˸OU98*ExTgq?$ } W0]iG"w\xld`6ʯoLBreujcv]EqjJ9)}xebpɎuYGv873x9ȆsHLuetq }ÔQiK@ ԳƢ~+9:}$+(J n-KxS)~0 H 0 P`ծ0C'`1j[Q;@ 0 9oA@9;}l¾YbO)ff0PXzDٿ ~09 hxVR6"2mQ "cl9<}RzDxEY1ޛxVTEDTY5CT}3zEdxwhUeE 4!ｚxW0TVUehxwv9=}yffwxffffUE#A：x% CUUUvݼgfvwVUUUU4bͫx!SUUefͫ9>}wffwgUUUUD#!：h1CUUUf̼［xgfffUUDDD4B：h2DUUUev9?}߼xwgfVEDDD4""u޼h2CDTUevμwgfUEDD43Bݬy5!33DDTUfw9@}ͻwfVUDDD3# SΫh4!23DDTew̻wfVED433"1u͛x5!23DDUew9A}ͼwwfUDD43#Bv͚h5!"23CDTev̻wgVED433!C͛h5"!"333DDUv9B}ͼwfVUDD3#!CuͫygD3"""3333DDUv̻wfVED33#2TͫygD3""3333CDTf9C}̻wgVED43#2dͫgE33333333DTf̻ 6@Z@P- 9D} Q/ o ;@P?0@PO`/j;_@[*Py09E}p/0hv`YO?CE{(@>߹xV0f#2a1"pls﫺GtW`9F}ޛxV eEDuUHCTIcWTwhUf5TｚhAeVUvΉwvyfvxfffVU4!9G}Ϋ61TUUeެ˼gfwgUeVUU4R͛h SUUevͫxgfwgUUUUD#!ͫ9H}y3TUUfλwfffUUDDD#!dͫh!CTUUev߼xwffUDDDD#!c޼69I}2CDUUfwμwgfUEDD4# S͚W!3DDTUfw޼wfVUDDD3"1CΫh4!23D9J}DTew̻xgfUDD33"!d͛h4!23CDTUvͼxwfUDD33"!SެyF#""33DDUv9K}ͼwgVED33#!C͚g4"!"333DTew̻wfVED43"!CuͫxE3""2333CDUv9L}̻xgVED33#2TͫxgD3"2333CDTf̻wfUDD33"!Cv޼gE3333333DTf=9M}==pk3u; ۝¢S ;m-ͤp\nNўP .{h Rg"+@> 9N} ` z®`FP/hf xv2iDȟ@{!7>оxVc$")]"R]r9O}XdxF0ެxV UDDU5Cu4ǾWTxhUUE 4Qެ6AeUe팆xwvʜgfwxfffU4!19P}X1TUUeܬ˛hfvWUUUE#b͛W2UUevͫygfvWUUUU4 ߼63TUev9Q}ﻻxgffVUDD4 t͛W!CTUUfwϻxwffEDDD#2͋G2CTUev［xwfV9R}EDD4 S͉F2CDTUfλwfVEDD4"Cάy5!2CDDUv̻wfUDD3# d9S}ｊG"3DDUe̻xwVED43"2u）F#""3CDTu̻wgUD43#2d޼yF#"233DTv9T}ͼwfUDD3"!C޼W4"""333CDew̻wVED33"2T޼g4#"2333DTf̻xfU9U}DD3#\j, @j h@(@\̽ҲA k=GF`Юp g??P=0JTq+_9V} .) nI0M gfo# Fߘ`@)axnоgEA6"!B*Pr9W}FhދgSEDV4D7XTwWUF@ｉF TUU팆wgȬgfwgffVU$!!﬉69X}CUUe͚gfwwVUUUEA＊& TUUfͪΪgfvVUUUD1W3TUUv̻ｻg9Y}ffUUDD4SF!CUUevλwgfUDDDD#!）&!3DUevͻwgVUDD4# d͛G9Z}2DDTevw߼wfVEDD326!2CDTew̻xgVED33"S߼5!2CDUe̻9[}wgUDD3#B͚W#"23CDUvͼwgUD43#!S͚V#"233DUvͼxgVED3#!Cd9\}zF3""233CDUv̻xgUD43#2dͫgE#"2333DTvO ] uP v (@?ߧxt9]} ҏn 0?^00퐻G@gkoN z@kq~ z yfv0 / E0pK`h9^}zVb$2<"HhxFQED7C\XTxhUF$ޛhSVUjxwjgff9_}ffU$!a）&2UUeܜfvVUUU$ｊRUUvܫשׁxfvWUUE4b͚G2TUe̻9`}xffVUDD# %BTUevλxwfVDDD#cޛX!CTUfͻxwfUDD4!ޛy2DD9a}UfͻwfUDD4" tX!3CDUv̻wfED3#cｉ523DTeμwgUD43!u9b}i5"23DTu̼xgVD43!cΚF#!233DUwͻxgVD432tF#""333DTvͻgVD43"9c}2tΫg4#"333DTvݼgVD43"2u f8 Be_{M.0$_@ 9d}L찫-0T`Kp~@z` hVX@Iԯ KzF@&27 b ΪTx9e}$y6QETf8CsGtwxUF h eUjحwh{fwffVE!h1UUڼ߉ʋgvwVUUU#9f}ޛ'SUeܫxfvVUUDΚ CUe̼ﻻxffVUDDcXBTUewfVDD4 ߼9g}h2DUewͻxgVED4RΊ%!CDTeλxgVED4cz$!3DTuͻwfED3"RޛG9q}B%DOS SYSB*)DUP SYSBSEXPINTROCOMBZEXPINTRODOCB^EXPINTROSRCB{SININTROCOMB ~EXPO COMB4EXPO SRCBFLY COMB FNT COMBGIGA COMB MUSIC COMB>PICT COMBREAD ME BuSAMPSHITCOMBSPLAY COMBSPLAY SRCBTEXTGIGACOM2CDUw޼wVD43RߜW!23DTv̻xgUD3#2y5"33De޼xfUD3"Cy4""333De9r} h  `m 0 ⿗Vq"@ҼݍV[aB]Y}k{]ľ\0D]0lQ9s}K 0 1 `KahP~(t0ߛf[ NQNbHȭrٍ0{A쬪ybf9q9t}xffPcXn1^ #AyDtz[ 70޻݋AG0xfEBf#"2}3""c9u} k!ΪFTxVrެgV1UEDDuVX3CTGCgDTwwgUUVE DRͫh59v} TeUUehެxwwߋf˼yffvwgffffVUU4!B޻V!CUUUUf̛xgffw9w}gVUUUUUU4"1ݼx%2UUUUfvݼͪwgffwgUUUUUUD41μyF2CTU9x}UUfw̻޻wffffVUUEDDD41dͫW$!CDUUUUfv߼xwwffVUDDDDD39y}""dݼx623DDUUefwͼxwgfVUEDDD43"TͫV#!3CDDDUUfw9z}ͻwgfVUEDDD4#"!C޻g4!"33DDDUew̻xwffUEDD33#"9{}!S޼xF#"23CDDUUvw̻xwgfUDDD33#"!Buͬg5#!""33CDDTev9|}̻wwfVUDD333"!3e̚xV3"""3333DDUfwͼwffUEDD33"!3T9}}̫gD3""""33333CDTUvwͼxgfUED433#"!CdͼxVD3#""33333CDDefͼ9~}wgVUDD433#2SvͫgV4333333333CDTev̼wwVUDDD333#2Deݼf9}ED3333DD43CDDUevKjywzww\geweWWHjgX|hWfgfHizhJigywxiWǖiyxwwwZgXyjhyxw9}vgwxxXYw{jyxxhiWxwhgixyxhxwxw  9}9}~PSY^chlosv|~SY^chlosv|}@`VX|H`VX|9}9}9}9}9}9} 9}    9}          9}     9}9}9}9}9} 9}  9} 9}9}9}9}9}    9}    8bE2􉩳ԭ҅~ ~~0~ɉ񩍍) JJJJ =} ѩПLg  ԍ ԍ`H,lԩԩԩ"ԭii2ih@=}ppppppppppNA"ԭii2ih@<R* EERSTE DEEL VAN HET TWEEDE DEEL!? * PLAY SAMPLES.. ORG $8900,$B900 PICTURE EQU $9010 PIECES EQU $7E00 SEQUEN EQU $7F00A} SEQEND EQU $8900 SEQNR EQU $F0 (AND $F1) SPLBEG EQU $F2 (AND $F3) SPLEND EQU $F4 (AND $F5) TIME EQU $F6 AUDIO EQU $D201A} IRQEN EQU $D20E DMACTL EQU $D400 WSYNC EQU $D40A NMIEN EQU $D40E INIT LDA #50 STA TIMER LDA #4 STA COLOR LDA #NMI STAA} $FFFA LDA #NMI/256 STA $FFFB LDA #DLI STA $200 LDA #DLI/256 STA $201 LDA #$C0 STA $D40E PAUWAN LDA TIMER CMP #1 BA}NE PAUWAN RUN LDA #0 STA IRQEN STA TIME LDA #SEQUEN:L STA SEQNR LDA #SEQUEN:H STA SEQNR+1 LDY #0 LDA (SEQNR),Y NA}IETNUL TAX LDA PIECES,X STA SPLBEG+1 LDA PIECES+$20,X STA SPLBEG LDA PIECES+$10,X STA SPLEND+1 LDA PIECES+$30,X STA SA}PLEND INC SEQNR BNE NOSEQ INC SEQNR+1 NOSEQ LDA SEQNR+1 CMP #SEQEND:H BNE DIZ LDA #SEQUEN:H STA SEQNR+1 DIZ LDA #$8DA} STA COMMAND THENOT LDA (SPLBEG),Y AND #%00001111 JSR NOISE LDA (SPLBEG),Y LSR LSR LSR LSR JSR NOISE INC TIME A}INC SPLBEG BNE NSPLEND INC SPLBEG+1 NSPLEND LDA SPLBEG CMP SPLEND BNE NOWAY LDA SPLBEG+1 CMP SPLEND+1 BNE NOWAY LDAA} #$AD STA COMMAND NOWAY LDA TIME CMP #$EA ;TIME END BNE THENOT LDA #0 STA TIME LDA (SEQNR),Y BNE NIETNUL INC SEQNA}R BNE THENOT INC SEQNR+1 JMP THENOT NOISE ORA #%00010000 STA WSYNC STA WSYNC COMMAND STA AUDIO RTS NMI PHA BIT $D40A}F BPL VBLANK JMP ($200) VBLANK STA $D40F LDA #DL:L STA $D402 LDA #DL:H STA $D403 LDA #34 STA $D400 LDA COLOR CLC A}STA $D016 ADC #2 STA $D017 ADC #4 STA $D018 DEC TIMER BNE NIENU LDA #50 STA TIMER LDA COLOR CLC ADC #$10 STA COLOA}R NIENU PLA DLI RTI COLOR DFB 4 TIMER DFB 0 DL DFB 112,112 DFB 112,112,112,112 DFB 112,112,112,112 DFB $4E DFW PICTUREA} DFB 14,14,14,14,14,14,14 DFB 14,14,14,14,14,14,14,14 DFB 14,14,14,14,14,14,14,14 DFB 14,14,14,14,14,14,14,14 DFB 14,14,A}14,14,14,14,14,14 DFB 14,14,14,14,14,14,14,14 DFB 14,14,14,14,14,14,14,14 DFB 14,14,14,14,14,14,14,14 DFB $41 DFW DLA}DFB 14,14,14,14,14,14,14,14 DFB 14,14,14,14,14,14,14,14 DFB $41 DFW DL@0FO@%@/P7T#X8XX1X XYZ"\*^6`.p!%4,$('3:9+5 &-0 2)E}ĵd?aV'tydV![NjY;۵Cwr+ѥ|bB,Dl`v~)\dsGʖ8+F\E};n.L1Xdm9 wb۴;+V?[˝Bc/:Cx͹Ru.~C[~5%cH]܌A[˝BSߨV!|/+FE}=w) g4>sOg( ;QHV5S5SIΎiݩ_T}\isstV!Zmyꗝ!{LۥCϏm 9Xvܼk4XuƾBzE}LONW|NnhwAt2QXQdj39+S hTXQxj܏bmN1ڜ 5T+nG?T9(g+ȬEV&4)!bE}ONhNebxXrOZ9y篣 a{\ǧ:K:KQ_Xr- kw_3nCg=Ӱ+XT-MV -+gj6DqCHE}(V+uN=+:_W!vV!ۋW|ǎ??G0ڜ OCȘ#ѻnȠ̤*Zöޓ!78_V_=j_hVVgE}IFh#'#ڜ{Rk(a:\ '?G;\F6OVm|Qڜwal7-V#eh\nG뽡.~C ;YEH)_=j_iE},n?()D:Fk!o5jo6d]ȢebWkOhEbwR!gYd؍yE}}csS)'1&F%K ng:wދxd?n~4g|i\Oty-i']#Riy;_Y{T)31ww0OE}^j+7NTal1(_=q^^lI&gPg[d/:B^o6bQi7:f'!Gj?HמT.㎇wr7&f>ҸE}Z>% /=gk]#r/ƅwBO]% 糒?c{Tjl;j|al/6C>W덟siG-[Kΐv{KqDbŸE}^k&bwm <^:g =w?q~];Wѻ楢C\o!I=-6Fqk~ |̼1- ?z%O jt/71E}i܉=:w$cd_o'w=kBJ>B9=~ ݋9ݒ֍F +/-F#sd" uݹ 'WE}gȼ/PWx/#g\b{5шb5Y=oS?xlQ;[Bx[.az'p\l"F5+.Ƨn-\yqk~qs3K_ɇnBE}ag-r8YRJu'ꖴlr.2fHvNû?ECdы gg{^'{C~QK>2:w-čFӑwcRJC aIﱳF:|8nGN?E}xۗzB"~q!s ģ>מ%A:/zqy~F0ѲNxë~QԞ6N=!76Y]JOjj}3J/vE}9xکȿv/jRJF% ɚ+BٟڋJ-i;7 eYOENQԞ6N=!76Y]JOjj}3J/vDJ