Mercurial > hg > Members > kono > nitros9-code
annotate 3rdparty/p2mods/sayhi.asm @ 3210:6353bb024571
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 | b8c7b7fbf3c9 |
| children |
| rev | line source |
|---|---|
| 0 | 1 ifp1 |
| 2624 | 2 use defsfile |
| 0 | 3 endc |
| 4 | |
| 5 Type set Prgrm+Objct | |
| 6 Revs set ReEnt+1 | |
| 7 edition set $01 | |
| 8 | |
| 9 mod OS9End,OS9Name,Type,Revs,Cold,256 | |
| 10 | |
| 11 OS9Name fcs "SayHi" | |
| 12 fcb edition | |
| 13 | |
| 14 * routine cold | |
| 15 Cold equ * | |
| 16 * The following three instructions are important. They cause the link | |
| 17 * count of this module to increase by 1. This insures that the module | |
| 18 * stays in memory, even if forked from disk. | |
| 19 leax OS9Name,pcr | |
| 20 clra | |
| 21 os9 F$Link | |
| 22 | |
| 23 leay SvcTbl,pcr | |
| 24 os9 F$SSvc | |
| 25 bcs Exit | |
| 26 clrb | |
| 27 Exit os9 F$Exit | |
| 28 | |
| 29 F$SAYHI equ $25 | |
| 30 | |
| 31 SvcTbl equ * | |
| 32 fcb F$SAYHI | |
| 33 fdb SayHi-*-2 | |
| 34 fcb $80 | |
| 35 | |
| 36 * Entry point to F$SAYHI system call | |
| 37 SayHi ldx R$X,u | |
| 38 bne SayHi6 | |
| 39 leax Hello,pcr | |
| 40 SayHi6 ldy #40 | |
| 41 ldu D.Proc | |
| 42 lda P$PATH+2,u | |
| 43 os9 I$WritLn | |
| 44 rts | |
| 45 | |
| 46 Hello fcc "Hello there user." | |
| 47 fcb $0D | |
| 48 | |
| 49 emod | |
| 50 | |
| 51 OS9End equ * | |
| 52 end |