LEVEL_VERSION(1)
RUN_AFTER_VICTORY(1)

SET_GENERATE_SPEED(400)

START_MONEY(PLAYER0,10000)

SET_FLAG(PLAYER_GOOD,BOX219_ACTIVATED,30)
MAX_CREATURES(PLAYER0,30)

ROOM_AVAILABLE(ALL_PLAYERS,TREASURE,1,1)
ROOM_AVAILABLE(ALL_PLAYERS,LAIR,1,1)
ROOM_AVAILABLE(ALL_PLAYERS,GARDEN,1,1)
ROOM_AVAILABLE(ALL_PLAYERS,TRAINING,1,1)
ROOM_AVAILABLE(ALL_PLAYERS,RESEARCH,1,1)
ROOM_AVAILABLE(ALL_PLAYERS,WORKSHOP,1,1)
ROOM_AVAILABLE(ALL_PLAYERS,BARRACKS,1,1)
ROOM_AVAILABLE(ALL_PLAYERS,GUARD_POST,1,1)
ROOM_AVAILABLE(ALL_PLAYERS,BRIDGE,1,0)
ROOM_AVAILABLE(ALL_PLAYERS,PRISON,1,0)
ROOM_AVAILABLE(ALL_PLAYERS,SCAVENGER,1,0)
ROOM_AVAILABLE(ALL_PLAYERS,TORTURE,1,0)
ROOM_AVAILABLE(ALL_PLAYERS,TEMPLE,1,0)
ROOM_AVAILABLE(ALL_PLAYERS,GRAVEYARD,1,0)

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

DOOR_AVAILABLE(ALL_PLAYERS,BRACED,1,0)
TRAP_AVAILABLE(ALL_PLAYERS,POISON_GAS,1,0)
DOOR_AVAILABLE(ALL_PLAYERS,STEEL,1,0)
DOOR_AVAILABLE(ALL_PLAYERS,MAGIC,1,0)
TRAP_AVAILABLE(ALL_PLAYERS,BOULDER,1,0)
TRAP_AVAILABLE(ALL_PLAYERS,LIGHTNING,1,0)
TRAP_AVAILABLE(ALL_PLAYERS,ALARM,1,0)
TRAP_AVAILABLE(ALL_PLAYERS,LAVA,1,0)
TRAP_AVAILABLE(ALL_PLAYERS,WORD_OF_POWER,1,0)

CREATE_PARTY(FIRST)
	ADD_TO_PARTY(FIRST,BARBARIAN,2,100,ATTACK_ENEMIES,0)
	ADD_TO_PARTY(FIRST,GIANT,2,100,ATTACK_ENEMIES,0)

CREATE_PARTY(SECOND)
	ADD_TO_PARTY(SECOND,MONK,3,100,ATTACK_ENEMIES,0)
	ADD_TO_PARTY(SECOND,MONK,3,100,ATTACK_ENEMIES,0)

CREATE_PARTY(THIRD)
	ADD_TO_PARTY(THIRD,ARCHER,4,100,ATTACK_ENEMIES,0)
	ADD_TO_PARTY(THIRD,BARBARIAN,4,100,ATTACK_ENEMIES,0)

CREATE_PARTY(FOURTH)
	ADD_TO_PARTY(FOURTH,WIZARD,4,100,ATTACK_ENEMIES,0)
	ADD_TO_PARTY(FOURTH,GIANT,4,100,ATTACK_ENEMIES,0)

CREATE_PARTY(FIFTH)
	ADD_TO_PARTY(FIFTH,WIZARD,5,100,ATTACK_ENEMIES,0)
	ADD_TO_PARTY(FIFTH,WIZARD,5,150,ATTACK_ENEMIES,0)

CREATE_PARTY(SIXTH)
	ADD_TO_PARTY(SIXTH,MONK,6,100,ATTACK_ENEMIES,0)
	ADD_TO_PARTY(SIXTH,MONK,6,100,ATTACK_ENEMIES,0)

CREATE_PARTY(SEVENTH)
	ADD_TO_PARTY(SEVENTH,FAIRY,6,100,ATTACK_ENEMIES,0)
	ADD_TO_PARTY(SEVENTH,FAIRY,6,100,ATTACK_ENEMIES,0)

CREATE_PARTY(EIGHTH)
	ADD_TO_PARTY(EIGHTH,WITCH,8,100,ATTACK_ENEMIES,0)
	ADD_TO_PARTY(EIGHTH,WITCH,8,100,ATTACK_ENEMIES,0)

CREATE_PARTY(LANDLORD)
	ADD_TO_PARTY(LANDLORD,KNIGHT,6,1000,ATTACK_ENEMIES,0)
	ADD_TO_PARTY(LANDLORD,ARCHER,6,50,ATTACK_ENEMIES,0)
	ADD_TO_PARTY(LANDLORD,BARBARIAN,6,50,ATTACK_ENEMIES,0)
	ADD_TO_PARTY(LANDLORD,MONK,6,50,ATTACK_ENEMIES,0)
	ADD_TO_PARTY(LANDLORD,FAIRY,8,50,ATTACK_ENEMIES,0)

DISPLAY_OBJECTIVE(105,ALL_PLAYERS)

IF(PLAYER_GOOD,GAME_TURN >= 1000)
	SET_TIMER(PLAYER_GOOD,TIMER1)
ENDIF

IF(PLAYER_GOOD,FLAG0 == 0)
	IF(PLAYER_GOOD,TIMER1 > 1750)
		NEXT_COMMAND_REUSABLE
		ADD_PARTY_TO_LEVEL(PLAYER_GOOD,FIRST,3,1)
		NEXT_COMMAND_REUSABLE
		SET_TIMER(PLAYER_GOOD,TIMER1)
	ENDIF
ENDIF

IF(PLAYER_GOOD,GAME_TURN >= 1750)
	SET_TIMER(PLAYER_GOOD,TIMER2)
ENDIF

IF(PLAYER_GOOD,FLAG0 == 0)
	IF(PLAYER_GOOD,TIMER2 > 2250)
		NEXT_COMMAND_REUSABLE
		ADD_PARTY_TO_LEVEL(PLAYER_GOOD,SECOND,1,1)
		NEXT_COMMAND_REUSABLE
		SET_TIMER(PLAYER_GOOD,TIMER2)
	ENDIF
ENDIF

IF(PLAYER_GOOD,GAME_TURN >= 2500)
	SET_TIMER(PLAYER_GOOD,TIMER3)
ENDIF

IF(PLAYER_GOOD,FLAG0 == 0)
	IF(PLAYER_GOOD,TIMER3 > 2750)
		NEXT_COMMAND_REUSABLE
		ADD_PARTY_TO_LEVEL(PLAYER_GOOD,THIRD,2,1)
		NEXT_COMMAND_REUSABLE
		SET_TIMER(PLAYER_GOOD,TIMER3)
	ENDIF
ENDIF

IF(PLAYER_GOOD,GAME_TURN >= 3250)
	SET_TIMER(PLAYER_GOOD,TIMER4)
ENDIF

IF(PLAYER_GOOD,FLAG0 == 0)
	IF(PLAYER_GOOD,TIMER4 > 3500)
		NEXT_COMMAND_REUSABLE
		ADD_PARTY_TO_LEVEL(PLAYER_GOOD,FOURTH,4,1)
		NEXT_COMMAND_REUSABLE
		SET_TIMER(PLAYER_GOOD,TIMER4)
	ENDIF
ENDIF

IF(PLAYER_GOOD,GAME_TURN >= 13000)
	SET_FLAG(PLAYER_GOOD,FLAG0,1)
	IF_CONTROLS(PLAYER_GOOD,TOTAL_CREATURES <= 0)
		DISPLAY_OBJECTIVE(102,PLAYER0)
		SET_TIMER(PLAYER0,TIMER1)
		ROOM_AVAILABLE(ALL_PLAYERS,BRIDGE,0,0)
		TUTORIAL_FLASH_BUTTON(18,60)
	ENDIF
ENDIF

IF(PLAYER0,BRIDGE >= 6)
		ADD_PARTY_TO_LEVEL(PLAYER_GOOD,FIFTH,DRAWFROM(1,2,3),1)
		ADD_PARTY_TO_LEVEL(PLAYER_GOOD,SIXTH,DRAWFROM(1,2,3),1)
		ADD_PARTY_TO_LEVEL(PLAYER_GOOD,SEVENTH,DRAWFROM(1,2,3),1)
ENDIF

IF(PLAYER0,TIMER1 >= 3000)
	DISPLAY_OBJECTIVE(103,ALL_PLAYERS)
	ADD_PARTY_TO_LEVEL(PLAYER_GOOD,FIFTH,DRAWFROM(1,2,3,4),1)
	ADD_PARTY_TO_LEVEL(PLAYER_GOOD,SIXTH,DRAWFROM(1,2,3,4),1)
	ADD_PARTY_TO_LEVEL(PLAYER_GOOD,SEVENTH,DRAWFROM(1,2,3,4),1)
ENDIF

IF(PLAYER0,TIMER1 >= 4000)
	ADD_PARTY_TO_LEVEL(PLAYER_GOOD,EIGHTH,DRAWFROM(2,4),1)
ENDIF

IF(PLAYER0,TIMER1 >= 4500)
	ADD_PARTY_TO_LEVEL(PLAYER_GOOD,LANDLORD,DRAWFROM(2,4),1)
	ADD_PARTY_TO_LEVEL(PLAYER_GOOD,THIRD,DRAWFROM(2,4),1)
	ADD_PARTY_TO_LEVEL(PLAYER_GOOD,FOURTH,DRAWFROM(2,4),1)
	SET_TIMER(PLAYER0,TIMER2)
ENDIF

IF(PLAYER0,TIMER2 >= 200)
	IF_CONTROLS(PLAYER_GOOD,TOTAL_CREATURES <= 0)
		DISPLAY_OBJECTIVE(104,ALL_PLAYERS)
		WIN_GAME
	ENDIF
ENDIF

REM # A Kind Only - WIZARD.
IF(PLAYER0,CAMPAIGN_FLAG0 == 1)
	ADD_CREATURE_TO_POOL(WIZARD,255)
	CREATURE_AVAILABLE(ALL_PLAYERS,WIZARD,1,1)
	CREATURE_AVAILABLE(PLAYER0,WIZARD,1,32)
	SET_CREATURE_CONFIGURATION(WIZARD,TrainingValue,8)
	SET_CREATURE_CONFIGURATION(WIZARD,PrimaryJobs,FIGHT)
	SET_CREATURE_CONFIGURATION(WIZARD,SecondaryJobs,TRAIN,EXPLORE)
	SET_CREATURE_CONFIGURATION(WIZARD,NotDoJobs,FREEZE_PRISONERS)
	SET_CREATURE_CONFIGURATION(WIZARD,StressfulJobs,KINKY_TORTURE)
	SET_ROOM_CONFIGURATION(PRISON,CreatureCreation,WIZARD)
	SET_ROOM_CONFIGURATION(TORTURE,CreatureCreation,WIZARD)
	SET_ROOM_CONFIGURATION(GRAVEYARD,CreatureCreation,WIZARD)
ENDIF

REM # A Kind Only - BARBARIAN.
IF(PLAYER0,CAMPAIGN_FLAG0 == 2)
	ADD_CREATURE_TO_POOL(BARBARIAN,255)
	CREATURE_AVAILABLE(ALL_PLAYERS,BARBARIAN,1,1)
	CREATURE_AVAILABLE(PLAYER0,BARBARIAN,1,32)
	SET_CREATURE_CONFIGURATION(BARBARIAN,TrainingValue,8)
	SET_CREATURE_CONFIGURATION(BARBARIAN,PrimaryJobs,FIGHT)
	SET_CREATURE_CONFIGURATION(BARBARIAN,SecondaryJobs,TRAIN,EXPLORE)
	SET_CREATURE_CONFIGURATION(BARBARIAN,NotDoJobs,FREEZE_PRISONERS)
	SET_CREATURE_CONFIGURATION(BARBARIAN,StressfulJobs,KINKY_TORTURE)
	SET_ROOM_CONFIGURATION(PRISON,CreatureCreation,BARBARIAN)
	SET_ROOM_CONFIGURATION(TORTURE,CreatureCreation,BARBARIAN)
	SET_ROOM_CONFIGURATION(GRAVEYARD,CreatureCreation,BARBARIAN)
ENDIF

REM # A Kind Only - ARCHER.
IF(PLAYER0,CAMPAIGN_FLAG0 == 3)
	ADD_CREATURE_TO_POOL(ARCHER,255)
	CREATURE_AVAILABLE(ALL_PLAYERS,ARCHER,1,1)
	CREATURE_AVAILABLE(PLAYER0,ARCHER,1,32)
	SET_CREATURE_CONFIGURATION(ARCHER,TrainingValue,8)
	SET_CREATURE_CONFIGURATION(ARCHER,PrimaryJobs,FIGHT)
	SET_CREATURE_CONFIGURATION(ARCHER,SecondaryJobs,TRAIN,EXPLORE)
	SET_CREATURE_CONFIGURATION(ARCHER,NotDoJobs,FREEZE_PRISONERS)
	SET_CREATURE_CONFIGURATION(ARCHER,StressfulJobs,KINKY_TORTURE)
	SET_ROOM_CONFIGURATION(PRISON,CreatureCreation,ARCHER)
	SET_ROOM_CONFIGURATION(TORTURE,CreatureCreation,ARCHER)
	SET_ROOM_CONFIGURATION(GRAVEYARD,CreatureCreation,ARCHER)
ENDIF

REM # A Kind Only - MONK.
IF(PLAYER0,CAMPAIGN_FLAG0 == 4)
	ADD_CREATURE_TO_POOL(MONK,255)
	CREATURE_AVAILABLE(ALL_PLAYERS,MONK,1,1)
	CREATURE_AVAILABLE(PLAYER0,MONK,1,32)
	SET_CREATURE_CONFIGURATION(MONK,TrainingValue,8)
	SET_CREATURE_CONFIGURATION(MONK,PrimaryJobs,FIGHT)
	SET_CREATURE_CONFIGURATION(MONK,SecondaryJobs,TRAIN,EXPLORE)
	SET_CREATURE_CONFIGURATION(MONK,NotDoJobs,FREEZE_PRISONERS)
	SET_CREATURE_CONFIGURATION(MONK,StressfulJobs,KINKY_TORTURE)
	SET_ROOM_CONFIGURATION(PRISON,CreatureCreation,MONK)
	SET_ROOM_CONFIGURATION(TORTURE,CreatureCreation,MONK)
	SET_ROOM_CONFIGURATION(GRAVEYARD,CreatureCreation,MONK)
ENDIF

REM # A Kind Only - DWARFA.
IF(PLAYER0,CAMPAIGN_FLAG0 == 5)
	ADD_CREATURE_TO_POOL(DWARFA,255)
	CREATURE_AVAILABLE(ALL_PLAYERS,DWARFA,1,1)
	CREATURE_AVAILABLE(PLAYER0,DWARFA,1,32)
	SET_CREATURE_CONFIGURATION(DWARFA,TrainingValue,8)
	SET_CREATURE_CONFIGURATION(DWARFA,PrimaryJobs,FIGHT)
	SET_CREATURE_CONFIGURATION(DWARFA,SecondaryJobs,TRAIN,EXPLORE)
	SET_CREATURE_CONFIGURATION(DWARFA,NotDoJobs,FREEZE_PRISONERS)
	SET_CREATURE_CONFIGURATION(DWARFA,StressfulJobs,KINKY_TORTURE)
	SET_ROOM_CONFIGURATION(PRISON,CreatureCreation,DWARFA)
	SET_ROOM_CONFIGURATION(TORTURE,CreatureCreation,DWARFA)
	SET_ROOM_CONFIGURATION(GRAVEYARD,CreatureCreation,DWARFA)
ENDIF

REM # A Kind Only - KNIGHT.
IF(PLAYER0,CAMPAIGN_FLAG0 == 6)
	ADD_CREATURE_TO_POOL(KNIGHT,255)
	CREATURE_AVAILABLE(ALL_PLAYERS,KNIGHT,1,1)
	CREATURE_AVAILABLE(PLAYER0,KNIGHT,1,32)
	SET_CREATURE_CONFIGURATION(KNIGHT,TrainingValue,8)
	SET_CREATURE_CONFIGURATION(KNIGHT,PrimaryJobs,FIGHT)
	SET_CREATURE_CONFIGURATION(KNIGHT,SecondaryJobs,TRAIN,EXPLORE)
	SET_CREATURE_CONFIGURATION(KNIGHT,NotDoJobs,FREEZE_PRISONERS)
	SET_CREATURE_CONFIGURATION(KNIGHT,StressfulJobs,KINKY_TORTURE)
	SET_ROOM_CONFIGURATION(PRISON,CreatureCreation,KNIGHT)
	SET_ROOM_CONFIGURATION(TORTURE,CreatureCreation,KNIGHT)
	SET_ROOM_CONFIGURATION(GRAVEYARD,CreatureCreation,KNIGHT)
ENDIF

REM # A Kind Only - AVATAR.
IF(PLAYER0,CAMPAIGN_FLAG0 == 7)
	ADD_CREATURE_TO_POOL(AVATAR,255)
	CREATURE_AVAILABLE(ALL_PLAYERS,AVATAR,1,1)
	SET_CREATURE_CONFIGURATION(AVATAR,TrainingValue,8)
	SET_CREATURE_CONFIGURATION(AVATAR,PrimaryJobs,FIGHT)
	SET_CREATURE_CONFIGURATION(AVATAR,SecondaryJobs,TRAIN,EXPLORE)
	SET_CREATURE_CONFIGURATION(AVATAR,NotDoJobs,FREEZE_PRISONERS)
	SET_CREATURE_CONFIGURATION(AVATAR,StressfulJobs,KINKY_TORTURE)
	SET_ROOM_CONFIGURATION(PRISON,CreatureCreation,AVATAR)
	SET_ROOM_CONFIGURATION(TORTURE,CreatureCreation,AVATAR)
	SET_ROOM_CONFIGURATION(GRAVEYARD,CreatureCreation,AVATAR)
ENDIF

REM # A Kind Only - TUNNELLER.
IF(PLAYER0,CAMPAIGN_FLAG0 == 8)
	ADD_CREATURE_TO_POOL(TUNNELLER,255)
	CREATURE_AVAILABLE(ALL_PLAYERS,TUNNELLER,1,1)
	CREATURE_AVAILABLE(PLAYER0,TUNNELLER,1,32)
	SET_CREATURE_CONFIGURATION(TUNNELLER,TrainingValue,8)
	SET_CREATURE_CONFIGURATION(TUNNELLER,PrimaryJobs,FIGHT)
	SET_CREATURE_CONFIGURATION(TUNNELLER,SecondaryJobs,TRAIN,EXPLORE)
	SET_CREATURE_CONFIGURATION(TUNNELLER,NotDoJobs,FREEZE_PRISONERS)
	SET_CREATURE_CONFIGURATION(TUNNELLER,StressfulJobs,KINKY_TORTURE)
	SET_ROOM_CONFIGURATION(PRISON,CreatureCreation,TUNNELLER)
	SET_ROOM_CONFIGURATION(TORTURE,CreatureCreation,TUNNELLER)
	SET_ROOM_CONFIGURATION(GRAVEYARD,CreatureCreation,TUNNELLER)
ENDIF
IF(PLAYER0,CAMPAIGN_FLAG0 == 8)
	NEXT_COMMAND_REUSABLE
	COMPUTE_FLAG(PLAYER_GOOD,BOX0_ACTIVATED,INCREASE,PLAYER0,TUNNELLER,0)
	IF(PLAYER_GOOD,BOX0_ACTIVATED >= 255)
		NEXT_COMMAND_REUSABLE
		KILL_CREATURE(PLAYER_GOOD,ANY_CREATURE,LEAST_EXPERIENCED,1)
		NEXT_COMMAND_REUSABLE
		SET_FLAG(PLAYER_GOOD,BOX0_ACTIVATED,0)
	ENDIF
ENDIF

REM # A Kind Only - WITCH.
IF(PLAYER0,CAMPAIGN_FLAG0 == 9)
	ADD_CREATURE_TO_POOL(WITCH,255)
	CREATURE_AVAILABLE(ALL_PLAYERS,WITCH,1,1)
	CREATURE_AVAILABLE(PLAYER0,WITCH,1,32)
	SET_CREATURE_CONFIGURATION(WITCH,TrainingValue,8)
	SET_CREATURE_CONFIGURATION(WITCH,PrimaryJobs,FIGHT)
	SET_CREATURE_CONFIGURATION(WITCH,SecondaryJobs,TRAIN,EXPLORE)
	SET_CREATURE_CONFIGURATION(WITCH,NotDoJobs,FREEZE_PRISONERS)
	SET_CREATURE_CONFIGURATION(WITCH,StressfulJobs,KINKY_TORTURE)
	SET_ROOM_CONFIGURATION(PRISON,CreatureCreation,WITCH)
	SET_ROOM_CONFIGURATION(TORTURE,CreatureCreation,WITCH)
	SET_ROOM_CONFIGURATION(GRAVEYARD,CreatureCreation,WITCH)
ENDIF

REM # A Kind Only - GIANT.
IF(PLAYER0,CAMPAIGN_FLAG0 == 10)
	ADD_CREATURE_TO_POOL(GIANT,255)
	CREATURE_AVAILABLE(ALL_PLAYERS,GIANT,1,1)
	CREATURE_AVAILABLE(PLAYER0,GIANT,1,32)
	SET_CREATURE_CONFIGURATION(GIANT,TrainingValue,8)
	SET_CREATURE_CONFIGURATION(GIANT,PrimaryJobs,FIGHT)
	SET_CREATURE_CONFIGURATION(GIANT,SecondaryJobs,TRAIN,EXPLORE)
	SET_CREATURE_CONFIGURATION(GIANT,NotDoJobs,FREEZE_PRISONERS)
	SET_CREATURE_CONFIGURATION(GIANT,StressfulJobs,KINKY_TORTURE)
	SET_ROOM_CONFIGURATION(PRISON,CreatureCreation,GIANT)
	SET_ROOM_CONFIGURATION(TORTURE,CreatureCreation,GIANT)
	SET_ROOM_CONFIGURATION(GRAVEYARD,CreatureCreation,GIANT)
ENDIF

REM # A Kind Only - FAIRY.
IF(PLAYER0,CAMPAIGN_FLAG0 == 11)
	ADD_CREATURE_TO_POOL(FAIRY,255)
	CREATURE_AVAILABLE(ALL_PLAYERS,FAIRY,1,1)
	CREATURE_AVAILABLE(PLAYER0,FAIRY,1,32)
	SET_CREATURE_CONFIGURATION(FAIRY,TrainingValue,8)
	SET_CREATURE_CONFIGURATION(FAIRY,PrimaryJobs,FIGHT)
	SET_CREATURE_CONFIGURATION(FAIRY,SecondaryJobs,TRAIN,EXPLORE)
	SET_CREATURE_CONFIGURATION(FAIRY,NotDoJobs,FREEZE_PRISONERS)
	SET_CREATURE_CONFIGURATION(FAIRY,StressfulJobs,KINKY_TORTURE)
	SET_ROOM_CONFIGURATION(PRISON,CreatureCreation,FAIRY)
	SET_ROOM_CONFIGURATION(TORTURE,CreatureCreation,FAIRY)
	SET_ROOM_CONFIGURATION(GRAVEYARD,CreatureCreation,FAIRY)
ENDIF

REM # A Kind Only - THIEF.
IF(PLAYER0,CAMPAIGN_FLAG0 == 12)
	ADD_CREATURE_TO_POOL(THIEF,255)
	CREATURE_AVAILABLE(ALL_PLAYERS,THIEF,1,1)
	CREATURE_AVAILABLE(PLAYER0,THIEF,1,32)
	SET_CREATURE_CONFIGURATION(THIEF,TrainingValue,8)
	SET_CREATURE_CONFIGURATION(THIEF,PrimaryJobs,FIGHT)
	SET_CREATURE_CONFIGURATION(THIEF,SecondaryJobs,TRAIN,EXPLORE)
	SET_CREATURE_CONFIGURATION(THIEF,NotDoJobs,FREEZE_PRISONERS)
	SET_CREATURE_CONFIGURATION(THIEF,StressfulJobs,KINKY_TORTURE)
	SET_ROOM_CONFIGURATION(PRISON,CreatureCreation,THIEF)
	SET_ROOM_CONFIGURATION(TORTURE,CreatureCreation,THIEF)
	SET_ROOM_CONFIGURATION(GRAVEYARD,CreatureCreation,THIEF)
ENDIF

REM # A Kind Only - SAMURAI.
IF(PLAYER0,CAMPAIGN_FLAG0 == 13)
	ADD_CREATURE_TO_POOL(SAMURAI,255)
	CREATURE_AVAILABLE(ALL_PLAYERS,SAMURAI,1,1)
	CREATURE_AVAILABLE(PLAYER0,SAMURAI,1,32)
	SET_CREATURE_CONFIGURATION(SAMURAI,TrainingValue,8)
	SET_CREATURE_CONFIGURATION(SAMURAI,PrimaryJobs,FIGHT)
	SET_CREATURE_CONFIGURATION(SAMURAI,SecondaryJobs,TRAIN,EXPLORE)
	SET_CREATURE_CONFIGURATION(SAMURAI,NotDoJobs,FREEZE_PRISONERS)
	SET_CREATURE_CONFIGURATION(SAMURAI,StressfulJobs,KINKY_TORTURE)
	SET_ROOM_CONFIGURATION(PRISON,CreatureCreation,SAMURAI)
	SET_ROOM_CONFIGURATION(TORTURE,CreatureCreation,SAMURAI)
	SET_ROOM_CONFIGURATION(GRAVEYARD,CreatureCreation,SAMURAI)
ENDIF

REM # A Kind Only - HORNY.
IF(PLAYER0,CAMPAIGN_FLAG0 == 14)
	ADD_CREATURE_TO_POOL(HORNY,255)
	CREATURE_AVAILABLE(ALL_PLAYERS,HORNY,1,1)
	CREATURE_AVAILABLE(PLAYER0,HORNY,1,7)
	SET_CREATURE_CONFIGURATION(HORNY,TrainingValue,8)
	SET_CREATURE_CONFIGURATION(HORNY,PrimaryJobs,FIGHT)
	SET_CREATURE_CONFIGURATION(HORNY,SecondaryJobs,TRAIN,EXPLORE)
	SET_CREATURE_CONFIGURATION(HORNY,NotDoJobs,FREEZE_PRISONERS)
	SET_CREATURE_CONFIGURATION(HORNY,StressfulJobs,KINKY_TORTURE)
	SET_ROOM_CONFIGURATION(PRISON,CreatureCreation,HORNY)
	SET_ROOM_CONFIGURATION(TORTURE,CreatureCreation,HORNY)
	SET_ROOM_CONFIGURATION(GRAVEYARD,CreatureCreation,HORNY)
ENDIF

REM # A Kind Only - SKELETON.
IF(PLAYER0,CAMPAIGN_FLAG0 == 15)
	ADD_CREATURE_TO_POOL(SKELETON,255)
	CREATURE_AVAILABLE(ALL_PLAYERS,SKELETON,1,1)
	CREATURE_AVAILABLE(PLAYER0,SKELETON,1,32)
	SET_CREATURE_CONFIGURATION(SKELETON,TrainingValue,8)
	SET_CREATURE_CONFIGURATION(SKELETON,PrimaryJobs,FIGHT)
	SET_CREATURE_CONFIGURATION(SKELETON,SecondaryJobs,TRAIN,EXPLORE)
	SET_CREATURE_CONFIGURATION(SKELETON,NotDoJobs,FREEZE_PRISONERS)
	SET_CREATURE_CONFIGURATION(SKELETON,StressfulJobs,KINKY_TORTURE)
	SET_ROOM_CONFIGURATION(PRISON,CreatureCreation,SKELETON)
	SET_ROOM_CONFIGURATION(TORTURE,CreatureCreation,SKELETON)
	SET_ROOM_CONFIGURATION(GRAVEYARD,CreatureCreation,SKELETON)
ENDIF

REM # A Kind Only - TROLL.
IF(PLAYER0,CAMPAIGN_FLAG0 == 16)
	ADD_CREATURE_TO_POOL(TROLL,255)
	CREATURE_AVAILABLE(ALL_PLAYERS,TROLL,1,1)
	CREATURE_AVAILABLE(PLAYER0,TROLL,1,32)
	SET_CREATURE_CONFIGURATION(TROLL,TrainingValue,8)
	SET_CREATURE_CONFIGURATION(TROLL,PrimaryJobs,FIGHT)
	SET_CREATURE_CONFIGURATION(TROLL,SecondaryJobs,TRAIN,EXPLORE)
	SET_CREATURE_CONFIGURATION(TROLL,NotDoJobs,FREEZE_PRISONERS)
	SET_CREATURE_CONFIGURATION(TROLL,StressfulJobs,KINKY_TORTURE)
	SET_ROOM_CONFIGURATION(PRISON,CreatureCreation,TROLL)
	SET_ROOM_CONFIGURATION(TORTURE,CreatureCreation,TROLL)
	SET_ROOM_CONFIGURATION(GRAVEYARD,CreatureCreation,TROLL)
ENDIF

REM # A Kind Only - DRAGON.
IF(PLAYER0,CAMPAIGN_FLAG0 == 17)
	ADD_CREATURE_TO_POOL(DRAGON,255)
	CREATURE_AVAILABLE(ALL_PLAYERS,DRAGON,1,1)
	CREATURE_AVAILABLE(PLAYER0,DRAGON,1,32)
	SET_CREATURE_CONFIGURATION(DRAGON,TrainingValue,8)
	SET_CREATURE_CONFIGURATION(DRAGON,PrimaryJobs,FIGHT)
	SET_CREATURE_CONFIGURATION(DRAGON,SecondaryJobs,TRAIN,EXPLORE)
	SET_CREATURE_CONFIGURATION(DRAGON,NotDoJobs,FREEZE_PRISONERS)
	SET_CREATURE_CONFIGURATION(DRAGON,StressfulJobs,KINKY_TORTURE)
	SET_ROOM_CONFIGURATION(PRISON,CreatureCreation,DRAGON)
	SET_ROOM_CONFIGURATION(TORTURE,CreatureCreation,DRAGON)
	SET_ROOM_CONFIGURATION(GRAVEYARD,CreatureCreation,DRAGON)
ENDIF

REM # A Kind Only - DEMONSPAWN.
IF(PLAYER0,CAMPAIGN_FLAG0 == 18)
	ADD_CREATURE_TO_POOL(DEMONSPAWN,255)
	CREATURE_AVAILABLE(ALL_PLAYERS,DEMONSPAWN,1,1)
	CREATURE_AVAILABLE(PLAYER0,DEMONSPAWN,1,32)
	SET_CREATURE_CONFIGURATION(DEMONSPAWN,TrainingValue,8)
	SET_CREATURE_CONFIGURATION(DEMONSPAWN,PrimaryJobs,FIGHT)
	SET_CREATURE_CONFIGURATION(DEMONSPAWN,SecondaryJobs,TRAIN,EXPLORE)
	SET_CREATURE_CONFIGURATION(DEMONSPAWN,NotDoJobs,FREEZE_PRISONERS)
	SET_CREATURE_CONFIGURATION(DEMONSPAWN,StressfulJobs,KINKY_TORTURE)
	SET_ROOM_CONFIGURATION(PRISON,CreatureCreation,DEMONSPAWN)
	SET_ROOM_CONFIGURATION(TORTURE,CreatureCreation,DEMONSPAWN)
	SET_ROOM_CONFIGURATION(GRAVEYARD,CreatureCreation,DEMONSPAWN)
ENDIF

REM # A Kind Only - FLY.
IF(PLAYER0,CAMPAIGN_FLAG0 == 19)
	ADD_CREATURE_TO_POOL(FLY,255)
	CREATURE_AVAILABLE(ALL_PLAYERS,FLY,1,1)
	CREATURE_AVAILABLE(PLAYER0,FLY,1,32)
	SET_CREATURE_CONFIGURATION(FLY,TrainingValue,8)
	SET_CREATURE_CONFIGURATION(FLY,PrimaryJobs,FIGHT)
	SET_CREATURE_CONFIGURATION(FLY,SecondaryJobs,TRAIN,EXPLORE)
	SET_CREATURE_CONFIGURATION(FLY,NotDoJobs,FREEZE_PRISONERS)
	SET_CREATURE_CONFIGURATION(FLY,StressfulJobs,KINKY_TORTURE)
	SET_ROOM_CONFIGURATION(PRISON,CreatureCreation,FLY)
	SET_ROOM_CONFIGURATION(TORTURE,CreatureCreation,FLY)
	SET_ROOM_CONFIGURATION(GRAVEYARD,CreatureCreation,FLY)
	SET_TIMER(PLAYER_GOOD,TIMER5)
ENDIF
IF(PLAYER_GOOD,TIMER5 >= PLAYER_GOOD,BOX219_ACTIVATED)
	NEXT_COMMAND_REUSABLE
	USE_POWER_ON_CREATURE(PLAYER0,FLY,LEAST_EXP_FIGHTING,PLAYER0,POWER_TIME_BOMB,9,1)
	NEXT_COMMAND_REUSABLE
	USE_POWER_ON_CREATURE(PLAYER0,FLY,MOST_EXP_FIGHTING,PLAYER0,POWER_TIME_BOMB,9,1)
	NEXT_COMMAND_REUSABLE
	SET_TIMER(PLAYER_GOOD,TIMER5)
ENDIF

REM # A Kind Only - DARK_MISTRESS.
IF(PLAYER0,CAMPAIGN_FLAG0 == 20)
	ADD_CREATURE_TO_POOL(DARK_MISTRESS,255)
	CREATURE_AVAILABLE(ALL_PLAYERS,DARK_MISTRESS,1,1)
	CREATURE_AVAILABLE(PLAYER0,DARK_MISTRESS,1,32)
	SET_CREATURE_CONFIGURATION(DARK_MISTRESS,TrainingValue,8)
	SET_CREATURE_CONFIGURATION(DARK_MISTRESS,PrimaryJobs,FIGHT)
	SET_CREATURE_CONFIGURATION(DARK_MISTRESS,SecondaryJobs,TRAIN,EXPLORE)
	SET_CREATURE_CONFIGURATION(DARK_MISTRESS,NotDoJobs,FREEZE_PRISONERS)
	SET_CREATURE_CONFIGURATION(DARK_MISTRESS,StressfulJobs,KINKY_TORTURE)
	SET_ROOM_CONFIGURATION(PRISON,CreatureCreation,DARK_MISTRESS)
	SET_ROOM_CONFIGURATION(TORTURE,CreatureCreation,DARK_MISTRESS)
	SET_ROOM_CONFIGURATION(GRAVEYARD,CreatureCreation,DARK_MISTRESS)
ENDIF

REM # A Kind Only - SORCEROR.
IF(PLAYER0,CAMPAIGN_FLAG0 == 21)
	ADD_CREATURE_TO_POOL(SORCEROR,255)
	CREATURE_AVAILABLE(ALL_PLAYERS,SORCEROR,1,1)
	CREATURE_AVAILABLE(PLAYER0,SORCEROR,1,32)
	SET_CREATURE_CONFIGURATION(SORCEROR,TrainingValue,8)
	SET_CREATURE_CONFIGURATION(SORCEROR,PrimaryJobs,FIGHT)
	SET_CREATURE_CONFIGURATION(SORCEROR,SecondaryJobs,TRAIN,EXPLORE)
	SET_CREATURE_CONFIGURATION(SORCEROR,NotDoJobs,FREEZE_PRISONERS)
	SET_CREATURE_CONFIGURATION(SORCEROR,StressfulJobs,KINKY_TORTURE)
	SET_ROOM_CONFIGURATION(PRISON,CreatureCreation,SORCEROR)
	SET_ROOM_CONFIGURATION(TORTURE,CreatureCreation,SORCEROR)
	SET_ROOM_CONFIGURATION(GRAVEYARD,CreatureCreation,SORCEROR)
ENDIF

REM # A Kind Only - BILE_DEMON.
IF(PLAYER0,CAMPAIGN_FLAG0 == 22)
	ADD_CREATURE_TO_POOL(BILE_DEMON,255)
	CREATURE_AVAILABLE(ALL_PLAYERS,BILE_DEMON,1,1)
	CREATURE_AVAILABLE(PLAYER0,BILE_DEMON,1,32)
	SET_CREATURE_CONFIGURATION(BILE_DEMON,TrainingValue,8)
	SET_CREATURE_CONFIGURATION(BILE_DEMON,PrimaryJobs,FIGHT)
	SET_CREATURE_CONFIGURATION(BILE_DEMON,SecondaryJobs,TRAIN,EXPLORE)
	SET_CREATURE_CONFIGURATION(BILE_DEMON,NotDoJobs,FREEZE_PRISONERS)
	SET_CREATURE_CONFIGURATION(BILE_DEMON,StressfulJobs,KINKY_TORTURE)
	SET_ROOM_CONFIGURATION(PRISON,CreatureCreation,BILE_DEMON)
	SET_ROOM_CONFIGURATION(TORTURE,CreatureCreation,BILE_DEMON)
	SET_ROOM_CONFIGURATION(GRAVEYARD,CreatureCreation,BILE_DEMON)
ENDIF

REM # A Kind Only - BUG.
IF(PLAYER0,CAMPAIGN_FLAG0 == 23)
	ADD_CREATURE_TO_POOL(BUG,255)
	CREATURE_AVAILABLE(ALL_PLAYERS,BUG,1,1)
	CREATURE_AVAILABLE(PLAYER0,BUG,1,32)
	SET_CREATURE_CONFIGURATION(BUG,TrainingValue,8)
	SET_CREATURE_CONFIGURATION(BUG,PrimaryJobs,FIGHT)
	SET_CREATURE_CONFIGURATION(BUG,SecondaryJobs,TRAIN,EXPLORE)
	SET_CREATURE_CONFIGURATION(BUG,NotDoJobs,FREEZE_PRISONERS)
	SET_CREATURE_CONFIGURATION(BUG,StressfulJobs,KINKY_TORTURE)
	SET_ROOM_CONFIGURATION(PRISON,CreatureCreation,BUG)
	SET_ROOM_CONFIGURATION(TORTURE,CreatureCreation,BUG)
	SET_ROOM_CONFIGURATION(GRAVEYARD,CreatureCreation,BUG)
	SET_CREATURE_CONFIGURATION(BUG,Health,500)
	SET_CREATURE_CONFIGURATION(BUG,HealRequirement,75)
	SET_CREATURE_CONFIGURATION(BUG,HealThreshold,150)
	SET_CREATURE_CONFIGURATION(BUG,FearWounded,0)
	SET_CREATURE_CONFIGURATION(BUG,FearStronger,30000)
	SET_CREATURE_CONFIGURATION(BUG,Strength,50)
	SET_CREATURE_CONFIGURATION(BUG,Armour,50)
	SET_CREATURE_CONFIGURATION(BUG,Dexterity,110)
	SET_CREATURE_CONFIGURATION(BUG,Defence,120)
	SET_CREATURE_CONFIGURATION(BUG,Luck,20)
	SET_CREATURE_CONFIGURATION(BUG,Recovery,10)
	SET_CREATURE_CONFIGURATION(BUG,HungerRate,0)
	SET_CREATURE_CONFIGURATION(BUG,HungerFill,0)
	SET_CREATURE_CONFIGURATION(BUG,HurtByLava,0)
	SET_CREATURE_CONFIGURATION(BUG,BaseSpeed,96)
	SET_CREATURE_CONFIGURATION(BUG,GoldHold,32767)
	SET_CREATURE_CONFIGURATION(BUG,SlapsToKill,0)
	SET_CREATURE_CONFIGURATION(BUG,DamageToBoulder,256)
	SET_CREATURE_INSTANCE(BUG,1,SWING_WEAPON_FIST,1)
	SET_CREATURE_INSTANCE(BUG,2,ARMOUR,2)
	SET_CREATURE_INSTANCE(BUG,3,HEAL,3)
	SET_CREATURE_INSTANCE(BUG,5,SPEED,5)
	SET_CREATURE_INSTANCE(BUG,7,FREEZE,7)
	SET_CREATURE_INSTANCE(BUG,10,TELEPORT,10)
ENDIF

REM # A Kind Only - VAMPIRE.
IF(PLAYER0,CAMPAIGN_FLAG0 == 24)
	ADD_CREATURE_TO_POOL(VAMPIRE,255)
	CREATURE_AVAILABLE(ALL_PLAYERS,VAMPIRE,1,1)
	CREATURE_AVAILABLE(PLAYER0,VAMPIRE,1,32)
	SET_CREATURE_CONFIGURATION(VAMPIRE,TrainingValue,8)
	SET_CREATURE_CONFIGURATION(VAMPIRE,PrimaryJobs,FIGHT)
	SET_CREATURE_CONFIGURATION(VAMPIRE,SecondaryJobs,TRAIN,EXPLORE)
	SET_CREATURE_CONFIGURATION(VAMPIRE,NotDoJobs,FREEZE_PRISONERS)
	SET_CREATURE_CONFIGURATION(VAMPIRE,StressfulJobs,KINKY_TORTURE)
	SET_ROOM_CONFIGURATION(PRISON,CreatureCreation,VAMPIRE)
	SET_ROOM_CONFIGURATION(TORTURE,CreatureCreation,VAMPIRE)
	SET_ROOM_CONFIGURATION(GRAVEYARD,CreatureCreation,VAMPIRE)
ENDIF

REM # A Kind Only - SPIDER.
IF(PLAYER0,CAMPAIGN_FLAG0 == 25)
	ADD_CREATURE_TO_POOL(SPIDER,255)
	CREATURE_AVAILABLE(ALL_PLAYERS,SPIDER,1,1)
	CREATURE_AVAILABLE(PLAYER0,SPIDER,1,32)
	SET_CREATURE_CONFIGURATION(SPIDER,TrainingValue,8)
	SET_CREATURE_CONFIGURATION(SPIDER,PrimaryJobs,FIGHT)
	SET_CREATURE_CONFIGURATION(SPIDER,SecondaryJobs,TRAIN,EXPLORE)
	SET_CREATURE_CONFIGURATION(SPIDER,NotDoJobs,FREEZE_PRISONERS)
	SET_CREATURE_CONFIGURATION(SPIDER,StressfulJobs,KINKY_TORTURE)
	SET_ROOM_CONFIGURATION(PRISON,CreatureCreation,SPIDER)
	SET_ROOM_CONFIGURATION(TORTURE,CreatureCreation,SPIDER)
	SET_ROOM_CONFIGURATION(GRAVEYARD,CreatureCreation,SPIDER)
	SET_CREATURE_CONFIGURATION(SPIDER,Health,800)
	SET_CREATURE_CONFIGURATION(SPIDER,HealRequirement,75)
	SET_CREATURE_CONFIGURATION(SPIDER,HealThreshold,150)
	SET_CREATURE_CONFIGURATION(SPIDER,FearWounded,0)
	SET_CREATURE_CONFIGURATION(SPIDER,FearStronger,30000)
	SET_CREATURE_CONFIGURATION(SPIDER,Strength,80)
	SET_CREATURE_CONFIGURATION(SPIDER,Armour,60)
	SET_CREATURE_CONFIGURATION(SPIDER,Dexterity,120)
	SET_CREATURE_CONFIGURATION(SPIDER,Defence,150)
	SET_CREATURE_CONFIGURATION(SPIDER,Luck,15)
	SET_CREATURE_CONFIGURATION(SPIDER,Recovery,10)
	SET_CREATURE_CONFIGURATION(SPIDER,HurtByLava,0)
	SET_CREATURE_CONFIGURATION(SPIDER,BaseSpeed,96)
	SET_CREATURE_INSTANCE(SPIDER,1,SWING_WEAPON_FIST,1)
	SET_CREATURE_INSTANCE(SPIDER,2,SLOW,2)
	SET_CREATURE_INSTANCE(SPIDER,3,HEAL,3)
	SET_CREATURE_INSTANCE(SPIDER,4,FREEZE,4)
	SET_CREATURE_INSTANCE(SPIDER,5,SPEED,5)
	SET_CREATURE_INSTANCE(SPIDER,8,HAILSTORM,8)
	SET_CREATURE_INSTANCE(SPIDER,10,TELEPORT,10)
ENDIF

REM # A Kind Only - HELL_HOUND.
IF(PLAYER0,CAMPAIGN_FLAG0 == 26)
	ADD_CREATURE_TO_POOL(HELL_HOUND,255)
	CREATURE_AVAILABLE(ALL_PLAYERS,HELL_HOUND,1,1)
	CREATURE_AVAILABLE(PLAYER0,HELL_HOUND,1,32)
	SET_CREATURE_CONFIGURATION(HELL_HOUND,TrainingValue,8)
	SET_CREATURE_CONFIGURATION(HELL_HOUND,PrimaryJobs,FIGHT)
	SET_CREATURE_CONFIGURATION(HELL_HOUND,SecondaryJobs,TRAIN,EXPLORE)
	SET_CREATURE_CONFIGURATION(HELL_HOUND,NotDoJobs,FREEZE_PRISONERS)
	SET_CREATURE_CONFIGURATION(HELL_HOUND,StressfulJobs,KINKY_TORTURE)
	SET_ROOM_CONFIGURATION(PRISON,CreatureCreation,HELL_HOUND)
	SET_ROOM_CONFIGURATION(TORTURE,CreatureCreation,HELL_HOUND)
	SET_ROOM_CONFIGURATION(GRAVEYARD,CreatureCreation,HELL_HOUND)
ENDIF

REM # A Kind Only - GHOST.
IF(PLAYER0,CAMPAIGN_FLAG0 == 27)
	ADD_CREATURE_TO_POOL(GHOST,255)
	CREATURE_AVAILABLE(ALL_PLAYERS,GHOST,1,1)
	CREATURE_AVAILABLE(PLAYER0,GHOST,1,32)
	SET_CREATURE_CONFIGURATION(GHOST,TrainingValue,8)
	SET_CREATURE_CONFIGURATION(GHOST,PrimaryJobs,FIGHT)
	SET_CREATURE_CONFIGURATION(GHOST,SecondaryJobs,TRAIN,EXPLORE)
	SET_CREATURE_CONFIGURATION(GHOST,NotDoJobs,FREEZE_PRISONERS)
	SET_CREATURE_CONFIGURATION(GHOST,StressfulJobs,KINKY_TORTURE)
	SET_ROOM_CONFIGURATION(PRISON,CreatureCreation,GHOST)
	SET_ROOM_CONFIGURATION(TORTURE,CreatureCreation,GHOST)
	SET_ROOM_CONFIGURATION(GRAVEYARD,CreatureCreation,GHOST)
ENDIF

REM # A Kind Only - TENTACLE.
IF(PLAYER0,CAMPAIGN_FLAG0 == 28)
	ADD_CREATURE_TO_POOL(TENTACLE,255)
	CREATURE_AVAILABLE(ALL_PLAYERS,TENTACLE,1,1)
	CREATURE_AVAILABLE(PLAYER0,TENTACLE,1,32)
	SET_CREATURE_CONFIGURATION(TENTACLE,TrainingValue,8)
	SET_CREATURE_CONFIGURATION(TENTACLE,PrimaryJobs,FIGHT)
	SET_CREATURE_CONFIGURATION(TENTACLE,SecondaryJobs,TRAIN,EXPLORE)
	SET_CREATURE_CONFIGURATION(TENTACLE,NotDoJobs,FREEZE_PRISONERS)
	SET_CREATURE_CONFIGURATION(TENTACLE,StressfulJobs,KINKY_TORTURE)
	SET_ROOM_CONFIGURATION(PRISON,CreatureCreation,TENTACLE)
	SET_ROOM_CONFIGURATION(TORTURE,CreatureCreation,TENTACLE)
	SET_ROOM_CONFIGURATION(GRAVEYARD,CreatureCreation,TENTACLE)
ENDIF

REM # A Kind Only - ORC.
IF(PLAYER0,CAMPAIGN_FLAG0 == 29)
	ADD_CREATURE_TO_POOL(ORC,255)
	CREATURE_AVAILABLE(ALL_PLAYERS,ORC,1,1)
	CREATURE_AVAILABLE(PLAYER0,ORC,1,32)
	SET_CREATURE_CONFIGURATION(ORC,TrainingValue,8)
	SET_CREATURE_CONFIGURATION(ORC,PrimaryJobs,FIGHT)
	SET_CREATURE_CONFIGURATION(ORC,SecondaryJobs,TRAIN,EXPLORE)
	SET_CREATURE_CONFIGURATION(ORC,NotDoJobs,FREEZE_PRISONERS)
	SET_CREATURE_CONFIGURATION(ORC,StressfulJobs,KINKY_TORTURE)
	SET_ROOM_CONFIGURATION(PRISON,CreatureCreation,ORC)
	SET_ROOM_CONFIGURATION(TORTURE,CreatureCreation,ORC)
	SET_ROOM_CONFIGURATION(GRAVEYARD,CreatureCreation,ORC)
ENDIF

REM # A Kind Only - TIME_MAGE.
IF(PLAYER0,CAMPAIGN_FLAG0 == 30)
	ADD_CREATURE_TO_POOL(TIME_MAGE,255)
	CREATURE_AVAILABLE(ALL_PLAYERS,TIME_MAGE,1,1)
	CREATURE_AVAILABLE(PLAYER0,TIME_MAGE,1,32)
	SET_CREATURE_CONFIGURATION(TIME_MAGE,TrainingValue,8)
	SET_CREATURE_CONFIGURATION(TIME_MAGE,PrimaryJobs,FIGHT)
	SET_CREATURE_CONFIGURATION(TIME_MAGE,SecondaryJobs,TRAIN,EXPLORE)
	SET_CREATURE_CONFIGURATION(TIME_MAGE,NotDoJobs,FREEZE_PRISONERS)
	SET_CREATURE_CONFIGURATION(TIME_MAGE,StressfulJobs,KINKY_TORTURE)
	SET_ROOM_CONFIGURATION(PRISON,CreatureCreation,TIME_MAGE)
	SET_ROOM_CONFIGURATION(TORTURE,CreatureCreation,TIME_MAGE)
	SET_ROOM_CONFIGURATION(GRAVEYARD,CreatureCreation,TIME_MAGE)
ENDIF

REM # A Kind Only - DRUID.
IF(PLAYER0,CAMPAIGN_FLAG0 == 31)
	ADD_CREATURE_TO_POOL(DRUID,255)
	CREATURE_AVAILABLE(ALL_PLAYERS,DRUID,1,1)
	CREATURE_AVAILABLE(PLAYER0,DRUID,1,32)
	SET_CREATURE_CONFIGURATION(DRUID,TrainingValue,8)
	SET_CREATURE_CONFIGURATION(DRUID,PrimaryJobs,FIGHT)
	SET_CREATURE_CONFIGURATION(DRUID,SecondaryJobs,TRAIN,EXPLORE)
	SET_CREATURE_CONFIGURATION(DRUID,NotDoJobs,FREEZE_PRISONERS)
	SET_CREATURE_CONFIGURATION(DRUID,StressfulJobs,KINKY_TORTURE)
	SET_ROOM_CONFIGURATION(PRISON,CreatureCreation,DRUID)
	SET_ROOM_CONFIGURATION(TORTURE,CreatureCreation,DRUID)
	SET_ROOM_CONFIGURATION(GRAVEYARD,CreatureCreation,DRUID)
ENDIF

REM # A Kind Only - ALL.
IF(PLAYER_GOOD,CAMPAIGN_FLAG0 > 0)
	RANDOMISE_FLAG(PLAYER0,CAMPAIGN_FLAG0,32)
ENDIF
IF(PLAYER0,CAMPAIGN_FLAG0 == 32)
	NEXT_COMMAND_REUSABLE
	RANDOMISE_FLAG(PLAYER0,CAMPAIGN_FLAG0,32)
	NEXT_COMMAND_REUSABLE
	SET_FLAG(PLAYER_GOOD,CAMPAIGN_FLAG0,1)
ENDIF

REM # A Kind Only - Increase Entrance Level.
IF(PLAYER_GOOD,GAME_TURN >= 1200)
	CREATURE_ENTRANCE_LEVEL(ALL_PLAYERS,2)
ENDIF
IF(PLAYER_GOOD,GAME_TURN >= 6000)
	CREATURE_ENTRANCE_LEVEL(ALL_PLAYERS,3)
ENDIF
IF(PLAYER_GOOD,GAME_TURN >= 30000)
	CREATURE_ENTRANCE_LEVEL(ALL_PLAYERS,4)
ENDIF
IF(PLAYER_GOOD,GAME_TURN >= 150000)
	CREATURE_ENTRANCE_LEVEL(ALL_PLAYERS,5)
ENDIF