s: nop bra.s s2 dc.l $00f80008 s2: ; Test if we are in ROM lea s,a0 lea s(pc),a1 moveq #0,d7 sub.l a0,a1 beq.s no moveq #1,d7 ;1 == ROM rom: move.l #$20000,d0 ;Assumed cold start .loop: subq.l #1,d0 bne.s .loop move.b #3,$bfe201 move.b #2,$bfe001 lea $dff000,a4 move.w #$7fff,d0 move.w d0,$9a(a4) move.w d0,$9c(a4) move.w d0,$96(a4) move.w #$0200,$100(a4) clr.w $100(a4) no: .loop2: move.w $dff006,$dff180 btst #6,$bfe001 bne.s .loop2 exit: rts q: blk.b 524288-(q-s), 0 e: