Apple-2-SW/dos33fsprogs
1
0
Fork 0
mirror of https://github.com/deater/dos33fsprogs.git synced 2024-09-17 08:54:50 +00:00
Code Issues Projects Releases Wiki Activity

raster: have it looking nice

Browse Source
This commit is contained in:
Vince Weaver 2018-07-20 23:58:57 -04:00
parent e40b2f9679
commit 0022b72ca8
1 changed files with 11 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
kfest2018/raster.s
View File

@ -60,9 +60,9 @@ WAIT = $FCA8 ;; delay 1/2(26+27A+5A^2) us
; draw border line ; draw border line
lda #$55 ; lda #$55
ldy #38 ; ldy #38
jsr hline ; jsr hline
;================== ;==================
@ -75,12 +75,19 @@ WAIT = $FCA8 ;; delay 1/2(26+27A+5A^2) us
lda #$6f lda #$6f
ldy #0 ldy #0
jsr hline jsr hline
lda #$72
ldy #38
jsr hline
lda #$4 lda #$4
sta DRAW_PAGE sta DRAW_PAGE
lda #$27 lda #$27
ldy #0 ldy #0
jsr hline jsr hline
lda #$f6
ldy #38
jsr hline
;===================================== ;=====================================
; Print the apple logos plus vmw logos ; Print the apple logos plus vmw logos
@ -137,7 +144,7 @@ wiloop:
DEX DEX
BNE wiloop BNE wiloop
LDA #$55 ; now look for four all grey LDA #$72 ; now look for our border color (4 times)
zloop: zloop:
LDX #$04 LDX #$04
qloop: qloop: