home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
GameStar Special 2004 September
/
GSSH0904CD1.iso
/
MedievalLords
/
MedievalLordsMaps.exe
/
004400650073006500720074.scn
/
Desert_Cata.scp
< prev
next >
Wrap
Text File
|
2004-09-06
|
2KB
|
73 lines
//-------------------------------------------------------
//-------------------------------------------------------
s32 TestCataIDesert()
{
CataCallNext();
s32 NbSec;
NbSec = Random(600) + 600; // Random(x) + y = se lance toutes les y sec + entre 0 et x sec
f32 NbSecf;
NbSecf = NbSec;
NbSec = NbSecf / Diff_GetCataGlobalFrequencyFactor();
ExecInFewSecNoBattle("TestCataIlots",NbSec);
}
//-------------------------------------------------------
//-------------------------------------------------------
s32 DeclareCataDesert()
{
CataBeginList(); // ATTENTION: l'ensemble des coΘfficients doivent faire 100
CataAddFunc("CataFish",25); //"FonctionCata", % de chance d'Ωtre lancΘ
CataAddFunc("CataWheat",20);
CataAddFunc("CataHealth",20);
CataAddFunc("CataKitchen",15);
CataAddFunc("CataHen",10);
CataAddFunc("CataPorc",10);
CataEndList();
}
//-------------------------------------------------------
//------- INFOS
//-------------------------------------------------------
// Ne pas oublier d'appeler les .scp de Cata dans le Gameplay_X.spj
// Ne pas oublier de faire les appels des fonctions dans StartGame du Gameplay_X.scp
// Il est possible de mettre des messages particuliers (sΦcheresse dans le dΘsert, etc ...) en faisant
//
// s32 DeclareCataIlots()
// {
// CataAddFunc("CataWheatIlots",25);
// }
//
// -------------------------------------------------------
// s32 CataWheatIlots()
// {
// StartCataWheat(50,1,180,"");
// MessageUserPause("CATA_BLE_ILOTS_DEBUT"); Attention clΘ de loc inexistante = exemple
// }
// Il est possible Θgalement de regrouper plusieurs catastrophes
//
// s32 DeclareCataIlots()
// {
// CataAddFunc("CataMultiIlots",25);
// }
//
// -------------------------------------------------------
// s32 CataMultiIlots()
// {
// StartCataWheat(50,1,180,"");
// StartCataKitchen(100,30,180,"CATA_POTAGER_FIN");
// StartCataHealth(50,15,90,"CATA_EPIDEMIE_FIN");
// MessageUserPause("CATA_MULTI_ILOTS_DEBUT"); Attention clΘ de loc inexistante = exemple
// }