 
# F - Forest
# L - Land
# M - Mountain
# R - Ruines
# H - Home
# T - Tower

DESCRIPTION
    -   ,   ==>
     ,     . ==>
        , ==>
          ==>
 .

MAP
LLWLLLLLLLLLLLLLLLLLLLLLLLLLLLLLMMMMMMMMMMM
LLLWLLLLLLLLLLLLWWWLLLLLLLLLLLLLLMMFMMMMMMMM
LLLWWLLLLLLLLLLWLLWLLLLLWWWLLLLLLMMMMMFMMMM
LLLLLWLLLLLLLWWWLLLWLLLLWLLWWWWWLLMMFMMMMMMM
LLLLLWWLLLLLWLLLLLLWWWWWLLLLLLLWLLMMMMMMMMM
LLLLLLLWWLLLWLLLLLLLLLLLLLLLLLLLWLLLMMMMMMMM
LLLLLLLLWWWWLLLLLLLLLLLLLLLLLLLLWLLMFFMMMMM
LLLLLLLLWLLLLLLLLLLLLLLLLLLLLLLLLWLMMMMMMMMM
LLLLLLLWLLLLLLLLLLLLQQQQQLLLLLLLLWMMMMMFMMM
LLLLLLLWLLLLLFFLLLLQQQQQQQLLLLLLLLWWWWMMMMMA
LLLLLLWLLLLLLFLLLLQQLLLLQQLLLLLLLWMMMWMMAAA
LLLLLLWLLLLLFLLLLLQQLLLLLLQLLLLLLWMMFMWWAMMM
LLLLLLWLLLFLLFLLLQQLLWWLLLQQLLQQWMMFFMAWWWW
LLLLLLLWLLLFFLLLWWWWWWLWLLQQQLQFQWQMAAAWMMMM
LLLLLLWLLLFFLLLWLQQLLWWLLLQLQQFFMWQQWWWMMFM
LLLLLWWLLLFFLLLWLLQQLLLLLLQLLLMMMMWWWMMMMMMM
LLWWWLLLLFFFLLWLLLQQLLLLQQLLLLLLLWMMMMMMFMM
WWWLLLLLLFFFLLLWLLLQQQQQQQLLLLLLLWLMMMFMMMMM
LLLLLLLFFFFFLLLWLLLLQQQQQLLLLLLLWLLLMMFMMMM
LLLLLLLFFFFFFLLLWLLLLLLLLLLLLLLLWLLLMMMMMMMM
LLLLLFFFFFFFLLLLWLLLLLLLLLLLLLWWLLLLMMMMFMM
LLLLFFFFFFFFFLLLLWWWLLLLLLLLWWWLLLLLLLMMFMMM
LLFFFFFMFMFFFFLLLLLWLLLLLLLWLLLLLLLLLLMMMMM
LFFFFFMFMMMFFFFLLLLLWWWWWWWWLLLLLLLLLLLMMMMM
FFFFFMMMMMMMFFFLLLLLLLLLLLLLLLLLLLLLLLLMMMM
FFFFFMMMMMMMMMFFFFLLLLLLLLLLLLLLLLLLLLLMMMMM
#===MAPEND===

CONSTANTS
HouseMustSave:8
HouseMustSaveLess:7
StepWave1:5
StepWave2:10
StepWave3:15
StepWave4:20
StepWave5:24
StepWave6:28
StepWave7:32
StepWave8:36
StepWave9:39
StepWave10:41
StepWave11:44
StepWave12:47
StepWave13:49
StepWave14:51
StepWave15:53
StepWave16:55
StepWave17:56
StepWave18:57
StepWave19:58
StepWave20:59
XC1:8
YC1:22
XC2:10
YC2:12
XC3:12
YC3:12
XC4:14
YC4:12
XC5:8
YC5:22
XC6:10
YC6:12
XC7:12
YC7:12
XC8:14
YC8:12


OBJECTS
#Pony:i=3,j=11,"name=",code=scorpion,DeathAllow=true
#Pony:i=3,j=10,"name=",code=scorpion,DeathAllow=true

Pony:i=22,j=11,"name=",code=luna
Pony:i=22,j=15,"name=",code=celestia
Pony:i=22,j=13,"name=",code=castle,DeathAllow=true
MonsterTirek:Code=tirek,"Name=",i=1,j=1,tag=tirek,strategy=AttackNearFirst

Building:Code=House,"Name= ",Tag=house,i=3,j=4
Building:Code=House2,"Name= ",Tag=house,i=5,j=6
Building:Code=House3,"Name= ",Tag=house,i=6,j=2
Building:Code=House,"Name= ",Tag=house,i=8,j=3
Building:Code=TreeApple,Name=,i=3,j=6
Building:Code=TreeApple,Name=,i=9,j=4
Building:Code=TreeApple,Name=,i=5,j=0
Building:Code=House,"Name= ",Tag=house,i=14,j=1
Building:Code=House2,"Name= ",Tag=house,i=17,j=3
Building:Code=TreeApple,Name=,i=16,j=5
Building:Code=House3,"Name= ",Tag=house,i=18,j=5
Building:Code=House,"Name= ",Tag=house,i=20,j=2
Building:Code=House2,"Name= ",Tag=house,i=25,j=4
Building:Code=House3,"Name= ",Tag=house,i=28,j=1
Building:Code=House,"Name= ",Tag=house,i=28,j=5
Building:Code=TreeApple,Name=,i=30,j=5
Building:Code=TreeApple,Name=,i=30,j=1
Building:Code=TreeApple,Name=,i=32,j=17
Building:Code=TreeApple,Name=,i=34,j=19
Building:Code=House2,"Name= ",Tag=house,i=30,j=18
Building:Code=House3,"Name= ",Tag=house,i=33,j=21
Building:Code=House,"Name= ",Tag=house,i=31,j=22
Building:Code=TreeApple,Name=,i=29,j=19
Building:Code=TreeApple,Name=,i=29,j=23
Building:Code=TreeApple,Name=,i=21,j=21
Building:Code=House,"Name= ",Tag=house,i=23,j=21
Building:Code=House2,"Name= ",Tag=house,i=21,j=25
Building:Code=House3,"Name= ",Tag=house,i=18,j=23
Building:Code=TreeApple,Name=,i=19,j=25
Building:Code=House3,"Name= ",Tag=house,i=15,j=22
Building:Code=House,"Name= ",Tag=house,i=18,j=19
Building:Code=TreeApple,Name=,i=31,j=8
Building:Code=TreeApple,Name=,i=35,j=12
Building:Code=TreeApple,Name=,i=31,j=14
Building:Code=House,"Name= ",Tag=house,i=20,j=12
Building:Code=House3,"Name= ",Tag=house,i=20,j=14
Building:Code=House2,"Name= ",Tag=house,i=23,j=12
Building:Code=House,"Name= ",Tag=house,i=23,j=14
Building:Code=TreeApple,Name=,i=26,j=21
#===OBJECTSEND===

INITIAL
Stone:100
Food:200
Task: 
AssignAction:pony=luna,action=BuildCrystalTowerDark
AssignAction:pony=celestia,action=CreateScorpion
Permits:action=allow,code=all
Permits:action=deny,code=SummoneFlatter
Permits:action=deny,code=SummoneApplejack
Permits:action=deny,code=SummonePinki
Permits:action=deny,code=SummoneRarity
Permits:action=deny,code=SummoneTwily
Permits:action=deny,code=SummoneRainbow
Permits:action=deny,code=SummoneCadence
Permits:action=deny,code=SummoneLuna
Permits:action=deny,code=SummoneCelestia


SCRIPT      
Event:Step=0
Action:Type=SetFocus,i=2,j=2,immediate=true
Action:Type=Message,icon=celestia_ico,"text=  .  ,    ,    ."
Action:Type=Message,icon=luna_ico,"text=..."
Action:Type=Message,icon=celestia_ico,"text=!"
Action:Type=Message,icon=luna_ico,"text=   ,   , .   ,        ."
Action:Type=Message,icon=celestia_ico,"text= ,     ?"
Action:Type=Message,icon=luna_ico,"text=-    -          ."
Action:Type=Message,icon=celestia_ico,"text=    .    , ,      ."
Action:Type=Message,icon=luna_ico,"text= ,  -      ..."
Action:Type=Message,icon=celestia_ico,"text=  ,   !"
Action:Type=Message,icon=luna_ico,"text=    .    , ."
Action:Type=Message,icon=ok_ico,"text=          .      -   .     ."
Action:Type=ShowBattleTask

SCRIPT      
Event:Step=1
Action:Type=SetFocus,i=2,j=2,immediate=true
Action:Type=Message,icon=tirek_ico,"text=... ,      ...   ,  !"
Action:Type=Message,icon=celestia_ico,"text=   , ."
Action:Type=Message,icon=tirek_ico,"text=   ...       .    -      ".
Action:Type=Message,icon=luna_ico,"text=    . ,    ?     ,      ."
Action:Type=Message,icon=celestia_ico,"text=,   .   ,    ."

SCRIPT      
Event:Step=2
Action:Type=SetFocus,i=4,j=4,immediate=true
Action:Type=Message,icon=celestia_ico,"text=,    . , ..."
Action:Type=Message,icon=luna_ico,"text=     ,   -  ."
Action:Type=Message,icon=celestia_ico,"text=,         .      -    ."
Action:Type=Message,icon=luna_ico,"text=.      .  ."
Action:Type=SetBattleTask,code=house,"Task=   @HouseMustSave@ "
Action:Type=SetExtInfoModel,"ModelMicroCode=maptirek; : %d;house"
Action:Type=ShowBattleTask

SCRIPT
Event:Flag=TirekFailSleep
Action:Type=Message,icon=tirek_ico,"text=  -    .   !".
Action:Type=Message,icon=celestia_ico,"text=  ,        ."

SCRIPT      
Event:Step=@StepWave1@
Action:Type=Message,icon=tirek_ico,"text=     ."
Action:Type=NewObjectGroup,Object=Monster,Code=bat,"Name=","i=$GetObjPos(tirek,x)$","j=$GetObjPos(tirek,y)$",count=6,radius=3
Action:Type=Message,icon=celestia_ico,"text=      .... , ,   ."

SCRIPT      
Event:Step=@StepWave2@
Action:Type=NewObjectGroup,Object=Monster,Code=troll,"Name=","i=$GetObjPos(tirek,x)$","j=$GetObjPos(tirek,y)$",count=4,radius=2
Action:Type=Message,icon=luna_ico,"text= ,  .        ."

SCRIPT      
Event:Step=@StepWave3@
Action:Type=NewObjectGroup,Object=Monster,Code=gidra,"Name=","i=$GetObjPos(tirek,x)$","j=$GetObjPos(tirek,y)$",count=3,radius=2
Action:Type=Message,icon=celestia_ico,"text=  ...       ."

SCRIPT      
Event:Step=@StepWave4@
Action:Type=Message,icon=tirek_ico,"text=,    ...    !"
Action:Type=NewObjectGroup,Object=MonsterTent,Code=tent,"Name= ","i=$GetObjPos(tirek,x)$","j=$GetObjPos(tirek,y)$",count=2,radius=2
Action:Type=Message,icon=luna_ico,"text=  .  ?"
Action:Type=Message,icon=celestia_ico,"text=, .    ,     .       ."

SCRIPT      
Event:Step=@StepWave5@
Action:Type=NewObjectGroup,Object=Monster,Code=bat,"Name=","i=$GetObjPos(tirek,x)$","j=$GetObjPos(tirek,y)$",count=6,radius=3

SCRIPT      
Event:Step=@StepWave6@
Action:Type=NewObjectGroup,Object=Monster,Code=troll,"Name=","i=$GetObjPos(tirek,x)$","j=$GetObjPos(tirek,y)$",count=4,radius=2

SCRIPT      
Event:Step=@StepWave7@
Action:Type=NewObjectGroup,Object=Monster,Code=gidra,"Name=","i=$GetObjPos(tirek,x)$","j=$GetObjPos(tirek,y)$",count=3,radius=2

SCRIPT      
Event:Step=@StepWave8@
Action:Type=NewObjectGroup,Object=MonsterTent,Code=tent,"Name= ","i=$GetObjPos(tirek,x)$","j=$GetObjPos(tirek,y)$",count=2,radius=2

SCRIPT      
Event:Step=@StepWave9@
Action:Type=NewObjectGroup,Object=Monster,Code=bat,"Name=","i=$GetObjPos(tirek,x)$","j=$GetObjPos(tirek,y)$",count=6,radius=3

SCRIPT      
Event:Step=@StepWave10@
Action:Type=NewObjectGroup,Object=Monster,Code=troll,"Name=","i=$GetObjPos(tirek,x)$","j=$GetObjPos(tirek,y)$",count=4,radius=2

SCRIPT      
Event:Step=@StepWave11@
Action:Type=NewObjectGroup,Object=Monster,Code=gidra,"Name=","i=$GetObjPos(tirek,x)$","j=$GetObjPos(tirek,y)$",count=3,radius=2

SCRIPT      
Event:Step=@StepWave12@
Action:Type=NewObjectGroup,Object=MonsterTent,Code=tent,"Name= ","i=$GetObjPos(tirek,x)$","j=$GetObjPos(tirek,y)$",count=2,radius=2

SCRIPT      
Event:Step=@StepWave13@
Action:Type=NewObjectGroup,Object=Monster,Code=bat,"Name=","i=$GetObjPos(tirek,x)$","j=$GetObjPos(tirek,y)$",count=6,radius=3

SCRIPT      
Event:Step=@StepWave14@
Action:Type=NewObjectGroup,Object=Monster,Code=troll,"Name=","i=$GetObjPos(tirek,x)$","j=$GetObjPos(tirek,y)$",count=4,radius=2

SCRIPT      
Event:Step=@StepWave15@
Action:Type=NewObjectGroup,Object=Monster,Code=gidra,"Name=","i=$GetObjPos(tirek,x)$","j=$GetObjPos(tirek,y)$",count=3,radius=2

SCRIPT      
Event:Step=@StepWave16@
Action:Type=NewObjectGroup,Object=MonsterTent,Code=tent,"Name= ","i=$GetObjPos(tirek,x)$","j=$GetObjPos(tirek,y)$",count=2,radius=2

SCRIPT      
Event:Step=@StepWave17@
Action:Type=NewObjectGroup,Object=Monster,Code=bat,"Name=","i=$GetObjPos(tirek,x)$","j=$GetObjPos(tirek,y)$",count=6,radius=3

SCRIPT      
Event:Step=@StepWave18@
Action:Type=NewObjectGroup,Object=Monster,Code=troll,"Name=","i=$GetObjPos(tirek,x)$","j=$GetObjPos(tirek,y)$",count=4,radius=2

SCRIPT      
Event:Step=@StepWave19@
Action:Type=NewObjectGroup,Object=Monster,Code=gidra,"Name=","i=$GetObjPos(tirek,x)$","j=$GetObjPos(tirek,y)$",count=3,radius=2

SCRIPT      
Event:Step=@StepWave20@
Action:Type=NewObjectGroup,Object=MonsterTent,Code=tent,"Name= ","i=$GetObjPos(tirek,x)$","j=$GetObjPos(tirek,y)$",count=2,radius=2

# Defeat
SCRIPT
Event:TagCount=@HouseMustSaveLess@,TagName=house,Compare=LessOrEqual
Action:Type=SetDefeat,"DefeatStr=   "

SCRIPT
Event:TagCount=0,TagName=tirek
Action:Type=SetFlag,FlagName=tirekkilled

SCRIPT
Event:Victory=True
Action:Type=Message,icon=tirek_ico,"text=    , !   !      ..."
Action:Type=Message,icon=luna_ico,"text=  .    ,    ."

VICTORY
ByFlag:FlagName=tirekkilled
