DevilMine ps script

[comi1991]

Here my Devildom Mine Script:
(I have not posted the correct script, you have to change something!)

open [main]
var InterruptBlock ""
InterruptArg ""

Boss1 ""
Boss2 ""
Boss3 ""
Boss4 ""
Boss5 ""

Entrance ""

Door00 ""
Door01 ""
Door02 ""
Door03 ""
Door04 "".

scriptfile "WarN".

interruptclear. ; Àδø¿¡¼­ ÀÎÅÍ·´Æ®°¡ ÀÚ²Ù ½×ÀÌ´Â Çö»ó ¹æÁö

doorbuild Door00 "T_Gate" 1961 1956 0 1000 "Normal".
doorclose Door00 "DOOR00".
doorbuild Door01 "T_Gate" 6129 6123 0 1000 "Normal".
doorclose Door01 "DOOR01".
doorbuild Door02 "T_Gate" 2064 6171 0 1000 "Normal".
doorclose Door02 "DOOR02".
doorbuild Door03 "T_Gate" 6090 2141 0 1000 "Normal".
doorclose Door03 "DOOR03".



npcstand Entrance "T_Gate02" 4136 793 0 1000 "Normal".
interruptset NPCClickHandle "EntranceClick" 1 Entrance "onEntranceClick".

pause Sec 10.


chatwin "EldSpeGuard01" "Chat0101".
pause Sec 2.
chatwin "EldSpeGuard01" "Chat0102".
pause Sec 2.
chatwin "EldSpeGuard01" "Chat0103".
regengroup "WarN" "v1".
regengroup "WarN" "v2".
regengroup "WarN" "v3".
regengroup "WarN" "v4".
regengroup "WarN" "v5".
call "WaitClearStage".

chatwin "EldSpeGuard01" "Chat0201".


regengroup "WarN" "v2".
regengroup "WarN" "b1".
call "WaitBoss1Dead".
dooropen Door00 "DOOR00".


chatwin "EldSpeGuard01" "Chat0501".
pause Sec 2.
chatwin "EldSpeGuard01" "Chat0502".
pause Sec 2.
chatwin "EldSpeGuard01" "Chat0503".
regengroup "WarN" "v3".
regengroup "WarN" "b2".
call "WaitBoss2Dead".
dooropen Door01 "DOOR01".

chatwin "EldSpeGuard01" "Chat0901".
pause Sec 2.
chatwin "EldSpeGuard01" "Chat0902".

regengroup "WarN" "v4".
regengroup "WarN" "b3".
call "WaitBoss3Dead".
dooropen Door02 "DOOR02".


chatwin "EldSpeGuard01" "Chat1001".
pause Sec 2.
chatwin "EldSpeGuard01" "Chat1002".
pause Sec 2.
chatwin "EldSpeGuard01" "Chat1003".


regengroup "WarN" "v5".
regengroup "WarN" "b4".
call "WaitBoss4Dead".
dooropen Door03 "DOOR03".


chatwin "EldSpeGuard01" "Chat1401".
pause Sec 2.
chatwin "EldSpeGuard01" "Chat1402".
pause Sec 2.
chatwin "EldSpeGuard01" "Chat1403".


regengroup "WarN" "b5".
call "WaitBoss5Dead".
chatwin "EldSpeGuard01" "Chat2001".
pause Sec 2.
chatwin "EldSpeGuard01" "Chat2002".
pause Sec 2.
chatwin "EldSpeGuard01" "Chat2003".

broadcast all "Chat2001System".
pause sec 30.
broadcast all "Chat2002System".
pause sec 20.
broadcast all "Chat2003System".
pause sec 10.

linkto all "RouVal01" "RouVal01" 4661 8208.

; ¶Ç µé¾î¿À´Â ¹Ùº¸°¡ ÀÖÀ»Áö ¸ð¸£´Ï ¹®À» À§Çؼ­
interruptclear.
interruptset NPCClickHandle "EntranceClick" 1 Entrance "onEntranceClick".

infinite
open
waitinterrupt InterruptBlock "InterruptArg".
call InterruptBlock.
close
close

open [onEntranceClick]
var mclicker 0.
whoclickme mclicker InterruptArg.
linkto mclicker "RouVal01" "RouVal01" 4136 8416.
interruptset NPCClickHandle "EntranceClick" 1 Entrance "onEntranceClick".
close

open [WaitClearStage]
; Index¸¦ _NONE_ À̶ó°í ÁÖ¸é ¾î¶² ¸÷/Ç÷¹À̾ Á׾ ÀÎÅÍ·´Æ® ¹ß»ý
; interruptset DeadIndex "AnyMobDead" 1 "_NONE_" "onAnyMobDead".

interruptset MobEliminate "" 1 "onMobEliminate".
; ¸÷µéÀÌ Çѹø ÀüºÎ Á×À¸¸é ¿¬¼ÓÀûÀ¸·Î Eliminate ÀÎÅÍ·´Æ®°¡ ÀϾ´õ¶ó
pause sec 5.

infinite
open
waitinterrupt InterruptBlock "InterruptArg".
call InterruptBlock.
close
close

open [onMobEliminate]
break "WaitClearStage".
close

open [onAnyMobDead]
var Total 0
Guard 0.
; Á×ÀÌÁö ¾Ê¾Æµµ µÉ ¸÷ÀÌ ÀÖ´Ù
Total = @Count("all").
Guard = @Count("Anti_Henis_A14") + @Count("Anti_Henis_A18") + @Count("Anti_Henis_F21") + @Count("Anti_Henis_M24") + @Count("Anti_Henis_M25") + @Count("Anti_Henis_F30") + @Count("Anti_Henis_A32") + @Count("Anti_Henis_C39") + @Count("Anti_Henis_C40") + @Count("Anti_Henis_F29") + @Count("Anti_Henis_A31") + @Count("Anti_Henis_C36") + @Count("Anti_Henis_F47") + @Count("Anti_Henis_C47") + @Count("Anti_Henis_A50") + @Count("Anti_Henis_M50").
Total = Total - Guard.

if Total == 0
then open
break "WaitClearStage".
close
else open
interruptset DeadIndex "AnyMobDead" 1 "_NONE_" "onAnyMobDead".
close
close

open [WaitBoss1Dead]
pause sec 1.
findhandle Boss1 "T_DustGolem" 0.
interruptset HPLow "Boss1HP80" 1 Boss1 800 "onBoss1HP80".
interruptset HPLow "Boss1HP20" 1 Boss1 200 "onBoss1HP20".
interruptset DeadIndex "Boss1Dead" 1 "T_DustGolem" "onBoss1Dead".

infinite
open
waitinterrupt InterruptBlock "InterruptArg".
call InterruptBlock.
close
close

open[onBoss1HP80]
chatwin "EldSpeGuard01" "Chat0501Boss".
summonmob Boss1 "T_Imp" 4.
summonmob Boss1 "T_GangImp" 4.
close

open[onBoss1HP20]
chatwin "EldSpeGuard01" "Chat0502Boss".
summonmob Boss1 "T_HungryWolf" 2.
summonmob Boss1 "T_Ratman" 2.
close

open[onBoss1Dead]
suicide all.
break "WaitBoss1Dead".
close

open [WaitBoss2Dead]
pause sec 1.
findhandle Boss2 "T_StoneGolem" 0.
interruptset HPLow "Boss2HP70" 1 Boss2 700 "onBoss2HP70".
interruptset HPLow "Boss2HP20" 1 Boss2 200 "onBoss2HP20".
interruptset DeadIndex "Boss2Dead" 1 "T_StoneGolem" "onBoss2Dead".

infinite
open
waitinterrupt InterruptBlock "InterruptArg".
call InterruptBlock.
close
close

open[onBoss2HP70]
chatwin "EldSpeGuard01" "Chat1001Boss".
summonmob Boss2 "T_SkelArcher01" 2.
close

open[onBoss2HP20]
chatwin "EldSpeGuard01" "Chat1002Boss".
summonmob Boss2 "T_SkelWarrior" 3.
summonmob Boss2 "T_SkelArcher02" 1.
close

open[onBoss2Dead]
suicide all.
break "WaitBoss2Dead".
close

open [WaitBoss3Dead]
pause sec 1.
findhandle Boss3 "T_PoisonGolem" 0.
interruptset HPLow "Boss3HP70" 1 Boss3 700 "onBoss3HP70".
interruptset HPLow "Boss3HP20" 1 Boss3 200 "onBoss3HP20".
interruptset DeadIndex "Boss3Dead" 1 "T_PoisonGolem" "onBoss3Dead".

infinite
open
waitinterrupt InterruptBlock "InterruptArg".
call InterruptBlock.
close
close

open[onBoss3HP70]
chatwin "EldSpeGuard01" "Chat1401Boss".
summonmob Boss3 "T_OldFox" 4.
summonmob Boss3 "T_DesertWolfC" 4.
close

open[onBoss3HP20]
chatwin "EldSpeGuard01" "Chat1402Boss".
summonmob Boss3 "T_Ghost" 4.
summonmob Boss3 "T_IceViVi" 4.
close

open[onBoss3Dead]
suicide all.
break "WaitBoss3Dead".
close

open [WaitBoss4Dead]
pause sec 1.
findhandle Boss4 "T_PoisonGolem" 0.
interruptset HPLow "Boss4HP70" 1 Boss4 700 "onBoss4HP70".
interruptset HPLow "Boss4HP20" 1 Boss4 200 "onBoss4HP20".
interruptset DeadIndex "Boss4Dead" 1 "T_PoisonGolem" "onBoss4Dead".

infinite
open
waitinterrupt InterruptBlock "InterruptArg".
call InterruptBlock.
close
close

open[onBoss4HP70]
chatwin "EldSpeGuard01" "Chat1401Boss".
summonmob Boss4 "T_OldFox" 4.
summonmob Boss4 "T_DesertWolfC" 4.
close

open[onBoss4HP20]
chatwin "EldSpeGuard01" "Chat1402Boss".
summonmob Boss4 "T_Ghost" 4.
summonmob Boss4 "T_IceViVi" 4.
close

open[onBoss4Dead]
suicide all.
break "WaitBoss4Dead".
close

open [WaitBoss5Dead]
pause sec 1.
findhandle Boss5 "T_IronGolem" 0.
interruptset HPLow "Boss5HP70" 1 Boss5 700 "onBoss5HP70".
interruptset HPLow "Boss5HP50" 1 Boss5 500 "onBoss5HP50".
interruptset HPLow "Boss5HP20" 1 Boss5 200 "onBoss5HP20".
interruptset DeadIndex "Boss5Dead" 1 "T_IronGolem" "onBoss5Dead".

infinite
open
waitinterrupt InterruptBlock "InterruptArg".
call InterruptBlock.
close
close

open[onBoss5HP70]
chatwin "EldSpeGuard01" "Chat2001Boss".
summonmob Boss5 "T_Prock" 1.
summonmob Boss5 "T_Spider00" 4.
close

open[onBoss5HP50]
chatwin "EldSpeGuard01" "Chat2002Boss".
summonmob Boss5 "T_KingCall" 2.
close

open[onBoss5HP20]
chatwin "EldSpeGuard01" "Chat2003Boss".
summonmob Boss5 "T_FlyingStaff01" 2.
summonmob Boss5 "T_IronSlime01" 2.
close

open[onBoss5Dead]
suicide all.
break "WaitBoss5Dead".
close

[MentaL]