Mercurial > hg > Members > kono > nitros9-code

view 3rdparty/p2mods/os9p3_sayhi.asm @ 3210:6353bb024571

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Created makefile and defsfile for NoCan RAMMER module driver and descriptor Updated rammer.asm in the NoCan driver folder to build the NoCan version of the Driver Updated r0.asm file to create the 6MB version of the descriptor. The makefile creates a disk image with two sets of the required drivers for the 6309 and 6809's in their respective module folders. /NITROS9/6309_L2/MODULES/RBF for the 6309 files and /NITROS9/6809_L2/MODULES/RBF for the 6809 files. This will make it easier for doing a dsave from this disk image into a normal distro disk image so people have these drivers ready for when new memory upgrades allow compatible usage of the NoCan registers.
author David Ladd <drencor-xeen@users.sourceforge.net>
date Wed, 20 Dec 2017 15:15:49 -0600
parents 1f8438c88938
children
line wrap: on
line source

         ifp1
         use   defsfile
         endc

Type     set   Systm+Objct
Revs     set   ReEnt+1
edition  set   $01

         mod   OS9End,OS9Name,Type,Revs,Cold,256

OS9Name  fcs   "OS9p3"
         fcb   $01

* routine cold
Cold     leay  SvcTbl,pcr
         os9   F$SSvc
         rts

F$SAYHI  equ   $25

SvcTbl   equ   *
         fcb   F$SAYHI
         fdb   SayHi-*-2
         fcb   $80

SayHi    ldx   R$X,u
         bne   SayHi6
         ldy   D.Proc
         ldu   P$SP,y
         leau  -40,u
         lda   D.SysTsk
         ldb   P$TASK,y
         ldy   #40
         leax  Hello,pcr
         os9   F$Move
         leax  0,u
SayHi6   ldy   #40
         ldu   D.Proc
         lda   P$PATH+2,u
         os9   I$WritLn
         rts

Hello    fcc   "Hello there user."
         fcb   $0D

         emod
OS9End   equ   *
         end