Var MainfileSize = 0
Var EventNewYear = 0
Var EventAO = 0
Var StPatrickEvent = 0



DEBUGVAR MainfileSize
If SystemDateMonthInt = 12 Then
    GetFileSizeK "taobin_project/inter/aus/video/video_main_event.mp4" MainfileSize
    DEBUGVAR MainfileSize
    If MainfileSize = 9267190 Then
        Var EventNewYear = 1
    EndIf
EndIf


If SystemDateMonthInt = 1 Then
    If SystemDateDayInt < 3 Then
        GetFileSizeK "taobin_project/inter/aus/video/video_main_event.mp4" MainfileSize
        DEBUGVAR MainfileSize
        If MainfileSize = 9267190 Then
            Var EventNewYear = 1
        EndIf
    EndIf

    If SystemDateDayInt <= 31 Then
        GetFileSizeK "taobin_project/inter/aus/video/video_main_ao.mp4" MainfileSize
        DEBUGVAR MainfileSize
        If MainfileSize = 20796764 Then
            Var EventAO = 1
        Else
            DEBUGVAR "AO:Size incorrect"
        EndIf
    EndIf
EndIf

If SystemDateMonthInt = 3 Then
    GetFileSizeK "taobin_project/inter/aus/video/video_main_StPatrick.mp4" MainfileSize
    DEBUGVAR MainfileSize
    If MainfileSize = 17941307 Then
        Var StPatrickEvent = 1
    Else
        DEBUGVAR "StPatrick: Video size incorrect"
    EndIf
EndIf

DEBUGVAR EventNewYear

If EventNewYear = 1 Then
    Var CountDownShowButton = 0
    Var ShowButtonClickFull = "Invisible"
    Var VideoMainPage = "ROOT/taobin_project/inter/aus/video/video_main_event.mp4"
Else
    Var CountDownShowButton = 0
    Var ShowButtonClickFull = "Invisible"
    Var VideoMainPage = "ROOT/taobin_project/inter/aus/video/video_main.mp4"
EndIf

If EventAO = 1 Then

    Var VideoMainPage = "ROOT/taobin_project/inter/aus/video/video_main_ao.mp4"
EndIf

If StPatrickEvent = 1 Then
    Var VideoMainPage = "ROOT/taobin_project/inter/aus/video/video_main_StPatrick.mp4"
EndIf