Mercurial > hg > Members > kono > nitros9-code

changeset 273:ed5795e619c7

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Now a part of sysgo
author boisy
date Sun, 21 Jul 2002 06:35:59 +0000
parents d9f3cf7bfc28
children 00fe04149e6e
files level1/modules/sysgo_rom.asm
diffstat 1 files changed, 0 insertions(+), 91 deletions(-) [+]
line wrap: on
line diff
--- a/level1/modules/sysgo_rom.asm	Sun Jul 21 06:23:48 2002 +0000
+++ /dev/null	Thu Jan 01 00:00:00 1970 +0000
@@ -1,91 +0,0 @@
-********************************************************************
-* SysGo - OS-9 Level One 2 ROM SysGo
-*
-* $Id$
-*
-* Ed.    Comments                                       Who YY/MM/DD
-* ------------------------------------------------------------------
-*  12    From Tandy OS-9 Level One VR 02.00.00
-*  13    Y2K                                            BGP 99/05/11
-
-         nam   SysGo
-         ttl   OS-9 Level One 2 ROM SysGo
-
-         ifp1
-         use   defsfile
-         use   scfdefs
-         endc
-
-tylg     set   Systm+Objct
-atrv     set   ReEnt+rev
-rev      set   $01
-edition  set   13
-
-         mod   eom,name,tylg,atrv,start,size
-
-dataarea rmb   200
-size     equ   .
-
-name     fcs   /SysGo/
-         fcb   edition
-
-* default OS-9 priority
-DefPrior set   128
-
-BootMsg  fcc   "OS-9 LEVEL ONE VR. 0"
-         fcb   48+OS9Vrsn
-         fcc   ".0"
-         fcb   48+OS9Major
-         fcc   ".0"
-         fcb   48+OS9Minor
-         fdb   C$CR,C$LF
-         fcc   "COPR. 1980 BY MOTOROLA INC. AND"
-         fdb   C$CR,C$LF
-         fcc   "MICROWARE SYSTEMS CORP."
-         fdb   C$CR,C$LF
-         fcc   "LICENSED TO TANDY CORP."
-         fdb   C$CR,C$LF
-         fcc   "ALL RIGHTS RESERVED."
-         fdb   C$CR,C$LF
-         fcb   C$LF
-MsgEnd   equ   *
-
-Shell    fcc   "Shell"
-         fcb   C$CR
-
-* Default time packet
-*              YY MM DD HH MM SS
-TimePckt fcb   85,06,01,00,00,00
-
-* SysGo entry point
-start    leax  >IcptRtn,pcr
-         os9   F$Icpt
-
-* Print boot message
-         leax  >BootMsg,pcr
-         ldy   #MsgEnd-BootMsg
-         lda   #$01
-         os9   I$Write
-         leax  >TimePckt,pcr
-         os9   F$STime
-
-* Set priority and do startup file
-DoStrtup os9   F$ID
-         ldb   #DefPrior
-         os9   F$SPrior
-
-FrkShell leax  >Shell,pcr
-         ldd   #$0100
-         ldy   #$0000
-         os9   F$Fork
-         bcs   DeadEnd
-         os9   F$Wait
-         bcc   FrkShell
-DeadEnd  bra   DeadEnd
-
-* Intercept routine
-IcptRtn  rti
-
-         emod
-eom      equ   *
-         end