mixed: comment the code

This commit is contained in:
Vince Weaver 2023-05-16 15:15:29 -04:00
parent b0973496f8
commit d19cbaeaaf
1 changed files with 21 additions and 2 deletions

View File

@ -20,6 +20,10 @@ LORES = $C056
HLINE = $F819 ; LORES HLINE SUBROUTINE HLINE = $F819 ; LORES HLINE SUBROUTINE
ltw: ltw:
;==================================
; draw lo-res green screen
;==================================
sta COL40 ; Single-Res Display sta COL40 ; Single-Res Display
lda LORES lda LORES
lda #39 ; Fill screen using HLINE lda #39 ; Fill screen using HLINE
@ -33,13 +37,24 @@ fill:
jsr HLINE jsr HLINE
dex dex
bpl fill bpl fill
;==================================
; insert text message
;==================================
ldx #21 ; Insert message ldx #21 ; Insert message
msglp: msglp:
lda MSG,X lda MSG,X
ora #$80 eor #$80
sta $5b1,X ; Message at line 11, position 10 sta $5b1,X ; Message at line 11, position 10
dex dex
bpl msglp bpl msglp
;==================================
; get exact vblank region
;==================================
poll1: poll1:
lda VBLOFF ; Find end of VBL lda VBLOFF ; Find end of VBL
bmi poll1 ; Fall through at VBL bmi poll1 ; Fall through at VBL
@ -58,6 +73,10 @@ lp17029:
nop ; ; 2 nop ; ; 2
bmi lp17029 ; no, slew back ; 2/3 bmi lp17029 ; no, slew back ; 2/3
;==================================
; maintain window
;==================================
ldx #5 ; yes, end VBL is precisely located ; 2 ldx #5 ; yes, end VBL is precisely located ; 2
jsr waitx1k ; now wait 5755 cycles for text window ; 5000 jsr waitx1k ; now wait 5755 cycles for text window ; 5000
ldy #73 ; ; 2 ldy #73 ; ; 2
@ -119,6 +138,6 @@ rts1:
rts ; 6 rts ; 6
MSG: MSG:
.byte 0 ; switch in the black .byte $80 ; switch in the black
.byte "*Little Text Window* " .byte "*Little Text Window* "