Mercurial > hg > Members > kono > nitros9-code
diff level1/modules/co80.asm @ 1582:e19a38f50c3a
More commments added
author | boisy |
---|---|
date | Fri, 21 May 2004 12:50:04 +0000 |
parents | f3557a63b11c |
children | 4a2a4667a4cf |
line wrap: on
line diff
--- a/level1/modules/co80.asm Fri May 21 03:18:56 2004 +0000 +++ b/level1/modules/co80.asm Fri May 21 12:50:04 2004 +0000 @@ -36,14 +36,14 @@ fcb edition start equ * -Init lbra L0022 -Write lbra L0083 -GetStat lbra L0054 -SetStat lbra L007F -Term lbra L004A + lbra Init + lbra Write + lbra GetStat + lbra SetStat + lbra Term * Init -L0022 ldx #$FF78 +Init ldx #$FF78 lda #$06 sta $01,x sta ,x @@ -61,14 +61,14 @@ orb #$04 bra L004F * Term -L004A ldb <$70,u +Term ldb <$70,u andb #$FB L004F stb <$70,u clrb rts * GetStat -L0054 cmpa #$25 - bne L007F +GetStat cmpa #$25 + bne SetStat ldy $06,y clra ldb <$58,u @@ -89,11 +89,11 @@ L007D clrb rts * SetStat -L007F ldb #E$UnkSvc +SetStat ldb #E$UnkSvc coma rts * Write -L0083 ldx #$FF78 +Write ldx #$FF78 cmpa #$0E bcs L00B6 cmpa #$1E