mirror of
https://github.com/pkali/scorch_src.git
synced 2026-05-20 22:34:21 +02:00
RTCLOK fix!
This commit is contained in:
@@ -161,7 +161,7 @@ APPMHI EQU $0E ;APPL MEM HI LIMIT
|
|||||||
;
|
;
|
||||||
POKMSK EQU $10 ;MASK POKEY IRQ
|
POKMSK EQU $10 ;MASK POKEY IRQ
|
||||||
BRKKEY EQU $11 ;BREAK KEY FLAG
|
BRKKEY EQU $11 ;BREAK KEY FLAG
|
||||||
RTCLOK EQU $13 ;REAL TIME CLOCK (only 2 bytes without $12 !!!)
|
RTCLOK EQU $12 ;REAL TIME CLOCK
|
||||||
BUFADR EQU $15 ;INDIRECT BUFF ADDR
|
BUFADR EQU $15 ;INDIRECT BUFF ADDR
|
||||||
ICCOMT EQU $17 ;COMMAND FOR VECTOR
|
ICCOMT EQU $17 ;COMMAND FOR VECTOR
|
||||||
DSKFMS EQU $18 ;FMS POINTER
|
DSKFMS EQU $18 ;FMS POINTER
|
||||||
|
|||||||
@@ -1431,7 +1431,12 @@ FinishResultDisplay
|
|||||||
cmp #@kbcode._none
|
cmp #@kbcode._none
|
||||||
bne EndMeter
|
bne EndMeter
|
||||||
; check timer
|
; check timer
|
||||||
|
; Atari 800 has 3 bytes clock, but 5200 only 2 bytes
|
||||||
|
.IF TARGET = 800
|
||||||
|
LDA RTCLOK+1
|
||||||
|
.ELIF TARGET = 5200
|
||||||
lda RTCLOK
|
lda RTCLOK
|
||||||
|
.ENDIF
|
||||||
cmp #VuMeterTime
|
cmp #VuMeterTime
|
||||||
bcc EndMeter
|
bcc EndMeter
|
||||||
; store all angles
|
; store all angles
|
||||||
@@ -1465,8 +1470,12 @@ Meter
|
|||||||
jsr drawtanknr
|
jsr drawtanknr
|
||||||
EndMeterAndReset
|
EndMeterAndReset
|
||||||
lda #0
|
lda #0
|
||||||
; sta RTCLOK+1
|
; only older byte
|
||||||
sta RTCLOK ; only older byte
|
.IF TARGET = 800
|
||||||
|
sta RTCLOK+1
|
||||||
|
.ELIF TARGET = 5200
|
||||||
|
sta RTCLOK
|
||||||
|
.ENDIF
|
||||||
EndMeter
|
EndMeter
|
||||||
rts
|
rts
|
||||||
.endp
|
.endp
|
||||||
|
|||||||
Reference in New Issue
Block a user