home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Crawly Crypt Collection 1
/
crawlyvol1.bin
/
utility
/
disk
/
boots170
/
example.s
< prev
Wrap
Text File
|
1994-07-15
|
488b
|
18 lines
print EQU 9
gemdos EQU 1
TEXT
pea message(PC)
move.w #print,-(SP)
trap #gemdos
addq.l #6,SP
rts
message: DC.B 27,'p'
DC.B ' ',$0D,$0A
DC.B ' Hello world! ',$0D,$0A
DC.B ' ',$0D,$0A
DC.B 27,'q',$0D,$0A,$0A,0
EVEN
END