Mercurial > hg > Members > kono > os9 > sbc09
changeset 114:bc9f2f443421
fix
author | Shinji KONO <kono@ie.u-ryukyu.ac.jp> |
---|---|
date | Tue, 01 Jan 2019 08:55:44 +0900 |
parents | a8b7dfc1baf5 |
children | 54b4e3afcd0e |
files | game09/game09.asm |
diffstat | 1 files changed, 7 insertions(+), 9 deletions(-) [+] |
line wrap: on
line diff
--- a/game09/game09.asm Tue Jan 01 08:16:34 2019 +0900 +++ b/game09/game09.asm Tue Jan 01 08:55:44 2019 +0900 @@ -54,7 +54,7 @@ lineend rmb 2 $A2 ustack rmb 128 linebuf rmb 252 -program rmb $8000 +program rmb $6000 size equ . name fcs "Game09" @@ -311,19 +311,17 @@ LBRA LC4F9 LC1EC CMPA #$3D BNE LC1ED +* = assignment ( GAME code top switch ) leax 2,x lda ,x lbsr expr std <$7E tfr d,x -lploop ldd ,x++ - cmpd #-1 - beq lpend -lpl tst ,x++ - bne lpl - bra lploop -lpend leax -2,x - stx <$50 +lploop ldd ,x+ + cmpd #$00ff + bne lploop +lpend stx <$50 + ldd <$7e lbra warmst LC1ED LDA ,X+ BITA #$DF