; ===========================================================================
Obj2E_Chk_Move_Line:
        cmpi.b  #8,d0               ; монитор содержит сдвиг границы и изменение чанков?
        bne Obj2E_ChkEnd            ; если нет, перейти
        move.w  #$B7,d0
        jsr (PlaySound).l           ; играть звук грохота
        move.l  a0,-(sp)
        jsr Pal_MakeWhite           ; сделать вспышку
        move.l  (sp)+,a0
        clr ($FFFFF728).w           ; переместить левую границу
        move.w  ($FFFFD00C).w,d0
        move.w  ($FFFFD008).w,d1
        jsr loc_60D0            ; перейти
        move.b  #$52,($FFFFA401).w      ; изменить чанк
        jsr LoadTilesFromStart      ; обновить
        moveq   #4,d0
        lea (ObjPos_for_CZ).l,a0        ; load object list for change CZ1
LOP_for_CZ: jsr OPL_MakeItem
        lea 5(a0),a0
        dbf d0,LOP_for_CZ
        rts
; ===========================================================================
ObjPos_for_CZ:  incbin  objpos\ghz1_change_obj.bin
; ===========================================================================
OPL_MakeItem:
        bsr.w   SingleObjLoad
        bne.s   OPL_MakeItem_Rts    ; if creating object failed, branch
        move.w  (a0)+,8(a1)
        move.w  (a0)+,d0
        move.w  d0,d1
        andi.w  #$FFF,d0
        move.w  d0,$C(a1)
        rol.w   #2,d1
        andi.b  #3,d1
        move.b  d1,1(a1)
        move.b  d1,$22(a1)
        move.b  (a0)+,d0
        bpl.s   loc_DA80
        andi.b  #$7F,d0
        move.b  d2,$23(a1)

loc_DA80:
        move.b  d0,0(a1)
        move.b  (a0)+,$28(a1)
        moveq   #0,d0

OPL_MakeItem_Rts:
        rts
; ===========================================================================
ghz1_change_obj.bin:
        dc.b    $01, $10, $01, $7C, $C1, $02
        dc.b    $01, $30, $01, $7C, $C1, $02
        dc.b    $01, $50, $01, $7C, $C1, $02
        dc.b    $01, $70, $01, $7C, $C1, $02
        dc.b    $FF, $FF, $00, $00, $00, $00
; ===========================================================================