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.

80 lines
1.8 KiB

open [main]
var InterruptBlock 0
InterruptArg 0
BossHandle 0
BossRegenX 0
BossRegenY 0
BossCoord InitFlag
BossIndex "Event_Monkey_Boss"
SummonIndex "Event_Monkey_Sub"
.
BossRegenX = @RemoveFirst("BossCoord" " ").
BossRegenY = BossCoord.
infinite
open [InfiniteLoop]
mobregen BossHandle BossIndex BossRegenX BossRegenY 90 1000 "Normal".
abstateset BossHandle "StaMonkeyDefense" 1 4000000000.
interruptclear.
interruptset HPLow "" 1 BossHandle 900 "SummonMonkey".
interruptset DeadHandle "" 1 BossHandle "BossDead".
infinite
open
waitinterrupt InterruptBlock "InterruptArg".
call InterruptBlock.
close
close
close
open [SummonMonkey]
var num @Count(SummonIndex)
MobList "".
; printf "Summon Number : " % num.
hpset BossHandle 99999999.
interruptset HPLow "" 1 BossHandle 900 "SummonMonkey".
if num < 30 then ; <EFBFBD>ִ<EFBFBD> <EFBFBD><EFBFBD>ȯ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> 50 - 1 + 10 = 59<EFBFBD><EFBFBD><EFBFBD><EFBFBD>
open
summonmob BossHandle SummonIndex 10.
close
else open
break "SummonMonkey".
close
pause Sec 1.
MobList = @GetObjectList(BossHandle "MOB").
open [AbstateAll]
var MobObject 0.
infinite
open
MobObject = @RemoveFirst("MobList" " ").
if MobObject == "" ; <EFBFBD><EFBFBD><EFBFBD>̻<EFBFBD> ã<EFBFBD><EFBFBD><EFBFBD><EFBFBD> <EFBFBD><EFBFBD><EFBFBD><EFBFBD>
then open
break "AbstateAll".
close
abstateset MobObject "StaMonkeyDefense" 1 4000000000.
close
close
close
open [BossDead]
;pause Sec 60. ; <EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <EFBFBD><EFBFBD><EFBFBD><EFBFBD> <EFBFBD><EFBFBD> 1<EFBFBD><EFBFBD> <EFBFBD><EFBFBD> <EFBFBD><EFBFBD><EFBFBD><EFBFBD>
pause Minute 1. ; <EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <EFBFBD><EFBFBD><EFBFBD><EFBFBD> <EFBFBD><EFBFBD> 1<EFBFBD><EFBFBD> <EFBFBD><EFBFBD> <EFBFBD><EFBFBD><EFBFBD><EFBFBD>
break "InfiniteLoop".
close