Mercurial > hg > Members > kono > nitros9-code

annotate 3rdparty/p2mods/tsayhi.asm @ 1163:5cbcbfd738ae

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Added
author boisy
date Thu, 08 May 2003 20:50:59 +0000
parents 6641a883d6b0
children b8c7b7fbf3c9
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
1 ifp1
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
2 use os9defs
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
3 endc
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
4
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
5 Type set Prgrm+Objct
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
6 Revs set ReEnt+1
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
7 edition set $01
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
8
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
9 mod OS9End,OS9Name,Type,Revs,start,256
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
10
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
11 OS9Name fcs "TSayHi"
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
12 fcb edition
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
13
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
14 F$SAYHI equ $25
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
15
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
16 * routine cold
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
17 start equ *
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
18 lda ,x
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
19 cmpa #$0D
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
20 bne SayHi
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
21 ldx #$0000
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
22 SayHi os9 F$SAYHI
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
23 bcs error
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
24 clrb
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
25 error os9 F$Exit
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
26
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
27 emod
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
28
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
29 OS9End equ *
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
30 end