moved PAL/NTSC support to a separate routine
This commit is contained in:
1 parent
c41da81e06
commit
2afe11c3b3
3 files changed
+67
-60
No files matched your search
@@ -11,46 +11,4 @@
|
||||
CINT:
|
||||
|
||||
jsr cint_legacy
|
||||
|
||||
cint_check_pal_ntsc:
|
||||
|
||||
// Detect video system (PAL/NTSC), use Graham's method, as it's short and reliable
|
||||
// see here: https://codebase64.org/doku.php?id=base:detect_pal_ntsc
|
||||
|
||||
lda VIC_RASTER
|
||||
!:
|
||||
cmp VIC_RASTER
|
||||
beq !-
|
||||
bmi cint_check_pal_ntsc
|
||||
|
||||
// Result in A, if no interrupt happened during the test:
|
||||
// #$37 -> 312 rasterlines, PAL, VIC 6569
|
||||
// #$06 -> 263 rasterlines, NTSC, VIC 6567R8
|
||||
// #$05 -> 262 rasterlines, NTSC, VIC 6567R56A
|
||||
|
||||
cmp #$07
|
||||
bcc cont_done
|
||||
|
||||
cint_pal:
|
||||
|
||||
// (This value was calculated by running a custom IRQ handler on a C64
|
||||
// with original KERNAL, and writing the values of $DC04/5 to the screen
|
||||
// in the IRQ handler to see roughly what value the timers must be set to)
|
||||
// ldy #<16380
|
||||
// ldx #>16380
|
||||
|
||||
// PAL C64 (https://codebase64.org/doku.php?id=base:cpu_clocking),
|
||||
// is clocked at 0.985248 MHz, so that 1/60s is 16421 CPU cycles
|
||||
|
||||
ldy #<16421
|
||||
ldx #>16421
|
||||
|
||||
sty CIA1_TIMALO
|
||||
stx CIA1_TIMAHI
|
||||
|
||||
lda #$01
|
||||
!:
|
||||
sta TVSFLG
|
||||
|
||||
cont_done:
|
||||
rts
|
||||
jmp setup_pal_ntsc
|
||||
Reference in new issue
Block a user