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