REM ********************************************
REM		 ӭʹػ
REM  ͼAI<<³ػIͼAI༭>>
REM		ߣ֮
REM		      QQ3262900
REM ********************************************
REM		ͼߣ
REM		   QQ
REM ********************************************
REM	            PLAYER1=0
REM	            PLAYER2=0
REM	            PLAYER3=0
REM ********************************************



REM ************ʼǮ**************

START_MONEY(PLAYER0,1)
MAX_CREATURES(PLAYER0,60)


REM ************************************

SET_GENERATE_SPEED(40)
ADD_CREATURE_TO_POOL(DRAGON,20)
ADD_CREATURE_TO_POOL(DARK_MISTRESS,20)
ADD_CREATURE_TO_POOL(SPIDER,40)


REM **********ħ**********

CREATURE_AVAILABLE(ALL_PLAYERS,DRAGON,1,1)
CREATURE_AVAILABLE(ALL_PLAYERS,DARK_MISTRESS,1,1)
CREATURE_AVAILABLE(ALL_PLAYERS,SPIDER,1,1)
ROOM_AVAILABLE(ALL_PLAYERS,TREASURE,1,1)
ROOM_AVAILABLE(ALL_PLAYERS,GARDEN,1,1)
MAGIC_AVAILABLE(ALL_PLAYERS,POWER_IMP,1,1)
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,0)
MAGIC_AVAILABLE(ALL_PLAYERS,POWER_HOLD_AUDIENCE,1,0)
MAGIC_AVAILABLE(ALL_PLAYERS,POWER_CHICKEN,1,0)
TRAP_AVAILABLE(ALL_PLAYERS,LIGHTNING,1,0)
TRAP_AVAILABLE(ALL_PLAYERS,BOULDER,1,0)
DOOR_AVAILABLE(ALL_PLAYERS,MAGIC,1,0)


REM ****************ͬ********************



REM ************************************

RESEARCH(PLAYER0,MAGIC,POWER_CHICKEN,2000000)


REM ************************************



REM ************************************

CREATE_PARTY(1)
ADD_TO_PARTY(1,WITCH,10,1,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(1,FAIRY,10,1,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(1,HORNY,5,1,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(1,DRAGON,8,1,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(1,VAMPIRE,6,1,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(1,GHOST,10,1,ATTACK_DUNGEON_HEART,0)
CREATE_PARTY(2)
ADD_TO_PARTY(2,KNIGHT,1,1,ATTACK_DUNGEON_HEART,0)
CREATE_PARTY(3)
ADD_TO_PARTY(3,KNIGHT,9,1,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(3,AVATAR,7,1,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(3,WIZARD,8,1,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(3,MONK,9,1,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(3,WITCH,10,1,ATTACK_DUNGEON_HEART,0)
ADD_TO_PARTY(3,DRAGON,7,1,ATTACK_DUNGEON_HEART,0)


REM ***************¼*******************



REM ***************ϵʽ*******************

DISPLAY_OBJECTIVE(200,PLAYER0)

IF_ACTION_POINT(-2,PLAYER0)
	ADD_PARTY_TO_LEVEL(PLAYER_GOOD,3,-2,10)
ENDIF
IF_ACTION_POINT(2,PLAYER0)
	ADD_PARTY_TO_LEVEL(PLAYER_GOOD,3,2,3)
ENDIF
IF_ACTION_POINT(3,PLAYER0)
	ADD_PARTY_TO_LEVEL(PLAYER_GOOD,3,3,3)
ENDIF
IF_ACTION_POINT(4,PLAYER0)
	ADD_PARTY_TO_LEVEL(PLAYER_GOOD,3,4,5)
ENDIF

REM ʾ趨һʱΪTimer0ԭűиţTimer1
SET_TIMER(PLAYER0,TIMER0)

REM һTimer0ʱ1000򳬹ʱ
REM IF(PLAYER0,TIMER0 >= 1000)

REM ѭʹã
REM NEXT_COMMAND_REUSABLE
REM ADD_PARTY_TO_LEVEL(PLAYER_GOOD,2,-1,2)
REM ˢһα󣬼ʱ
REM NEXT_COMMAND_REUSABLE
REM SET_TIMER(PLAYER0,TIMER0)
REM ENDIF


IF_AVAILABLE(PLAYER0,POWER_CHICKEN==1)
SET_TIMER(PLAYER0,TIMER1)
IF(PLAYER0,TIMER1 >= 15000)
NEXT_COMMAND_REUSABLE
ADD_PARTY_TO_LEVEL(PLAYER_GOOD,1,2,1)
REM ˢһα󣬼ʱ
NEXT_COMMAND_REUSABLE
SET_TIMER(PLAYER0,TIMER1)
ENDIF
ENDIF

IF(PLAYER_GOOD,DUNGEON_DESTROYED==1)
	ADD_PARTY_TO_LEVEL(PLAYER_GOOD,1,1,3)
ENDIF

IF(PLAYER0,ALL_DUNGEONS_DESTROYED==1)
	WIN_GAME
ENDIF

IF(PLAYER0,DUNGEON_DESTROYED==1)
	LOSE_GAME
ENDIF
