mirror of
https://github.com/Pecusx/scorch_src.git
synced 2026-05-20 22:33:43 +02:00
missing files
This commit is contained in:
@@ -0,0 +1,153 @@
|
||||
; --- dmsc LZSS player routine
|
||||
|
||||
song_data
|
||||
ins 'mmm_16.lzs'
|
||||
song_end
|
||||
|
||||
buffers
|
||||
.ds 256 * 9
|
||||
|
||||
POKEY2 = POKEY+$10 ; stereo
|
||||
|
||||
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
||||
; Song Initialization - this runs in the first tick:
|
||||
;
|
||||
.proc init_song
|
||||
|
||||
; pokeys init
|
||||
lda #3 ; stereo
|
||||
sta POKEY+$0f ; stereo
|
||||
sta POKEY2+$0f ; stereo
|
||||
|
||||
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
|
||||
sta POKEY2,x ; stereo
|
||||
sta stereo_buff,x ; stereo
|
||||
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
|
||||
ldx #8 ; stereo
|
||||
@ lda stereo_buff,x ; stereo
|
||||
sta POKEY2,x ; stereo
|
||||
dex ;stereo
|
||||
bpl @- ; stereo
|
||||
|
||||
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 stereo_buff,x ; stereo
|
||||
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 #<song_end
|
||||
;bne wait_frame
|
||||
|
||||
end_loop
|
||||
rts
|
||||
|
||||
song_ptr = get_byte + 1
|
||||
.proc get_byte
|
||||
lda song_data+1
|
||||
inc song_ptr
|
||||
bne skip
|
||||
inc song_ptr+1
|
||||
skip
|
||||
rts
|
||||
.endp
|
||||
|
||||
stereo_buff ; stereo
|
||||
.ds 9 ; stereo
|
||||
|
||||
Binary file not shown.
Binary file not shown.
@@ -0,0 +1,73 @@
|
||||
; ----------------------------------
|
||||
; RastaConverter by Ilmenit v.Beta7
|
||||
; ----------------------------------
|
||||
missiles
|
||||
.ds $100
|
||||
player0
|
||||
.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 60 A0 26 1E 00 00 00 00
|
||||
.he 08 04 0E 0E 0F 0F 1E 07 03 02 02 C7 D7 F7 F7 77
|
||||
.he 77 37 F7 37 57 46 6E B0 B0 A0 C1 60 7C 1E 07 05
|
||||
.he 01 03 03 07 07 19 1F 1B 1B B2 53 BB 43 D3 60 38
|
||||
.he 01 7C 7B 41 C3 87 E7 85 75 02 C8 C8 9F 12 1E 9E
|
||||
.he 1E 9E 9E 9E F2 EB BF 1F 3F C7 00 7F 7F 7F 7F 7F
|
||||
.he 3F 3D 1D 0D 38 38 0F 1F 00 0C 04 04 08 10 E0 C0
|
||||
.he E4 E2 E0 E8 E0 7A EE FD F4 78 7F 7B A1 31 C5 56
|
||||
.he C6 D0 3C F7 90 CF 28 08 2C 3C 3C 3C 36 1D 14 36
|
||||
.he 32 30 38 1C 1E 38 70 FC FB F3 FE 8F D7 EF 43 83
|
||||
.he BA F9 F8 F8 1C 1C 0C 04 04 04 04 FA FB FA 30 70
|
||||
.he 70 78 F8 38 3F 00 03 03 0B 0F 07 13 03 03 13 C0
|
||||
.he CA 9A BF 9F 3F 5B 1F 9F FF CF 59 C4 0B EC 51 8F
|
||||
.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
|
||||
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 FE FE FE FE FE FF 03 03
|
||||
.he FF FF FF FF FF 01 FF FF DF DF DF 0F 1F 0F 1F 0F
|
||||
.he 1F 0F 1F 0E 1E CE DE DE FE 5F 3E 1E 83 C6 C3 C6
|
||||
.he C3 C7 C7 43 E7 67 E7 77 7F 7F 3F 3F 7F 3F 3E 00
|
||||
.he F0 3C E7 E0 60 E0 E0 E0 E0 E0 E0 E0 E0 E0 E0 77
|
||||
.he 77 07 07 5F 07 7F C7 FF FF FF FF 3E FE 0C C0 C0
|
||||
.he D8 C0 F0 C0 87 00 00 FC 01 00 20 20 50 10 50 5C
|
||||
.he 4C 44 60 6C 3C 38 C0 C8 98 39 1D 1F 1E C8 00 01
|
||||
.he 01 01 3F F2 F3 F6 E7 F7 D5 07 77 F7 FF FF DF 9F
|
||||
.he 6F FF FF BF FF FF 48 80 80 80 80 FF FF FF FF FF
|
||||
.he FF FF FF 7F 7F 7F 7F 5F DF FF FD FF FF FE F8 07
|
||||
.he 67 3F 27 7F 27 3F 27 7F DF A0 F8 E4 F8 E4 FC E0
|
||||
.he D8 E0 D8 20 95 E2 3F E0 7A E2 9E 81 5A CE 83 8C
|
||||
.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
|
||||
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 60 81 71 93 73 BB F9 BF
|
||||
.he F8 BF FD FC FC FC FC 8C 0C 88 0C 8C 38 38 B8 3A
|
||||
.he BA B8 3A BA BA B9 AC 0C CC 0C CC 1C 9C 7C 3C FC
|
||||
.he FA FC FE FC F4 F2 F0 72 72 26 52 22 C2 06 C2 22
|
||||
.he 38 C0 C0 0E 00 00 00 10 00 12 10 10 30 30 30 30
|
||||
.he 70 30 10 30 FF EC 3F EC 3F EC 3F ED 3C EC 3F ED
|
||||
.he 3F 6C 3F 2D 3F FE 10 18 1E 1E 1E 1C 1D E4 98 E4
|
||||
.he E8 DC E8 38 20 50 A8 58 AB 7E 36 1B E0 02 21 10
|
||||
.he 10 EC 20 05 EE 82 64 61 6D 24 6D 78 30 9C 75 5D
|
||||
.he 5D 1D 3D 57 4D E7 E7 24 0A 0C 38 1A 08 08 0C 0C
|
||||
.he 38 1C 18 0E 3E 3C 3E 3E 3E 3A 3A 3C 37 7A 3E 7E
|
||||
.he 3E 3F 10 2A 19 3A 39 1B 19 38 3E 38 18 3B 00 E0
|
||||
.he 50 C0 72 F8 68 DE 0A FF 1E 5A 1E 2B 16 FB DF FB
|
||||
.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
|
||||
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 06 DF CE FF 6E FF 60 47
|
||||
.he 60 E7 C0 D0 D8 D0 D8 DE CE EE EE E4 E6 E4 F1 F4
|
||||
.he F0 F0 D8 D8 D8 D0 D0 C6 C1 C6 D4 DF FF FF FF FE
|
||||
.he FE FE FE FE FE FE FE FF FF FF FF FF FE FF FE FF
|
||||
.he FF FE FE FF FF FF FF FF FF FF FF FC FE FF FF FF
|
||||
.he FF FF FF FF FF FF FF FF FF FF FF 03 43 F2 DF FF
|
||||
.he DD FF 9F FE BF FE 1E FE 1C FC FF 4E DE 2A 1C 00
|
||||
.he 04 2F 10 8E CC 5C 80 D0 A0 40 20 00 3A 0F FE 16
|
||||
.he 01 BB 5B DB 53 53 F3 F3 F3 E3 F3 F3 F3 F3 F6 FF
|
||||
.he FF FF FF FF FF FF 15 E1 92 C2 36 6B FF FF FF FE
|
||||
.he FE FA FC FA FC F8 FC FD 07 1F 2E 7F 7F FF 7F DF
|
||||
.he 7F FF 7F DF 7F DF 7F FF 7F FF 3A FF E7 FF E7 7F
|
||||
.he A7 FF 27 1F 0F 07 07 20 3F 3F 1F 38 F0 62 D0 E0
|
||||
.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
|
||||
File diff suppressed because it is too large
Load Diff
@@ -0,0 +1,41 @@
|
||||
; ----------------------------------
|
||||
; RastaConverter by Ilmenit v.Beta7
|
||||
; ----------------------------------
|
||||
|
||||
; Initial values
|
||||
lda #$0E
|
||||
sta colpf0
|
||||
lda #$96
|
||||
sta colpf1
|
||||
lda #$88
|
||||
sta colpf2
|
||||
lda #$00
|
||||
sta COLBAK
|
||||
lda #$74
|
||||
sta COLPM0
|
||||
lda #$EE
|
||||
sta COLPM1
|
||||
lda #$85
|
||||
sta COLPM2
|
||||
lda #$95
|
||||
sta COLPM3
|
||||
lda #$5E
|
||||
sta HPOSP0
|
||||
lda #$9F
|
||||
sta HPOSP1
|
||||
lda #$45
|
||||
sta HPOSP2
|
||||
lda #$30
|
||||
sta HPOSP3
|
||||
lda #$0
|
||||
ldx #$0
|
||||
ldy #$0
|
||||
|
||||
; Set proper count of wsyncs
|
||||
|
||||
:2 sta wsync
|
||||
|
||||
; Set proper picture height
|
||||
|
||||
|
||||
PIC_HEIGHT = 200
|
||||
Binary file not shown.
Binary file not shown.
Binary file not shown.
|
After Width: | Height: | Size: 109 KiB |
@@ -0,0 +1,282 @@
|
||||
/***************************************/
|
||||
/* Use MADS http://mads.atari8.info/ */
|
||||
/* Mode: GED- (bitmap mode) */
|
||||
/***************************************/
|
||||
|
||||
icl "splash.h"
|
||||
|
||||
; --- 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
|
||||
; ---
|
||||
|
||||
org $00
|
||||
|
||||
fcnt .ds 2
|
||||
fadr .ds 2
|
||||
fhlp .ds 2
|
||||
cloc .ds 1
|
||||
regA .ds 1
|
||||
regX .ds 1
|
||||
regY .ds 1
|
||||
byt2 .ds 1
|
||||
|
||||
zc .ds ZCOLORS
|
||||
|
||||
* --- BASIC switch OFF
|
||||
org $2000\ mva #$ff portb\ rts\ ini $2000
|
||||
|
||||
* --- MAIN PROGRAM
|
||||
org $2010
|
||||
IFT PIC_HEIGHT>=204
|
||||
scr ins "output.png.mic", 0, 8160
|
||||
:16 .byte 0
|
||||
ins "output.png.mic" , +8160
|
||||
ELS
|
||||
scr ins "output.png.mic"
|
||||
EIF
|
||||
|
||||
.ifdef nil_used
|
||||
nil :8*40 brk
|
||||
eif
|
||||
|
||||
.ALIGN $0400
|
||||
ant ANTIC_PROGRAM scr,ant
|
||||
|
||||
fnt
|
||||
|
||||
ift USESPRITES
|
||||
.ALIGN $0800
|
||||
.ds $0300
|
||||
pmg SPRITES
|
||||
eif
|
||||
|
||||
FontSplash
|
||||
ins '../../artwork/weapons_AW6_mod.fnt' ; 'artwork/weapons.fnt'
|
||||
|
||||
mother
|
||||
; dta d" The Mother of All Games "
|
||||
dta d" Father Unknown of All Games "
|
||||
icl "lzss_player.asm" ; player (and data) for splash music
|
||||
|
||||
main
|
||||
jsr init_song
|
||||
|
||||
* --- init PMG
|
||||
|
||||
ift USESPRITES
|
||||
mva >pmg pmbase ;missiles and players data address
|
||||
mva #$03 pmcntl ;enable players and missiles
|
||||
eif
|
||||
|
||||
lda:cmp:req $14 ;wait 1 frame
|
||||
|
||||
sei ;stop interrups
|
||||
mva #$00 nmien ;stop all interrupts
|
||||
mva #$fe portb ;switch off ROM to get 16k more ram
|
||||
|
||||
ZPINIT
|
||||
|
||||
////////////////////
|
||||
// RASTER PROGRAM //
|
||||
////////////////////
|
||||
|
||||
; jmp line239
|
||||
jmp raster_program_end
|
||||
|
||||
LOOP lda vcount ;synchronization for the first screen (picture) line
|
||||
cmp #$02
|
||||
;sta colpf0
|
||||
;sta colpm0
|
||||
;sta colbak
|
||||
bne LOOP
|
||||
|
||||
mva #%00111110 dmactl ;set new screen width
|
||||
mva <ant dlptr
|
||||
mva >ant dlptr+1
|
||||
|
||||
icl "output.png.rp.ini"
|
||||
|
||||
;--- 16 lines down ---- !!!
|
||||
:16 sta wsync
|
||||
|
||||
; wait 13 cycles !!!
|
||||
:4 nop
|
||||
inc byt2
|
||||
|
||||
;--- wait 18 cycles
|
||||
; jsr _rts
|
||||
; inc byt3
|
||||
|
||||
|
||||
;--- set global offset (23 cycles)
|
||||
jsr _rts
|
||||
cmp byt3\ pha:pla
|
||||
|
||||
;--- empty line
|
||||
jsr wait54cycle
|
||||
inc byt2
|
||||
|
||||
icl "output.png.rp"
|
||||
|
||||
raster_program_end
|
||||
|
||||
lda >FontSplash
|
||||
sta chbase
|
||||
c0 lda #$00
|
||||
sta colbak
|
||||
c1 lda #$00
|
||||
sta colpf0
|
||||
c2 lda #$02
|
||||
sta colpf1
|
||||
c3 lda #$08
|
||||
sta colpf2
|
||||
c4 lda #$00
|
||||
sta colpf3
|
||||
s0 lda #$03
|
||||
sta sizep0
|
||||
sta sizep1
|
||||
sta sizep2
|
||||
sta sizep3
|
||||
mva #$ff sizem
|
||||
sta grafm
|
||||
mva #$20 hposm0
|
||||
mva #$28 hposm1
|
||||
mva #$d0 hposm2
|
||||
mva #$d8 hposm3
|
||||
mva #$02 pmcntl
|
||||
lda #$14
|
||||
sta gtictl
|
||||
|
||||
|
||||
//--------------------
|
||||
// EXIT
|
||||
//--------------------
|
||||
|
||||
lda trig0 ; FIRE #0
|
||||
beq stop
|
||||
|
||||
lda trig1 ; FIRE #1
|
||||
beq stop
|
||||
|
||||
lda consol ; START
|
||||
and #1
|
||||
beq stop
|
||||
|
||||
lda skctl ; ANY KEY
|
||||
and #$04
|
||||
bne skp
|
||||
|
||||
stop mva #$00 pmcntl ;PMG disabled
|
||||
tax
|
||||
sta:rne hposp0,x+
|
||||
|
||||
; silent
|
||||
lda #0
|
||||
ldx #8
|
||||
@ sta POKEY,x
|
||||
sta POKEY2,x ; stereo
|
||||
dex
|
||||
bpl @-
|
||||
|
||||
;no glitching please (issue #67)
|
||||
lda #0
|
||||
sta $D400 ;dmactl
|
||||
sta $022F ;dmactls
|
||||
|
||||
|
||||
mva #$ff portb ;ROM switch on
|
||||
mva #$40 nmien ;only NMI interrupts, DLI disabled
|
||||
cli ;IRQ enabled
|
||||
|
||||
rts ;return to ... DOS
|
||||
skp
|
||||
|
||||
//--------------------
|
||||
jsr play_frame
|
||||
|
||||
jmp LOOP
|
||||
|
||||
;---
|
||||
|
||||
wait54cycle
|
||||
:2 inc byt2
|
||||
wait44cycle
|
||||
inc byt3
|
||||
nop
|
||||
wait36cycle
|
||||
inc byt3
|
||||
jsr _rts
|
||||
wait18cycle
|
||||
inc byt3
|
||||
_rts rts
|
||||
|
||||
byt3 brk
|
||||
|
||||
|
||||
;---
|
||||
|
||||
.MACRO ANTIC_PROGRAM
|
||||
dta $70,$70
|
||||
:+8 dta $4e,a(:1+$0000+#*40)
|
||||
:+8 dta $4e,a(:1+$0140+#*40)
|
||||
:+8 dta $4e,a(:1+$0280+#*40)
|
||||
:+8 dta $4e,a(:1+$03C0+#*40)
|
||||
:+8 dta $4e,a(:1+$0500+#*40)
|
||||
:+8 dta $4e,a(:1+$0640+#*40)
|
||||
:+8 dta $4e,a(:1+$0780+#*40)
|
||||
:+8 dta $4e,a(:1+$08C0+#*40)
|
||||
:+8 dta $4e,a(:1+$0A00+#*40)
|
||||
:+8 dta $4e,a(:1+$0B40+#*40)
|
||||
:+8 dta $4e,a(:1+$0C80+#*40)
|
||||
:+8 dta $4e,a(:1+$0DC0+#*40)
|
||||
:+8 dta $4e,a(:1+$0F00+#*40)
|
||||
:+8 dta $4e,a(:1+$1040+#*40)
|
||||
:+8 dta $4e,a(:1+$1180+#*40)
|
||||
:+8 dta $4e,a(:1+$12C0+#*40)
|
||||
:+8 dta $4e,a(:1+$1400+#*40)
|
||||
:+8 dta $4e,a(:1+$1540+#*40)
|
||||
:+8 dta $4e,a(:1+$1680+#*40)
|
||||
:+8 dta $4e,a(:1+$17C0+#*40)
|
||||
:+8 dta $4e,a(:1+$1900+#*40)
|
||||
:+8 dta $4e,a(:1+$1A40+#*40)
|
||||
:+8 dta $4e,a(:1+$1B80+#*40)
|
||||
:+8 dta $4e,a(:1+$1CC0+#*40)
|
||||
:+8 dta $4e,a(:1+$1E00+#*40)
|
||||
; :+4 dta $4e,a(:1+$1F40+#*40)
|
||||
; :+4 dta $4e,a(:1+$1FF0+#*40)
|
||||
; :+8 dta $4e,a(:1+$2090+#*40)
|
||||
; :+8 dta $4e,a(:1+$21D0+#*40)
|
||||
; :+8 dta $4e,a(:1+$2310+#*40)
|
||||
; :+8 dta $4e,a(:1+$2450+#*40)
|
||||
dta $00
|
||||
dta $42,a(mother)
|
||||
dta $41,a(:2)
|
||||
.ENDM
|
||||
|
||||
CL
|
||||
|
||||
.MACRO ZPINIT
|
||||
.ENDM
|
||||
|
||||
ZCOLORS = 0
|
||||
|
||||
;---
|
||||
ini main
|
||||
;---
|
||||
|
||||
opt l-
|
||||
|
||||
.MACRO SPRITES
|
||||
icl "output.png.pmg"
|
||||
.ENDM
|
||||
|
||||
USESPRITES = 1
|
||||
|
||||
@@ -0,0 +1,55 @@
|
||||
|
||||
.enum @@dmactl
|
||||
blank = %00
|
||||
narrow = %01
|
||||
standard= %10
|
||||
wide = %11
|
||||
missiles= %100
|
||||
players = %1000
|
||||
lineX1 = %10000
|
||||
lineX2 = %00000
|
||||
dma = %100000
|
||||
.ende
|
||||
|
||||
.enum @@pmcntl
|
||||
missiles= %1
|
||||
players = %10
|
||||
trigs = %100
|
||||
.ende
|
||||
|
||||
.enum @@gtictl
|
||||
prior0 = %0
|
||||
prior1 = %1
|
||||
prior2 = %10
|
||||
prior4 = %100
|
||||
prior8 = %1000
|
||||
ply5 = %10000 ; Fifth Player Enable
|
||||
mlc = %100000 ; Multiple Color Player Enable
|
||||
mode9 = %01000000
|
||||
mode10 = %10000000
|
||||
mode11 = %11000000
|
||||
.ende
|
||||
|
||||
* ---------------------------------------------------------------------------------------------
|
||||
* --- GTIA
|
||||
* ---------------------------------------------------------------------------------------------
|
||||
|
||||
gtictl = PRIOR ; rejestr kontroli uk³adu GTIA
|
||||
gtiactl = gtictl
|
||||
|
||||
pmcntl = GRACTL ; rejestr kontroli graczy i pocisków
|
||||
|
||||
* ---------------------------------------------------------------------------------------------
|
||||
* --- POKEY
|
||||
* ---------------------------------------------------------------------------------------------
|
||||
|
||||
irqens = $0010 ; rejestr-cieñ IRQEN
|
||||
irqstat = $0011 ; rejestr-cieñ IRQST
|
||||
|
||||
skstres = SKRES ; rejestr statusu z³¹cza szeregowego (Z)
|
||||
|
||||
* ---------------------------------------------------------------------------------------------
|
||||
* --- ANTIC
|
||||
* ---------------------------------------------------------------------------------------------
|
||||
chrctl = CHACTL ; rejestr kontroli wyœwietlania znaków
|
||||
|
||||
Reference in New Issue
Block a user