Endrix
June 26th, 2014, 16:27
Hi. What´s wrong?
ADD_CREATURE_TO_LEVEL(PLAYER0,HELL_HOUND,PLAYER0,1 ,10,0)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,TUNNELLER,PLAYER 0,3,7,1000)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,AVATAR,PLAYER_GO OD,1,10,0)
CREATE_PARTY(BOULDER_FAIL)
ADD_TO_PARTY(BOULDER_FAIL,GIANT,6,0,ATTACK_ENEMIES ,0)
ADD_TO_PARTY(BOULDER_FAIL,GIANT,6,0,ATTACK_ENEMIES ,0)
ADD_TO_PARTY(BOULDER_FAIL,GIANT,6,0,ATTACK_ENEMIES ,0)
ADD_TO_PARTY(BOULDER_FAIL,GIANT,6,0,ATTACK_ENEMIES ,0)
ADD_TO_PARTY(BOULDER_FAIL,TUNNELLER,10,2000,ATTACK _DUNGEON_HEART,0)
CREATE_PARTY(DEFENDERS_ONE)
ADD_TO_PARTY(DEFENDERS_ONE,DEMONSPAWN,7,0,ATTACK_E NEMIES,0)
ADD_TO_PARTY(DEFENDERS_ONE,DEMONSPAWN,7,0,ATTACK_E NEMIES,0)
ADD_TO_PARTY(DEFENDERS_ONE,DEMONSPAWN,7,0,ATTACK_E NEMIES,0)
ADD_TO_PARTY(DEFENDERS_ONE,DEMONSPAWN,7,0,ATTACK_E NEMIES,0)
ADD_TO_PARTY(DEFENDERS_ONE,DEMONSPAWN,7,0,ATTACK_E NEMIES,0)
ADD_TO_PARTY(DEFENDERS_ONE,DEMONSPAWN,7,0,ATTACK_E NEMIES,0)
ADD_TO_PARTY(DEFENDERS_ONE,DEMONSPAWN,7,0,ATTACK_E NEMIES,0)
CREATE_PARTY(DEFENDERS_TWO)
ADD_TO_PARTY(DEFENDERS_TWO,DEMONSPAWN,10,0,ATTACK_ ENEMIES,0)
ADD_TO_PARTY(DEFENDERS_TWO,DEMONSPAWN,10,0,ATTACK_ ENEMIES,0)
ADD_TO_PARTY(DEFENDERS_TWO,DEMONSPAWN,10,0,ATTACK_ ENEMIES,0)
ADD_TO_PARTY(DEFENDERS_TWO,DEMONSPAWN,10,0,ATTACK_ ENEMIES,0)
ADD_TO_PARTY(DEFENDERS_TWO,DEMONSPAWN,10,0,ATTACK_ ENEMIES,0)
ADD_TO_PARTY(DEFENDERS_TWO,DEMONSPAWN,10,0,ATTACK_ ENEMIES,0)
ADD_TO_PARTY(DEFENDERS_TWO,DEMONSPAWN,10,0,ATTACK_ ENEMIES,0)
CREATE_PARTY(SKELETONS)
ADD_TO_PARTY(SKELETONS,SKELETON,10,0,ATTACK_ENEMIE S,0)
ADD_TO_PARTY(SKELETONS,SKELETON,10,0,ATTACK_ENEMIE S,0)
ADD_TO_PARTY(SKELETONS,SKELETON,10,0,ATTACK_ENEMIE S,0)
ADD_TO_PARTY(SKELETONS,SKELETON,10,0,ATTACK_ENEMIE S,0)
ADD_TO_PARTY(SKELETONS,ORC,10,0,ATTACK_ENEMIES,0)
ADD_TO_PARTY(SKELETONS,ORC,10,0,ATTACK_ENEMIES,0)
ADD_TO_PARTY(SKELETONS,ORC,10,0,ATTACK_ENEMIES,0)
CREATE_PARTY(GHOSTS)
ADD_TO_PARTY(GHOSTS,GHOST,10,0,ATTACK_ENEMIES,0)
ADD_TO_PARTY(GHOSTS,GHOST,10,0,ATTACK_ENEMIES,0)
ADD_TO_PARTY(GHOSTS,GHOST,10,0,ATTACK_ENEMIES,0)
ADD_TO_PARTY(GHOSTS,GHOST,10,0,ATTACK_ENEMIES,0)
ADD_TO_PARTY(GHOSTS,TROLL,10,0,ATTACK_ENEMIES,0)
ADD_TO_PARTY(GHOSTS,TROLL,10,0,ATTACK_ENEMIES,0)
ADD_TO_PARTY(GHOSTS,TROLL,10,0,ATTACK_ENEMIES,0)
CREATE_PARTY(SPIDERS)
ADD_TO_PARTY(SPIDERS,SPIDER,10,0,ATTACK_ENEMIES,0)
ADD_TO_PARTY(SPIDERS,SPIDER,10,0,ATTACK_ENEMIES,0)
ADD_TO_PARTY(SPIDERS,SPIDER,10,0,ATTACK_ENEMIES,0)
ADD_TO_PARTY(SPIDERS,SPIDER,10,0,ATTACK_ENEMIES,0)
ADD_TO_PARTY(SPIDERS,HELL_HOUND,10,0,ATTACK_ENEMIE S,0)
ADD_TO_PARTY(SPIDERS,HELL_HOUND,10,0,ATTACK_ENEMIE S,0)
ADD_TO_PARTY(SPIDERS,HELL_HOUND,10,0,ATTACK_ENEMIE S,0)
CREATE_PARTY(LAST_STAND)
ADD_TO_PARTY(LAST_STAND,SORCEROR,10,0,DEFEND_PARTY ,0)
ADD_TO_PARTY(LAST_STAND,WIZARD,10,0,ATTACK_ENEMIES ,0)
ADD_TO_PARTY(LAST_STAND,TUNNELLER,10,2000,ATTACK_D UNGEON_HEART,0)
ADD_TO_PARTY(LAST_STAND,TUNNELLER,10,2000,ATTACK_D UNGEON_HEART,0)
ADD_TO_PARTY(LAST_STAND,TUNNELLER,10,2000,ATTACK_D UNGEON_HEART,0)
ADD_TO_PARTY(LAST_STAND,TUNNELLER,10,2000,ATTACK_D UNGEON_HEART,0)
ADD_TO_PARTY(LAST_STAND,TUNNELLER,10,2000,ATTACK_D UNGEON_HEART,0)
REM -------------------------------------------------------------------------------------------------------------------------------------------
QUICK_OBJECTIVE(0,"The Ancient Spirits of Intregity, Valor and Justice keep this realm protected with their ancient magic. They just missed one tiny detail, the elderly Vampire Lord Jedidiah was burried here long ago by those same spirits and is in slumber, awake him! For that, you will need some power structures with the Heroes protecting them, find and secure them. The Heroes will not hesitate to destroy them if nessesary so keep your eyes on the rascals.",PLAYER0)
REM Beginning
IF_ACTION_POINT(2,PLAYER0)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,FLY,-1,6,1,0)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,BUG,-2,6,1,0)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,FLY,PLAYER0,6,1, 500)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,BUG,PLAYER0,6,1, 600)
ENDIF
IF_ACTION_POINT(3,PLAYER0)
SET_FLAG(PLAYER1,FLAG0,1)
QUICK_OBJECTIVE(3,"You have reached and secured one of the power structures. Remember, the goal is to secure them, NOT destroy them!",PLAYER0)
ENDIF
IF_ACTION_POINT(4,PLAYER0)
SET_FLAG(PLAYER2,FLAG0,1)
QUICK_OBJECTIVE(3,"You have reached and secured one of the power structures. Remember, the goal is to secure them, NOT destroy them!",PLAYER0)
ENDIF
IF_ACTION_POINT(5,PLAYER0)
ADD_PARTY_TO_LEVEL(PLAYER_GOOD,BOULDER_FAIL,6,1)
ENDIF
IF_ACTION_POINT(7,PLAYER0)
SET_FLAG(PLAYER3,FLAG0,1)
QUICK_OBJECTIVE(3,"You have reached and secured one of the power structures. Remember, the goal is to secure them, NOT destroy them!",PLAYER0)
ENDIF
IF(PLAYER1,FLAG0 == 1)
IF(PLAYER2,FLAG0 == 1)
IF(PLAYER3,FLAG0 == 1)
ADD_CREATURE_TO_LEVEL(PLAYER0,VAMPIRE,1,1,10,9001)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,FLY,PLAYER0,6,1, 500)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,BUG,PLAYER0,6,1, 600)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,TUNNELLER,PLAYER 1,1,10,0)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,TUNNELLER,PLAYER 2,1,10,0)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,TUNNELLER,PLAYER 3,1,10,0)
QUICK_OBJECTIVE(1,"Jeddiah has awakened and is very eager on vengeance on those had imprisoned him, lead on. Your forces will gradually appear as the battle progresses... as do some special allies...",PLAYER0)
ENDIF
ENDIF
ENDIF
REM Endgame
IF_ACTION_POINT(8,PLAYER0)
SET_TIMER(PLAYER_GOOD,TIMER0)
ADD_PARTY_TO_LEVEL(PLAYER2,GHOSTS,8,1)
ENDIF
IF(PLAYER_GOOD,TIMER0 >= 550)
ADD_PARTY_TO_LEVEL(PLAYER3,SPIDERS,8,1)
ADD_PARTY_TO_LEVEL(PLAYER_GOOD,DEFENDERS_ONE,-3,1)
ENDIF
IF(PLAYER_GOOD,TIMER0 >= 1000)
ADD_PARTY_TO_LEVEL(PLAYER_GOOD,DEFENDERS_TWO,-3,1)
ADD_PARTY_TO_LEVEL(PLAYER1,SKELETONS,8,1)
ENDIF
IF_ACTION_POINT(9,PLAYER0)
SET_FLAG(PLAYER1,FLAG1,1)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,FLY,PLAYER1,2,1, 0)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,BUG,PLAYER1,2,1, 0)
QUICK_OBJECTIVE(4,"More reinforcements are on the way to assist you.",PLAYER0)
ENDIF
IF_ACTION_POINT(10,PLAYER0)
SET_FLAG(PLAYER2,FLAG1,1)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,FLY,PLAYER2,2,1, 0)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,BUG,PLAYER2,2,1, 0)
QUICK_OBJECTIVE(4,"More reinforcements are on the way to assist you.",PLAYER0)
ENDIF
IF_ACTION_POINT(11,PLAYER0)
SET_FLAG(PLAYER3,FLAG1,1)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,FLY,PLAYER3,2,1, 0)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,BUG,PLAYER3,2,1, 0)
QUICK_OBJECTIVE(4,"More reinforcements are on the way to assist you.",PLAYER0)
ENDIF
IF_ACTION_POINT(12,PLAYER0)
ADD_PARTY_TO_LEVEL(PLAYER2,SKELETONS,-4,1)
ADD_PARTY_TO_LEVEL(PLAYER3,SPIDERS,-5,1)
ADD_PARTY_TO_LEVEL(PLAYER1,GHOSTS,12,2)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,SAMURAI,14,2,6,0 )
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,SAMURAI,13,1,7,0 )
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,THIEF,14,2,6,0)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,THIEF,13,1,7,0)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,MONK,13,3,6,0)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,BARBARIAN,13,2,6 ,0)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,ARCHER,14,6,4,0)
ENDIF
IF_ACTION_POINT(15,PLAYER0)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,THIEF,-8,3,5,0)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,ARCHER,-9,1,8,0)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,BARBARIAN,-6,2,8,0)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,GIANT,-7,2,6,1200)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,TUNNELLER,PLAYER 0,5,10,2000)
ENDIF
IF_ACTION_POINT(16,PLAYER0)
ADD_PARTY_TO_LEVEL(PLAYER2,SKELETONS,16,1)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,TUNNELLER,PLAYER 0,1,10,2000)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,FLY,PLAYER1,1,1, 0)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,BUG,PLAYER1,1,1, 0)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,FLY,PLAYER2,1,1, 0)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,BUG,PLAYER2,1,1, 0)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,FLY,PLAYER3,1,1, 0)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,BUG,PLAYER3,1,1, 0)
ENDIF
IF_ACTION_POINT(17,PLAYER0)
ADD_PARTY_TO_LEVEL(PLAYER3,SPIDERS,17,1)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,TUNNELLER,PLAYER 0,1,10,2000)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,FLY,PLAYER1,1,1, 0)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,BUG,PLAYER1,1,1, 0)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,FLY,PLAYER2,1,1, 0)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,BUG,PLAYER2,1,1, 0)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,FLY,PLAYER3,1,1, 0)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,BUG,PLAYER3,1,1, 0)
ENDIF
IF_ACTION_POINT(18,PLAYER0)
ADD_PARTY_TO_LEVEL(PLAYER1,GHOSTS,18,1)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,TUNNELLER,PLAYER 0,1,10,2000)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,FLY,PLAYER1,1,1, 0)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,BUG,PLAYER1,1,1, 0)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,FLY,PLAYER2,1,1, 0)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,BUG,PLAYER2,1,1, 0)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,FLY,PLAYER3,1,1, 0)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,BUG,PLAYER3,1,1, 0)
ENDIF
IF(PLAYER_GOOD,GHOST == 0)
TUTORIAL_FLASH_BUTTON(13,PLAYER0)
MAGIC_AVAILABLE(PLAYER0,POWER_DESTROY_WALLS,1,1)
QUICK_OBJECTIVE(2,"Use this spell to break down the walls and destroy the remaining opposition!",PLAYER0)
ENDIF
REM The gang, part 1
IF_ACTION_POINT(19,PLAYER0)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,KNIGHT,-10,6,6,0)
ADD_PARTY_TO_LEVEL(PLAYER1,SKELETONS,21,1)
ADD_CREATURE_TO_LEVEL(PLAYER0,WITCH,PLAYER0,1,10,0 )
ADD_CREATURE_TO_LEVEL(PLAYER1,BILE_DEMON,20,2,10,0 )
ADD_CREATURE_TO_LEVEL(PLAYER2,HORNY,21,1,10,0)
ADD_CREATURE_TO_LEVEL(PLAYER3,DARK_MISTRESS,22,1,1 0,0)
SET_FLAG(PLAYER_GOOD,FLAG0,1)
ENDIF
IF(PLAYER_GOOD,FLAG0 == 1)
SET_TIMER(PLAYER_GOOD,TIMER1)
ENDIF
IF_ACTION_POINT(19,PLAYER0)
IF(PLAYER1,FLAG1 == 1)
SET_TIMER(PLAYER1,TIMER1)
ENDIF
ENDIF
IF_ACTION_POINT(19,PLAYER0)
IF(PLAYER2,FLAG1 == 1)
SET_TIMER(PLAYER2,TIMER1)
ENDIF
ENDIF
IF_ACTION_POINT(19,PLAYER0)
IF(PLAYER3,FLAG1 == 1)
SET_TIMER(PLAYER3,TIMER1)
ENDIF
ENDIF
IF(PLAYER_GOOD,DUNGEON_DESTROYED == 0)
IF(PLAYER_GOOD,TOTAL_CREATURES <= 20)
IF(PLAYER_GOOD,TIMER1 > 1350)
NEXT_COMMAND_REUSABLE
ADD_PARTY_TO_LEVEL(PLAYER_GOOD,LAST_STAND,-10,1)
NEXT_COMMAND_REUSABLE
SET_TIMER(PLAYER_GOOD,TIMER1)
ENDIF
ENDIF
ENDIF
REM The gang, part 2
IF(PLAYER1,TOTAL_CREATURES <= 20)
IF(PLAYER1,TIMER1 > 400)
ADD_CREATURE_TO_LEVEL(PLAYER1,TROLL,22,1,10,0)
NEXT_COMMAND_REUSABLE
ADD_CREATURE_TO_LEVEL(PLAYER1,GHOST,20,1,10,0)
NEXT_COMMAND_REUSABLE
SET_TIMER(PLAYER1,TIMER1)
ENDIF
ENDIF
IF(PLAYER2,TOTAL_CREATURES <= 20)
IF(PLAYER2,TIMER1 > 600)
ADD_CREATURE_TO_LEVEL(PLAYER2,ORC,20,1,10,0)
NEXT_COMMAND_REUSABLE
ADD_CREATURE_TO_LEVEL(PLAYER2,SKELETON,21,1,10,0)
NEXT_COMMAND_REUSABLE
SET_TIMER(PLAYER2,TIMER1)
ENDIF
ENDIF
IF(PLAYER3,TOTAL_CREATURES <= 20)
IF(PLAYER3,TIMER1 > 800)
ADD_CREATURE_TO_LEVEL(PLAYER3,HELL_HOUND,22,1,10,0 )
NEXT_COMMAND_REUSABLE
ADD_CREATURE_TO_LEVEL(PLAYER3,SPIDER,22,1,10,0)
NEXT_COMMAND_REUSABLE
SET_TIMER(PLAYER3,TIMER1)
ENDIF
ENDIF
IF(PLAYER_GOOD,AVATAR == 0)
IF(PLAYER_GOOD,FLAG0 == 1)
QUICK_OBJECTIVE(5,"The enemies of darkness and death have been shown no mercy... as it should be.... well done...",PLAYER0)
WIN_GAME
ENDIF
ENDIF
REM -------------------------------------------------------------------------------------------------------------------------------------------
IF(PLAYER1,DUNGEON_DESTROYED == 1)
LOSE_GAME
ENDIF
IF(PLAYER2,DUNGEON_DESTROYED == 1)
LOSE_GAME
ENDIF
IF(PLAYER3,DUNGEON_DESTROYED == 1)
LOSE_GAME
ENDIF
IF(PLAYER0,TOTAL_CREATURES == 0)
LOSE_GAME
ENDIF
ADD_CREATURE_TO_LEVEL(PLAYER0,HELL_HOUND,PLAYER0,1 ,10,0)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,TUNNELLER,PLAYER 0,3,7,1000)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,AVATAR,PLAYER_GO OD,1,10,0)
CREATE_PARTY(BOULDER_FAIL)
ADD_TO_PARTY(BOULDER_FAIL,GIANT,6,0,ATTACK_ENEMIES ,0)
ADD_TO_PARTY(BOULDER_FAIL,GIANT,6,0,ATTACK_ENEMIES ,0)
ADD_TO_PARTY(BOULDER_FAIL,GIANT,6,0,ATTACK_ENEMIES ,0)
ADD_TO_PARTY(BOULDER_FAIL,GIANT,6,0,ATTACK_ENEMIES ,0)
ADD_TO_PARTY(BOULDER_FAIL,TUNNELLER,10,2000,ATTACK _DUNGEON_HEART,0)
CREATE_PARTY(DEFENDERS_ONE)
ADD_TO_PARTY(DEFENDERS_ONE,DEMONSPAWN,7,0,ATTACK_E NEMIES,0)
ADD_TO_PARTY(DEFENDERS_ONE,DEMONSPAWN,7,0,ATTACK_E NEMIES,0)
ADD_TO_PARTY(DEFENDERS_ONE,DEMONSPAWN,7,0,ATTACK_E NEMIES,0)
ADD_TO_PARTY(DEFENDERS_ONE,DEMONSPAWN,7,0,ATTACK_E NEMIES,0)
ADD_TO_PARTY(DEFENDERS_ONE,DEMONSPAWN,7,0,ATTACK_E NEMIES,0)
ADD_TO_PARTY(DEFENDERS_ONE,DEMONSPAWN,7,0,ATTACK_E NEMIES,0)
ADD_TO_PARTY(DEFENDERS_ONE,DEMONSPAWN,7,0,ATTACK_E NEMIES,0)
CREATE_PARTY(DEFENDERS_TWO)
ADD_TO_PARTY(DEFENDERS_TWO,DEMONSPAWN,10,0,ATTACK_ ENEMIES,0)
ADD_TO_PARTY(DEFENDERS_TWO,DEMONSPAWN,10,0,ATTACK_ ENEMIES,0)
ADD_TO_PARTY(DEFENDERS_TWO,DEMONSPAWN,10,0,ATTACK_ ENEMIES,0)
ADD_TO_PARTY(DEFENDERS_TWO,DEMONSPAWN,10,0,ATTACK_ ENEMIES,0)
ADD_TO_PARTY(DEFENDERS_TWO,DEMONSPAWN,10,0,ATTACK_ ENEMIES,0)
ADD_TO_PARTY(DEFENDERS_TWO,DEMONSPAWN,10,0,ATTACK_ ENEMIES,0)
ADD_TO_PARTY(DEFENDERS_TWO,DEMONSPAWN,10,0,ATTACK_ ENEMIES,0)
CREATE_PARTY(SKELETONS)
ADD_TO_PARTY(SKELETONS,SKELETON,10,0,ATTACK_ENEMIE S,0)
ADD_TO_PARTY(SKELETONS,SKELETON,10,0,ATTACK_ENEMIE S,0)
ADD_TO_PARTY(SKELETONS,SKELETON,10,0,ATTACK_ENEMIE S,0)
ADD_TO_PARTY(SKELETONS,SKELETON,10,0,ATTACK_ENEMIE S,0)
ADD_TO_PARTY(SKELETONS,ORC,10,0,ATTACK_ENEMIES,0)
ADD_TO_PARTY(SKELETONS,ORC,10,0,ATTACK_ENEMIES,0)
ADD_TO_PARTY(SKELETONS,ORC,10,0,ATTACK_ENEMIES,0)
CREATE_PARTY(GHOSTS)
ADD_TO_PARTY(GHOSTS,GHOST,10,0,ATTACK_ENEMIES,0)
ADD_TO_PARTY(GHOSTS,GHOST,10,0,ATTACK_ENEMIES,0)
ADD_TO_PARTY(GHOSTS,GHOST,10,0,ATTACK_ENEMIES,0)
ADD_TO_PARTY(GHOSTS,GHOST,10,0,ATTACK_ENEMIES,0)
ADD_TO_PARTY(GHOSTS,TROLL,10,0,ATTACK_ENEMIES,0)
ADD_TO_PARTY(GHOSTS,TROLL,10,0,ATTACK_ENEMIES,0)
ADD_TO_PARTY(GHOSTS,TROLL,10,0,ATTACK_ENEMIES,0)
CREATE_PARTY(SPIDERS)
ADD_TO_PARTY(SPIDERS,SPIDER,10,0,ATTACK_ENEMIES,0)
ADD_TO_PARTY(SPIDERS,SPIDER,10,0,ATTACK_ENEMIES,0)
ADD_TO_PARTY(SPIDERS,SPIDER,10,0,ATTACK_ENEMIES,0)
ADD_TO_PARTY(SPIDERS,SPIDER,10,0,ATTACK_ENEMIES,0)
ADD_TO_PARTY(SPIDERS,HELL_HOUND,10,0,ATTACK_ENEMIE S,0)
ADD_TO_PARTY(SPIDERS,HELL_HOUND,10,0,ATTACK_ENEMIE S,0)
ADD_TO_PARTY(SPIDERS,HELL_HOUND,10,0,ATTACK_ENEMIE S,0)
CREATE_PARTY(LAST_STAND)
ADD_TO_PARTY(LAST_STAND,SORCEROR,10,0,DEFEND_PARTY ,0)
ADD_TO_PARTY(LAST_STAND,WIZARD,10,0,ATTACK_ENEMIES ,0)
ADD_TO_PARTY(LAST_STAND,TUNNELLER,10,2000,ATTACK_D UNGEON_HEART,0)
ADD_TO_PARTY(LAST_STAND,TUNNELLER,10,2000,ATTACK_D UNGEON_HEART,0)
ADD_TO_PARTY(LAST_STAND,TUNNELLER,10,2000,ATTACK_D UNGEON_HEART,0)
ADD_TO_PARTY(LAST_STAND,TUNNELLER,10,2000,ATTACK_D UNGEON_HEART,0)
ADD_TO_PARTY(LAST_STAND,TUNNELLER,10,2000,ATTACK_D UNGEON_HEART,0)
REM -------------------------------------------------------------------------------------------------------------------------------------------
QUICK_OBJECTIVE(0,"The Ancient Spirits of Intregity, Valor and Justice keep this realm protected with their ancient magic. They just missed one tiny detail, the elderly Vampire Lord Jedidiah was burried here long ago by those same spirits and is in slumber, awake him! For that, you will need some power structures with the Heroes protecting them, find and secure them. The Heroes will not hesitate to destroy them if nessesary so keep your eyes on the rascals.",PLAYER0)
REM Beginning
IF_ACTION_POINT(2,PLAYER0)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,FLY,-1,6,1,0)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,BUG,-2,6,1,0)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,FLY,PLAYER0,6,1, 500)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,BUG,PLAYER0,6,1, 600)
ENDIF
IF_ACTION_POINT(3,PLAYER0)
SET_FLAG(PLAYER1,FLAG0,1)
QUICK_OBJECTIVE(3,"You have reached and secured one of the power structures. Remember, the goal is to secure them, NOT destroy them!",PLAYER0)
ENDIF
IF_ACTION_POINT(4,PLAYER0)
SET_FLAG(PLAYER2,FLAG0,1)
QUICK_OBJECTIVE(3,"You have reached and secured one of the power structures. Remember, the goal is to secure them, NOT destroy them!",PLAYER0)
ENDIF
IF_ACTION_POINT(5,PLAYER0)
ADD_PARTY_TO_LEVEL(PLAYER_GOOD,BOULDER_FAIL,6,1)
ENDIF
IF_ACTION_POINT(7,PLAYER0)
SET_FLAG(PLAYER3,FLAG0,1)
QUICK_OBJECTIVE(3,"You have reached and secured one of the power structures. Remember, the goal is to secure them, NOT destroy them!",PLAYER0)
ENDIF
IF(PLAYER1,FLAG0 == 1)
IF(PLAYER2,FLAG0 == 1)
IF(PLAYER3,FLAG0 == 1)
ADD_CREATURE_TO_LEVEL(PLAYER0,VAMPIRE,1,1,10,9001)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,FLY,PLAYER0,6,1, 500)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,BUG,PLAYER0,6,1, 600)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,TUNNELLER,PLAYER 1,1,10,0)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,TUNNELLER,PLAYER 2,1,10,0)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,TUNNELLER,PLAYER 3,1,10,0)
QUICK_OBJECTIVE(1,"Jeddiah has awakened and is very eager on vengeance on those had imprisoned him, lead on. Your forces will gradually appear as the battle progresses... as do some special allies...",PLAYER0)
ENDIF
ENDIF
ENDIF
REM Endgame
IF_ACTION_POINT(8,PLAYER0)
SET_TIMER(PLAYER_GOOD,TIMER0)
ADD_PARTY_TO_LEVEL(PLAYER2,GHOSTS,8,1)
ENDIF
IF(PLAYER_GOOD,TIMER0 >= 550)
ADD_PARTY_TO_LEVEL(PLAYER3,SPIDERS,8,1)
ADD_PARTY_TO_LEVEL(PLAYER_GOOD,DEFENDERS_ONE,-3,1)
ENDIF
IF(PLAYER_GOOD,TIMER0 >= 1000)
ADD_PARTY_TO_LEVEL(PLAYER_GOOD,DEFENDERS_TWO,-3,1)
ADD_PARTY_TO_LEVEL(PLAYER1,SKELETONS,8,1)
ENDIF
IF_ACTION_POINT(9,PLAYER0)
SET_FLAG(PLAYER1,FLAG1,1)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,FLY,PLAYER1,2,1, 0)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,BUG,PLAYER1,2,1, 0)
QUICK_OBJECTIVE(4,"More reinforcements are on the way to assist you.",PLAYER0)
ENDIF
IF_ACTION_POINT(10,PLAYER0)
SET_FLAG(PLAYER2,FLAG1,1)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,FLY,PLAYER2,2,1, 0)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,BUG,PLAYER2,2,1, 0)
QUICK_OBJECTIVE(4,"More reinforcements are on the way to assist you.",PLAYER0)
ENDIF
IF_ACTION_POINT(11,PLAYER0)
SET_FLAG(PLAYER3,FLAG1,1)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,FLY,PLAYER3,2,1, 0)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,BUG,PLAYER3,2,1, 0)
QUICK_OBJECTIVE(4,"More reinforcements are on the way to assist you.",PLAYER0)
ENDIF
IF_ACTION_POINT(12,PLAYER0)
ADD_PARTY_TO_LEVEL(PLAYER2,SKELETONS,-4,1)
ADD_PARTY_TO_LEVEL(PLAYER3,SPIDERS,-5,1)
ADD_PARTY_TO_LEVEL(PLAYER1,GHOSTS,12,2)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,SAMURAI,14,2,6,0 )
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,SAMURAI,13,1,7,0 )
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,THIEF,14,2,6,0)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,THIEF,13,1,7,0)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,MONK,13,3,6,0)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,BARBARIAN,13,2,6 ,0)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,ARCHER,14,6,4,0)
ENDIF
IF_ACTION_POINT(15,PLAYER0)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,THIEF,-8,3,5,0)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,ARCHER,-9,1,8,0)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,BARBARIAN,-6,2,8,0)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,GIANT,-7,2,6,1200)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,TUNNELLER,PLAYER 0,5,10,2000)
ENDIF
IF_ACTION_POINT(16,PLAYER0)
ADD_PARTY_TO_LEVEL(PLAYER2,SKELETONS,16,1)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,TUNNELLER,PLAYER 0,1,10,2000)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,FLY,PLAYER1,1,1, 0)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,BUG,PLAYER1,1,1, 0)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,FLY,PLAYER2,1,1, 0)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,BUG,PLAYER2,1,1, 0)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,FLY,PLAYER3,1,1, 0)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,BUG,PLAYER3,1,1, 0)
ENDIF
IF_ACTION_POINT(17,PLAYER0)
ADD_PARTY_TO_LEVEL(PLAYER3,SPIDERS,17,1)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,TUNNELLER,PLAYER 0,1,10,2000)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,FLY,PLAYER1,1,1, 0)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,BUG,PLAYER1,1,1, 0)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,FLY,PLAYER2,1,1, 0)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,BUG,PLAYER2,1,1, 0)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,FLY,PLAYER3,1,1, 0)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,BUG,PLAYER3,1,1, 0)
ENDIF
IF_ACTION_POINT(18,PLAYER0)
ADD_PARTY_TO_LEVEL(PLAYER1,GHOSTS,18,1)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,TUNNELLER,PLAYER 0,1,10,2000)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,FLY,PLAYER1,1,1, 0)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,BUG,PLAYER1,1,1, 0)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,FLY,PLAYER2,1,1, 0)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,BUG,PLAYER2,1,1, 0)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,FLY,PLAYER3,1,1, 0)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,BUG,PLAYER3,1,1, 0)
ENDIF
IF(PLAYER_GOOD,GHOST == 0)
TUTORIAL_FLASH_BUTTON(13,PLAYER0)
MAGIC_AVAILABLE(PLAYER0,POWER_DESTROY_WALLS,1,1)
QUICK_OBJECTIVE(2,"Use this spell to break down the walls and destroy the remaining opposition!",PLAYER0)
ENDIF
REM The gang, part 1
IF_ACTION_POINT(19,PLAYER0)
ADD_CREATURE_TO_LEVEL(PLAYER_GOOD,KNIGHT,-10,6,6,0)
ADD_PARTY_TO_LEVEL(PLAYER1,SKELETONS,21,1)
ADD_CREATURE_TO_LEVEL(PLAYER0,WITCH,PLAYER0,1,10,0 )
ADD_CREATURE_TO_LEVEL(PLAYER1,BILE_DEMON,20,2,10,0 )
ADD_CREATURE_TO_LEVEL(PLAYER2,HORNY,21,1,10,0)
ADD_CREATURE_TO_LEVEL(PLAYER3,DARK_MISTRESS,22,1,1 0,0)
SET_FLAG(PLAYER_GOOD,FLAG0,1)
ENDIF
IF(PLAYER_GOOD,FLAG0 == 1)
SET_TIMER(PLAYER_GOOD,TIMER1)
ENDIF
IF_ACTION_POINT(19,PLAYER0)
IF(PLAYER1,FLAG1 == 1)
SET_TIMER(PLAYER1,TIMER1)
ENDIF
ENDIF
IF_ACTION_POINT(19,PLAYER0)
IF(PLAYER2,FLAG1 == 1)
SET_TIMER(PLAYER2,TIMER1)
ENDIF
ENDIF
IF_ACTION_POINT(19,PLAYER0)
IF(PLAYER3,FLAG1 == 1)
SET_TIMER(PLAYER3,TIMER1)
ENDIF
ENDIF
IF(PLAYER_GOOD,DUNGEON_DESTROYED == 0)
IF(PLAYER_GOOD,TOTAL_CREATURES <= 20)
IF(PLAYER_GOOD,TIMER1 > 1350)
NEXT_COMMAND_REUSABLE
ADD_PARTY_TO_LEVEL(PLAYER_GOOD,LAST_STAND,-10,1)
NEXT_COMMAND_REUSABLE
SET_TIMER(PLAYER_GOOD,TIMER1)
ENDIF
ENDIF
ENDIF
REM The gang, part 2
IF(PLAYER1,TOTAL_CREATURES <= 20)
IF(PLAYER1,TIMER1 > 400)
ADD_CREATURE_TO_LEVEL(PLAYER1,TROLL,22,1,10,0)
NEXT_COMMAND_REUSABLE
ADD_CREATURE_TO_LEVEL(PLAYER1,GHOST,20,1,10,0)
NEXT_COMMAND_REUSABLE
SET_TIMER(PLAYER1,TIMER1)
ENDIF
ENDIF
IF(PLAYER2,TOTAL_CREATURES <= 20)
IF(PLAYER2,TIMER1 > 600)
ADD_CREATURE_TO_LEVEL(PLAYER2,ORC,20,1,10,0)
NEXT_COMMAND_REUSABLE
ADD_CREATURE_TO_LEVEL(PLAYER2,SKELETON,21,1,10,0)
NEXT_COMMAND_REUSABLE
SET_TIMER(PLAYER2,TIMER1)
ENDIF
ENDIF
IF(PLAYER3,TOTAL_CREATURES <= 20)
IF(PLAYER3,TIMER1 > 800)
ADD_CREATURE_TO_LEVEL(PLAYER3,HELL_HOUND,22,1,10,0 )
NEXT_COMMAND_REUSABLE
ADD_CREATURE_TO_LEVEL(PLAYER3,SPIDER,22,1,10,0)
NEXT_COMMAND_REUSABLE
SET_TIMER(PLAYER3,TIMER1)
ENDIF
ENDIF
IF(PLAYER_GOOD,AVATAR == 0)
IF(PLAYER_GOOD,FLAG0 == 1)
QUICK_OBJECTIVE(5,"The enemies of darkness and death have been shown no mercy... as it should be.... well done...",PLAYER0)
WIN_GAME
ENDIF
ENDIF
REM -------------------------------------------------------------------------------------------------------------------------------------------
IF(PLAYER1,DUNGEON_DESTROYED == 1)
LOSE_GAME
ENDIF
IF(PLAYER2,DUNGEON_DESTROYED == 1)
LOSE_GAME
ENDIF
IF(PLAYER3,DUNGEON_DESTROYED == 1)
LOSE_GAME
ENDIF
IF(PLAYER0,TOTAL_CREATURES == 0)
LOSE_GAME
ENDIF