//////////////////////////////////////////
//					//
// Pillage Bonus Code			//
//	by Pedrunn			//
//					//
//////////////////////////////////////////


HandleEvent(PillageOrder) 'PillageGivesPWBonus' pre {

int_t PEDRUNN_PILLAGED_IMPROVEMENT[];
int_t PEDRUNN_PILLAGE_BONUS[];

int_t i;
int_t PlayerPW;
location_t tmpLoc;
unit_t tmpUnit;

// Start from here

PEDRUNN_PILLAGED_IMPROVEMENT[] = TerrainImprovementDB(TILEIMP_PASTURE);
PEDRUNN_PILLAGE_BONUS[] = 0;

PEDRUNN_PILLAGED_IMPROVEMENT[] = TerrainImprovementDB(TILEIMP_FARMS);
PEDRUNN_PILLAGE_BONUS[] = 0;

PEDRUNN_PILLAGED_IMPROVEMENT[] = TerrainImprovementDB(TILEIMP_ADVANCED_FARMS);
PEDRUNN_PILLAGE_BONUS[] = 0;

PEDRUNN_PILLAGED_IMPROVEMENT[] = TerrainImprovementDB(TILEIMP_HYDROPONIC_FARMS);
PEDRUNN_PILLAGE_BONUS[] = 0;

PEDRUNN_PILLAGED_IMPROVEMENT[] = TerrainImprovementDB(TILEIMP_TRADING_POST);
PEDRUNN_PILLAGE_BONUS[] = 0;

PEDRUNN_PILLAGED_IMPROVEMENT[] = TerrainImprovementDB(TILEIMP_LATIFUNDIA);
PEDRUNN_PILLAGE_BONUS[] = 0;

PEDRUNN_PILLAGED_IMPROVEMENT[] = TerrainImprovementDB(TILEIMP_OUTLET_MALL);
PEDRUNN_PILLAGE_BONUS[] = 0;

PEDRUNN_PILLAGED_IMPROVEMENT[] = TerrainImprovementDB(TILEIMP_NATURE_PRESERVE);
PEDRUNN_PILLAGE_BONUS[] = 0;

PEDRUNN_PILLAGED_IMPROVEMENT[] = TerrainImprovementDB(TILEIMP_MINES);
PEDRUNN_PILLAGE_BONUS[] = 0;

PEDRUNN_PILLAGED_IMPROVEMENT[] = TerrainImprovementDB(TILEIMP_MINE_SHAFT);
PEDRUNN_PILLAGE_BONUS[] = 0;

PEDRUNN_PILLAGED_IMPROVEMENT[] = TerrainImprovementDB(TILEIMP_ADVANCED_MINES);
PEDRUNN_PILLAGE_BONUS[] = 0;

PEDRUNN_PILLAGED_IMPROVEMENT[] = TerrainImprovementDB(TILEIMP_MEGA_MINES);
PEDRUNN_PILLAGE_BONUS[] = 0;

PEDRUNN_PILLAGED_IMPROVEMENT[] = TerrainImprovementDB(TILEIMP_UNDERSEA_MINES);
PEDRUNN_PILLAGE_BONUS[] = 0;

PEDRUNN_PILLAGED_IMPROVEMENT[] = TerrainImprovementDB(TILEIMP_ADVANCED_UNDERSEA_MINES);
PEDRUNN_PILLAGE_BONUS[] = 0;

PEDRUNN_PILLAGED_IMPROVEMENT[] = TerrainImprovementDB(TILEIMP_MEGA_UNDERSEA_MINES);
PEDRUNN_PILLAGE_BONUS[] = 0;

PEDRUNN_PILLAGED_IMPROVEMENT[] = TerrainImprovementDB(TILEIMP_NETS);
PEDRUNN_PILLAGE_BONUS[] = 0;

PEDRUNN_PILLAGED_IMPROVEMENT[] = TerrainImprovementDB(TILEIMP_FISHERIES);
PEDRUNN_PILLAGE_BONUS[] = 0;

PEDRUNN_PILLAGED_IMPROVEMENT[] = TerrainImprovementDB(TILEIMP_AUTOMATED_FISHERIES);
PEDRUNN_PILLAGE_BONUS[] = 0;

PEDRUNN_PILLAGED_IMPROVEMENT[] = TerrainImprovementDB(TILEIMP_PORT);
PEDRUNN_PILLAGE_BONUS[] = 0;

PEDRUNN_PILLAGED_IMPROVEMENT[] = TerrainImprovementDB(TILEIMP_DRILLING_PLATFORM);
PEDRUNN_PILLAGE_BONUS[] = 0;

PEDRUNN_PILLAGED_IMPROVEMENT[] = TerrainImprovementDB(TILEIMP_FORTIFICATIONS);
PEDRUNN_PILLAGE_BONUS[] = 0;

PEDRUNN_PILLAGED_IMPROVEMENT[] = TerrainImprovementDB(TILEIMP_AIR_BASES);
PEDRUNN_PILLAGE_BONUS[] = 0;

PEDRUNN_PILLAGED_IMPROVEMENT[] = TerrainImprovementDB(TILEIMP_PROCESSING_TOWER);
PEDRUNN_PILLAGE_BONUS[] = 0;

PEDRUNN_PILLAGED_IMPROVEMENT[] = TerrainImprovementDB(TILEIMP_WATCH_TOWER);
PEDRUNN_PILLAGE_BONUS[] = 0;

PEDRUNN_PILLAGED_IMPROVEMENT[] = TerrainImprovementDB(TILEIMP_LISTENING_POSTS);
PEDRUNN_PILLAGE_BONUS[] = 0;

PEDRUNN_PILLAGED_IMPROVEMENT[] = TerrainImprovementDB(TILEIMP_RADAR_STATIONS);
PEDRUNN_PILLAGE_BONUS[] = 0;

PEDRUNN_PILLAGED_IMPROVEMENT[] = TerrainImprovementDB(TILEIMP_SONAR_BUOYS);
PEDRUNN_PILLAGE_BONUS[] = 0;

PEDRUNN_PILLAGED_IMPROVEMENT[] = TerrainImprovementDB(TILEIMP_ROAD);
PEDRUNN_PILLAGE_BONUS[] = 0;

PEDRUNN_PILLAGED_IMPROVEMENT[] = TerrainImprovementDB(TILEIMP_RAILROAD);
PEDRUNN_PILLAGE_BONUS[] = 0;

PEDRUNN_PILLAGED_IMPROVEMENT[] = TerrainImprovementDB(TILEIMP_MAGLEV);
PEDRUNN_PILLAGE_BONUS[] = 0;
	
	tmpLoc = location[0];
	GetUnitFromCell(tmpLoc, 0, tmpUnit);
	player[3] = tmpUnit.owner;
	for(i = 0; i < PEDRUNN_PILLAGED_IMPROVEMENT.#; i = i + 1) {
		if(TileHasImprovement(tmpLoc, PEDRUNN_PILLAGED_IMPROVEMENT[i])) {
			PlayerPW = player[3].publicworkslevel + PEDRUNN_PILLAGE_BONUS[i];
			SetPW(player[3], PlayerPW);
		}
	}
}