Jeśli chcesz wziąć udział w dyskusjach na forum - zaloguj się. Jeżeli nie masz loginu - poproś o członkostwo.
Vanilla 1.1.4 jest produktem Lussumo. Więcej informacji: Dokumentacja, Forum.
jsr PRINTF
.byte 'Ciąg %s do wyświetlenia.',0
.word string
lda #$AB
ldx #$CD
ldy #$EF
...
PRINTF:
pla
sta adr
pla
sta adr+1
ldx #0
inc adr
sne
inc adr+1
lda (adr,x)
...
lda adr+1
pha
lda adr
pha
rts
.MACRO WAIT
;WAIT
;waits one frame (1/50 s(PAL) or 1/60s(NTSC))
?zero LDA VCOUNT
cmp #$05 ; if line<5 then wait for line>4
bcc ?zero
cmp #$70
bcc ?WA ; if line>=112 then
sbc #10 ; last lines correction
?WA cmp VCOUNT
beq ?WA
bcc ?WA
?WFRAME cmp VCOUNT
beq ?nowait
bcs ?WFRAME
?nowait
.ENDM
.macro waitRTC
lda RTCLOK+2
?wa cmp RTCLOK+2
beq ?wa
.endm
.MACRO WAIT
; WAIT
; waits one frame (1/50 s(PAL) or 1/60s(NTSC))
?ze LDA VCOUNT
cmp #16 ; if line<16 then wait for line>15 (long VBI protection)
bcc ?ze
sbc #10 ; last lines correction
?wa cmp VCOUNT
bcc ?wa
?wf cmp VCOUNT
bcs ?wf
.ENDM
bit VCOUNT
bmi *-3
bit VCOUNT
bpl *-3
sne:wait
Kaz:
(...) jakby ktoś nie kojarzył, to przedstawiony pojazd to M142 Himars, w Wojsku Polskim znany jako Homar.