SigFiesta/ScenarioBookShelf/KQ/ConditionOfHero.ps

open [main]
    var InterruptBlock      ""
        InterruptArg        ""

        Players             ""
        Count               ""
        ResultList          ""
        PlayerHandle        ""

        Winner0             ""
        Winner1             ""
        Winner2             "".

    ;;;;;;;;;;;;;;;;;;;; printf InitFlag.        ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

    battlestop PK.;    freepk OFF.                                                 ; <EFBFBD><EFBFBD><EFBFBD>ο<EFBFBD> <EFBFBD><EFBFBD><EFBFBD>ɾ<EFBFBD>

    printf "WaitPlayer".

    waitlogin Players.

    printf "Player : " % Players.

    if Players == 0                            ; <EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ð<EFBFBD> <EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <EFBFBD>α<EFBFBD> <EFBFBD><EFBFBD><EFBFBD><EFBFBD>
    then open
        call "QuestFail".
    close

    pause Sec 7.

    scriptfile "KQConditionOfHero".


    chatwin "RouTownChiefRoumenus" "Intro0".
    pause Sec 2.
    chatwin "RouTownChiefRoumenus" "Intro1".
    pause Sec 2.
    chatwin "RouTownChiefRoumenus" "Intro2".
    pause Sec 2.
    chatwin "RouTownChiefRoumenus" "Intro3".
    pause Sec 2.
    chatwin "RouTownChiefRoumenus" "Intro4".



    timelimit Min 3.



    ; <EFBFBD><EFBFBD><EFBFBD><EFBFBD> <EFBFBD><EFBFBD><EFBFBD><EFBFBD>
    Count = 0.
    while Count < 20
    open
        regengroup "KDHero" "HERO" % InitFlag.
        Count = Count + 1.
        pause Sec 3.
    close



    interruptclear.
    call "WaitTimeLimit".


    chatwin "RouTownChiefRoumenus" "DualStart".
    call "PKON".                                                ; PK <EFBFBD><EFBFBD><EFBFBD><EFBFBD>



    timelimit Min 7.
    interruptclear.

    interruptset Sec "" 99999 10 "PKON".
    interruptset Sec "" 99999 30 "MineRegen".
;    interruptset PlayerDead "" 1 "PlayerDead".                  ; <EFBFBD><EFBFBD><EFBFBD>ͷ<EFBFBD>Ʈ <EFBFBD>ε<EFBFBD><EFBFBD><EFBFBD> <EFBFBD>߰<EFBFBD> - <EFBFBD>ڵ<EFBFBD><EFBFBD>ʿ<EFBFBD>(InterruptArg<EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20>÷<EFBFBD><C3B7>̾<EFBFBD><CCBE><EFBFBD> <20>ڵ<EFBFBD>) <EFBFBD>۵<EFBFBD> <EFBFBD><EFBFBD><EFBFBD><EFBFBD> - <EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ʿ<EFBFBD>
    call "WaitTimeLimit".



    chatwin "RouTownChiefRoumenus" "DualStop".
    battlestop PK.;    freepk OFF.



    ; <EFBFBD><EFBFBD><EFBFBD><EFBFBD>üũ
    ResultList = @KQResultList("ConditionOfHero").              ; <EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <EFBFBD><EFBFBD>Ʈ<EFBFBD>ؼ<EFBFBD> <EFBFBD>÷<EFBFBD><EFBFBD>̾<EFBFBD><EFBFBD>鿡<EFBFBD><EFBFBD> <EFBFBD><EFBFBD><EFBFBD><EFBFBD> <EFBFBD><EFBFBD> <EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ʈ<EFBFBD><EFBFBD> <EFBFBD><EFBFBD><EFBFBD><EFBFBD>

    open [RewardBlock]
        Count = 0.
        infinite
        open
            PlayerHandle = @RemoveFirst("ResultList" " ").          ; <EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ʈ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> ResultList<EFBFBD><EFBFBD><EFBFBD><EFBFBD> " "<22><> <EFBFBD>и<EFBFBD><EFBFBD><EFBFBD> ù°<EFBFBD><EFBFBD><EFBFBD>Ҹ<EFBFBD> x<EFBFBD><EFBFBD> <EFBFBD>ְ<EFBFBD> ResultList<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <EFBFBD><EFBFBD><EFBFBD><EFBFBD>.

            if PlayerHandle === ""
            then open
                break "RewardBlock".
            close


            if Count < 3
            then open
                sendquestresult Suc PlayerHandle.                   ; <EFBFBD><EFBFBD><EFBFBD>ο<EFBFBD><EFBFBD>Ը<EFBFBD> <EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ŷ <EFBFBD><EFBFBD><EFBFBD><EFBFBD>
                invidualreward PlayerHandle "HERO_" % InitFlag % "_" % Count.          ; <20><><EFBFBD>ο<EFBFBD><CEBF><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><>
                #("Winner" % Count) = @CharName(PlayerHandle).
            close
            else open
                sendquestresult Fail PlayerHandle.                  ; <EFBFBD><EFBFBD><EFBFBD>ο<EFBFBD><EFBFBD>Ը<EFBFBD> <EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ŷ <EFBFBD><EFBFBD><EFBFBD><EFBFBD>
                invidualreward PlayerHandle "HERO_" % InitFlag % "_3".          ; <20><><EFBFBD>ο<EFBFBD><CEBF><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><>
            close

            Count = Count + 1.

        close
    close

    chatwin "RouTownChiefRoumenus" "DualResult" Winner0 Winner1 Winner2.

    broadcast all "KQReturn30".
    pause sec 10.
    broadcast all "KQReturn20".
    pause sec 10.
    broadcast all "KQReturn10".
    pause sec 5.
    broadcast all "KQReturn5".
    pause sec 5.
    linkto all "Eld" "Eld" 17214 13445.
    endofkq.
close

open [MineRegen]
        regengroup "KDHero" "HERO" % InitFlag.
close

open [PKON]
    battlestart PK.;freepk ON.                                                  ; <EFBFBD><EFBFBD><EFBFBD>ο<EFBFBD> <EFBFBD><EFBFBD><EFBFBD>ɾ<EFBFBD>
close

open [WaitTimeLimit]
    interruptset TimeOut "" 1 "LimitTimeOut".
    interruptset PlayerEliminate "" 1 "QuestFail".

    infinite
    open
        waitinterrupt InterruptBlock "InterruptArg".
        call InterruptBlock.
    close
close

open [LimitTimeOut]
    break "WaitTimeLimit".
close

open [QuestFail]                ; <EFBFBD><EFBFBD><EFBFBD><EFBFBD> <EFBFBD><EFBFBD><EFBFBD><EFBFBD> <EFBFBD><EFBFBD><EFBFBD><EFBFBD>(<EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>Ƿ<EFBFBD>)
    battlestop PK.;    freepk OFF.
    broadcast all "KQReturn30".
    pause sec 10.
    broadcast all "KQReturn20".
    pause sec 10.
    broadcast all "KQReturn10".
    pause sec 5.
    broadcast all "KQReturn5".
    pause sec 5.
    linkto all "Eld" "Eld" 17214 13445.
    endofkq.
    break "main".
close

;open [PlayerDead]
;    sendquestresult Fail InterruptArg.                  ; <EFBFBD><EFBFBD><EFBFBD>ο<EFBFBD><EFBFBD>Ը<EFBFBD> <EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ŷ <EFBFBD><EFBFBD><EFBFBD><EFBFBD>
;close