2021-09-27 17:37:36 -04:00
|
|
|
;;;
|
|
|
|
|
;;; Sample PGX Program
|
|
|
|
|
;;;
|
|
|
|
|
|
|
|
|
|
org $010000
|
|
|
|
|
|
|
|
|
|
dc.b "PGX", $02
|
2021-09-30 13:39:39 -04:00
|
|
|
dc.l start
|
2021-09-27 17:37:36 -04:00
|
|
|
|
2021-09-30 13:39:39 -04:00
|
|
|
start: move.l #$13,d0 ; sys_chan_write
|
|
|
|
|
clr.l d1 ; Channel #0
|
|
|
|
|
move.l #greet,d2 ; Pointer to message
|
|
|
|
|
move.l #greet_end-greet+1,d3 ; Length of message
|
|
|
|
|
trap #15
|
2021-09-27 17:37:36 -04:00
|
|
|
|
2021-09-30 13:39:39 -04:00
|
|
|
done: clr.l d0 ; sys_exit
|
|
|
|
|
clr.l d1 ; Return value = 0
|
|
|
|
|
trap #15
|
2021-09-27 17:37:36 -04:00
|
|
|
|
2021-09-30 13:39:39 -04:00
|
|
|
greet: dc.b "Hello, world!"
|
|
|
|
|
greet_end: dc.b 0
|
