You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
 
 

265 lines
9.5 KiB

open [Regen1stLayer]
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".
call "WaitMobRegen".
call "WaitMobAnnihilation".
close
open [Regen2ndLayer]
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".
call "WaitMobRegen".
call "WaitMobAnnihilation".
close
open [Regen3rdLayer]
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".
call "WaitMobRegen".
call "WaitMobAnnihilation".
close
open [RegenTopLayer]
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".
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. ; <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 [WaitMobRegen]
var Mob.
Mob = 0.
while Mob == 0
open
howmanymob Mob "All". ; <EFBFBD><EFBFBD><EFBFBD><EFBFBD> <EFBFBD><EFBFBD><EFBFBD><EFBFBD> Ȯ<EFBFBD><EFBFBD>
close
close
open [WaitMobAnnihilation]
var Mob.
Mob = 10.
while Mob > 0
open
howmanymob Mob "All". ; <EFBFBD><EFBFBD><EFBFBD><EFBFBD> <EFBFBD><EFBFBD><EFBFBD><EFBFBD> Ȯ<EFBFBD><EFBFBD>
call "IsTimeUp".
close
close
open [WaitKingSlimeKill]
var Mob.
Mob = 10.
while Mob > 0
open
howmanymob Mob "KQ_KingSlime". ; ŷ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <EFBFBD><EFBFBD><EFBFBD><EFBFBD> Ȯ<EFBFBD><EFBFBD>
call "IsTimeUp".
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 [main]
var MyName.
var MyHandle.
myname MyName. ; <EFBFBD><EFBFBD> <EFBFBD≯<EFBFBD><EFBFBD><EFBFBD> <EFBFBD><EFBFBD><EFBFBD>´<EFBFBD>(<EFBFBD><EFBFBD><EFBFBD>ε<EFBFBD><EFBFBD><EFBFBD>)
myhandle MyHandle.
call MyName "DefRoutine". ; <EFBFBD>ε<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <EFBFBD><EFBFBD>ƾ ȣ<EFBFBD><EFBFBD>
close
open [DefRoutine]
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 "Regen1stLayer".
call "Regen2ndLayer".
call "Regen3rdLayer".
call "RegenTopLayer".
mobregen Aggressive "KDEddyHill" "KDEddyHillArea01" "Breeder" "KingSlime". ; ŷ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <EFBFBD><EFBFBD><EFBFBD><EFBFBD>
call "WaitMobRegen".
call "WaitKingSlimeKill".
KQResult = "Success".
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>.".
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_KingSlime]
var SummonHPRate.
var MaxHP.
currenthp MaxHP.
SummonHPRate = 1000.
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>".
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>!!!".
while SummonHPRate > 0
open
var CurHP.
var CurHPRate.
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>!!!!
print "MaxHP[" % MaxHP % "] CurHP[" % CurHP % "] CurHPRate[" % CurHPRate % "] SummonHPRate[" % SummonHPRate % "]".
if CurHPRate < SummonHPRate
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>Ͽ<EFBFBD><EFBFBD><EFBFBD>!!".
call "KingSlimeSummon".
SummonHPRate = SummonHPRate - 200.
close
close
; ŷ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <EFBFBD>׾<EFBFBD><EFBFBD><EFBFBD>
var Mobs.
howmanymob Mobs "all".
if Mobs < 15
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>ΰ<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