quote: For the Barracks you'll need the functions IsVeteran, ToggleBVeteran and CityHasBuilding. |
| quote: Originally posted by lago on 01-06-2001 01:16 PM Locutus, where is the documentation (such as it is) on SLIC functions? Thanks. |
I have a question for you. I have add a barrack in the game using
Tweet
Need help making Barrack :-)
HandleEvent(CreateUnit) 'BarrackCode' post { // if a unit is created
int_t tmpUnit;
city_t tmpCity;
tmpUnit = unit[0]; // store the unit that was just built
tmpCity= city[0]; // store the city in which it was built
if (CityIsValid(tmpCity)) { // if city exits (unit didn't come from ruin or whatever)
if (CityHasBuilding(tmpCity, BuildingDB(IMPROVE_BARRACK)) { // if city has a barrack
ToggleVeteran(tmpUnit, 1); // make unit a veteran;
}
}
}
If you like the concept please help.
location_t militaryBaseLocs[]; // array that stores all bases in game
int_t militaryBaseOwners[]; // array that stores all owners of bases
int_t miitaryBaseIndex; // value that stores how many bases exist/at what index new bases are added
unit_t trainingUnits[]; // array that stores all training units
int_t trainingTimes[]; // array that stores how long these units have been training
int_t trainingIndex; // value that stores how many units are training/at what index new units are added
HandleEvent(ImprovementComplete) 'MilitaryBaseBuilt' post { // triggers if a tile improvement is built
location_t tmpLoc;
int_t tmpPlayer;
int_t tmpValue;
tmpValue = value[0]; // might have to be value[1], not sure; stores type of improvement
tmpPlayer = player[0]; // stores owner of improvement
tmpLoc = location[0]; // stores location of improvement
if (tmpValue == TerrainImprovementDB(TILEIMP_MILITARY_BASE)) { // check if type of improvement is military base
militaryBaseLocs[miitaryBaseIndex] = tmpLoc; // store base
militaryBaseOwners[militaryBaseIndex] = tmpPlayer; // store owner
militaryBaseIndex = militaryBaseIndex + 1; // now one more base exists
}
}
HandleEvent(CutImprovements) 'MilitaryBasePillaged' post { // triggers if a tile improvement is pillaged
location_t tmpLoc;
int_t i;
int_t j;
tmpLoc = location[0]; // get location of pillage
i = 0;
while (i < militaryBaseIndex) { // cycle through all military bases
if (militaryBaseLocs[i] == tmpLoc) { // if the location of this base is same as pillage-location
for (j = i; j < (militaryBaseIndex - 1); j = j + 1) { // go through all remaining bases except the last one
militaryBaseLocs[j] = militaryBaseLocs[j + 1]; // put next base at the position of the current base
militaryBaseOwners[j] = militaryBaseOwners[j + 1]; // do the same for the owners
} // the above two lines overwrite the pillaged base and move all other bases forward in the array
militaryBaseIndex = militaryBaseIndex - 1; // there's now one less base
i = militaryBaseIndex + 1; // base is found, no need to look further
} else { // if this is not the same location as the pillage location
i = i + 1; // look at the next base
}
}
}
HandleEvent(SleepUnit) 'UnitTrains' post { // triggers if a unit goes to sleep
int_t i;
unit_t tmpUnit;
tmpUnit = unit[0]; // store unit
i = 0;
while (i < militaryBaseIndex) { // cycle through all military bases
if (militaryBaseLocs[i] == tmpUnit.location) { // if location of base is same location of that of sleeping unit
if (militaryBaseOwners[i] == tmpUnit.owner) { // check if unit is in his own base
if (IsVeteran(tmpUnit)) { // if unit isn't already veteran
trainingUnits[trainingIndex] = tmpUnit; // train this unit
trainingTimes[trainingIndex] = 5; // it takes 6 turns to train a unit
} // (countdown from 5 to 0, so 6 turns)
trainingIndex = trainingIndex + 1; // one more unit training
i = militaryBaseIndex + 1; // no need to look further, so end cycling through bases
} else { // if locations are different
i = i + 1; // look at next base
}
} else {
i = i + 1;
}
}
}
HandleEvent(WakeUnit) 'UnitStopsTraining' post { // triggers if a units wakes up
int_t i;
int_t j;
unit_t tmpUnit;
tmpUnit = unit[0]; // store unit
i = 0;
while (i < militaryBaseIndex) { // cycle through all military bases
if (militaryBaseLocs[i] == tmpUnit.location) { // if location of base is same location of that of sleeping unit
if (militaryBaseOwners[i] == tmpUnit.owner) { // check if unit is in his own base
j = 0;
while (j < trainingUnitsIndex) { // go through all training units
if (tmpUnit == trainingUnits[j]) { // if this is the unit
for (k = j; k < trainingIndex; k = k + 1) {
trainingUnits[k] = trainingUnits[k + 1];
trainingTimes[k] = trainingTimes[k + 1];
}
trainingIndex = trainingIndex - 1; // one less unit training
j = trainingIndex + 1;
i = militaryBaseIndex + 1;
} else {
j = j + 1; // no need to look further
}
}
} else { // if locations are different
i = i + 1; // look at next base
}
} else {
i = i + 1;
}
}
}
HandleEvent(BeginTurn) 'TrainingUnitsAnnual' post { // trigger when a new turn begins for any of the players
int_t i;
if (player[0] == 0) { // if player is barbarian, this should happen once a year, not x times a year (where x is # of players in the game)
i = 0;
while (i < trainingIndex) { // cycle through all players
if (trainingTimes[i] != 0) { // unless training is completed
trainingTimes[i] = trainingTimes[i] - 1; // one year of training completed
} else { // if training is completed
ToggleVeteran(trainingUnits[i], 1); // make unit veteran
for (j = i; j < trainingIndex; j = j + 1) { // go through all remaining units
trainingUnits[j] = trainingUnits[j + 1]; // put next unit at the position of the current one
trainingTimes[j] = trainingTimes[j + 1]; // put next time at the position of the current one
}
trainingIndex = trainingIndex - 1; // one less unit training
}
i = i + 1; // look at next unit
}
}
}
Comment