Mercurial > hg > Members > kono > nitros9-code

changeset 2212:58ca25581f6d

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Added D.SysPrc move to clock2_dw3
author boisy
date Mon, 16 Mar 2009 14:59:09 +0000
parents 0d9a3b9b5886
children 0eaed2dfda42
files level1/modules/clock2_dw3.asm
diffstat 1 files changed, 18 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/level1/modules/clock2_dw3.asm	Mon Mar 16 14:44:10 2009 +0000
+++ b/level1/modules/clock2_dw3.asm	Mon Mar 16 14:59:09 2009 +0000
@@ -58,12 +58,29 @@
 UpdLeave puls  x,y,u,pc
 
 
-Init     leax    subname,pcr
+Init     
+         IFGT    Level-1
+         ldx     <D.Proc
+         pshs    x
+         ldx     <D.SysPrc
+         stx     <D.Proc
+         ENDC
+         leax    subname,pcr
          clra
          os9     F$Link
+         IFGT    Level-1
+         bcs     InitEx
+         sty     >D.DWSUB
+         jsr     ,y			call initialization routine
+InitEx  
+         puls    x
+         stx     <D.Proc
+         rts
+         ELSE
          bcs     ex
          sty     >D.DWSUB
          jmp     ,y			call initialization routine
+         ENDC
 
          emod            
 eom      equ   *