mirror of
https://github.com/fumiama/c64-snake.git
synced 2026-06-05 00:32:39 +08:00
47 lines
821 B
NASM
47 lines
821 B
NASM
.outfile "snake.prg"
|
|
.require "platform/c64_0.oph"
|
|
.require "platform/c64kernal.oph"
|
|
|
|
.alias cblk $a6
|
|
|
|
.alias go_u $55 ; 上
|
|
.alias go_d $5f ; 下
|
|
.alias go_l $1d ; 左
|
|
.alias go_r $32 ; 右
|
|
.alias st_g $a0 ; 开始/暂停
|
|
.alias ed_g $20 ; 结束
|
|
|
|
.data zp
|
|
.space d 1 ; 方向 值定义如上
|
|
.space c 1 ; 🐍长度 最大255 最小0
|
|
.space s 2 ; 得分 小端序
|
|
.text
|
|
|
|
main:
|
|
.scope
|
|
`init
|
|
|
|
rts
|
|
.scend
|
|
|
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
|
; init 初始化界面、变量
|
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
|
.macro init
|
|
lda #147 ;清屏
|
|
jsr chrout
|
|
lda #$a8
|
|
sta s
|
|
;sta s + 1
|
|
jsr printscore
|
|
.macend
|
|
|
|
.require "printscore.asm"
|
|
.require "print16.asm"
|
|
.require "print.asm"
|
|
|
|
.checkpc $A000 ; text段边界
|
|
.data zp ; 零页段边界
|
|
.checkpc $80
|
|
.data
|
|
.checkpc $D000 ; data段边界 |