arch-msx/original-tara
2
0
Fork 0
Code Actions Activity

disable caps filkering

Browse source
This commit is contained in:
Willem 2018-11-29 20:35:56 +01:00
parent 0c304be6f7
commit 6b2082173b
2 changed files with 21 additions and 11 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
src/tara/build.asm
View file

@ -1,14 +1,14 @@
ADR: ADR:
.dw 0x4000 .dw 0x4000
BUILD: BUILD:
CALL CAPS_ON ;CALL CAPS_ON
CALL DO_SWAP CALL DO_SWAP
CALL BUILD_VELD CALL BUILD_VELD
CALL TANKS CALL TANKS
CALL BULLETS CALL BULLETS
;CALL MSEL ;CALL MSEL
CALL SETPAGE CALL SETPAGE
CALL CAPS_OFF ;CALL CAPS_OFF
LD a,(#BUILD_CNT) LD a,(#BUILD_CNT)
inc a inc a
@ -491,7 +491,7 @@ BUILD_VELD:
DEC HL DEC HL
LD DE,#CPYTT LD DE,#CPYTT
LD B,#26 LD B,#26 ; 24x13 = (384+128radar)512x208 on 512x212
LD C,#15 LD C,#15
LD A,#-16 ; ???? LD A,#-16 ; ????
LD (DY),A LD (DY),A

26
src/tara/init.asm
View file

@ -1,20 +1,30 @@
GFX .equ 0x60
GFX_REG .equ 0x03
INIT_DOME: INIT_DOME:
XOR A ; 2=MIXMODE XOR A ; 2=MIXMODE
OUT (0x6F),A OUT (0x6F),A
OUT (0x67),A ; POWER OFF + INT CLK OUT (0x67),A ; P7: MSC + POWER OFF + INT CLK
LD A,#6 ; SETREG LD A,#6 ; SETREG see page: 80
OUT (0x64),A OUT (0x64),A
LD A,#0b10011010 ;ITMAP,XTAL,212DOTS,8BIT LD A,#0b10011010 ; R6: DSPM1,DSPM0,DCKM1,DCKM0,XIMM1,XIMM0,CLRM1,CLRM0 = BITMAP + XTAL/2 + 1024px X space + 8b per dot
OUT (0x63),A OUT (GFX+GFX_REG),A
LD A,#0b00001000 ;0,B,262,?,PAL,INTER,INTERLACE,MODE LD A,#0b00001000 ; R7: 0,C25M,SM1,SM,PAL,EO,IL,HSCN = !B6,262line,?,PAL,none,none-inter,none-high-scn
OUT (0x63),A OUT (GFX+GFX_REG),A
LD A,#0b10000010 ; VRAM,SPRITE,YS,0,0,DREQ,512KB LD A,#0b10000010 ; R8: DISP,SPD,YSE,VWTE,VWM,DMAE,VSL1,VSL0 = VRAM+SPRITE+no-YS+512KB mem
OUT (0x63),A OUT (0x63),A
; mode B3: 512x212 in 1024x512 space
; note;
; YJK = NTSC
; YUV = PAL
LD A,#13 LD A,#13
OUT (0x64),A OUT (0x64),A
LD A,#0b01000000 ; 256 COLOR-MODE LD A,#0b01000000 ; R13: PLTM1,PLTM0,YAE,PLTAIH,PLT05,PLT04,PLT03,PLT02 = 256 COLOR-MODE
OUT (0x63),A OUT (0x63),A
INIT_DOME_W0: INIT_DOME_W0: