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

[@BeetleJuiceMain1]
{

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


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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

}

[@SearchBeetleJuice]
{
#IF
CheckMonMap D201 1 BeetleJuice
#SAY
BeetleJuice D201\
#IF
CheckMonMap D003 1 BeetleJuice
#SAY
BeetleJuice D003\
#IF
CheckMonMap D002 1 BeetleJuice
#SAY
BeetleJuice D002\
#IF
CheckMonMap 10 1 BeetleJuice
#SAY
BeetleJuice 10\
#IF
CheckMonMap D005 1 BeetleJuice
#SAY
BeetleJuice D005\
#IF
CheckMonMap D2701 1 BeetleJuice
#SAY
BeetleJuice D2701\
#IF
CheckMonMap FBI1F 1 BeetleJuice
#SAY
BeetleJuice FBI1F\
#IF
CheckMonMap D1001 1 BeetleJuice
#SAY
BeetleJuice D1001\
#IF
CheckMonMap D101 1 BeetleJuice
#SAY
BeetleJuice D101\
#IF
CheckMonMap D1101 1 BeetleJuice
#SAY
BeetleJuice D1101\
#IF
CheckMonMap D1301 1 BeetleJuice
#SAY
BeetleJuice D1301\
#IF
CheckMonMap D1402 1 BeetleJuice
#SAY
BeetleJuice D1402\
#IF
CheckMonMap D1501 1 BeetleJuice
#SAY
BeetleJuice D1501\
#IF
CheckMonMap D2001 1 BeetleJuice
#SAY
BeetleJuice D2001\
#IF
CheckMonMap D2101 1 BeetleJuice
#SAY
BeetleJuice D2101\
#IF
CheckMonMap D301 1 BeetleJuice
#SAY
BeetleJuice D301\
#IF
CheckMonMap D401 1 BeetleJuice
#SAY
BeetleJuice D401\
#IF
CheckMonMap D501 1 BeetleJuice
#SAY
BeetleJuice D501\
#IF
CheckMonMap D601 1 BeetleJuice
#SAY
BeetleJuice D601\
#IF
CheckMonMap D701 1 BeetleJuice
#SAY
BeetleJuice D701\
#IF
CheckMonMap D801 1 BeetleJuice
#SAY
BeetleJuice D801\
#IF
CheckMonMap D901 1 BeetleJuice
#SAY
BeetleJuice D901\
#IF
CheckMonMap D701 1 BeetleJuice
#SAY
BeetleJuice D701\
#ELSESAY
BeetleJuice is dead
}
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;