open [main]
    WaitPlayer Above 1.                 ; 플레이어가 한명 이상이 될때까지 대기
    WaitTime MilliSec 10000.            ; 10초간 대기


    var NPC a.   ; NPC와 a라는 변수를 만듦(a는 로딩 테스트용, 사용안함)
    Regen NPC "EldSpeGuard01" 2099 10440 180.

    npcchat NPC "여기서 뭐하는 겁니까, 위기상황이란것 모르십니까?".
    WaitTime MilliSec 3000.             ; 3초간 대기

    npcchat NPC "킹슬라임 휘하의 슬라임들이 쳐들어왔단 말입니다.".
    WaitTime MilliSec 3000.             ; 3초간 대기

    npcchat NPC "50분 안에 슬라임들을 모두 잡지 않으면 큰일납니다.".
    WaitTime MilliSec 3000.             ; 3초간 대기

    npcchat NPC "저는 원군을 요청하러 갈테니".
    WaitTime MilliSec 3000.             ; 3초간 대기

    npcchat NPC "여러분들은 방해하지 말고 빨리 피하십시오.".
    WaitTime MilliSec 3000.             ; 3초간 대기

    Vanish NPC.

    Terminate TimeOut "-" 50 "Fail".    ; 50분이 지나면 패배
    Terminate Player "Below" 0 "Fail".  ; 사람이 없으면 패배

    ; 1층 리젠
    mobregen Aggressive "KDEddyHill" "KDEddyHillArea05" "Breeder" "EventManagerA".
    mobregen Aggressive "KDEddyHill" "KDEddyHillArea07" "Breeder" "EventManagerA".
    ;mobregen Aggressive "KDEddyHill" "KDEddyHillArea55" "Breeder" "EventManagerA".
    mobregen Aggressive "KDEddyHill" "KDEddyHillArea06" "Breeder" "EventManagerA".
    mobregen Aggressive "KDEddyHill" "KDEddyHillArea11" "Breeder" "EventManagerA".
    mobregen Aggressive "KDEddyHill" "KDEddyHillArea14" "Breeder" "EventManagerA".
    mobregen Aggressive "KDEddyHill" "KDEddyHillArea13" "Breeder" "EventManagerA".
    mobregen Aggressive "KDEddyHill" "KDEddyHillArea12" "Breeder" "EventManagerA".
    mobregen Aggressive "KDEddyHill" "KDEddyHillArea16" "Breeder" "EventManagerA".
    mobregen Aggressive "KDEddyHill" "KDEddyHillArea09" "Breeder" "EventManagerA".
    mobregen Aggressive "KDEddyHill" "KDEddyHillArea10" "Breeder" "EventManagerA".
    mobregen Aggressive "KDEddyHill" "KDEddyHillArea08" "Breeder" "EventManagerA".
    mobregen Aggressive "KDEddyHill" "KDEddyHillArea24" "Breeder" "EventManagerA".
    mobregen Aggressive "KDEddyHill" "KDEddyHillArea15" "Breeder" "EventManagerA".
    WaitMob Above 1.                    ; 몹이 1 이상일 동안 대기(리젠될 동안)
    WaitMob Below 0.                    ; 몹이 0이 될동안 대기

    ; 2층 리젠
    mobregen Aggressive "KDEddyHill" "KDEddyHillArea17" "Breeder" "EventManagerA".
    mobregen Aggressive "KDEddyHill" "KDEddyHillArea49" "Breeder" "EventManagerA".
    mobregen Aggressive "KDEddyHill" "KDEddyHillArea50" "Breeder" "EventManagerA".
    mobregen Aggressive "KDEddyHill" "KDEddyHillArea48" "Breeder" "EventManagerA".
    mobregen Aggressive "KDEddyHill" "KDEddyHillArea28" "Breeder" "EventManagerA".
    mobregen Aggressive "KDEddyHill" "KDEddyHillArea53" "Breeder" "EventManagerA".
    mobregen Aggressive "KDEddyHill" "KDEddyHillArea18" "Breeder" "EventManagerA".
    mobregen Aggressive "KDEddyHill" "KDEddyHillArea19" "Breeder" "EventManagerA".
    mobregen Aggressive "KDEddyHill" "KDEddyHillArea51" "Breeder" "EventManagerA".
    mobregen Aggressive "KDEddyHill" "KDEddyHillArea52" "Breeder" "EventManagerA".
    mobregen Aggressive "KDEddyHill" "KDEddyHillArea20" "Breeder" "EventManagerA".
    mobregen Aggressive "KDEddyHill" "KDEddyHillArea21" "Breeder" "EventManagerA".
    mobregen Aggressive "KDEddyHill" "KDEddyHillArea56" "Breeder" "EventManagerA".
    mobregen Aggressive "KDEddyHill" "KDEddyHillArea57" "Breeder" "EventManagerA".
    WaitMob Above 1.                    ; 몹이 1 이상일 동안 대기(리젠될 동안)
    WaitMob Below 0.                    ; 몹이 0이 될동안 대기

    ; 3층 리젠
    mobregen Aggressive "KDEddyHill" "KDEddyHillArea26" "Breeder" "EventManagerA".
    mobregen Aggressive "KDEddyHill" "KDEddyHillArea22" "Breeder" "EventManagerA".
    mobregen Aggressive "KDEddyHill" "KDEddyHillArea27" "Breeder" "EventManagerA".
    mobregen Aggressive "KDEddyHill" "KDEddyHillArea25" "Breeder" "EventManagerA".
    mobregen Aggressive "KDEddyHill" "KDEddyHillArea23" "Breeder" "EventManagerA".
    mobregen Aggressive "KDEddyHill" "KDEddyHillArea30" "Breeder" "EventManagerA".
    mobregen Aggressive "KDEddyHill" "KDEddyHillArea29" "Breeder" "EventManagerA".
    mobregen Aggressive "KDEddyHill" "KDEddyHillArea03" "Breeder" "EventManagerA".
    mobregen Aggressive "KDEddyHill" "KDEddyHillArea04" "Breeder" "EventManagerA".
    mobregen Aggressive "KDEddyHill" "KDEddyHillArea45" "Breeder" "EventManagerA".
    mobregen Aggressive "KDEddyHill" "KDEddyHillArea46" "Breeder" "EventManagerA".
    mobregen Aggressive "KDEddyHill" "KDEddyHillArea47" "Breeder" "EventManagerA".
    mobregen Aggressive "KDEddyHill" "KDEddyHillArea44" "Breeder" "EventManagerA".
    WaitMob Above 1.                    ; 몹이 1 이상일 동안 대기(리젠될 동안)
    WaitMob Below 0.                    ; 몹이 0이 될동안 대기

    ; 4층 리젠
    mobregen Aggressive "KDEddyHill" "KDEddyHillArea41" "Breeder" "EventManagerA".
    mobregen Aggressive "KDEddyHill" "KDEddyHillArea40" "Breeder" "EventManagerA".
    mobregen Aggressive "KDEddyHill" "KDEddyHillArea39" "Breeder" "EventManagerA".
    mobregen Aggressive "KDEddyHill" "KDEddyHillArea42" "Breeder" "EventManagerA".
    mobregen Aggressive "KDEddyHill" "KDEddyHillArea43" "Breeder" "EventManagerA".
    mobregen Aggressive "KDEddyHill" "KDEddyHillArea54" "Breeder" "EventManagerA".
    WaitMob Above 1.                    ; 몹이 1 이상일 동안 대기(리젠될 동안)
    WaitMob Below 0.                    ; 몹이 0이 될동안 대기

    ; 킹슬라임 리젠
    var KingSlime.
    Regen KingSlime "KQ_KingSlime" 7081 5972 90.

    npcshout KingSlime "성스러운 슬라임들을 모욕하는 더러운 생명체들이여".
    WaitTime MilliSec 2000.             ; 2초간 대기
    npcshout KingSlime "너희들에게 영원한 저주를 내리노라!!!".
    WaitTime MilliSec 2000.             ; 2초간 대기

    Terminate AllMob "Below" 0 "Suc".  ; 모든 몹이 사라졌으면 승리

    WaitHP KingSlime 800.                ; 킹슬라임의 HP가 80% 될때까지 대기
    npcshout KingSlime "슬라임들이여, 내 힘을 받아 저들을 멸하여라!!".
    mobregen Aggressive "KDEddyHill" "KDEddyHillArea02" "Breeder" "KingSlime".
    mobregen Aggressive "KDEddyHill" "KDEddyHillArea31" "Breeder" "KingSlime".
    mobregen Aggressive "KDEddyHill" "KDEddyHillArea32" "Breeder" "KingSlime".
    mobregen Aggressive "KDEddyHill" "KDEddyHillArea33" "Breeder" "KingSlime".

    WaitHP KingSlime 600.                ; 킹슬라임의 HP가 60% 될때까지 대기
    npcshout KingSlime "슬라임들이여, 내 힘을 받아 저들을 멸하여라!!".
    mobregen Aggressive "KDEddyHill" "KDEddyHillArea02" "Breeder" "KingSlime".
    mobregen Aggressive "KDEddyHill" "KDEddyHillArea31" "Breeder" "KingSlime".
    mobregen Aggressive "KDEddyHill" "KDEddyHillArea32" "Breeder" "KingSlime".
    mobregen Aggressive "KDEddyHill" "KDEddyHillArea33" "Breeder" "KingSlime".
    mobregen Aggressive "KDEddyHill" "KDEddyHillArea34" "Breeder" "KingSlime".
    mobregen Aggressive "KDEddyHill" "KDEddyHillArea35" "Breeder" "KingSlime".

    WaitHP KingSlime 400.                ; 킹슬라임의 HP가 40% 될때까지 대기
    npcshout KingSlime "슬라임들이여, 내 힘을 받아 저들을 멸하여라!!".
    mobregen Aggressive "KDEddyHill" "KDEddyHillArea02" "Breeder" "KingSlime".
    mobregen Aggressive "KDEddyHill" "KDEddyHillArea31" "Breeder" "KingSlime".
    mobregen Aggressive "KDEddyHill" "KDEddyHillArea32" "Breeder" "KingSlime".
    mobregen Aggressive "KDEddyHill" "KDEddyHillArea33" "Breeder" "KingSlime".
    mobregen Aggressive "KDEddyHill" "KDEddyHillArea34" "Breeder" "KingSlime".
    mobregen Aggressive "KDEddyHill" "KDEddyHillArea35" "Breeder" "KingSlime".
    mobregen Aggressive "KDEddyHill" "KDEddyHillArea38" "Breeder" "KingSlime".
    mobregen Aggressive "KDEddyHill" "KDEddyHillArea36" "Breeder" "KingSlime".

    WaitHP KingSlime 200.                ; 킹슬라임의 HP가 20% 될때까지 대기
    npcshout KingSlime "슬라임들이여, 내 힘을 받아 저들을 멸하여라!!".
    mobregen Aggressive "KDEddyHill" "KDEddyHillArea02" "Breeder" "KingSlime".
    mobregen Aggressive "KDEddyHill" "KDEddyHillArea31" "Breeder" "KingSlime".
    mobregen Aggressive "KDEddyHill" "KDEddyHillArea32" "Breeder" "KingSlime".
    mobregen Aggressive "KDEddyHill" "KDEddyHillArea33" "Breeder" "KingSlime".
    mobregen Aggressive "KDEddyHill" "KDEddyHillArea34" "Breeder" "KingSlime".
    mobregen Aggressive "KDEddyHill" "KDEddyHillArea35" "Breeder" "KingSlime".
    mobregen Aggressive "KDEddyHill" "KDEddyHillArea38" "Breeder" "KingSlime".
    mobregen Aggressive "KDEddyHill" "KDEddyHillArea36" "Breeder" "KingSlime".
    mobregen Aggressive "KDEddyHill" "KDEddyHillArea37" "Breeder" "KingSlime".

    WaitTime MilliSec 60 * 60 * 1000.    ; 한시간동안 기다림 - Terminate 조건으로만 끝나도록
close

;open [Regen1stLayer]
;
;    call "WaitMobRegen".
;    call "WaitMobAnnihilation".
;close
;
;open [Regen2ndLayer]
;
;    call "WaitMobRegen".
;    call "WaitMobAnnihilation".
;close
;
;open [Regen3rdLayer]
;
;    call "WaitMobRegen".
;    call "WaitMobAnnihilation".
;close
;
;open [RegenTopLayer]
;
;    call "WaitMobRegen".
;    call "WaitMobAnnihilation".
;close
;
;open [KingSlimeSummon]
;    mobregen Aggressive "KDEddyHill" "KDEddyHillArea02" "Breeder" "KingSlime".
;    mobregen Aggressive "KDEddyHill" "KDEddyHillArea31" "Breeder" "KingSlime".
;    mobregen Aggressive "KDEddyHill" "KDEddyHillArea32" "Breeder" "KingSlime".
;    mobregen Aggressive "KDEddyHill" "KDEddyHillArea33" "Breeder" "KingSlime".
;    mobregen Aggressive "KDEddyHill" "KDEddyHillArea34" "Breeder" "KingSlime".
;    mobregen Aggressive "KDEddyHill" "KDEddyHillArea35" "Breeder" "KingSlime".
;    mobregen Aggressive "KDEddyHill" "KDEddyHillArea38" "Breeder" "KingSlime".
;    mobregen Aggressive "KDEddyHill" "KDEddyHillArea36" "Breeder" "KingSlime".
;    mobregen Aggressive "KDEddyHill" "KDEddyHillArea37" "Breeder" "KingSlime".
;
;    call "WaitMobRegen".
;close
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;open [WaitPlayerEntry]
;    var InitRest.
;    var CurRest.
;    kqrestminute InitRest.                ; 남은 시간을 분단위로 얻어옴
;
;    var Ply.
;    Ply = 0.
;    while Ply == 0
;    open
;        howmanymob Ply "Player".           ; 들어온 플레이어들 확인
;
;        kqrestminute CurRest.                ; 남은 시간을 분단위로 얻어옴
;        if InitRest - CurRest > 5               ; 5분간 대기
;        then
;        open
;            print "Room vanish".
;            endofevent KingdomQuest 0.       ; 킹덤퀘스트 실패로 마무리
;            break "main".
;        close
;    close
;close
;
;open [WaitMobRegen]
;    var Mob.
;    Mob = 0.
;    while Mob == 0
;    open
;        howmanymob Mob "All".                ; 모든 몹수 확인
;    close
;close
;
;open [WaitMobAnnihilation]
;    var Mob.
;    Mob = 10.
;    while Mob > 0
;    open
;        howmanymob Mob "All".                ; 모든 몹수 확인
;        call "IsTimeUp".
;    close
;close
;
;open [WaitKingSlimeKill]
;    var Mob.
;    Mob = 10.
;    while Mob > 0
;    open
;        howmanymob Mob "KQ_KingSlime".                ; 킹슬라임 갯수 확인
;        call "IsTimeUp".
;    close
;close
;
;open [IsTimeUp]            ; 시간제한이 다 되었는지 확인
;    print "IsTimeUp".
;    var TimeUp.
;    kqrestminute TimeUp.                ; 남은 시간을 분단위로 얻어옴
;    print "EventManagerAIsTimeUp : " % TimeUp % "Minute left".
;    if TimeUp == 0                      ; 시간오버
;    then
;    open
;        print "IsTimeUp : Exit 0".
;        KQResult = "Fail".
;        break "MainLoop".
;    close
;
;    var Ply.
;    howmanymob Ply "Player".           ; 남아있는 플레이어들 확인
;    print "EventManagerAIsTimeUp : " % Ply % "Player left".
;    if Ply == 0
;    then
;    open
;        print "IsTimeUp : Exit 1".
;        KQResult = "Fail".
;        break "MainLoop".
;    close
;close
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;open [main]
;    var MyName.
;    var MyHandle.
;    myname MyName.          ; 내 이름을 얻는다(몹인덱스)
;    myhandle MyHandle.
;
;    call MyName "DefRoutine".   ; 인덱스와 동일한 루틴 호출
;close
;
;open [DefRoutine]
;close
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;open [EventManagerA]
;
;    print "EventManagerA : Entry".
;
;    call "WaitPlayerEntry".             ; 사람들이 들어올 때까지 기다림
;
;    var KQResult.   ; IsTimeUp에서 사용할 변수
;
;    open [MainLoop]
;        call "Regen1stLayer".
;        call "Regen2ndLayer".
;        call "Regen3rdLayer".
;        call "RegenTopLayer".
;
;        mobregen Aggressive "KDEddyHill" "KDEddyHillArea01" "Breeder" "KingSlime". ; 킹슬라임 리젠
;
;        call "WaitMobRegen".
;        call "WaitKingSlimeKill".
;
;        KQResult = "Success".
;    close
;
;    wait sec 3.
;    if KQResult === "Success"   ; 성공
;    then
;    open
;        reward KingdomQuest.         ; 리워드를 줌
;        broadcast all "슬라임들을 성공적으로 방어했습니다.".
;        endofevent KingdomQuest 1.  ; 킹덤퀘스트 성공으로 마무리
;    close
;    else
;    open
;        broadcast all "슬라임들 방어에 실패했습니다.".
;        endofevent KingdomQuest 0.       ; 킹덤퀘스트 실패로 마무리
;    close
;
;    broadcast all "30초후 루멘으로 이동합니다.".
;    wait sec 10.
;    broadcast all "20초후 루멘으로 이동합니다.".
;    wait sec 10.
;    broadcast all "10초후 루멘으로 이동합니다.".
;    wait sec 5.
;    broadcast all "5초후 루멘으로 이동합니다.".
;    wait sec 5.
;    linkto all "Rou" "Rou" 7907 8572.
;
;    mapclear all.
;
;close
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;open [KQ_KingSlime]
;    var SummonHPRate.
;    var MaxHP.
;    currenthp MaxHP.
;    SummonHPRate = 1000.
;
;    shout all "" "성스러운 슬라임들을 모욕하는 더러운 생명체들이여".
;    wait sec 2.
;    shout all "" "너희들에게 영원한 저주를 내리노라!!!".
;
;    while SummonHPRate > 0
;    open
;        var CurHP.
;        var CurHPRate.
;
;        currenthp CurHP.
;        CurHPRate = (CurHP * 1000) / MaxHP.   ; 주의 : 이런 수식은 뒤에서부터 실행됨!!!!
;
;        print "MaxHP[" % MaxHP % "]  CurHP[" % CurHP % "]   CurHPRate[" % CurHPRate % "]   SummonHPRate[" % SummonHPRate % "]".
;
;        if CurHPRate < SummonHPRate
;        then
;        open
;            shout all "" "슬라임들이여, 내 힘을 받아 저들을 멸하여라!!".
;            call "KingSlimeSummon".
;            SummonHPRate = SummonHPRate - 200.
;        close
;    close
;
;    ; 킹슬라임이 죽었음
;    var Mobs.
;    howmanymob Mobs "all".
;    if Mobs < 15
;    then
;    open
;        shout all "" "아아, 정녕 슬라임의 시대는 갔단 말인가...".
;    close
;    else
;    open
;        shout all "" "남아있는 슬라임들이여, 명예를 위해 최선을 다하라".
;    close
;close
;;;;;;;;;;;;;;;;;;;