s: dc.w $1114 ; Rom size, actually executable... bra.s s2 dc.l $00000008 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 move.l #$20000,d0 .loop: subq.l #1,d0 bne.s .loop lea $dff000,a4 move.w #$7fff,d0 move.w d0,$9a(a4) move.w d0,$9c(a4) move.w d0,$96(a4) .no; move.w #$0200,$100(a4) clr.w $100(a4) move.w $dff006,$dff180 .loop2: ; move.w #$0fff,$dff180 ; move.w #$0f00,$dff180 move.w $dff006,$dff180 btst #6,$bfe001 ; bne.s .loop2 ; rts bra.s .loop2 q: blk.b 524288-(q-s), 0 e: