LEVEL_VERSION(1)
SET_GENERATE_SPEED(400)
START_MONEY(ALL_PLAYERS,0)
MAX_CREATURES(ALL_PLAYERS,25)

COMPUTER_PLAYER(PLAYER_GOOD,0)
COMPUTER_PLAYER(PLAYER1,0)
COMPUTER_PLAYER(PLAYER2,0)
COMPUTER_PLAYER(PLAYER3,0)
COMPUTER_PLAYER(PLAYER4,0)
COMPUTER_PLAYER(PLAYER5,0)
COMPUTER_PLAYER(PLAYER6,ROAMING)

ALLY_PLAYERS(PLAYER0,PLAYER6,3)
ALLY_PLAYERS(PLAYER1,PLAYER2,3)
ALLY_PLAYERS(PLAYER1,PLAYER3,3)
ALLY_PLAYERS(PLAYER1,PLAYER4,3)
ALLY_PLAYERS(PLAYER1,PLAYER5,3)
ALLY_PLAYERS(PLAYER1,PLAYER_GOOD,3)
ALLY_PLAYERS(PLAYER2,PLAYER3,3)
ALLY_PLAYERS(PLAYER2,PLAYER4,3)
ALLY_PLAYERS(PLAYER2,PLAYER5,3)
ALLY_PLAYERS(PLAYER2,PLAYER_GOOD,3)
ALLY_PLAYERS(PLAYER3,PLAYER4,3)
ALLY_PLAYERS(PLAYER3,PLAYER5,3)
ALLY_PLAYERS(PLAYER3,PLAYER_GOOD,3)
ALLY_PLAYERS(PLAYER4,PLAYER5,3)
ALLY_PLAYERS(PLAYER4,PLAYER_GOOD,3)
ALLY_PLAYERS(PLAYER5,PLAYER_GOOD,3)

ROOM_AVAILABLE(ALL_PLAYERS,BRIDGE,1,1)

MAGIC_AVAILABLE(PLAYER0,POWER_IMP,1,0)
MAGIC_AVAILABLE(PLAYER1,POWER_IMP,1,1)
MAGIC_AVAILABLE(PLAYER2,POWER_IMP,1,1)
MAGIC_AVAILABLE(PLAYER3,POWER_IMP,1,1)
MAGIC_AVAILABLE(PLAYER4,POWER_IMP,1,1)
MAGIC_AVAILABLE(PLAYER5,POWER_IMP,1,1)
MAGIC_AVAILABLE(PLAYER_GOOD,POWER_IMP,1,1)

MAGIC_AVAILABLE(ALL_PLAYERS,POWER_HAND,1,1)
MAGIC_AVAILABLE(ALL_PLAYERS,POWER_SLAP,1,1)
MAGIC_AVAILABLE(ALL_PLAYERS,POWER_POSSESS,1,1)
MAGIC_AVAILABLE(ALL_PLAYERS,POWER_SIGHT,1,0)
MAGIC_AVAILABLE(ALL_PLAYERS,POWER_SPEED,1,0)
MAGIC_AVAILABLE(ALL_PLAYERS,POWER_OBEY,1,0)
MAGIC_AVAILABLE(ALL_PLAYERS,POWER_CALL_TO_ARMS,1,1)
MAGIC_AVAILABLE(ALL_PLAYERS,POWER_CONCEAL,1,0)
MAGIC_AVAILABLE(ALL_PLAYERS,POWER_HOLD_AUDIENCE,1,0)
MAGIC_AVAILABLE(ALL_PLAYERS,POWER_CAVE_IN,1,0)
MAGIC_AVAILABLE(ALL_PLAYERS,POWER_HEAL_CREATURE,1,0)
MAGIC_AVAILABLE(ALL_PLAYERS,POWER_LIGHTNING,1,0)
MAGIC_AVAILABLE(ALL_PLAYERS,POWER_PROTECT,1,0)
MAGIC_AVAILABLE(ALL_PLAYERS,POWER_CHICKEN,1,0)
MAGIC_AVAILABLE(ALL_PLAYERS,POWER_DISEASE,1,0)

QUICK_OBJECTIVE(1,"Your brainless brute reapers absolutly had to start a whole theatre about how they could take not on one, not on two, not on three, but SIX!?!1?1? whole hero fortresses and their inhabitants all alone. And now this whole shittocened situation breaks down on you to shovel out. Good luck, and good night.",ALL_PLAYERS)

SET_COMPUTER_PROCESS(PLAYER1, "ATTACK PLAN 1", 1, 100, 15, 10, 0)
SET_COMPUTER_PROCESS(PLAYER2, "ATTACK PLAN 1", 1, 100, 15, 10, 0)
SET_COMPUTER_PROCESS(PLAYER3, "ATTACK PLAN 1", 1, 100, 15, 10, 0)
SET_COMPUTER_PROCESS(PLAYER4, "ATTACK PLAN 1", 1, 100, 15, 10, 0)
SET_COMPUTER_PROCESS(PLAYER5, "ATTACK PLAN 1", 1, 100, 15, 10, 0)
SET_COMPUTER_PROCESS(PLAYER_GOOD, "ATTACK PLAN 1", 0, 100, 15, 10, 0)
SET_COMPUTER_EVENT(PLAYER1,"EVENT ENEMY DOOR", 400, 1, 0, 0, 0)
SET_COMPUTER_EVENT(PLAYER2,"EVENT ENEMY DOOR", 400, 1, 0, 0, 0)
SET_COMPUTER_EVENT(PLAYER3,"EVENT ENEMY DOOR", 400, 1, 0, 0, 0)
SET_COMPUTER_EVENT(PLAYER4,"EVENT ENEMY DOOR", 400, 1, 0, 0, 0)
SET_COMPUTER_EVENT(PLAYER5,"EVENT ENEMY DOOR", 400, 1, 0, 0, 0)
SET_COMPUTER_EVENT(PLAYER_GOOD,"EVENT ENEMY DOOR", 400, 1, 0, 0, 0)
SET_COMPUTER_CHECKS(PLAYER1,"CHECK FOR QUICK ATTACK", 1000,100,5000,10,5000)
SET_COMPUTER_CHECKS(PLAYER2,"CHECK FOR QUICK ATTACK", 1000,100,5000,10,5000)
SET_COMPUTER_CHECKS(PLAYER3,"CHECK FOR QUICK ATTACK", 1000,100,5000,10,5000)
SET_COMPUTER_CHECKS(PLAYER4,"CHECK FOR QUICK ATTACK", 1000,100,5000,10,5000)
SET_COMPUTER_CHECKS(PLAYER5,"CHECK FOR QUICK ATTACK", 1000,100,5000,10,5000)
SET_COMPUTER_CHECKS(PLAYER_GOOD,"CHECK FOR QUICK ATTACK", 1000,100,5000,10,5000)

IF(PLAYER0,GAME_TURN >= 500)
	COMPUTER_DIG_TO_LOCATION(PLAYER1,2,1)
	COMPUTER_DIG_TO_LOCATION(PLAYER1,3,1)
	COMPUTER_DIG_TO_LOCATION(PLAYER1,4,1)
	COMPUTER_DIG_TO_LOCATION(PLAYER1,5,1)

	COMPUTER_DIG_TO_LOCATION(PLAYER2,10,1)
	COMPUTER_DIG_TO_LOCATION(PLAYER2,11,1)
	COMPUTER_DIG_TO_LOCATION(PLAYER2,12,1)
	COMPUTER_DIG_TO_LOCATION(PLAYER2,13,1)

	COMPUTER_DIG_TO_LOCATION(PLAYER3,14,1)
	COMPUTER_DIG_TO_LOCATION(PLAYER3,15,1)
	COMPUTER_DIG_TO_LOCATION(PLAYER3,16,1)
	COMPUTER_DIG_TO_LOCATION(PLAYER3,17,1)

	COMPUTER_DIG_TO_LOCATION(PLAYER4,22,1)
	COMPUTER_DIG_TO_LOCATION(PLAYER4,23,1)
	COMPUTER_DIG_TO_LOCATION(PLAYER4,24,1)
	COMPUTER_DIG_TO_LOCATION(PLAYER4,25,1)

	COMPUTER_DIG_TO_LOCATION(PLAYER5,18,1)
	COMPUTER_DIG_TO_LOCATION(PLAYER5,19,1)
	COMPUTER_DIG_TO_LOCATION(PLAYER5,20,1)
	COMPUTER_DIG_TO_LOCATION(PLAYER5,21,1)

	COMPUTER_DIG_TO_LOCATION(PLAYER_GOOD,6,1)
	COMPUTER_DIG_TO_LOCATION(PLAYER_GOOD,7,1)
	COMPUTER_DIG_TO_LOCATION(PLAYER_GOOD,8,1)
	COMPUTER_DIG_TO_LOCATION(PLAYER_GOOD,9,1)
ENDIF

IF(PLAYER0,GAME_TURN >= 1900)
	USE_POWER_AT_LOCATION(PLAYER1, 4, POWER_CALL_TO_ARMS, 9, 1)
	USE_POWER_AT_LOCATION(PLAYER2, 10, POWER_CALL_TO_ARMS, 9, 1)
	USE_POWER_AT_LOCATION(PLAYER3, 15, POWER_CALL_TO_ARMS, 9, 1)
	USE_POWER_AT_LOCATION(PLAYER4, 23, POWER_CALL_TO_ARMS, 9, 1)
	USE_POWER_AT_LOCATION(PLAYER5, 19, POWER_CALL_TO_ARMS, 9, 1)
	USE_POWER_AT_LOCATION(PLAYER_GOOD, 8, POWER_CALL_TO_ARMS, 9, 1)
ENDIF

IF(PLAYER0,GAME_TURN >= 2000)
	USE_POWER_AT_LOCATION(PLAYER1, 1, POWER_CALL_TO_ARMS, 9, 1)
	USE_POWER_AT_LOCATION(PLAYER2, 1, POWER_CALL_TO_ARMS, 9, 1)
	USE_POWER_AT_LOCATION(PLAYER3, 1, POWER_CALL_TO_ARMS, 9, 1)
	USE_POWER_AT_LOCATION(PLAYER4, 1, POWER_CALL_TO_ARMS, 9, 1)
	USE_POWER_AT_LOCATION(PLAYER5, 1, POWER_CALL_TO_ARMS, 9, 1)
	USE_POWER_AT_LOCATION(PLAYER_GOOD, 1, POWER_CALL_TO_ARMS, 9, 1)
ENDIF

IF(PLAYER0,ALL_DUNGEONS_DESTROYED == 1)
	QUICK_OBJECTIVE(2,"Who had thought that it would even work out in the end. Too bad your reapers gonna kill each other anyway before they start splitting the booty.",ALL_PLAYERS)
	WIN_GAME
ENDIF
