;;;;;;;;; Reward NPC - Toxin ;;;;;;;;;

[@main]
#IF
   ISADMIN
#SAY
\
Teleport locations for GM's only.\
<[ Call Quest System ]/@QQQ>\
<[ JP Tester NPCs ]/@MoveToTester>\
<[ Move to OldBichon ]/@MoveToOB>\
<[ AddStat ]/@AddStat>\
<[ MonGen ]/@SpawnEvent>\
<[ Item Creation Test ]/@ItemCreationTest>\
<[ Auto Store Test ]/@AutoStoreTest>\
<[ EXP Int Test ]/@CALLExpIntTest>\
<[ Reset VIP LEVEL ]/@DAVEIntExp>\
<[ Group Test ]/@GroupTest>\
<[ Capture Samak ]/@CapSam>\
<[ Save Guild Name ]/@SaveG>\
\\\\
{FCOLOR/0} 0 - Black\
{FCOLOR/1} 1 - Bright Red\
{FCOLOR/2} 2 - Light Green\
{FCOLOR/3} 3 - Amber\
{FCOLOR/4} 4 - Grey\
{FCOLOR/5} 5 - Dark Red\
{FCOLOR/6} 6 - Light Blue\
{FCOLOR/7} 7 - Dark Blue\
{FCOLOR/8} 8 - White\
{FCOLOR/9} 9 - Magenta\
{FCOLOR/10} 10 - Bright Green\
{FCOLOR/11} 11 - Bright Blue\
{FCOLOR/12} 12 - Bright White\
{FCOLOR/13} 13 - Bright Magenta\
{FCOLOR/14} 14 - Bright Light Blue\
{FCOLOR/15} 15 - Bright Yellow\
{FCOLOR/16} 16\
{FCOLOR/17} 17\
{FCOLOR/18} 18\
{FCOLOR/19} 19\
{FCOLOR/20} 20\
{FCOLOR/21} 21\
{FCOLOR/22} 22\
{FCOLOR/23} 23\
{FCOLOR/24} 24\
{FCOLOR/25} 25\
{FCOLOR/26} 26\
{FCOLOR/27} 27\
{FCOLOR/28} 28\
{FCOLOR/29} 29\\\\\\

[@SaveG]
#ACT
Mov A0 %GUILDNAME
SaveLog "QuestDiary\System\GuildNoticeBoard\GuildInfo.txt" %A0
#SAY
Done

[@QQQ]
#IF
#ACT
   FormatStr "Name='%s'" %USERNAME   
   ReadValueSql  "Mainquest"  %A9  "QuestLevel,Qsect,QPoint" [@Main2]   

 
[@Main2()]
#IF
#ACT                        ;;;;;   LOADS VARIABLES
   Mov   D1      %ARG(1)
   Mov	 D2      %ARG(2) 
   Mov	 D7      %ARG(3) 
   LoadValue D9 "QuestDiary\MONKILLCOUNT.txt" Q1 %USERNAME
   LoadValue D8 "QuestDiary\MONKILLCOUNT.txt" Q2 %USERNAME

#IF
   checkpkpoint 2           ;;;;;   ONLY FOR PKERS
#SAY
#INCLUDE [..\Market_Def\00Standard.txt] @MainHeader
   Sorry <$USERNAME> We Do Not Deal With Criminals.\
   #INCLUDE [..\Market_Def\00Standard.txt] @MainFooter
#ACT
   Break

#IF
   EQUAL D1 0
#ACT
   goto @Newbie             ;;;;;   Quest Level 0 (Newbie)

;#IF
;   EQUAL D1 1
;#ACT
;   Goto @Level1             ;;;;;   Quest Level 1
;
;#IF
;   EQUAL D1 2
;#ACT
;   Goto @Level2             ;;;;;   Quest Level 2
;
;#IF
;   EQUAL D1 3
;#ACT
;   Goto @Level3             ;;;;;   Quest Level 3


;[@Level1]
;#CALL [BM355Quest\Level1.txt] @lvl1

;[@Level2]
;#CALL [BM355Quest\Level2.txt] @lvl2

;[@Level3]
;#CALL [BM355Quest\Level3.txt] @lvl3


;;;;;;;;;;;;;;;;;;;;;;;;   Newbie Script ;;;;;;;;;;;;;;;;;;;

[@Newbie]

;;;;;;;;;;;;;;;;;;Quest 1
#IF
#ACT
   Mov A1 "First Things First: Part 1"
   Mov A2 "1+"
   Mov A3 "15 x [Hens]"
   Mov A4 ""

#IF
   EQUAL D2 0
#ACT
   goto @UpdateUser

#IF
   EQUAL D2 1
   ELarge D9 15
#ACT
   goto @UpdateUserNext
   Break

#IF
   EQUAL D2 1
#ACT
   goto @UpdateUserRecap

;;;;;;;;;;;;;;;;;;Quest 2
#IF
#ACT
   Mov A1 "First Things First: Part 2"
   Mov A2 "5+"
   Mov A3 "15 x [Pigs]"
   Mov A4 ""

#IF
   EQUAL D2 2
#ACT
   goto @UpdateUser

#IF
   EQUAL D2 3
   ELarge D9 15
#ACT
   goto @UpdateUserNext
   Break

#IF
   EQUAL D2 3
#ACT
   goto @UpdateUserRecap

;;;;;;;;;;;;;;;;;;Quest 3
#IF
#ACT
   Mov A1 "First Things First: Part 3"
   Mov A2 "10+"
   Mov A3 "15 x [Deer]"
   Mov A4 ""

#IF
   EQUAL D2 4
#ACT
   goto @UpdateUser

#IF
   EQUAL D2 5
   ELarge D9 15
#ACT
   goto @UpdateUserNext
   Break

#IF
   EQUAL D2 5
#ACT
   goto @UpdateUserRecap

;;;;;;;;;;;;;;;;;;Quest 4
#IF
#ACT
   Mov A1 "First Things First: Part 4"
   Mov A2 "10+"
   Mov A3 "25 x [Scarecrow]"
   Mov A4 "25 x [HookingCat]"
#IF
   EQUAL D2 6
#ACT
   goto @UpdateUser

#IF
   EQUAL D2 7
   ELarge D8 25
   ELarge D9 25
#ACT
   goto @UpdateUserNext
   Break

#IF
   EQUAL D2 7
#ACT
   goto @UpdateUserRecap

;;;;;;;;;;;;;;;;;;Quests Complete

#IF
   EQUAL D2 8
#SAY
   #INCLUDE [..\Market_Def\00Standard.txt] @MainHeader
   All complete\
   #INCLUDE [..\Market_Def\00Standard.txt] @MainFooter

;;;;;;;;;;;;;;;;;;;;;;;Update the User Messages

[@UpdateUser]
#IF
#SAY
   #INCLUDE [..\Market_Def\00Standard.txt] @MainHeader

#IF
   Equal A4 ""
#SAY
   #INCLUDE [..\Market_Def\00Standard.txt] @QuestNormalInfo
#ELSESAY
   #INCLUDE [..\Market_Def\00Standard.txt] @QuestNormalInfoMobs2
#IF
#SAY
   #INCLUDE [..\Market_Def\00Standard.txt] @MainFooter
#ACT
   Inc D2 1
   SaveValue "QuestDiary\MONKILLCOUNT.txt" Q1 %USERNAME 0
   SaveValue "QuestDiary\MONKILLCOUNT.txt" Q2 %USERNAME 0
   goto @UpdateQuestSQL

[@UpdateUserRecap]
#IF
#SAY
   #INCLUDE [..\Market_Def\00Standard.txt] @MainHeader

#IF
   Equal A4 ""
#SAY
   #INCLUDE [..\Market_Def\00Standard.txt] @QuestNormalInfo
#ELSESAY
   #INCLUDE [..\Market_Def\00Standard.txt] @QuestNormalInfoMobs2
#IF
#SAY
   #INCLUDE [..\Market_Def\00Standard.txt] @MainFooter


[@UpdateUserNext]
#SAY
   #INCLUDE [..\Market_Def\00Standard.txt] @MainHeader
   #INCLUDE [..\Market_Def\00Standard.txt] @QuestNextInfo
   #INCLUDE [..\Market_Def\00Standard.txt] @MainFooter


;;;;;;;;;;;;;;;;;;;;;;;; Next Quest
[@nxtst]
#ACT
   SaveValue "QuestDiary\MONKILLCOUNT.txt" Q1 %USERNAME 0
   SaveValue "QuestDiary\MONKILLCOUNT.txt" Q2 %USERNAME 0
   Inc D7 1
   Inc D2 1
   SYSMSG "Quest Point Recieved and Quest Diary Updated"
   Goto @UpdateQuestSQL

;;;;;;;;;;;;;;;;;;;;;;;; Next Level

[@nxtst1]
#ACT
   SaveValue "QuestDiary\MONKILLCOUNT.txt" Q1 %USERNAME 0
   SaveValue "QuestDiary\MONKILLCOUNT.txt" Q2 %USERNAME 0
   Inc D7 4
   Inc D1 1
   Mov D2 0
   SYSMSG "4x Quest Points Recieved and Quest Section Completed"
   Goto @UpdateQuestSQL

;;;;;;;;;;;;;;;;;;;;;;;; Update SQL

[@UpdateQuestSQL]
#ACT
   FormatStr "Name='%s'" %USERNAME      
   Mov   A8     %A9  
   FormatStr "QPoint=%s,Qsect=%s,QuestLevel=%s" %D7 %D2 %D1
   UPDATEVALUESQL "MainQuest" %A8 %A9
   Goto @QQQ

;;;;;;SCRIPT BY GEO - WWW.LOMCN.CO.UK;;;;;;

[@CapSam]
#ACT
CAPTURECASTLEFLAG [TAOSUNG]
linemsg Grobal "'<$GUILD>' has captured SamakWall!"


[@GroupTest]
#IF
CHECKGROUPCOUNT
#ACT
MOV   D1 %P9
#SAY
Quantity = <$OUTPUT(D1)>
#ELSESAY
None in Group

[@DAVEIntExp]
#IF
#ACT
HLSCRIPTCMD SETVIPLEVEL 0
HLSCRIPTCMD SETVIPTIME 0
#SAY
Back to norm.

[@AutoStoretest]
#CALL [System\DangerMouse\AutoStore.txt] @AutoStoreMain

[@SpawnEvent]
#SAY
    GM Spawn Event - Menu \
\
Firstly, choose a map that you'd like the event to take\
place on.\
<[ OldBichon ]/@EventSpawnOldBichon>\
<[ SabukWall ]/@EventSpawnSabuk>\
<[ PKVillage ]/@EventSpawnPKVillage> - Not working yet\
<[ DMEvent ]/@EventSpawnDMEvent> - DangerMouse *DONT USE*\
\
<[ Exit ]/@exit>\\\

[@EventSpawnDMEvent]
#SAY
Next, choose one of the listed events to start it off.\
\
<[ Bichon ]/@EventDMBichon>\
\
<[ Exit ]/@exit>\\\

[@EventDMBichon]
#SAY
Done!!
#ACT
Eventmsg Grobal "Spencer: Help!!! Bichon is under attack! StingKing's minions are visible on the horizon!!" 29

Delaygoto [Grobal] 60 @EventDMBichon1

[@EventDMBichon1]
#ACT
Eventmsg Grobal "StingKing: Go my soldiers, claim what is rightfully mine!" 29
MonGenP "0,141,233,5" ScareCrow 13
AddPath 161, 233
ApplyPath "0,141,233,5" ScareCrow
ClearPath

MonGenP "0,166,247,5" ScareCrow 13
AddPath 161, 233
ApplyPath "0,166,247,5" ScareCrow
ClearPath

MonGenP "0,141,233,5" HookkingCat 13
AddPath 161, 233
ApplyPath "0,141,233,5" HookingCat
ClearPath

MonGenP "0,166,247,5" HookingCat 13
AddPath 161, 233
ApplyPath "0,166,247,5" HookingCat
ClearPath

MonGenP "0,141,233,5" ForestYeti 13
AddPath 161, 233
ApplyPath "0,141,233,5" ForestYeti
ClearPath

MonGenP "0,166,247,5" ForestYeti 13
AddPath 161, 233
ApplyPath "0,166,247,5" ForestYeti
ClearPath

MonGenP "0,141,233,5" Oma 13
AddPath 161, 233
ApplyPath "0,141,233,5" Oma
ClearPath

MonGenP "0,166,247,5" Oma 13
AddPath 161, 233
ApplyPath "0,166,247,5" Oma
ClearPath

MonGenP "0,141,233,2" OmaChief 1
AddPath 161, 233
ApplyPath "0,141,233,2" OmaChief
ClearPath

MonGenP "0,166,247,1" OmaChief 1
AddPath 161, 233
ApplyPath "0,166,247,1" OmaChief 
ClearPath

Delaygoto [Grobal] 120 @EventDMBichon2

[@EventDMBichon2]
#ACT
Eventmsg Grobal "StingKing: I have underestimated you, time to send in reinforcements!" 29
MonGenP "0,141,233,5" WoomaSoldier 13
AddPath 161, 233
ApplyPath "0,141,233,5" WoomaSoldier
ClearPath

MonGenP "0,166,247,5" WoomaSoldier 13
AddPath 161, 233
ApplyPath "0,166,247,5" WoomaSoldier 
ClearPath

MonGenP "0,141,233,5" WoomaWarrior 13
AddPath 161, 233
ApplyPath "0,141,233,5" WoomaWarrior 
ClearPath

MonGenP "0,166,247,5" WoomaWarrior 13
AddPath 161, 233
ApplyPath "0,166,247,5" WoomaWarrior 
ClearPath

MonGenP "0,141,233,5" FlamingWooma 13
AddPath 161, 233
ApplyPath "0,141,233,5" FlamingWooma 
ClearPath

MonGenP "0,166,247,5" FlamingWooma 13
AddPath 161, 233
ApplyPath "0,166,247,5" FlamingWooma 
ClearPath

MonGenP "0,141,233,5" WoomaTaurus 1
AddPath 161, 233
ApplyPath "0,141,233,5" WoomaTaurus 
ClearPath

Delaygoto [Grobal] 120 @EventDMBichon3

[@EventDMBichon3]
#ACT
Eventmsg Grobal "StingKing: SEND IN THE UNDEAD!!!" 29
MonGenP "0,141,233,5" Zombie1 13
AddPath 161, 233
ApplyPath "0,141,233,5" Zombie1 
ClearPath

MonGenP "0,166,247,5" Zombie1 13
AddPath 161, 233
ApplyPath "0,166,247,5" Zombie1 
ClearPath

MonGenP "0,141,233,5" Zombie3 13
AddPath 161, 233
ApplyPath "0,141,233,5" Zombie2 
ClearPath

MonGenP "0,166,247,5" Zombie3 13
AddPath 161, 233
ApplyPath "0,166,247,5" Zombie2 
ClearPath

MonGenP "0,141,233,5" Zombie3 13
AddPath 161, 233
ApplyPath "0,141,233,5" Zombie3 
ClearPath

MonGenP "0,166,247,5" Zombie3 13
AddPath 161, 233
ApplyPath "0,166,247,5" Zombie3 
ClearPath

MonGenP "0,141,233,5" Zombie4 13
AddPath 161, 233
ApplyPath "0,141,233,5" Zombie4 
ClearPath

MonGenP "0,166,247,5" Zombie4 13
AddPath 161, 233
ApplyPath "0,166,247,5" Zombie4 
ClearPath

MonGenP "0,141,233,5" Ghoul 1
AddPath 161, 233
ApplyPath "0,141,233,5" Ghoul
ClearPath

MonGenP "0,166,247,5" Ghoul 1
AddPath 161, 233
ApplyPath "0,166,247,5" Ghoul
ClearPath

Delaygoto [Grobal] 120 @EventDMBichon4

[@EventDMBichon4]
#ACT
Eventmsg Grobal "StingKing: It's time to ressurect some old friends!!!" 29
MonGenP "0,141,233,5" Skeleton 13
AddPath 161, 233
ApplyPath "0,141,233,5" Skeleton
ClearPath

MonGenP "0,166,247,5" Skeleton 13
AddPath 161, 233
ApplyPath "0,166,247,5" Skeletton
ClearPath

MonGenP "0,141,233,5" AxeHurler 13
AddPath 161, 233
ApplyPath "0,141,233,5" AxeHurler 
ClearPath

MonGenP "0,166,247,5" AxeHurler 13
AddPath 161, 233
ApplyPath "0,166,247,5" AxeHurler 
ClearPath

MonGenP "0,141,233,5" SkeletonAxeMan 13
AddPath 161, 233
ApplyPath "0,141,233,5" SkeletonAxeMan 
ClearPath

MonGenP "0,166,247,5" SkeletonAxeMan 13
AddPath 161, 233
ApplyPath "0,166,247,5" SkeletonAxeMan 
ClearPath

MonGenP "0,141,233,5" BoneCaptain 1
AddPath 161, 233
ApplyPath "0,141,233,5" BoneCaptain 
ClearPath

MonGenP "0,166,247,5" BoneCaptain 1
AddPath 161, 233
ApplyPath "0,166,247,5" BoneCaptain 
ClearPath

Delaygoto [Grobal] 120 @EventDMBichon5

[@EventDMBichon5]
#ACT
Eventmsg Grobal "StingKing: Arrrghh, Bichon is safe... For Now!!!!" 29
break

[@EventSpawnOldBichon]
#SAY
Next, choose one of the listed events to start it off.\
\
<[ The Beatles ]/@EventOBBeatles> This event will randomly spawn around\
250 Chickens around OldBichon, each one named after\
a Beatle.  The exp range of them is 10k to 32k a mob.\
Aim this event at 40's to 60's.\
\
<[ Exit ]/@exit>\\\

[@EventOBBeatles]
#SAY
Done!
#ACT
MonGenP "10,300,265,250" John 100
MonGenP "10,300,265,250" Paul 80
MonGenP "10,300,265,250" George 60
MonGenP "10,300,265,250" Ringo 30
break

[@EventSpawnSabuk]
#SAY
Choose one of the listed events below.\
\
<[ Boss Wars ]/@EventSabukBoss_1> Click this one to spawn a\
fixed amount of bosses and subs inside the Sabuk\
castle walls.  These won't spawn at the same time\
instead they will be staggered over a period of\
60mins.  Post on the forum if you think any of\
the times or mobs need adjusting.\
\
<[ Mini Boss Wars ]/@EventMiniSabukBoss_1> \
Click this one to spawn a\
smaller amount of bosses and subs inside the Sabuk\
castle walls.  These won't spawn at the same time\
instead they will be staggered over a period of\
30mins.  Post on the forum if you think any of\
the times or mobs need adjusting.\
\
<[ Exit ]/@exit>\\\

[@EventSabukBossBegin]
#ACT
Eventmsg Grobal "Sabuk is about to be attacked. We need help! Please come quickly!" 10432

Delaygoto [Grobal] 30 @EventSabukBoss_1 10001

[@EventSabukBoss_1]
#SAY
Event started.\\
#ACT
Eventmsg "3" "It's the WoomaTaurus and his gang. His reinforcements will arrive in 2 minutes! Kill fast!" 10432
MonGenP "3,180,120,5" WoomaTaurus 1
MonGenP "3,180,120,5" WoomaGuardian 5
MonGenP "3,180,120,5" WoomaSoldier 15
MonGenP "3,180,120,5" WoomaFighter 15
MonGenP "3,180,120,5" FlamingWooma 15
MonGenP "3,210,125,5" WoomaTaurus 1
MonGenP "3,210,125,5" WoomaGuardian 5
MonGenP "3,210,125,5" WoomaSoldier 15
MonGenP "3,210,125,5" WoomaFighter 15
MonGenP "3,210,125,5" FlamingWooma 15
MonGenP "3,212,92,5" WoomaTaurus 1
MonGenP "3,212,92,5" WoomaGuardian 5
MonGenP "3,212,92,5" WoomaSoldier 15
MonGenP "3,212,92,5" WoomaFighter 15
MonGenP "3,212,92,5" FlamingWooma 15

Delaygoto [Grobal] 120 @EventSabukBoss_2 10001

[@EventSabukBoss_2]
#ACT
Eventmsg "3" "The BoarKing and his cronies have come to support the Wooma's! The next wave will attack in 2.5mins!" 10432
MonGenP "3,210,125,5" BoarKing 1
MonGenP "3,210,125,5" WhiteBoar 5
MonGenP "3,210,125,5" RedBoar 20
MonGenP "3,210,125,5" BlackBoar 20
MonGenP "3,210,125,5" WedgeMoth 25
MonGenP "3,210,145,5" BoarKing 1
MonGenP "3,210,145,5" WhiteBoar 5
MonGenP "3,210,145,5" RedBoar 20
MonGenP "3,210,145,5" BlackBoar 20
MonGenP "3,210,145,5" WedgeMoth 25
MonGenP "3,232,123,5" BoarKing 1
MonGenP "3,232,123,5" WhiteBoar 5
MonGenP "3,232,123,5" RedBoar 20
MonGenP "3,232,123,5" BlackBoar 20
MonGenP "3,232,123,5" WedgeMoth 25

Delaygoto [Grobal] 150 @EventSabukBoss_3 10001

[@EventSabukBoss_3]
#ACT
Eventmsg "3" "They've used HoneyBombs! The insects are infesting the castle! Exterminate the bugs before the next attack force arrives.  2.5mins!" 10432
MonGenP "3,180,120,5" EvilCentipede 1
MonGenP "3,180,120,5" GreatTongs 5
MonGenP "3,180,120,5" Tongs 25
MonGenP "3,180,120,5" BlackMaggot 20
MonGenP "3,180,120,5" Centipede 25
MonGenP "3,210,125,5" EvilCentipede 1
MonGenP "3,210,125,5" GreatTongs 5
MonGenP "3,210,125,5" Tongs 25
MonGenP "3,210,125,5" BlackMaggot 20
MonGenP "3,210,125,5" Centipede 25
MonGenP "3,212,92,5" EvilCentipede 1
MonGenP "3,212,92,5" GreatTongs 5
MonGenP "3,212,92,5" Tongs 25
MonGenP "3,212,92,5" BlackMaggot 20
MonGenP "3,212,92,5" Centipede 25

Delaygoto [Grobal] 150 @EventSabukBoss_4 10001

[@EventSabukBoss_4]
#ACT
Eventmsg "3" "The monstrous ZumaTemple beasts are flocking over the walls. We've only got 3mins until the next wave!" 10432
MonGenP "3,180,120,5" ZumaTaurus 1
MonGenP "3,180,120,5" ZumaGuard 5
MonGenP "3,180,120,5" ZumaArcher 25
MonGenP "3,180,120,5" ZumaStatue 20
MonGenP "3,180,120,5" KillerRat 25
MonGenP "3,210,125,5" ZumaTaurus 1
MonGenP "3,210,125,5" ZumaGuard 5
MonGenP "3,210,125,5" ZumaArcher 25
MonGenP "3,210,125,5" ZumaStatue 20
MonGenP "3,210,125,5" KillerRat 25
MonGenP "3,212,92,5" ZumaTaurus 1
MonGenP "3,212,92,5" ZumaGuard 5
MonGenP "3,212,92,5" ZumaArcher 25
MonGenP "3,212,92,5" ZumaStatue 20
MonGenP "3,212,92,5" KillerRat 25

Delaygoto [Grobal] 180 @EventSabukBoss_5 10001

[@EventSabukBoss_5]
#ACT
Eventmsg "3" "The beasts of Red Moon Valley are here!. We've only got 4 mins until the next wave!" 10432
;MonGenP "3,225,95,5" RedMoonEvil 1
MonGenP "3,225,95,5" GreatDarkArachnid 3
MonGenP "3,225,95,5" ApeKing 3
MonGenP "3,225,95,5" EvilApe 25
MonGenP "3,225,95,5" SpiderBat 20
MonGenP "3,225,95,5" VenomArachnid 25
MonGenP "3,225,95,5" DarkArachnid 25
MonGenP "3,225,95,5" GrenadeArachnid 15
;MonGenP "3,192,144,5" RedMoonEvil 1
MonGenP "3,192,144,5" GreatDarkArachnid 3
MonGenP "3,192,144,5" ApeKing 3
MonGenP "3,192,144,5" EvilApe 25
MonGenP "3,192,144,5" SpiderBat 20
MonGenP "3,192,144,5" VenomArachnid 25
MonGenP "3,192,144,5" DarkArachnid 25
MonGenP "3,192,144,5" GrenadeArachnid 15

Delaygoto [Grobal] 240 @EventSabukBoss_6 10001

[@EventSabukBoss_6]
#ACT
Eventmsg "3" "There! On the horizon! MINOTAURS!!!  Kill them before they burn down the palace! 4.5mins to go!" 10432
MonGenP "3,180,120,5" MinoTaurKing 1
MonGenP "3,180,120,5" MinotaurChief 5
MonGenP "3,180,120,5" IceMinotaur 25
MonGenP "3,180,120,5" WindMinotaur 20
MonGenP "3,180,120,5" RightGuard 25
MonGenP "3,180,120,5" LeftGuard 25
MonGenP "3,210,125,5" MinoTaurKing 1
MonGenP "3,210,125,5" MinotaurChief 5
MonGenP "3,210,125,5" IceMinotaur 25
MonGenP "3,210,125,5" WindMinotaur 20
MonGenP "3,210,125,5" RightGuard 25
MonGenP "3,210,125,5" LeftGuard 25
MonGenP "3,212,92,5" MinoTaurKing 1
MonGenP "3,212,92,5" MinotaurChief 5
MonGenP "3,212,92,5" IceMinotaur 25
MonGenP "3,212,92,5" WindMinotaur 20
MonGenP "3,212,92,5" RightGuard 25
MonGenP "3,212,92,5" LeftGuard 25

Delaygoto [Grobal] 270 @EventSabukBoss_7 10001

[@EventSabukBoss_7]
#ACT
Eventmsg "3" "The ForbiddenKing has brought his minions to take the wall!  Kill them before they kill you!" 10432
MonGenP "3,180,120,5" ForbiddenKing 1
MonGenP "3,180,120,5" ForbiddenGeneral 5
MonGenP "3,180,120,5" ForbiddenArcher 25
MonGenP "3,180,120,5" ForbiddenGuard 20
MonGenP "3,180,120,5" ForbiddenFighter 25
MonGenP "3,210,125,5" ForbiddenKing 1
MonGenP "3,210,125,5" ForbiddenGeneral 5
MonGenP "3,210,125,5" ForbiddenArcher 25
MonGenP "3,210,125,5" ForbiddenGuard 20
MonGenP "3,210,125,5" ForbiddenFighter 25
MonGenP "3,212,92,5" ForbiddenKing 1
MonGenP "3,212,92,5" ForbiddenGeneral 5
MonGenP "3,212,92,5" ForbiddenArcher 25
MonGenP "3,212,92,5" ForbiddenGuard 20
MonGenP "3,212,92,5" ForbiddenFighter 25

Delaygoto [Grobal] 270 @EventSabukBoss_8 10001

[@EventSabukBoss_8]
#ACT
Eventmsg "3" "AncientEmperor is HERE.. RUN FOR YOU LIVES!!" 10432
MonGenP "3,180,120,5" AncientEmperor 1
MonGenP "3,180,120,5" IncarnatedWooma 5
MonGenP "3,180,120,5" IncarnatedZuma 5
MonGenP "3,180,120,5" AncientRaider 25
MonGenP "3,180,120,5" AncientSpider 25
MonGenP "3,180,120,5" AncientMage 20
MonGenP "3,180,120,5" AncientMonkey 25
;MonGenP "3,210,125,5" AncientEmperor 1
MonGenP "3,210,125,5" IncarnatedWooma 5
MonGenP "3,210,125,5" IncarnatedZuma 5
MonGenP "3,210,125,5" AncientRaider 25
MonGenP "3,210,125,5" AncientSpider 25
MonGenP "3,210,125,5" AncientMage 20
MonGenP "3,210,125,5" AncientMonkey 25
;MonGenP "3,212,92,5" AncientEmperor 1
MonGenP "3,212,92,5" IncarnatedWooma 5
MonGenP "3,212,92,5" IncarnatedZuma 5
MonGenP "3,212,92,5" AncientRaider 25
MonGenP "3,212,92,5" AncientSpider 25
MonGenP "3,212,92,5" AncientMage 20
MonGenP "3,212,92,5" AncientMonkey 25

Delaygoto [Grobal] 330 @EventSabukBoss_9 10001

[@EventSabukBoss_9]
#ACT
Eventmsg "3" "It's feeling awfully cold round here.... DEADSOUL!!!" 10432
MonGenP "3,180,120,5" DeadSoul 1
MonGenP "3,180,120,5" IceMaiden 10
MonGenP "3,180,120,5" IceWolfKing 25
MonGenP "3,180,120,5" IceMaster 20
MonGenP "3,180,120,5" IceKnight 25
;MonGenP "3,215,145,5" DeadSoul 1
MonGenP "3,215,145,5" IceMaiden 10
MonGenP "3,215,145,5" IceWolfKing 25
MonGenP "3,215,145,5" IceMaster 20
MonGenP "3,215,145,5" IceKnight 25
;MonGenP "3,224,96,5" DeadSoul 1
MonGenP "3,224,96,5" IceMaiden 10
MonGenP "3,224,96,5" IceWolfKing 25
MonGenP "3,224,96,5" IceMaster 10
MonGenP "3,224,96,5" IceKnight 15

Delaygoto [Grobal] 420 @EventSabukBoss_10 10001

[@EventSabukBoss_10]
#ACT
Eventmsg "3" "BoneLord is here Lookout!!!" 10432
;MonGenP "3,180,120,5" Bonelord 1
MonGenP "3,180,120,5" BoneGeneral 3
MonGenP "3,180,120,5" BoneArcher 15
MonGenP "3,180,120,5" BoneBladeMan 20
MonGenP "3,180,120,5" BoneSpearman 25
MonGenP "3,180,120,5" BoneCaptain 25
MonGenP "3,215,140,5" Bonelord 1
MonGenP "3,215,140,5" BoneGeneral 3
MonGenP "3,215,140,5" BoneArcher 15
MonGenP "3,215,140,5" BoneBladeMan 20
MonGenP "3,215,140,5" BoneSpearman 25
MonGenP "3,215,140,5" BoneCaptain 25
;MonGenP "3,212,92,5" Bonelord 1
MonGenP "3,212,92,5" BoneGeneral 3
MonGenP "3,212,92,5" BoneArcher 15
MonGenP "3,212,92,5" BoneBladeMan 20
MonGenP "3,212,92,5" BoneSpearman 25
MonGenP "3,212,92,5" BoneCaptain 25

Delaygoto [Grobal] 480 @EventSabukBoss_11 10001

[@EventSabukBoss_11]
#ACT
Eventmsg "3" "Here Comes ToxinOma, Run Run Run!" 10432
;MonGenP "3,190,141,5" ToxinOma 1
MonGenP "3,190,141,5" HairyOma 1
MonGenP "3,190,141,5" SmellyOma 15
MonGenP "3,190,141,5" StinkyOma 20
MonGenP "3,190,141,5" MuckyOma 25
MonGenP "3,190,141,5" DirtyOma 25
MonGenP "3,225,95,5" ToxinOma 1
MonGenP "3,225,95,5" HairyOma 3
MonGenP "3,225,95,5" SmellyOma 15
MonGenP "3,225,95,5" StinkyOma 20
MonGenP "3,225,95,5" MuckyOma 25
MonGenP "3,225,95,5" DirtyOma 25

Delaygoto [Grobal] 180 @EventSabukBossEnd 10001

[@EventSabukBossEnd]
#ACT
Eventmsg "3" "Thats all for now... more to be added soon!" 10432
break

[@EventMiniSabukBoss_1]
#SAY
Event started.\\
#ACT
Eventmsg "3" "It's the WoomaTaurus and his gang. His reinforcements will arrive in 3 minutes! Kill fast!" 10432
MonGenP "3,180,120,5" WoomaTaurus 1
MonGenP "3,180,120,5" WoomaGuardian 5
MonGenP "3,180,120,5" WoomaSoldier 15
MonGenP "3,180,120,5" WoomaFighter 15
MonGenP "3,180,120,5" FlamingWooma 15
MonGenP "3,210,125,5" WoomaTaurus 1
MonGenP "3,210,125,5" WoomaGuardian 5
MonGenP "3,210,125,5" WoomaSoldier 15
MonGenP "3,210,125,5" WoomaFighter 15
MonGenP "3,210,125,5" FlamingWooma 15
MonGenP "3,212,92,5" WoomaTaurus 1
MonGenP "3,212,92,5" WoomaGuardian 5
MonGenP "3,212,92,5" WoomaSoldier 15
MonGenP "3,212,92,5" WoomaFighter 15
MonGenP "3,212,92,5" FlamingWooma 15

Delaygoto [Grobal] 180 @EventMiniSabukBoss_2 10001

[@EventMiniSabukBoss_2]
#ACT
Eventmsg "3" "The BoarKing and his cronies have come to support the Wooma's! The next wave will attack in 3mins!" 10432
MonGenP "3,180,120,5" BoarKing 1
MonGenP "3,180,120,5" WhiteBoar 5
MonGenP "3,180,120,5" RedBoar 20
MonGenP "3,180,120,5" BlackBoar 20
MonGenP "3,180,120,5" WedgeMoth 25
MonGenP "3,210,125,5" BoarKing 1
MonGenP "3,210,125,5" WhiteBoar 5
MonGenP "3,210,125,5" RedBoar 20
MonGenP "3,210,125,5" BlackBoar 20
MonGenP "3,210,125,5" WedgeMoth 25
MonGenP "3,212,92,5" BoarKing 1
MonGenP "3,212,92,5" WhiteBoar 5
MonGenP "3,212,92,5" RedBoar 20
MonGenP "3,212,92,5" BlackBoar 20
MonGenP "3,212,92,5" WedgeMoth 25

Delaygoto [Grobal] 180 @EventMiniSabukBoss_3 10001

[@EventMiniSabukBoss_3]
#ACT
Eventmsg "3" "They've used HoneyBombs! The insects are infesting the castle! Exterminate the bugs before the next attack force arrives.  4mins!" 10432
MonGenP "3,180,120,5" EvilCentipede 1
MonGenP "3,180,120,5" GreatTongs 5
MonGenP "3,180,120,5" Tongs 25
MonGenP "3,180,120,5" BlackMaggot 20
MonGenP "3,180,120,5" Centipede 25
MonGenP "3,210,125,5" EvilCentipede 1
MonGenP "3,210,125,5" GreatTongs 5
MonGenP "3,210,125,5" Tongs 25
MonGenP "3,210,125,5" BlackMaggot 20
MonGenP "3,210,125,5" Centipede 25
MonGenP "3,212,92,5" EvilCentipede 1
MonGenP "3,212,92,5" GreatTongs 5
MonGenP "3,212,92,5" Tongs 25
MonGenP "3,212,92,5" BlackMaggot 20
MonGenP "3,212,92,5" Centipede 25

Delaygoto [Grobal] 240 @EventMiniSabukBoss_4 10001

[@EventMiniSabukBoss_4]
#ACT
Eventmsg "3" "The monstrous ZumaTemple beasts are flocking over the walls. We've only got 4mins until the next wave!" 10432
MonGenP "3,180,120,5" ZumaTaurus 1
MonGenP "3,180,120,5" ZumaGuard 5
MonGenP "3,180,120,5" ZumaArcher 25
MonGenP "3,180,120,5" ZumaStatue 20
MonGenP "3,180,120,5" KillerRat 25
MonGenP "3,210,125,5" ZumaTaurus 1
MonGenP "3,210,125,5" ZumaGuard 5
MonGenP "3,210,125,5" ZumaArcher 25
MonGenP "3,210,125,5" ZumaStatue 20
MonGenP "3,210,125,5" KillerRat 25
MonGenP "3,212,92,5" ZumaTaurus 1
MonGenP "3,212,92,5" ZumaGuard 5
MonGenP "3,212,92,5" ZumaArcher 25
MonGenP "3,212,92,5" ZumaStatue 20
MonGenP "3,212,92,5" KillerRat 25

Delaygoto [Grobal] 240 @EventMiniSabukBoss_5 10001

[@EventMiniSabukBoss_5]
#ACT
Eventmsg "3" "The beasts of Red Moon Valley are here!. We've only got 5 mins until the next wave!" 10432
;MonGenP "3,225,95,5" RedMoonEvil 1
MonGenP "3,225,95,5" GreatDarkArachnid 3
MonGenP "3,225,95,5" ApeKing 3
MonGenP "3,225,95,5" EvilApe 25
MonGenP "3,225,95,5" SpiderBat 20
MonGenP "3,225,95,5" VenomArachnid 25
MonGenP "3,225,95,5" DarkArachnid 25
MonGenP "3,225,95,5" GrenadeArachnid 15
;MonGenP "3,192,144,5" RedMoonEvil 1
MonGenP "3,192,144,5" GreatDarkArachnid 3
MonGenP "3,192,144,5" ApeKing 3
MonGenP "3,192,144,5" EvilApe 25
MonGenP "3,192,144,5" SpiderBat 20
MonGenP "3,192,144,5" VenomArachnid 25
MonGenP "3,192,144,5" DarkArachnid 25
MonGenP "3,192,144,5" GrenadeArachnid 15

Delaygoto [Grobal] 300 @EventMiniSabukBoss_6 10001

[@EventMiniSabukBoss_6]
#ACT
Eventmsg "3" "There! On the horizon! MINOTAURS!!!  Kill them before they burn down the palace! 5mins to go!" 10432
MonGenP "3,180,120,5" MinoTaurKing 1
MonGenP "3,180,120,5" MinotaurChief 5
MonGenP "3,180,120,5" IceMinotaur 25
MonGenP "3,180,120,5" WindMinotaur 20
MonGenP "3,180,120,5" RightGuard 25
MonGenP "3,180,120,5" LeftGuard 25
MonGenP "3,212,92,5" MinoTaurKing 1
MonGenP "3,212,92,5" MinotaurChief 5
MonGenP "3,212,92,5" IceMinotaur 25
MonGenP "3,212,92,5" WindMinotaur 20
MonGenP "3,212,92,5" RightGuard 25
MonGenP "3,212,92,5" LeftGuard 25
MonGenP "3,210,125,5" MinotaurChief 5
MonGenP "3,210,125,5" IceMinotaur 30
MonGenP "3,210,125,5" WindMinotaur 30
MonGenP "3,210,125,5" RightGuard 25
MonGenP "3,210,125,5" LeftGuard 25

Delaygoto [Grobal] 300 @EventMiniSabukBoss_7 10001

[@EventMiniSabukBoss_7]
#ACT
Eventmsg "3" "The ForbiddenKing has brought his minions to take the wall!  Kill them before they kill you!" 10432
MonGenP "3,180,120,5" ForbiddenKing 1
MonGenP "3,180,120,5" ForbiddenGeneral 5
MonGenP "3,180,120,5" ForbiddenArcher 25
MonGenP "3,180,120,5" ForbiddenGuard 20
MonGenP "3,180,120,5" ForbiddenFighter 25
MonGenP "3,212,92,5" ForbiddenKing 1
MonGenP "3,212,92,5" ForbiddenGeneral 5
MonGenP "3,212,92,5" ForbiddenArcher 25
MonGenP "3,212,92,5" ForbiddenGuard 20
MonGenP "3,212,92,5" ForbiddenFighter 25
MonGenP "3,210,125,5" ForbiddenGeneral 5
MonGenP "3,210,125,5" ForbiddenArcher 25
MonGenP "3,210,125,5" ForbiddenGuard 20
MonGenP "3,210,125,5" ForbiddenFighter 25

Delaygoto [Grobal] 300 @EventMiniSabukBoss_8 10001

[@EventMiniSabukBoss_8]
#ACT
Eventmsg "3" "AncientEmperor is HERE.. RUN FOR YOU LIVES!!" 10432
MonGenP "3,180,120,5" AncientEmperor 1
MonGenP "3,180,120,5" IncarnatedWooma 5
MonGenP "3,180,120,5" IncarnatedZuma 5
MonGenP "3,180,120,5" AncientRaider 25
MonGenP "3,180,120,5" AncientSpider 25
MonGenP "3,180,120,5" AncientMage 20
MonGenP "3,180,120,5" AncientMonkey 25
MonGenP "3,212,92,5" AncientEmperor 1
MonGenP "3,212,92,5" IncarnatedWooma 5
MonGenP "3,212,92,5" IncarnatedZuma 5
MonGenP "3,212,92,5" AncientRaider 25
MonGenP "3,212,92,5" AncientSpider 25
MonGenP "3,212,92,5" AncientMage 20
MonGenP "3,212,92,5" AncientMonkey 25
MonGenP "3,210,125,5" IncarnatedWooma 5
MonGenP "3,210,125,5" IncarnatedZuma 5
MonGenP "3,210,125,5" AncientRaider 25
MonGenP "3,210,125,5" AncientSpider 25
MonGenP "3,210,125,5" AncientMage 20
MonGenP "3,210,125,5" AncientMonkey 25

Delaygoto [Grobal] 240 @EventMiniSabukBossEnd 10001

[@EventMiniSabukBossEnd]
#ACT
Eventmsg "3" "Thats all for now..." 10432
break

[@ItemCreationTest]
#CALL [System\ItemCreation\ItemCreation.txt] @ItemCreation

[@AddStat]
#IF
#SAY
This is an EnchantedOrb, it has the power\
to Enchant an item of your choice with\
whatever you want!\\
Would you like to Add or Remove a Stat?\
<[ Add Stat ]/@ChooseItemAdd>\

[@ChooseItemAdd]
#SAY
Which Item would you like to Enchant?\\
<[ Armour ]/@EnchantItem(0)>\
<[ Necklace ]/@EnchantItem(3)>\
<[ Helmet ]/@EnchantItem(4)>\
<[ Bracelet(L) ]/@EnchantItem(5)>\
<[ Bracelet(R) ]/@EnchantItem(6)>\
<[ Ring(L) ]/@EnchantItem(7)>\
<[ Ring(R) ]/@EnchantItem(8)>\
<[ Shoes ]/@EnchantItem(10)>\\
<[ Exit ]/@exit>\\\


[@EnchantItem()]
#IF
#ACT
Mov  D0  %ARG(1)

#IF
   equal D0 0
#SAY
What would you like to add?\\
<[ AC ]/@UpDescPoint(0)>\
<[ MR ]/@UpDescPoint(1)>\
<[ DC ]/@UpDescPoint(2)>\
<[ M-All ]/@UpDescPoint(3)>\
<[ HP ]/@UpDescPoint(8)>\
<[ MP ]/@UpDescPoint(9)>\\
<[ Back ]/@EnchantedOrbEvent_Main>\\\

#IF
   equal D0 3
#SAY
What would you like to add?\\
;<[ Accuracy ]/@UpDescPoint(0)> - HPR on Certain Items\
;<[ Agility ]/@UpDescPoint(1)> - MPR on Certain Items\
<[ DC ]/@UpDescPoint(2)>\
<[ M-All ]/@UpDescPoint(3)>\
<[ Attack Element ]/@UpDesc11>\\
<[ Back ]/@EnchantedOrbEvent_Main>\\\

#IF
   equal D0 4
#SAY
What would you like to add?\\
<[ AC ]/@UpDescPoint(0)>\
<[ MR ]/@UpDescPoint(1)>\
<[ DC ]/@UpDescPoint(2)>\
<[ M-All ]/@UpDescPoint(3)>\
<[ Attack Element ]/@UpDesc11>\
<[ Back ]/@EnchantedOrbEvent_Main>\\\

#IF
   equal D0 5
#SAY
What would you like to add?\\
<[ AC ]/@UpDescPoint(0)>\
<[ MR ]/@UpDescPoint(1)>\
<[ DC ]/@UpDescPoint(2)>\
<[ M-All ]/@UpDescPoint(3)>\
<[ Attack Element ]/@UpDesc11>\\
<[ Back ]/@EnchantedOrbEvent_Main>\\\

#IF
   equal D0 6
#SAY
What would you like to add?\\
<[ AC ]/@UpDescPoint(0)>\
<[ MR ]/@UpDescPoint(1)>\
<[ DC ]/@UpDescPoint(2)>\
<[ M-All ]/@UpDescPoint(3)>\
<[ Attack Element ]/@UpDesc11>\\
<[ Back ]/@EnchantedOrbEvent_Main>\\\

#IF
   equal D0 7
#SAY
What would you like to add?\\
<[ AC ]/@UpDescPoint(0)> - PR on Certain Items\
<[ MR ]/@UpDescPoint(1)> - PN on Certain Items\
<[ DC ]/@UpDescPoint(2)>\
<[ M-All ]/@UpDescPoint(3)>\
<[ Attack Element ]/@UpDesc11>\\
<[ Back ]/@EnchantedOrbEvent_Main>\\\

#IF
   equal D0 8
#SAY
What would you like to add?\\
<[ AC ]/@UpDescPoint(0)> - PR on Certain Items\
<[ MR ]/@UpDescPoint(1)> - PN on Certain Items\
<[ DC ]/@UpDescPoint(2)>\
<[ M-All ]/@UpDescPoint(3)>\
<[ Attack Element ]/@UpDesc11>\\
<[ Back ]/@EnchantedOrbEvent_Main>\\\

#IF
   equal D0 10
#SAY
What would you like to add?\\
<[ Comfort ]/@UpDescPoint(0)>\
<[ WearWeight ]/@UpDescPoint(1)>\
<[ HandWeight ]/@UpDescPoint(2)>\
<[ HP ]/@UpDescPoint(8)>\
<[ MP ]/@UpDescPoint(9)>\\
<[ Back ]/@EnchantedOrbEvent_Main>\\\

[@UpDescPoint()]
#ACT
    mov D1 %ARG(1)
    mov D2 4
       
#IF
   HLSCRIPTCMD CHECKISTAKEITEM %D0
#ACT
   HLSCRIPTCMD ITEMREMAKEADD %D0 %D1 1
#SAY
Item Enchanted!!!!\
<[ Exit ]/@exit>\\\
#ELSESAY
Please check that you are wearing the item\
That you are not cheating by dropping the orb\
and that you don't have more than 5 Stats Added\
already!\\
<[ Exit ]/@exit>\\\

[@UpDesc11]
#IF
#SAY
<[ Attack Element(Fire) ]/@UpDesc12(1)>\
<[ Attack Element(Cold) ]/@UpDesc12(2)>\
<[ Attack Element(Light) ]/@UpDesc12(3)>\
<[ Attack Element(Wind) ]/@UpDesc12(4)>\
<[ Attack Element(Holy) ]/@UpDesc12(5)>\
<[ Attack Element(Dark) ]/@UpDesc12(6)>\
<[ Attack Element(Phantom) ]/@UpDesc12(7)>\\
<[ Back ]/@EnchantedOrbEvent_Main>\\\

[@UpDesc12()]
#ACT
    mov D1 %ARG(1)
    mov D2 4
 
#IF
    HLSCRIPTCMD CHECKISTAKEITEM %D0
#ACT
    HLSCRIPTCMD ITEMREMAKEEQU %D0 11 %D1 
    HLSCRIPTCMD ITEMREMAKEADD %D0 12 1
#SAY
Item Enchanted!!!!\
<[ Exit ]/@exit>\\\
#ELSESAY
Please check that you are wearing the item\
That you are not cheating by dropping the orb\
and that you don't have more than 5 Stats Added\
already!\\
<[ Exit ]/@exit>\\\

[@MoveToTester]
#IF
#ACT
mapmove 13 171 128

[@CALLExpIntTest]
#CALL [IntegralSystem\IntExp.txt] @IntExp


[@MoveToOB]
#IF
#ACT
mapmove 10 297 266

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;