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

[@XmasEventMain1]
{

#IF
!CheckMonMap D201 1 Santa
!CheckMonMap D003 1 Santa
!CheckMonMap D002 1 Santa
!CheckMonMap 10 1 Santa
!CheckMonMap D005 1 Santa
!CheckMonMap D2701 1 Santa
!CheckMonMap FBI1F 1 Santa
!CheckMonMap D1001 1 Santa
!CheckMonMap D101 1 Santa
!CheckMonMap D1101 1 Santa
!CheckMonMap D1301 1 Santa
!CheckMonMap D1402 1 Santa
!CheckMonMap D1501 1 Santa
!CheckMonMap D2001 1 Santa
!CheckMonMap D2101 1 Santa
!CheckMonMap D301 1 Santa
!CheckMonMap D401 1 Santa
!CheckMonMap D501 1 Santa
!CheckMonMap D601 1 Santa
!CheckMonMap D701 1 Santa
!CheckMonMap D801 1 Santa
!CheckMonMap D901 1 Santa
!CheckMonMap D701 1 Santa
#ACT
Goto @SpawnSanta
#ELSEACT
Eventmsg Grobal "Santa Is Still Alive!!!!!!" 10003
DelayGoto [grobal] 1800 @XmasEventMain1
Break


[@SpawnSanta]
#ACT
Movr  D0  22
Inc   D0  1
#IF
Equal D0  1
#ACT
MonGenP "D201,150,150,140" Santa  1

#IF
Equal D0  2
#ACT
MonGenP "D003,150,150,140" Santa  1

#IF
Equal D0  3
#ACT
MonGenP "D002,150,150,140" Santa  1

#IF
Equal D0  4
#ACT
MonGenP "10,150,150,140" Santa  1

#IF
Equal D0  5
#ACT
MonGenP "D005,150,150,140" Santa  1

#IF
Equal D0  6
#ACT
MonGenP "D2701,150,150,140" Santa  1

#IF
Equal D0  7
#ACT
MonGenP "FBI1F,150,150,140" Santa  1

#IF
Equal D0  8
#ACT
MonGenP "D1001,150,150,140" Santa  1

#IF
Equal D0  9
#ACT
MonGenP "D101,150,150,140" Santa  1

#IF
Equal D0  10
#ACT
MonGenP "D1101,150,150,140" Santa  1

#IF
Equal D0  11
#ACT
MonGenP "D1301,150,150,140" Santa  1

#IF
Equal D0  12
#ACT
MonGenP "D1402,150,150,140" Santa  1

#IF
Equal D0  13
#ACT
MonGenP "D1501,150,150,140" Santa  1

#IF
Equal D0  14
#ACT
MonGenP "D2001,150,150,140" Santa  1

#IF
Equal D0  15
#ACT
MonGenP "D2101,150,150,140" Santa  1

#IF
Equal D0  16
#ACT
MonGenP "D301,150,150,140" Santa  1

#IF
Equal D0  17
#ACT
MonGenP "D401,150,150,140" Santa  1

#IF
Equal D0  18
#ACT
MonGenP "D501,150,150,140" Santa  1

#IF
Equal D0  19
#ACT
MonGenP "D601,150,150,140" Santa  1

#IF
Equal D0  20
#ACT
MonGenP "D701,150,150,140" Santa  1

#IF
Equal D0  21
#ACT
MonGenP "D801,150,150,140" Santa  1

#IF
Equal D0  22
#ACT
MonGenP "D901,150,150,140" Santa  1

#IF
Equal D0  23
#ACT
MonGenP "D701,150,150,140" Santa  1

#IF
#ACT
Eventmsg Grobal "A NEW Santa has Spawned!!!!!!" 10025
DelayGoto [grobal] 3600 @XmasEventMain1

}

[@SearchSanta]
{
#IF
CheckMonMap D201 1 Santa
#SAY
Santa D201\
#IF
CheckMonMap D003 1 Santa
#SAY
Santa D003\
#IF
CheckMonMap D002 1 Santa
#SAY
Santa D002\
#IF
CheckMonMap 10 1 Santa
#SAY
Santa 10\
#IF
CheckMonMap D005 1 Santa
#SAY
Santa D005\
#IF
CheckMonMap D2701 1 Santa
#SAY
Santa D2701\
#IF
CheckMonMap FBI1F 1 Santa
#SAY
Santa FBI1F\
#IF
CheckMonMap D1001 1 Santa
#SAY
Santa D1001\
#IF
CheckMonMap D101 1 Santa
#SAY
Santa D101\
#IF
CheckMonMap D1101 1 Santa
#SAY
Santa D1101\
#IF
CheckMonMap D1301 1 Santa
#SAY
Santa D1301\
#IF
CheckMonMap D1402 1 Santa
#SAY
Santa D1402\
#IF
CheckMonMap D1501 1 Santa
#SAY
Santa D1501\
#IF
CheckMonMap D2001 1 Santa
#SAY
Santa D2001\
#IF
CheckMonMap D2101 1 Santa
#SAY
Santa D2101\
#IF
CheckMonMap D301 1 Santa
#SAY
Santa D301\
#IF
CheckMonMap D401 1 Santa
#SAY
Santa D401\
#IF
CheckMonMap D501 1 Santa
#SAY
Santa D501\
#IF
CheckMonMap D601 1 Santa
#SAY
Santa D601\
#IF
CheckMonMap D701 1 Santa
#SAY
Santa D701\
#IF
CheckMonMap D801 1 Santa
#SAY
Santa D801\
#IF
CheckMonMap D901 1 Santa
#SAY
Santa D901\
#IF
CheckMonMap D701 1 Santa
#SAY
Santa D701\

#IF
#SAY
<[ Spawn Reindeer ]/@SpawnReindeer>\

[@SpawnReindeer]
#ACT
MonGenP "10,300,300,300" Reindeer 100
MonGenP "10,300,300,300" ChristmasTree 50
#SAY
Reindeer Spawned




}
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;