pea supex(pc) ;go to supervisor mode move.w #38,-(sp) trap #14 addq.l #6,sp pea im(pc) move.w #9,-(sp) trap #1 addq.l #6,sp clr.w -(sp) trap #1 supex move.b #$FF,$FFFF8E21.w *16MHz MSTE rts im dc.b "16MHz set!",0