taobin_project/xml/event/halloween/game.xml

<Popup>
    <Cache> "Enable" </Cache>
    <Width> 1080 </Width>
    <Height> 1920 </Height>
    <Background> "0xeae6e1" </Background>
    <Volume> SoundVolume </Volume>

    <EventOpen>

        Var MovieTicketIndex = 0

        If MovieTicketUnavailable = 0 Then
            Random2 1 14 MovieTicketIndex
        EndIf

        Var DiscountIndex = 0

        If DiscountUnavailable = 0 Then

            ; for garantee not same index with movie
            If MovieTicketIndex > 6 Then
                Random2 1 6 DiscountIndex
            Else
                Random2 7 14 DiscountIndex
            EndIf

        EndIf

        Var GhostSet = 0
        Random2 1 5 GhostSet

        Var DirImage = "ROOT/taobin_project/image/event/halloween/ghosts/"

        Var DirGhostImage = DirImage + "set_"
        Var DirGhostImage = DirGhostImage + GhostSet

        If GhostSet = 1 Then
            Var ghost1_X = 35
            Var ghost1_Y = 972

            Var ghost2_X = 729
            Var ghost2_Y = 1268

            Var ghost3_X = 38
            Var ghost3_Y = 1645

            Var ghost4_X = 430
            Var ghost4_Y = 493

            Var ghost5_X = 211
            Var ghost5_Y = 733

            Var ghost6_X = 800
            Var ghost6_Y = 984

            Var ghost7_X = 771
            Var ghost7_Y = 1695

            Var ghost8_X = 367
            Var ghost8_Y = 911

            Var ghost9_X = 386
            Var ghost9_Y = 1466

            Var ghost10_X = 674
            Var ghost10_Y = 743

            Var ghost11_X = 86
            Var ghost11_Y = 472

            Var ghost12_X = 859
            Var ghost12_Y = 507

            Var ghost13_X = 199
            Var ghost13_Y = 1268
        EndIf

        If GhostSet = 2 Then
            Var ghost1_X = 151
            Var ghost1_Y = 1610

            Var ghost2_X = 757
            Var ghost2_Y = 1593

            Var ghost3_X = 709
            Var ghost3_Y = 1430

            Var ghost4_X = 507
            Var ghost4_Y = 1023

            Var ghost5_X = 373
            Var ghost5_Y = 458

            Var ghost6_X = 206
            Var ghost6_Y = 859

            Var ghost7_X = 132
            Var ghost7_Y = 1393

            Var ghost8_X = 836
            Var ghost8_Y = 784

            Var ghost9_X = 746
            Var ghost9_Y = 451

            Var ghost10_X = 63
            Var ghost10_Y = 510

            Var ghost11_X = 384
            Var ghost11_Y = 1303

            Var ghost12_X = 54
            Var ghost12_Y = 1095

            Var ghost13_X = 744
            Var ghost13_Y = 1101
        EndIf

        If GhostSet = 3 Then
            Var ghost1_X = 70
            Var ghost1_Y = 451

            Var ghost2_X = 48
            Var ghost2_Y = 1383

            Var ghost3_X = 441
            Var ghost3_Y = 1405

            Var ghost4_X = 402
            Var ghost4_Y = 932

            Var ghost5_X = 308
            Var ghost5_Y = 1162

            Var ghost6_X = 735
            Var ghost6_Y = 456

            Var ghost7_X = 693
            Var ghost7_Y = 1675

            Var ghost8_X = 740
            Var ghost8_Y = 822

            Var ghost9_X = 615
            Var ghost9_Y = 1117

            Var ghost10_X = 811
            Var ghost10_Y = 1389

            Var ghost11_X = 346
            Var ghost11_Y = 466

            Var ghost12_X = 54
            Var ghost12_Y = 1095

            Var ghost13_X = 75
            Var ghost13_Y = 788
        EndIf

        If GhostSet = 4 Then
            Var ghost1_X = 380
            Var ghost1_Y = 459

            Var ghost2_X = 441
            Var ghost2_Y = 1422

            Var ghost3_X = 103
            Var ghost3_Y = 1363

            Var ghost4_X = 749
            Var ghost4_Y = 491

            Var ghost5_X = 87
            Var ghost5_Y = 781

            Var ghost6_X = 44
            Var ghost6_Y = 1633

            Var ghost7_X = 875
            Var ghost7_Y = 1169

            Var ghost8_X = 155
            Var ghost8_Y = 1068

            Var ghost9_X = 777
            Var ghost9_Y = 760

            Var ghost10_X = 385
            Var ghost10_Y = 889

            Var ghost11_X = 787
            Var ghost11_Y = 1441

            Var ghost12_X = 576
            Var ghost12_Y = 1080

            Var ghost13_X = 68
            Var ghost13_Y = 454
        EndIf

    </EventOpen>


    <Timeout> 1000 </Timeout>
    <EventTimeout>

        Var GameTimeout = GameTimeout - 1

        DEBUGVAR GameTimeout

        If GameTimeout < 0 Then
            If DiscountUnavailable = 0 Then
                Var RewardType = "discount_timeout"
                Open "ROOT/taobin_project/xml/event/halloween/page_get_reward.xml"
            Else
                Open "ROOT/taobin_project/xml/event/halloween/thank_you.xml"
            EndIf
        EndIf

        TimerReset
        Refresh
    </EventTimeout>

;include="ROOT/taobin_project/inc/video.inc"


    <Image>
        <X> 0 </X>
        <Y> 380 </Y>
        <Filename> Var( DirImage + "game_bg.png" ) </Filename>
    </Image>


    ; ============== Ghosts =====================

    <Button>
        <X> ghost1_X </X>
        <Y> ghost1_Y </Y>
        <Filename> Var( DirGhostImage + "/Ghost_1.png" ) </Filename>
        <EventOnClick>
            Var SelectedGhostNum = 1
            Function 2
        </EventOnClick>
    </Button>

    <Button>
        <X> ghost2_X </X>
        <Y> ghost2_Y </Y>
        <Filename> Var( DirGhostImage + "/Ghost_2.png" ) </Filename>
        <EventOnClick>
            Var SelectedGhostNum = 2
            Function 2
        </EventOnClick>
    </Button>

    <Button>
        <X> ghost3_X </X>
        <Y> ghost3_Y </Y>
        <Filename> Var( DirGhostImage + "/Ghost_3.png" ) </Filename>
        <EventOnClick>
            Var SelectedGhostNum = 3
            Function 2
        </EventOnClick>
    </Button>

    <Button>
        <X> ghost4_X </X>
        <Y> ghost4_Y </Y>
        <Filename> Var( DirGhostImage + "/Ghost_4.png" ) </Filename>
        <EventOnClick>
            Var SelectedGhostNum = 4
            Function 2
        </EventOnClick>
    </Button>

    <Button>
        <X> ghost5_X </X>
        <Y> ghost5_Y </Y>
        <Filename> Var( DirGhostImage + "/Ghost_5.png" ) </Filename>
        <EventOnClick>
            Var SelectedGhostNum = 5
            Function 2
        </EventOnClick>
    </Button>

    <Button>
        <X> ghost6_X </X>
        <Y> ghost6_Y </Y>
        <Filename> Var( DirGhostImage + "/Ghost_6.png" ) </Filename>
        <EventOnClick>
            Var SelectedGhostNum = 6
            Function 2
        </EventOnClick>
    </Button>

    <Button>
        <X> ghost7_X </X>
        <Y> ghost7_Y </Y>
        <Filename> Var( DirGhostImage + "/Ghost_7.png" ) </Filename>
        <EventOnClick>
            Var SelectedGhostNum = 7
            Function 2
        </EventOnClick>
    </Button>

    <Button>
        <X> ghost8_X </X>
        <Y> ghost8_Y </Y>
        <Filename> Var( DirGhostImage + "/Ghost_8.png" ) </Filename>
        <EventOnClick>
            Var SelectedGhostNum = 8
            Function 2
        </EventOnClick>
    </Button>

    <Button>
        <X> ghost9_X </X>
        <Y> ghost9_Y </Y>
        <Filename> Var( DirGhostImage + "/Ghost_9.png" ) </Filename>
        <EventOnClick>
            Var SelectedGhostNum = 9
            Function 2
        </EventOnClick>
    </Button>

    <Button>
        <X> ghost10_X </X>
        <Y> ghost10_Y </Y>
        <Filename> Var( DirGhostImage + "/Ghost_10.png" ) </Filename>
        <EventOnClick>
            Var SelectedGhostNum = 10
            Function 2
        </EventOnClick>
    </Button>

    <Button>
        <X> ghost11_X </X>
        <Y> ghost11_Y </Y>
        <Filename> Var( DirGhostImage + "/Ghost_11.png" ) </Filename>
        <EventOnClick>
            Var SelectedGhostNum = 11
            Function 2
        </EventOnClick>
    </Button>

    <Button>
        <X> ghost12_X </X>
        <Y> ghost12_Y </Y>
        <Filename> Var( DirGhostImage + "/Ghost_12.png" ) </Filename>
        <EventOnClick>
            Var SelectedGhostNum = 12
            Function 2
        </EventOnClick>
    </Button>

    <Button>
        <X> ghost13_X </X>
        <Y> ghost13_Y </Y>
        <Filename> Var( DirGhostImage + "/Ghost_13.png" ) </Filename>
        <EventOnClick>
            Var SelectedGhostNum = 13
            Function 2
        </EventOnClick>
    </Button>

    ; ============== End Ghosts =================

    <Function2>

        SAVELOG "Press ghost!!!"

        DEBUGVAR SelectedGhostNum
        DEBUGVAR MovieTicketIndex

        If SelectedGhostNum = MovieTicketIndex Then
            Var RewardType = "movie_ticket"
            Open "ROOT/taobin_project/xml/event/halloween/page_get_reward.xml"
        Else
            If SelectedGhostNum = DiscountIndex Then
                Var RewardType = "discount"
                Open "ROOT/taobin_project/xml/event/halloween/page_get_reward.xml"
            EndIf
        EndIf

        If GameTimeout < 0 Then
            If DiscountUnavailable = 0 Then
                Var RewardType = "discount_timeout"
                Open "ROOT/taobin_project/xml/event/halloween/page_get_reward.xml"
            Else
                Open "ROOT/taobin_project/xml/event/halloween/thank_you.xml"
            EndIf
        Else
            Open "ROOT/taobin_project/xml/event/halloween/page_try_again.xml"
        EndIf
    </Function2>



    <Text>
        <X> 914 </X>
        <Y> 380 </Y>
        <Width> 165 </Width>
        <Height> 100 </Height>
        <Font> KanitRegularTTF </Font>
        <Size> 100 </Size>
        <Color> 0xFFFFFF </Color>
        <Align> center-vertical-horizontal </Align>
        <Value> GameTimeout </Value>
    </Text>


    <EventUnitTest1>
        Open "ROOT/taobin_project/xml/event/halloween/game.xml"
    </EventUnitTest1>

</Popup>