view level1/cmds/unlink.asm @ 1652:558cab468052

RG fixed a bug in the Vavasour emulator clock2 module. clock2 is now of type Sbrtn instead of Systm. clock.asm has been modified to link to this type.
author boisy
date Sat, 17 Jul 2004 12:20:31 +0000
parents 2b6d9d391bcc
children
line wrap: on
line source

********************************************************************
* Unlink - Unlink memory module
*
* $Id$
*
* Edt/Rev  YYYY/MM/DD  Modified by
* Comment
* ------------------------------------------------------------------
*   2      ????/??/??
* Original Tandy/Microware version

         nam   Unlink
         ttl   Unlink memory module

* Disassembled 02/04/03 22:32:26 by Disasm v1.6 (C) 1988 by RML

         ifp1
         use   defsfile
         endc

tylg     set   Prgrm+Objct   
atrv     set   ReEnt+rev
rev      set   $00
edition  set   2

         mod   eom,name,tylg,atrv,start,size

         org   0
u0000    rmb   512
size     equ   .

name     fcs   /Unlink/
         fcb   edition

start    clra  
         IFGT  Level-1
         os9   F$UnLoad
         ELSE
         clrb  
         os9   F$Link   
         bcs   exit
         os9   F$UnLink 
         bcs   exit
         os9   F$UnLink 
         ENDC
         bcs   exit
         lda   ,x
         cmpa  #C$CR
         bne   start
         clrb  
exit     os9   F$Exit   

         emod
eom      equ   *
         end