SigFiesta/MobBehaviorDescript/KQ/GordonMaster.ps

open [RegenGorDonMaster]
	print "Regen RegenGorDonMaster".
    mobregen Aggressive "KDEchoCave" "KDEchoCaveArea01" "Breeder" "EventManagerA".
close

open [RegenBat]
	print "Regen RegenBat".
    mobregen Aggressive "KDEchoCave" "KDEchoCaveArea07" "Breeder" "EventManagerA".
    mobregen Aggressive "KDEchoCave" "KDEchoCaveArea08" "Breeder" "EventManagerA".
    mobregen Aggressive "KDEchoCave" "KDEchoCaveArea11" "Breeder" "EventManagerA".
    mobregen Aggressive "KDEchoCave" "KDEchoCaveArea24" "Breeder" "EventManagerA".
close

open [RegenFireViVi]
	print "Regen RegenFireViVi".
    mobregen Aggressive "KDEchoCave" "KDEchoCaveArea10" "Breeder" "EventManagerA".
    mobregen Aggressive "KDEchoCave" "KDEchoCaveArea12" "Breeder" "EventManagerA".
    mobregen Aggressive "KDEchoCave" "KDEchoCaveArea39" "Breeder" "EventManagerA".
close

open [RegenSkelArcher]
	print "Regen RegenSkelArcher".
    mobregen Aggressive "KDEchoCave" "KDEchoCaveArea04" "Breeder" "EventManagerA".
    mobregen Aggressive "KDEchoCave" "KDEchoCaveArea09" "Breeder" "EventManagerA".
    mobregen Aggressive "KDEchoCave" "KDEchoCaveArea18" "Breeder" "EventManagerA".
    mobregen Aggressive "KDEchoCave" "KDEchoCaveArea19" "Breeder" "EventManagerA".
    mobregen Aggressive "KDEchoCave" "KDEchoCaveArea21" "Breeder" "EventManagerA".
    mobregen Aggressive "KDEchoCave" "KDEchoCaveArea28" "Breeder" "EventManagerA".
    mobregen Aggressive "KDEchoCave" "KDEchoCaveArea30" "Breeder" "EventManagerA".
    mobregen Aggressive "KDEchoCave" "KDEchoCaveArea33" "Breeder" "EventManagerA".
    mobregen Aggressive "KDEchoCave" "KDEchoCaveArea37" "Breeder" "EventManagerA".
close

open [RegenSkeleton]
	print "Regen RegenSkeleton".
    mobregen Aggressive "KDEchoCave" "KDEchoCaveArea02" "Breeder" "EventManagerA".
    mobregen Aggressive "KDEchoCave" "KDEchoCaveArea03" "Breeder" "EventManagerA".
    mobregen Aggressive "KDEchoCave" "KDEchoCaveArea31" "Breeder" "EventManagerA".
    mobregen Aggressive "KDEchoCave" "KDEchoCaveArea35" "Breeder" "EventManagerA".
    mobregen Aggressive "KDEchoCave" "KDEchoCaveArea36" "Breeder" "EventManagerA".
    mobregen Aggressive "KDEchoCave" "KDEchoCaveArea42" "Breeder" "EventManagerA".
close

open [RegenSkelKnight]
	print "Regen RegenSkelKnight".
    mobregen Aggressive "KDEchoCave" "KDEchoCaveArea14" "Breeder" "EventManagerA".
    mobregen Aggressive "KDEchoCave" "KDEchoCaveArea15" "Breeder" "EventManagerA".
    mobregen Aggressive "KDEchoCave" "KDEchoCaveArea20" "Breeder" "EventManagerA".
    mobregen Aggressive "KDEchoCave" "KDEchoCaveArea25" "Breeder" "EventManagerA".
    mobregen Aggressive "KDEchoCave" "KDEchoCaveArea26" "Breeder" "EventManagerA".
close

open [RegenSkelWarrior]
	print "Regen RegenSkelWarrior".
    mobregen Aggressive "KDEchoCave" "KDEchoCaveArea05" "Breeder" "EventManagerA".
    mobregen Aggressive "KDEchoCave" "KDEchoCaveArea23" "Breeder" "EventManagerA".
    mobregen Aggressive "KDEchoCave" "KDEchoCaveArea27" "Breeder" "EventManagerA".
    mobregen Aggressive "KDEchoCave" "KDEchoCaveArea32" "Breeder" "EventManagerA".
close

open [RegenSpider]
	print "Regen RegenSpider".
    mobregen Aggressive "KDEchoCave" "KDEchoCaveArea13" "Breeder" "EventManagerA".
    mobregen Aggressive "KDEchoCave" "KDEchoCaveArea17" "Breeder" "EventManagerA".
    mobregen Aggressive "KDEchoCave" "KDEchoCaveArea38" "Breeder" "EventManagerA".
close

open [RegenZombie]
	print "Regen RegenZombie".
    mobregen Aggressive "KDEchoCave" "KDEchoCaveArea06" "Breeder" "EventManagerA".
    mobregen Aggressive "KDEchoCave" "KDEchoCaveArea29" "Breeder" "EventManagerA".
close
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
open [main]
    var MyName.
    var MyHandle.
    myname MyName.
    myhandle MyHandle.

    var KQResult.

    call MyName "DefRoutine".
close

open [DefRoutine]
close

open [WaitPlayerEntry]
    var InitRest.
    var CurRest.
    kqrestminute InitRest.                ; <EFBFBD><EFBFBD><EFBFBD><EFBFBD> <EFBFBD>ð<EFBFBD><EFBFBD><EFBFBD> <EFBFBD>д<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>

    var Ply.
    Ply = 0.
    while Ply == 0
    open
        howmanymob Ply "Player".           ; <EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <EFBFBD>÷<EFBFBD><EFBFBD>̾<EFBFBD><EFBFBD><EFBFBD> Ȯ<EFBFBD><EFBFBD>

        kqrestminute CurRest.                ; <EFBFBD><EFBFBD><EFBFBD><EFBFBD> <EFBFBD>ð<EFBFBD><EFBFBD><EFBFBD> <EFBFBD>д<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
        if InitRest - CurRest > 5       ; 5<EFBFBD>а<EFBFBD> <EFBFBD><EFBFBD><EFBFBD><EFBFBD>
        then
        open
            print "Room vanish".
            endofevent KingdomQuest 0.       ; ŷ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ʈ <EFBFBD><EFBFBD><EFBFBD>з<EFBFBD> <EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
            break "main".
        close
    close
close

open [IsTimeUp]            ; <EFBFBD>ð<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <EFBFBD><EFBFBD> <EFBFBD>Ǿ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> Ȯ<EFBFBD><EFBFBD>
    print "IsTimeUp".
    var TimeUp.
    kqrestminute TimeUp.                ; <EFBFBD><EFBFBD><EFBFBD><EFBFBD> <EFBFBD>ð<EFBFBD><EFBFBD><EFBFBD> <EFBFBD>д<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
    print "EventManagerAIsTimeUp : " % TimeUp % "Minute left".
    if TimeUp == 0                      ; <EFBFBD>ð<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
    then
    open
        print "IsTimeUp : Exit 0".
        KQResult = "Fail".
        break "MainLoop".
    close

    var Ply.
    howmanymob Ply "Player".           ; <EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ִ<EFBFBD> <EFBFBD>÷<EFBFBD><EFBFBD>̾<EFBFBD><EFBFBD><EFBFBD> Ȯ<EFBFBD><EFBFBD>
    print "EventManagerAIsTimeUp : " % Ply % "Player left".
    if Ply == 0
    then
    open
        print "IsTimeUp : Exit 1".
        KQResult = "Fail".
        break "MainLoop".
    close

    var NumGoden.

    howmanymob NumGoden "KQ_GorDonMaster".
    if NumGoden == 0
    then
    open
        print "IsTimeUp : Exit 2".
        KQResult = "Success".
        break "MainLoop".
    close
close
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
open [EventManagerAMobAppend]
    var Mobs.
    howmanymob Mobs "KQ_" % AppendMobName.

    print "KQ_" % AppendMobName % "[" % Mobs % "]".

    if Mobs < @("Num" % AppendMobName)
    then
    open
        call "Regen" % AppendMobName.
    close
close

open [EventManagerA]

    print "EventManagerA : Entry".

    var CurMap.
    currentmap CurMap.                  ; <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>
    call "WaitPlayerEntry".

    ; <EFBFBD><EFBFBD><EFBFBD><EFBFBD> <EFBFBD><EFBFBD> <EFBFBD><EFBFBD><EFBFBD><EFBFBD>
    call "RegenGorDonMaster".
    call "RegenBat".
    call "RegenFireViVi".
    call "RegenSkelArcher".
    call "RegenSkeleton".
    call "RegenSkelKnight".
    call "RegenSkelWarrior".
    call "RegenSpider".
    call "RegenZombie".


    ; <EFBFBD>⺻ <EFBFBD><EFBFBD><EFBFBD><EFBFBD> <EFBFBD><EFBFBD><EFBFBD><EFBFBD> <EFBFBD><EFBFBD><EFBFBD><EFBFBD>
    var NumBat.
    var NumFireViVi.
    var NumGhost.
    var NumOldFox.
    var NumSkelArcher.
    var NumSkeleton.
    var NumSkelKnight.
    var NumSkelWarrior.
    var NumSpider.
    var NumZombie.

    howmanymob NumBat "KQ_Bat".
    howmanymob NumFireViVi "KQ_FireViVi".
    howmanymob NumSkelArcher "KQ_SkelArcher".
    howmanymob NumSkeleton "KQ_Skeleton".
    howmanymob NumSkelKnight "KQ_SkelKnight".
    howmanymob NumSkelWarrior "KQ_SkelWarrior".
    howmanymob NumSpider "KQ_Spider".
    howmanymob NumZombie "KQ_Zombie".

    NumBat = NumBat / 2.
    NumFireViVi = NumFireViVi / 2.
    NumGhost = NumGhost / 2.
    NumOldFox = NumOldFox / 2.
    NumSkelArcher = NumSkelArcher / 2.
    NumSkeleton = NumSkeleton / 2.
    NumSkelKnight = NumSkelKnight / 2.
    NumSkelWarrior = NumSkelWarrior / 2.
    NumSpider = NumSpider / 2.
    NumZombie = NumZombie / 2.

    var AppendMobName.
    open [MainLoop]
        infinite
        open
            ; <EFBFBD><EFBFBD><EFBFBD>ڶ<EFBFBD> <EFBFBD><EFBFBD> <EFBFBD>߰<EFBFBD>
            AppendMobName = "Bat".          call "EventManagerAMobAppend".
            AppendMobName = "FireViVi".     call "EventManagerAMobAppend".
            AppendMobName = "SkelArcher".   call "EventManagerAMobAppend".
            AppendMobName = "Skeleton".     call "EventManagerAMobAppend".
            AppendMobName = "SkelKnight".   call "EventManagerAMobAppend".
            AppendMobName = "SkelWarrior".  call "EventManagerAMobAppend".
            AppendMobName = "Spider".       call "EventManagerAMobAppend".
            AppendMobName = "Zombie".       call "EventManagerAMobAppend".

            call "IsTimeUp".
        close
    close

    wait sec 3.
    if KQResult === "Success"   ; <EFBFBD><EFBFBD><EFBFBD><EFBFBD>
    then
    open
        reward KingdomQuest.         ; <EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>带 <EFBFBD><EFBFBD>
        broadcast all "<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>.".
        endofevent KingdomQuest 1.  ; ŷ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ʈ <EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
    close
    else
    open
        broadcast all "<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>.".
        endofevent KingdomQuest 0.       ; ŷ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ʈ <EFBFBD><EFBFBD><EFBFBD>з<EFBFBD> <EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
    close

    broadcast all "30<EFBFBD><EFBFBD><EFBFBD><EFBFBD> <EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <EFBFBD>̵<EFBFBD><EFBFBD>մϴ<EFBFBD>.".
    wait sec 10.
    broadcast all "20<EFBFBD><EFBFBD><EFBFBD><EFBFBD> <EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <EFBFBD>̵<EFBFBD><EFBFBD>մϴ<EFBFBD>.".
    wait sec 10.
    broadcast all "10<EFBFBD><EFBFBD><EFBFBD><EFBFBD> <EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <EFBFBD>̵<EFBFBD><EFBFBD>մϴ<EFBFBD>.".
    wait sec 5.
    broadcast all "5<EFBFBD><EFBFBD><EFBFBD><EFBFBD> <EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <EFBFBD>̵<EFBFBD><EFBFBD>մϴ<EFBFBD>.".
    wait sec 5.
    linkto all "Rou" "Rou" 7907 8572.

    mapclear all.

close
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
open [KQ_GorDonMaster]
    var MaxHP.
    currenthp MaxHP.   ; <EFBFBD>ƽ<EFBFBD> HP <EFBFBD><EFBFBD><EFBFBD><EFBFBD>

    var NextSummonHPRate.
    var NextTeleportHPRate.

    NextSummonHPRate = 910.
    NextTeleportHPRate = 800.

    var CurHP.
    var CurHPRate.
    open [MainLoop]
        infinite
        open
            currenthp CurHP.
            CurHPRate = (CurHP * 1000) / MaxHP.   ; <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>ȯüũ
            if CurHPRate < NextSummonHPRate
            then
            open
                shout all "" "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ŷ<EFBFBD>, <EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>̿<EFBFBD>..".
                mobsummon Aggressive "KQ_GorDon" 5 "Breeder" "KQ_GorDonMaster".
                NextSummonHPRate = NextSummonHPRate - 91.
            close

            ; <EFBFBD>ڷ<EFBFBD><EFBFBD><EFBFBD>Ʈ üũ
            if CurHPRate < NextTeleportHPRate
            then
            open
                shout all "" "<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>.".
                skillblast me "GoMasterTeleportStart".
                NextTeleportHPRate = NextTeleportHPRate - 200.
            close
            call "IsTimeUp".
        close
    close

    if KQResult === "Success"   ; <EFBFBD><EFBFBD><EFBFBD><EFBFBD>
    then
    open
        shout All "" "<EFBFBD>ȵ<EFBFBD>!!!!".
    close
    else
    open
        shout All "" "<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>...".
    close
close