--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/CoCoOS9/level2v3/CMDS/load.asm	Sat Jul 14 15:16:13 2018 +0900
@@ -0,0 +1,42 @@
+********************************************************************
+* Load - Load a module
+*
+* $Id: load.asm,v 1.1.1.1 2001/02/21 23:30:54 boisy Exp $
+*
+* Ed.    Comments                                       Who YY/MM/DD
+* ------------------------------------------------------------------
+* 4      Original Tandy/Microware version
+
+         nam   Load
+         ttl   Load a module
+
+* Disassembled 98/09/10 23:08:07 by Disasm v1.6 (C) 1988 by RML
+
+         ifp1
+         use   defsfile
+         endc
+
+tylg     set   Prgrm+Objct   
+atrv     set   ReEnt+rev
+rev      set   $01
+edition  set   4
+
+         mod   eom,name,tylg,atrv,start,size
+
+u0000    rmb   450
+size     equ   .
+
+name     fcs   /Load/
+         fcb   edition
+
+start    os9   F$Load   
+         bcs   Exit
+         lda   ,x
+         cmpa  #C$CR
+         bne   start
+         clrb  
+Exit     os9   F$Exit   
+
+         emod
+eom      equ   *
+         end