PICO_EntryPoint

Pico_Entry:
        lea word_0_27C(pc),a5
        movem.w (a5)+,d5-d7
        movem.l (a5)+,a2-a4
        move.l  #'SEGA',d0
        movep.l d0,(a2)
        move.w  (a4),d0
        moveq   #0,d0
        movea.l d0,a6
        move    a6,usp
        moveq   #$17,d1

loc_0_236:
        move.b  (a5)+,d5
        move.w  d5,(a4)
        add.w   d7,d5
        dbf d1,loc_0_236
        move.l  (a5)+,(a4)
        move.w  d0,(a3)

loc_0_244:
        move.l  d0,-(a6)
        dbf d6,loc_0_244

loc_0_24A:
        move.w  (a4),d0
        andi.b  #2,d0
        bne.s   loc_0_24A
        move.l  (a5)+,(a4)
        move.l  (a5)+,(a4)
        moveq   #$1F,d3

loc_0_258:
        move.l  d0,(a3)
        dbf d3,loc_0_258
        move.l  (a5)+,(a4)
        moveq   #$13,d4

loc_0_262:
        move.l  d0,(a3)
        dbf d4,loc_0_262
        moveq   #3,d5

loc_0_26A:
        move.b  (a5)+,$11(a3)
        dbf d5,loc_0_26A
        movem.l (a6),d0-a6
        move    #$2700,sr
        bra.s   Pico_Start
; ---------------------------------------------------------------------------
word_0_27C:
        dc.w $8000
        dc.w $3FFF
        dc.w $100
        dc.l $800019
        dc.l $C00000
        dc.l $C00004
        dc.b 4, $14, $30, $2C, 7, $54, 0, 0, 0, 0
        dc.b $FF, 0, $81, $2B, 0, 1, 1, 0, 0, $FF
        dc.b $FF, 0, 0, $80
        dc.l $40000080
        dc.l $81048F02
        dc.l $C0000000
        dc.l $40000010
        dc.b $9F, $BF, $DF, $FF
; ---------------------------------------------------------------------------

Pico_Start: