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

MAP
LLLLLLMMMMMMMMAAMMMMMFFFLLLLLLL
LLLLLLLLFFFMMMMAAMMMMFFLLLLLLLLL
LLLLLLLLLFFFMMMAMMMMFFLLLLLLLLL
LLLLLLLLLLFFFMFMAMMFFLLLLAALLLLL
LLLLLLLLLLFFFFFAFFFFLLLLAALLLLL
LLLLLLLLLLLLFFFFAFFFLLLLAAALLLLL
LLLLLLLLLLLLFFFAAAFLLLLLLALLLLL
LLLLLLLLLLALLFFAAAFFLLLLLALLLLLL
LLLLLLLLAALLLFAFFAFLLLLLALLLLLL
LLLLLLLAALLLLFAFFFALLLLLALLLLLLL
LLLLLLLALLLLLFALLALLLLLAALLLLLL
LLLLLLLALLLLLAALLLLLLLLLAALLLLLL
LLLLLAALLLLLLLALLLLLLLAAAALLLLL
LLLLLLALLLLLLLAAALLLLLAAALLLLLLL
LLLLLALLLLLLLLAAALLLLLAAALLLLLL
LLLLFAFLLLLLLLLAAAALLLAAAAFLLLLL
LLLFFAFLLLLLLLAAALLLLLFFAFFFLLL
LLLFAFAFLLLLLLLLAALLLLLFAAFFFLLL
LLFAAAFFLLLLLLLLLLLLLLLFFAAFFFL
LLLFAMFFLLLLLLLLLLLLLLLLFFAAAFFF
LLFFAMFFFLLLLLLLLLLLLLLFFMMAAMF
FFFFMAMMFFFLLLLLLLLLLLFFMMMAAMMM
FFMMAMMMMFFFLLLLLLLLFFFMMMMAAMM
MMMMMAMMMMFFFFLLLLLFFFFMMMMAAAMM
#===MAPEND===

#       
CONSTANTS
PortalX:28
PortalY:12
FoodNeed:300
FoodForLuna:150

OBJECTS
Pony:i=3,j=1,"name=",code=scoot,tag=scoot
Pony:i=1,j=2,"name= ",code=switie,tag=switie
Pony:i=2,j=2,"name=",code=applebloom,tag=applebloom
Neutral:i=25,j=22,"name=  ",Code=dungeon_enter
#Monster:Code=ameba,"Name=",i=6,j=10
Food:size=min,i=8,j=4
Food:size=medium,i=4,j=10
Food:size=max,i=1,j=19
Food:size=min,i=2,j=13
Food:size=min,i=3,j=7
Food:size=max,i=29,j=14
Food:size=medium,i=28,j=9
Food:size=min,i=30,j=5
Food:size=min,i=29,j=1
Food:size=medium,i=21,j=6
Food:size=min,i=21,j=11
Food:size=min,i=17,j=12
Food:size=min,i=20,j=18
Food:size=medium,i=15,j=20
Food:size=min,i=11,j=18
Food:size=min,i=8,j=14
Food:size=min,i=11,j=11
#===OBJECTSEND===

INITIAL
Stone:0
Food:30
Task: @FoodNeed@  
AssignAction:pony=scoot,action=TeleportFial1
AssignAction:pony=switie,action=TeleportFial2
AssignAction:pony=applebloom,action=TeleportFial3
Permits:action=deny,code=all
Permits:action=allow,code=Harvest
Permits:action=allow,code=TeleportFial1
Permits:action=allow,code=TeleportFial2
Permits:action=allow,code=TeleportFial3

SCRIPT      
Event:Step=0
Action:Type=Message,icon=switie_ico,"text=          ,  -     .     ,     -     ."
Action:Type=Message,icon=applebloom_ico,"text= -    -.       - ,   ."
Action:Type=Message,icon=scoot_ico,"text=-  ....   ...  ...     .... !      100 ,    .  ,  -     ."
Action:Type=Message,icon=switie_ico,"text=   !"
Action:Type=Message,icon=applebloom_ico,"text=, 100  -   , - .  .  -  !"
Action:Type=ShowBattleTask

SCRIPT      
Event:Step=2
Action:Type=SetFocus,i=25,j=22
Action:Type=Message,icon=switie_ico,"text=   .  - ?"
Action:Type=Message,icon=applebloom_ico,"text= ,      .   -     ."
Action:Type=Message,icon=scoot_ico,"text=  ,    ,   -       .  - ,   - ,      ."

SCRIPT    
Event:StepModN=5
Action:Type=NewObjectGroup,Object=Monster,Code=ameba,"Name=",i=29,j=10,count=1,radius=1

SCRIPT      
Event:Step=5
Action:Type=SetFocus,i=29,j=10
#Action:Type=NewObjectGroup,Object=Monster,Code=ameba,"Name=",i=29,j=10,count=1,radius=1
Action:Type=Message,icon=switie_ico,"text=     ! - ,  ."
Action:Type=Message,icon=applebloom_ico,"text=       ,   -      .    ?"
Action:Type=Message,icon=scoot_ico,"text=      ... !"
Action:Type=Message,icon=switie_ico,"text=    ?"
Action:Type=Message,icon=scoot_ico,"text=,     - . ,       -    ."
Action:Type=Message,icon=applebloom_ico,"text= , ,         ?"
Action:Type=Message,icon=switie_ico,"text=    ?  .    ?  ,          ?"
Action:Type=Message,icon=scoot_ico,"text=,    ,     ."
Action:Type=Message,icon=help_ico,"text=    - 6   .       3 .   -."
Action:Type=SetPermits,action=allow,code=SleepSong
Action:Type=SetPermits,action=allow,code=BuildPonyTree
Action:Type=SetPermits,action=allow,code=Accelerate


SCRIPT    
Event:StepModN=7
Action:Type=NewObjectGroup,Object=Monster,Code=troll,"Name=",i=15,j=18,count=1,radius=1

SCRIPT    
Event:StepModN=9
Action:Type=NewObjectGroup,Object=Monster,Code=gidra,"Name=",i=3,j=3,count=1,radius=1

SCRIPT      
Event:FoodReach=@FoodForLuna@
Action:Type=SetFocus,i=16,j=15
Action:Type=NewObject,Object=Neutral,Code=luna,"Name= ",i=16,j=15,tag=luna
Action:Type=Message,icon=luna_ico,"text= ...  .    ,     ."
Action:Type=Message,icon=switie_ico,"text=?"
Action:Type=Message,icon=luna_ico,"text=,      ."
Action:Type=Message,icon=applebloom_ico,"text=?"
Action:Type=Message,icon=luna_ico,"text=     ,   .        -  ."
Action:Type=Message,icon=applebloom_ico,"text= , ...    ,      ...    ."
Action:Type=Message,icon=luna_ico,"text=    ,    ... ,    ,    .    -  ."
Action:Type=NewObject,Object=Neutral,Code=teleport,"Name=",i=@PortalX@,j=@PortalY@,tag=portal
Action:Type=Message,icon=switie_ico,"text=   !"
Action:Type=RemoveObject,method=tag,Tag=luna
Action:Type=SetBattleTask,code=initial,isreq=false,"Task= @FoodNeed@  "
Action:Type=SetBattleTask,code=portal,"Task=    "
Action:Type=ShowBattleTask

SCRIPT      
Event:TagCount=1,TagName=portal
Event2:ObjectPos=True,i=@PortalX@,j=@PortalY@,IncludeLinked=true,Object=switie
Action:Type=Message,icon=switie_ico,"text= !  !"
Action:Type=RemoveObject,method=tag,Tag=switie

SCRIPT      
Event:TagCount=1,TagName=portal
Event2:ObjectPos=True,i=@PortalX@,j=@PortalY@,IncludeLinked=true,Object=scoot
Action:Type=Message,icon=scoot_ico,"text=  !     ."
Action:Type=RemoveObject,method=tag,Tag=scoot

SCRIPT      
Event:TagCount=1,TagName=portal
Event2:ObjectPos=True,i=@PortalX@,j=@PortalY@,IncludeLinked=true,Object=applebloom
Action:Type=Message,icon=applebloom_ico,"text=  ...  ."
Action:Type=RemoveObject,method=tag,Tag=applebloom

SCRIPT      
Event:FoodReach=@FoodNeed@
Action:Type=Message,icon=applebloom_ico,"text= ,     ,   !"
Action:Type=SetFlag,FlagName=foodreach
Action:Type=CompBattleTask,code=initial
Action:Type=DecFood,Delta=@FoodNeed@

SCRIPT      
Event:TagCount=0,TagName=switie,ForceOnceAtStep=True
Event2:TagCount=0,TagName=scoot,ForceOnceAtStep=True
Event3:TagCount=0,TagName=applebloom,ForceOnceAtStep=True
Event4:Flag=foodreach,CheckNoFlag=true,ForceOnceAtStep=True
Action:Type=Message,icon=ok_ico,"text=    ,      .     ,      ' '"

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

VICTORY
ByFlag:FlagName=foodreach
->ByObjectCount:Object=switie,cnt=0,AddType=And
->ByObjectCount:Object=scoot,cnt=0,AddType=And
->ByObjectCount:Object=applebloom,cnt=0,AddType=And
