diff --git a/artwork/Scorch50.asm b/artwork/Scorch50.asm deleted file mode 100644 index 216e32b..0000000 --- a/artwork/Scorch50.asm +++ /dev/null @@ -1,877 +0,0 @@ -/***************************************/ -/* Use MADS http://mads.atari8.info/ */ -/* Mode: DLI (char mode) */ -/***************************************/ - - ;icl "Scorch50.h" - ;icl "../lib/ATARISYS.ASM" - ;icl "../lib/macro.hea" - -; --- dmsc LZSS player routine on zero page - org $80 - -chn_copy .ds 9 -chn_pos .ds 9 -bptr .ds 2 -cur_pos .ds 1 -chn_bits .ds 1 - -bit_data .ds 1 - -fcnt .ds 2 -fadr .ds 2 -fhlp .ds 2 -cloc .ds 1 -regA .ds 1 -regX .ds 1 -regY .ds 1 - -WIDTH = 40 -HEIGHT = 30 - -; --- BASIC switch OFF - org $2000\ mva #$ff portb\ rts\ ini $2000 - -; --- MAIN PROGRAM - org $2000 -ant dta $C2,a(scr) - dta $02,$82,$02,$02,$82,$02,$82,$02,$82,$02,$02,$02,$82,$02,$82,$82 - dta $02,$02,$82,$02,$02,$82,$02,$02,$82,$82,$02,$82,$22 - ;dta $42,a(verline) - dta $41,a(ant) - -;verline -; :37 dta d" " -; dta build - -scr ins "Scorch50.scr" - - .ds 0*40 - - .ALIGN $0400 -fnt ins "Scorch50.fnt" - - ift USESPRITES - .ALIGN $0800 -pmg .ds $0300 - ift FADECHR = 0 - SPRITES - els - .ds $500 - eif - eif - - -song_data - ins 'mmm_16.lzs' -song_end - -buffers - .ds 256 * 9 - -;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; -; Song Initialization - this runs in the first tick: -; -.proc init_song - - mva #1 bit_data - - ; Example: here initializes song pointer: - - ;mwa #song_data song_ptr - - ; Init all channels: - ldx #8 - ldy #0 -clear - ; Read just init value and store into buffer and POKEY - jsr get_byte - sta POKEY, x - sty chn_copy, x -cbuf - sta buffers + 255 - inc cbuf + 2 - dex - bpl clear - - ; Initialize buffer pointer: - sty bptr - sty cur_pos - rts -.endp - -;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; -; Wait for next frame -; -.proc wait_frame - - lda 20 -delay - cmp 20 - beq delay -.endp - -;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; -; Play one frame of the song -; -.proc play_frame - lda #>buffers - sta bptr+1 - - lda song_data - sta chn_bits - ldx #8 - - ; Loop through all "channels", one for each POKEY register -chn_loop: - lsr chn_bits - bcs skip_chn ; C=1 : skip this channel - - lda chn_copy, x ; Get status of this stream - bne do_copy_byte ; If > 0 we are copying bytes - - ; We are decoding a new match/literal - lsr bit_data ; Get next bit - bne got_bit - jsr get_byte ; Not enough bits, refill! - ror ; Extract a new bit and add a 1 at the high bit (from C set above) - sta bit_data ; -got_bit: - jsr get_byte ; Always read a byte, it could mean "match size/offset" or "literal byte" - bcs store ; Bit = 1 is "literal", bit = 0 is "match" - - sta chn_pos, x ; Store in "copy pos" - - jsr get_byte - sta chn_copy, x ; Store in "copy length" - - ; And start copying first byte -do_copy_byte: - dec chn_copy, x ; Decrease match length, increase match position - inc chn_pos, x - ldy chn_pos, x - - ; Now, read old data, jump to data store - lda (bptr), y - -store: - ldy cur_pos - sta POKEY, x ; Store to output and buffer - sta (bptr), y - -skip_chn: - ; Increment channel buffer pointer - inc bptr+1 - - dex - bpl chn_loop ; Next channel - - inc cur_pos -.endp - -;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; -; Check for ending of song and jump to the next frame -; - -; not checking really so the tune gets funky :))) - ;lda song_ptr + 1 - ;cmp #>song_end - ;bne wait_frame - ;lda song_ptr - ;cmp #pmg pmbase ;missiles and players data address - mva #$03 GRACTL ;enable players and missiles - eif - - lda:cmp:req $14 ;wait 1 frame - - sei ;stop IRQ interrupts - mva #$00 nmien ;stop NMI interrupts - sta dmactl - ;mva #$fe portb ;switch off ROM to get 16k more ram - - ;mwa #NMI $fffa ;new NMI handler - - sta COLOR4 - lda #$0E - sta COLOR1 - lda #$84 - sta COLOR2 - lda #$0E - sta COLOR3 - lda #$02 - - - - VMAIN NMI.vbl,6 ;jsr SetVBL - VDLI DLI.dli_start - - - mva #1 vscrol - - mva #$c0 nmien ;switch on NMI+DLI again - -_lp lda trig0 ; FIRE #0 - beq stop - - lda trig1 ; FIRE #1 - beq stop - - lda consol ; START - and #1 - beq stop - - lda skctl - and #$04 - bne _lp ;wait to press any key; here you can put any own routine - - -stop - - cli - vmain sysvbv,6 - - mva #$00 GRACTL ;PMG disabled - tax - sta:rne hposp0,x+ - - ;mva #$ff portb ;ROM switch on - mva #$40 nmien ;only NMI interrupts, DLI disabled - ;cli ;IRQ enabled - - lda #0 - ldx #8 -@ sta POKEY,x - dex - bpl @- - - - ;no glitching please (issue #67) - lda #0 - sta $D400 ;dmactl - sta $022F ;dmactls - rts ;return to ... DOS - -; --- DLI PROGRAM - -.local DLI - - ?old_dli = * - -dli_start - -dli13 - sta regA - - sta wsync ;line=8 - sta wsync ;line=9 - sta wsync ;line=10 - sta wsync ;line=11 - sta wsync ;line=12 - sta wsync ;line=13 -c9 lda #$14 - sta wsync ;line=14 - sta colpm3 - DLINEW DLI.dli2 1 0 0 - -dli2 - sta regA - lda >fnt+$400*$01 - sta wsync ;line=24 - sta chbase - DLINEW dli3 1 0 0 - -dli3 - sta regA - lda >fnt+$400*$02 - sta wsync ;line=48 - sta chbase - sta wsync ;line=49 - sta wsync ;line=50 - sta wsync ;line=51 -s3 lda #$07 - sta wsync ;line=52 - sta sizem - DLINEW dli14 1 0 0 - -dli14 - sta regA - stx regX - sty regY - -x8 lda #$A3 - sta wsync ;line=64 - sta hposp3 -x9 lda #$AB - sta wsync ;line=65 - sta hposm3 - sta wsync ;line=66 - sta wsync ;line=67 - sta wsync ;line=68 - sta wsync ;line=69 - sta wsync ;line=70 -s4 lda #$13 -x10 ldx #$A6 - sta wsync ;line=71 - sta sizem - stx hposm2 -s5 lda #$01 -x11 ldx #$72 -x12 ldy #$62 - sta wsync ;line=72 - sta sizep2 - sta sizep3 - stx hposp2 - sty hposp3 -x13 lda #$A9 - sta wsync ;line=73 - sta hposp1 - DLINEW dli4 1 1 1 - -dli4 - sta regA - lda >fnt+$400*$03 - sta wsync ;line=80 - sta chbase - DLINEW dli5 1 0 0 - -dli5 - sta regA - stx regX - lda >fnt+$400*$04 - sta wsync ;line=112 - sta chbase - sta wsync ;line=113 - sta wsync ;line=114 - sta wsync ;line=115 - sta wsync ;line=116 - sta wsync ;line=117 - sta wsync ;line=118 -s6 lda #$07 -x14 ldx #$A3 - sta wsync ;line=119 - sta sizem - stx hposm1 -s7 lda #$01 -x15 ldx #$93 - sta wsync ;line=120 - sta sizep1 - stx hposp1 - DLINEW dli15 1 1 0 - -dli15 - sta regA - stx regX - - sta wsync ;line=128 - sta wsync ;line=129 - sta wsync ;line=130 - sta wsync ;line=131 -x16 lda #$4A - sta wsync ;line=132 - sta hposp1 -c10 lda #$D4 - sta wsync ;line=133 - sta colpf2 -s8 lda #$C3 -x17 ldx #$5A - sta wsync ;line=134 - sta sizem - stx hposm3 - DLINEW dli6 1 1 0 - -dli6 - sta regA - stx regX - sty regY - lda >fnt+$400*$05 - sta wsync ;line=136 - sta chbase - sta wsync ;line=137 - sta wsync ;line=138 - sta wsync ;line=139 - sta wsync ;line=140 - sta wsync ;line=141 - sta wsync ;line=142 -s9 lda #$C7 -x18 ldx #$A9 - sta wsync ;line=143 - sta sizem - stx hposm1 -s10 lda #$D7 -x19 ldx #$9E -c11 ldy #$02 - sta wsync ;line=144 - sta sizem - stx hposm2 - sty colpm2 - sta wsync ;line=145 -c12 lda #$04 - sta wsync ;line=146 - sta colpm1 - sta wsync ;line=147 - sta wsync ;line=148 - sta wsync ;line=149 -s11 lda #$00 -x20 ldx #$74 -c13 ldy #$02 - sta wsync ;line=150 - sta sizep3 - stx hposp3 - sty colpm3 - sta wsync ;line=151 - sta wsync ;line=152 - sta wsync ;line=153 - sta wsync ;line=154 - sta wsync ;line=155 - sta wsync ;line=156 - sta wsync ;line=157 -c14 lda #$04 - sta wsync ;line=158 - sta colpf0 - DLINEW dli7 1 1 1 - -dli7 - sta regA - lda >fnt+$400*$06 - sta wsync ;line=160 - sta chbase - DLINEW dli8 1 0 0 - -dli8 - sta regA - stx regX - sty regY - lda >fnt+$400*$07 - sta wsync ;line=184 - sta chbase - sta wsync ;line=185 -s12 lda #$00 -x21 ldx #$8E -c15 ldy #$08 - sta wsync ;line=186 - sta sizep2 - stx hposp2 - sty colpm2 -x22 lda #$4C -c16 ldx #$0E - sta wsync ;line=187 - sta hposp3 - stx colpm3 -c17 lda #$0A -c18 ldx #$34 - sta wsync ;line=188 - sta colpf1 - stx colpm3 -s13 lda #$43 -x23 ldx #$49 - sta wsync ;line=189 - sta sizem - stx hposm3 -c19 lda #$08 -c20 ldx #$34 - sta wsync ;line=190 - sta colpf1 - stx colpm2 - sta wsync ;line=191 -c21 lda #$0A - sta wsync ;line=192 - sta colpf1 -c22 lda #$08 - sta wsync ;line=193 - sta colpf1 -c23 lda #$0A - sta wsync ;line=194 - sta colpf1 -c24 lda #$34 - sta wsync ;line=195 - sta colpf2 -c25 lda #$0C - sta wsync ;line=196 - sta colpf1 -c26 lda #$0A - sta wsync ;line=197 - sta colpf1 -c27 lda #$0C - sta wsync ;line=198 - sta colpf1 - sta wsync ;line=199 - sta wsync ;line=200 -c28 lda #$0E - sta wsync ;line=201 - sta colpf1 -c29 lda #$0C - sta wsync ;line=202 - sta colpf1 -c30 lda #$0E - sta wsync ;line=203 - sta colpf1 -c31 lda #$0C - sta wsync ;line=204 - sta colpf1 -c32 lda #$0E - sta wsync ;line=205 - sta colpf1 - DLINEW dli16 1 1 1 - -dli16 - sta regA - - sta wsync ;line=208 - sta wsync ;line=209 -c33 lda #$0C - sta wsync ;line=210 - sta colpf1 -c34 lda #$0E - sta wsync ;line=211 - sta colpf1 -c35 lda #$0C - sta wsync ;line=212 - sta colpf1 - DLINEW dli9 1 0 0 - -dli9 - sta regA - stx regX - sty regY - lda >fnt+$400*$08 -c36 ldx #$0A - sta wsync ;line=216 - sta chbase - stx colpf1 -c37 lda #$0C - sta wsync ;line=217 - sta colpf1 -c38 lda #$0A -x24 ldx #$9D -c39 ldy #$34 - sta wsync ;line=218 - sta colpf1 - stx hposm1 - sty colpm1 -s14 lda #$03 -x25 ldx #$7D - sta wsync ;line=219 - sta sizep3 - stx hposp3 -c40 lda #$08 -s15 ldx #$13 -x26 ldy #$45 - sta wsync ;line=220 - sta colpf1 - stx sizem - sty hposm2 -s16 lda #$03 -x27 ldx #$59 - sta wsync ;line=221 - sta sizep2 - stx hposp2 -s17 lda #$53 -x28 ldx #$49 -x29 ldy #$79 - sta wsync ;line=222 - sta sizem - stx hposp1 - sty hposm3 -c41 lda #$06 -c42 ldx #$00 - sta wsync ;line=223 - sta colpf1 - stx colpf2 - lda >fnt+$400*$01 -s18 ldx #$50 -x30 ldy #$44 - sta wsync ;line=224 - sta chbase - stx sizem - sty hposm0 - sta wsync ;line=225 -c43 lda #$08 - sta wsync ;line=226 - sta colpf1 -c44 lda #$0C - sta wsync ;line=227 - sta colpf1 - sta wsync ;line=228 - sta wsync ;line=229 -c45 lda #$0E - sta wsync ;line=230 - sta colpf1 - DLINEW dli10 1 1 1 - -dli10 - sta regA - lda >fnt+$400*$00 - sta wsync ;line=232 - sta chbase - ;DLINEW dli11 1 0 0 - - lda regA - rti - -;dli11 -; sta regA -; -; lda #>$a000 ; system font -; sta wsync ;line=232 -; sta chbase -; lda #$01 -; sta gtictl -; -; lda regA -; rti - - -.endl - -; --- - -CHANGES = 1 -FADECHR = 0 - -SCHR = 127 - -dliv = $0200 - -; --- - -.proc NMI - - bit nmist - bpl VBL - - jmp DLI.dli_start - - -VBL - sta regA - stx regX - sty regY - - ;sta nmist ;reset NMI flag - - mwa #ant dlptr ;ANTIC address program - - mva #@dmactl(standard|dma|lineX1|players|missiles) dmactl ;set new screen width - - inc cloc ;little timer - -; Initial values - - lda >fnt+$400*$00 - sta chbase -c0 lda #$00 - sta colbak -c1 lda #$0E - sta colpf1 -c2 lda #$84 - sta colpf2 -c3 lda #$0E - sta colpf3 - lda #$02 - sta CHACTL - lda #$01 - sta PRIOR - sta sizep0 -s0 lda #$03 - sta sizem -x0 lda #$D0 - sta hposp0 -x1 lda #$28 - sta hposm0 -c4 lda #$00 - sta colpm0 -x2 lda #$A2 - sta hposm3 -c5 lda #$0E - sta colpm3 -s1 lda #$00 - sta sizep2 - sta sizep3 -x3 lda #$92 - sta hposp2 -x4 lda #$8A - sta hposp3 -c6 lda #$14 - sta colpm2 -s2 lda #$00 - sta sizep1 -x5 lda #$9A - sta hposp1 -c7 lda #$14 - sta colpm1 -x6 lda #$A4 - sta hposm2 -x7 lda #$A6 - sta hposm1 -c8 lda #$00 - sta colpf0 - - mwa #DLI.dli_start dliv ;set the first address of DLI interrupt - -;this area is for yours routines - jsr play_frame - -quit - lda regA - ldx regX - ldy regY - jmp sysvbv - -.endp - -; --- - ini main -; --- - - ;opt l- ; this stops the listing - -.MACRO SPRITES -missiles - .he 00 00 00 00 00 00 00 00 03 03 C3 03 03 03 03 03 - .he 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 - .he 03 03 03 03 03 03 03 03 03 83 83 83 C3 C3 C3 C3 - .he C3 C3 C3 C3 C3 E3 E3 E3 E3 E3 E3 F3 F3 F3 F3 FB - .he FB FB FB FB FF FF FF FF F3 33 83 83 83 83 C3 D3 - .he D3 D3 13 03 03 03 03 03 03 03 03 03 03 03 03 03 - .he 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 - .he 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 0F - .he 0F 0F 0F 0F 0F 0F 0F 0F 0F 0F 03 03 03 03 C3 C3 - .he C3 C3 C3 C3 C3 C3 C3 C3 C3 D3 FF FF 3F 3F 3F 3F - .he 3F 3F 33 13 03 03 03 03 03 03 03 03 03 03 03 03 - .he 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 - .he 03 03 03 03 03 03 03 43 43 C3 C3 C3 C3 03 03 03 - .he 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 03 - .he 03 03 0F 0F 3F 3F FF FC FE FE FF DB 03 03 03 03 - .he 03 03 03 03 03 03 03 03 00 00 00 00 00 00 00 00 -player0 - .he 00 00 00 00 00 00 00 00 FF FF FF FF FF FF FF FF - .he FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF - .he FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF - .he FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF - .he FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF - .he FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF - .he FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF - .he FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF - .he FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF - .he FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF - .he FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF - .he FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF - .he FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF - .he FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF - .he FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF - .he FF FF FF FF FF FF FF FF 00 00 00 00 00 00 00 00 -player1 - .he 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 - .he 00 00 00 00 00 00 00 00 F0 FC FE FE FF FF FF FF - .he FF 0F 0F 0F 0F 0F 0F 0F 0F 0F 07 07 07 07 07 07 - .he 03 03 03 FF FF FF FF FF CF CF FF FF FF FF FF 9F - .he 9F FF FF FF FF FF FF FF 00 00 00 00 00 00 00 00 - .he 00 F0 F0 F0 F0 78 F8 78 78 78 78 38 78 38 3C 3C - .he 3C 3C 1C 3C 1C 1C 1C 1C 1E 1E 1E 1E 0E 1E 0E 0E - .he 0E 0F 07 0F 07 0F 07 07 07 07 07 07 06 06 06 06 - .he FF FF FF FF FF FF FF FF FF FF FF 00 00 3E 3F 7F - .he 7F 7F 7F 7F 7F 7F 7F 3F 3F 3F 00 00 00 00 00 00 - .he 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 - .he 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 - .he 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 - .he 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 - .he 00 00 00 00 00 00 FF FF FF FF FF FF 00 00 00 00 - .he 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 -player2 - .he 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 - .he 00 00 00 00 00 00 00 00 FF FF FF FF FF FF FF FF - .he FF 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 - .he 00 00 00 FF FF FF FF FF 99 99 FF FF FF FF FF 33 - .he 33 FF FF FF FF FF FF FF 00 00 00 00 00 00 00 00 - .he 00 00 80 F0 F8 F8 F8 FC FC FC FC FC FC FC FC FC - .he FC FE FE FE FE FE FE FF FF FF FF FF FF FF FE FC - .he F8 F8 F8 F8 F0 F0 F0 F0 F0 F0 F0 F0 E0 E0 E0 E0 - .he E0 E0 E0 FC FE FE FF FF 8F 87 87 87 07 07 07 07 - .he 07 07 07 07 07 07 07 03 00 00 00 00 00 00 00 00 - .he 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 - .he 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 - .he 00 00 00 00 00 00 F8 FC FC FE FE FF FF 00 00 00 - .he 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 - .he 00 00 00 00 00 00 FF FF FF FF FF FF 00 00 00 00 - .he 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 -player3 - .he 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 - .he 00 00 00 00 00 00 00 00 01 07 0F 1F 1F 3F 3F 7F - .he 7F 78 78 F0 F0 F0 F0 F8 F8 F8 78 7C 7C 7C 3C 3E - .he 3E 3E 1E 1F 1F 1F 0F 0F 0F 0F 0F 1F 1F 1F 1F 1F - .he 1F 3F 3F 3F 3F 3F 3F 3F FF 7F 7F 3F 3F 1F 1F 0F - .he 1F 1F 1F 3F 3F 3F 3F 3F 3F 3B 30 30 30 30 30 30 - .he 30 30 30 30 38 3E 7F 7F 7F 7F 7F 7F 7F 7F 7F 7F - .he 7F 7F 7F 7F 7F 7F 7F FF FF FF FF FF FF FF FF FF - .he FF FF FF FF FF FF FF FF 7F 7F 7F 7F 7F 7F FF FF - .he FF FF FF FF FE FE FE FE FE FE FE FE FC 1C FF 7E - .he 7E FE FE FE FE FF FF FF 7F 7E 7E 3C 00 00 00 00 - .he 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 - .he 00 00 00 00 00 7C FE FE FF FF FF 00 00 00 00 00 - .he 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 - .he 00 00 00 FF FF FF FF FF FF FF FF FF 00 00 00 00 - .he 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 -.ENDM - -USESPRITES = 1 - -.MACRO DLINEW - mva <:1 dliv - ift [>?old_dli]<>[>:1] - mva >:1 dliv+1 - eif - - ift :2 - lda regA - eif - - ift :3 - ldx regX - eif - - ift :4 - ldy regY - eif - - rti - - .def ?old_dli = * -.ENDM - diff --git a/artwork/Scorch50.fnt b/artwork/Scorch50.fnt deleted file mode 100644 index e4fced4..0000000 Binary files a/artwork/Scorch50.fnt and /dev/null differ diff --git a/artwork/Scorch50.scr b/artwork/Scorch50.scr deleted file mode 100644 index b1b3d7f..0000000 Binary files a/artwork/Scorch50.scr and /dev/null differ diff --git a/artwork/mmm_16.lzs b/artwork/mmm_16.lzs deleted file mode 100644 index c2dada3..0000000 Binary files a/artwork/mmm_16.lzs and /dev/null differ diff --git a/scorch.asm b/scorch.asm index 0744aaf..4dc4045 100644 --- a/scorch.asm +++ b/scorch.asm @@ -194,7 +194,6 @@ FirstZpageVariable = $57 .ELSE icl 'lib/ATARISYS.ASM' icl 'lib/MACRO.ASM' - ;icl 'artwork/Scorch50.asm' ; splash screen and musix icl 'splash_v2/splash.asm' ; splash screen and musix .ENDIF @@ -337,6 +336,12 @@ no5200splash bne @- .IF TARGET = 800 + +; pokeys init + lda #3 ; stereo + sta POKEY+$0f ; stereo + sta POKEY+$1f ; stereo + lda PAL and #%00001110 bne NoRMT_PALchange diff --git a/scorch.xex b/scorch.xex index 68497d1..71b794e 100644 Binary files a/scorch.xex and b/scorch.xex differ diff --git a/artwork/mm_rmt1.31.rmt b/splash_v2/source_data/mm_rmt1.31.rmt similarity index 100% rename from artwork/mm_rmt1.31.rmt rename to splash_v2/source_data/mm_rmt1.31.rmt diff --git a/artwork/mmm_type_r.sap b/splash_v2/source_data/mmm_type_r.sap similarity index 100% rename from artwork/mmm_type_r.sap rename to splash_v2/source_data/mmm_type_r.sap diff --git a/splash_v2/source_data/test.png b/splash_v2/source_data/test.png new file mode 100644 index 0000000..e8efbe0 Binary files /dev/null and b/splash_v2/source_data/test.png differ