.define _alarm
.sect .text
.sect .rom
.sect .data
.sect .bss
.extern _alarm
_alarm: clr.l d0
move.w 4(sp),d0
move.l d0,a0
move.w #0x1B,d0
trap #0
rts