SigFiesta/MobBehaviorDescript/KQ/MaraPirate.ps

open [RegenZacco]
    mobregen Aggressive "KDPrtShip" "KDPrtShipArea01" "Breeder" "EventManagerA".
    mobregen Aggressive "KDPrtShip" "KDPrtShipArea02" "Breeder" "EventManagerA".
    mobregen Aggressive "KDPrtShip" "KDPrtShipArea03" "Breeder" "EventManagerA".
    mobregen Aggressive "KDPrtShip" "KDPrtShipArea04" "Breeder" "EventManagerA".
    mobregen Aggressive "KDPrtShip" "KDPrtShipArea05" "Breeder" "EventManagerA".
    mobregen Aggressive "KDPrtShip" "KDPrtShipArea06" "Breeder" "EventManagerA".
    mobregen Aggressive "KDPrtShip" "KDPrtShipArea07" "Breeder" "EventManagerA".
    mobregen Aggressive "KDPrtShip" "KDPrtShipArea08" "Breeder" "EventManagerA".
    mobregen Aggressive "KDPrtShip" "KDPrtShipArea09" "Breeder" "EventManagerA".
    mobregen Aggressive "KDPrtShip" "KDPrtShipArea10" "Breeder" "EventManagerA".
    mobregen Aggressive "KDPrtShip" "KDPrtShipArea12" "Breeder" "EventManagerA".
    mobregen Aggressive "KDPrtShip" "KDPrtShipArea13" "Breeder" "EventManagerA".
    mobregen Aggressive "KDPrtShip" "KDPrtShipArea14" "Breeder" "EventManagerA".
    mobregen Aggressive "KDPrtShip" "KDPrtShipArea15" "Breeder" "EventManagerA".
    mobregen Aggressive "KDPrtShip" "KDPrtShipArea16" "Breeder" "EventManagerA".
    mobregen Aggressive "KDPrtShip" "KDPrtShipArea17" "Breeder" "EventManagerA".
    mobregen Aggressive "KDPrtShip" "KDPrtShipArea18" "Breeder" "EventManagerA".
    mobregen Aggressive "KDPrtShip" "KDPrtShipArea19" "Breeder" "EventManagerA".
    mobregen Aggressive "KDPrtShip" "KDPrtShipArea21" "Breeder" "EventManagerA".
    mobregen Aggressive "KDPrtShip" "KDPrtShipArea22" "Breeder" "EventManagerA".
    mobregen Aggressive "KDPrtShip" "KDPrtShipArea23" "Breeder" "EventManagerA".
    mobregen Aggressive "KDPrtShip" "KDPrtShipArea24" "Breeder" "EventManagerA".
    mobregen Aggressive "KDPrtShip" "KDPrtShipArea25" "Breeder" "EventManagerA".
    mobregen Aggressive "KDPrtShip" "KDPrtShipArea26" "Breeder" "EventManagerA".
    mobregen Aggressive "KDPrtShip" "KDPrtShipArea27" "Breeder" "EventManagerA".
    mobregen Aggressive "KDPrtShip" "KDPrtShipArea28" "Breeder" "EventManagerA".
    mobregen Aggressive "KDPrtShip" "KDPrtShipArea29" "Breeder" "EventManagerA".
    mobregen Aggressive "KDPrtShip" "KDPrtShipArea30" "Breeder" "EventManagerA".
    mobregen Aggressive "KDPrtShip" "KDPrtShipArea31" "Breeder" "EventManagerA".
    mobregen Aggressive "KDPrtShip" "KDPrtShipArea32" "Breeder" "EventManagerA".
    mobregen Aggressive "KDPrtShip" "KDPrtShipArea33" "Breeder" "EventManagerA".
    mobregen Aggressive "KDPrtShip" "KDPrtShipArea34" "Breeder" "EventManagerA".
    mobregen Aggressive "KDPrtShip" "KDPrtShipArea35" "Breeder" "EventManagerA".
    mobregen Aggressive "KDPrtShip" "KDPrtShipArea36" "Breeder" "EventManagerA".
    mobregen Aggressive "KDPrtShip" "KDPrtShipArea37" "Breeder" "EventManagerA".
    mobregen Aggressive "KDPrtShip" "KDPrtShipArea38" "Breeder" "EventManagerA".
    mobregen Aggressive "KDPrtShip" "KDPrtShipArea39" "Breeder" "EventManagerA".
    mobregen Aggressive "KDPrtShip" "KDPrtShipArea43" "Breeder" "EventManagerA".
    mobregen Aggressive "KDPrtShip" "KDPrtShipArea44" "Breeder" "EventManagerA".
    mobregen Aggressive "KDPrtShip" "KDPrtShipArea46" "Breeder" "EventManagerA".
    mobregen Aggressive "KDPrtShip" "KDPrtShipArea49" "Breeder" "EventManagerA".
    mobregen Aggressive "KDPrtShip" "KDPrtShipArea50" "Breeder" "EventManagerA".
    mobregen Aggressive "KDPrtShip" "KDPrtShipArea51" "Breeder" "EventManagerA".
    mobregen Aggressive "KDPrtShip" "KDPrtShipArea52" "Breeder" "EventManagerA".
    mobregen Aggressive "KDPrtShip" "KDPrtShipArea53" "Breeder" "EventManagerA".
    mobregen Aggressive "KDPrtShip" "KDPrtShipArea54" "Breeder" "EventManagerA".
    mobregen Aggressive "KDPrtShip" "KDPrtShipArea55" "Breeder" "EventManagerA".
close

open [FirstBoss]
    mobregen Aggressive "KDPrtShip" "KDPrtShipArea47" "Breeder" "EventManagerA".
    mobregen Aggressive "KDPrtShip" "KDPrtShipArea47" "Breeder" "EventManager".

    var MobNum.

    MobNum = 0.
    while MobNum == 0
    open
        howmanymob MobNum "KQ_Mara".
        call "IsTimeUp".
    close

    MobNum = 2.
    while MobNum > 0
    open
        howmanymob MobNum "KQ_Mara".
        call "IsTimeUp".
    close
close

open [SecondBoss]
    mobregen Aggressive "KDPrtShip" "KDPrtShipArea48" "Breeder" "EventManagerA".
    mobregen Aggressive "KDPrtShip" "KDPrtShipArea48" "Breeder" "EventManager".

    var MobNum.

    MobNum = 0.
    while MobNum == 0
    open
        howmanymob MobNum "KQ_Marlone".
        call "IsTimeUp".
    close

    MobNum = 2.
    while MobNum > 0
    open
        howmanymob MobNum "KQ_Marlone".
        call "IsTimeUp".
    close
close

open [LastBoss]
    mobregen Aggressive "KDPrtShip" "KDPrtShipArea40" "Breeder" "EventManagerA".
    mobregen Aggressive "KDPrtShip" "KDPrtShipArea45" "Breeder" "EventManagerA".

    var MobNum.

    MobNum = 0.
    while MobNum == 0
    open
        var Mara.
        var Marlone.
        howmanymob Mara    "KQ_TrueMara".
        howmanymob Marlone "KQ_TrueMarlone".
        MobNum = Mara + Marlone.
        call "IsTimeUp".
    close

    MobNum = 2.
    while MobNum > 0
    open
        var Mara.
        var Marlone.
        howmanymob Mara    "KQ_TrueMara".
        howmanymob Marlone "KQ_TrueMarlone".
        MobNum = Mara + Marlone.
        call "IsTimeUp".
    close
close
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
open [main]
    var MyName.
    var MyHandle.
    myname MyName.
    myhandle MyHandle.

    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
close
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
open [EventManagerA]

    print "EventManagerA : Entry".

    call "WaitPlayerEntry".             ; <EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <EFBFBD><EFBFBD><EFBFBD>ٸ<EFBFBD>

    var KQResult.   ; IsTimeUp<EFBFBD><EFBFBD><EFBFBD><EFBFBD> <EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <EFBFBD><EFBFBD><EFBFBD><EFBFBD>

    open [MainLoop]
        call "RegenZacco".
        call "FirstBoss".
        call "SecondBoss".
        call "LastBoss".
        KQResult = "Success". ; <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

    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>.".
        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>.".
        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_Mara]
    if Breeder === "EventManagerA"          ; <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>
    then
    open
        var Target.
        Target = "".
        while Target === ""
        open
            whoistarget Target.     ; Ÿ<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

        ; Ÿ<EFBFBD>ٹ߰<EFBFBD>
        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>!!!".
    close

    var CurHP.
    CurHP = 100.
    while CurHP > 0         ; <EFBFBD><EFBFBD><EFBFBD><EFBFBD> <EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <EFBFBD><EFBFBD><EFBFBD>ٸ<EFBFBD>
    open
        currenthp CurHP.
    close

    shout all "" "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>, <EFBFBD><EFBFBD>.. <EFBFBD><EFBFBD><EFBFBD>ϴ<EFBFBD>!".
close

open [KQ_Marlone]
    if Breeder === "EventManagerA"          ; <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>
    then
    open
        wait sec 2.
        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>غ<EFBFBD><EFBFBD><EFBFBD> <EFBFBD>϶<EFBFBD>".
    close

    var CurHP.
    CurHP = 100.
    while CurHP > 0         ; <EFBFBD><EFBFBD><EFBFBD><EFBFBD> <EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <EFBFBD><EFBFBD><EFBFBD>ٸ<EFBFBD>
    open
        currenthp CurHP.
    close

    shout all "" "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>, <EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <EFBFBD>ʹ<EFBFBD> <EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ϴ<EFBFBD>!".
close

open [KQ_TrueMara]
    shout all "" "<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <EFBFBD>͵<EFBFBD> <EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>϶<EFBFBD><EFBFBD><EFBFBD>.".
    wait sec 4.
    shout all "" "<EFBFBD><EFBFBD>, ȥ<EFBFBD>ڸ<EFBFBD> <EFBFBD><EFBFBD><EFBFBD>̺<EFBFBD><EFBFBD><EFBFBD> <EFBFBD><EFBFBD> <EFBFBD><EFBFBD><EFBFBD><EFBFBD> <EFBFBD><EFBFBD><EFBFBD><EFBFBD>.".


    mobregen Aggressive "KDPrtShip" "KDPrtShipArea41" "Breeder" "KQ_TrueMara".
    mobregen Aggressive "KDPrtShip" "KDPrtShipArea41" "Breeder" "KQ_TrueMara".

    infinite
    open
        var MobNum.
        howmanymob MobNum "KQ_Mara".
        wait sec 60.
        mobregen Aggressive "KDPrtShip" "KDPrtShipArea41" "Breeder" "EventManagerA".
    close
close

open [KQ_TrueMarlone]
    wait sec 2.
    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>.".

    mobregen Aggressive "KDPrtShip" "KDPrtShipArea42" "Breeder" "KQ_TrueMarlone".
    mobregen Aggressive "KDPrtShip" "KDPrtShipArea42" "Breeder" "KQ_TrueMarlone".

    infinite
    open
        var MobNum.
        howmanymob MobNum "KQ_Marlone".
        wait sec 60.
        mobregen Aggressive "KDPrtShip" "KDPrtShipArea42" "Breeder" "EventManagerA".
    close
close