mirror of
https://github.com/fumiama/c64-snake.git
synced 2026-06-05 00:32:39 +08:00
45 lines
669 B
NASM
45 lines
669 B
NASM
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
||
; printfield 打印蛇，包括边框
|
||
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
||
printfield:
|
||
.scope
|
||
ldx #23 ; i代表行数，不含边框
|
||
lda #<field ; 取地址低8位
|
||
clc
|
||
adc #1
|
||
sta _ptr
|
||
lda #>field ; 取地址高8位
|
||
sta _ptr + 1
|
||
jsr _print_blk_line
|
||
;ldy #0 ; 此时y一定为0
|
||
* lda #cblk
|
||
sta (_ptr), y ; 打印左边框
|
||
lda #39
|
||
jsr _addptr
|
||
lda #cblk
|
||
sta (_ptr), y ; 打印右边框
|
||
lda #1
|
||
jsr _addptr
|
||
dex
|
||
bne -
|
||
jsr _print_blk_line
|
||
rts
|
||
|
||
_addptr:
|
||
clc
|
||
adc _ptr
|
||
bcc +
|
||
inc _ptr + 1
|
||
* sta _ptr
|
||
rts
|
||
|
||
_print_blk_line:
|
||
lda #cblk
|
||
ldy #40
|
||
dec _ptr
|
||
* sta (_ptr), y ; 打印底边
|
||
dey
|
||
bne -
|
||
rts
|
||
.scend
|