This section allows you to view all posts made by this member. Note that you can only see posts made in areas you currently have access to.
. the problem is indeed explained in the help file, but not his solution. Anyway, I get it now. 
// Define who's "acting"
function room_AfterFadeIn()
{
if(aClem==1){
Who="Clement";
WhoSuj="he";
WhoComp="him";
WhoPoss="his";
Archeo();
}
if(aJc==1){
Who="Jean-Charles";
WhoSuj="he";
WhoComp="him";
WhoPoss="his";
Archeo();
}
}
//This determine what string should be used in the displays, and runs the Archeo function for each one of them.
//Now here the Archeo Function :
//The different events that may happen (randomly)
function Archeo(){
int randig=Random(99)+1;
if(randig<=10){
Display("%s dug all the afternoon, but it seems %s luck has abandonned him : %s couldn't find anything of interest", Who, WhoPoss, WhoSuj);
}
if((randig>10)&&(randig<=30)){
Display("%s efforts weren't totally vain : %s found one rare material. Better than nothing!", Who, WhoSuj);
RM=RM+1;
}
if((randig>30)&&(randig<=60)){
Display("%s is exhausted for having dug all day, but it was worth it : %s found 2 rare materials", Who, WhoSuj);
RM=RM+2;
}
if((randig>60)&&(randig<=90)){
Display("%s's lucky star haven't failed %s : %s brought 3 rare materials to the camp, and didn't forget to brag about it!", Who, WhoComp, WhoSuj);
RM=RM+3;
}
if(randig>90){
int randigevent=Random(99)+1;
if(randigevent<=20){
Display("When %s came back to the camp, nobody could believe his eyes. The blessed digger didn't find any rare material, but something much more worthy : BONES! Not chicken bones, not rabbit bones, but Dinosaur bones!", Who);
Display("It was easy to tell because they look pretty old, like millions years old, and there weren't any chicken or rabbit back then.", Who);
Display("Though everyone was happy with this discovery, an argument broke out to know wether the bones were from a t-rex or an allosaurus. It escaladed very quickly. A decision has to be made.", Who);
dDinosaur.Start();
}
if((randigevent>20)&&(randigevent<=40)){
Display("It's a bad day for %s. Despite all %s efforts, %s couldn't find anything worthy. The night was falling, and %s was about to leave, when %s saw something shining in a dirt.", Who, WhoPoss, WhoSuj, WhoSuj, WhoSuj);
Display("A coin! It was a coin! A by the look of it, a very very old one, probably a Roman sestertium. By screwing up his eyes, %s could precognize Trajan portrait on it: yeah, totally a sestertium!", Who);
Display("No doubt it would bring prestige to the clan!", Who);
}
if((randigevent>40)&&(randigevent<=60)){
Display("When %s went digging this afternoon, %s felt a strange power coming from the dirt...well, as least that's what %s told the others. It was like someone â€" or something â€" was calling %s, telling %s where to dig.", Who, WhoSuj, WhoSuj, WhoComp, WhoComp);
Display("%s followed the voice, and soon found a strange stone, glowing red in the dusk, definitely a magic stone! ''The most beautiful thing I've ever seen'', she said.", WhoSuj, WhoSuj);
dStone.Start();
}
if((randigevent>60)&&(randigevent<=80)){
dPickaxe.Start();
}
if((randigevent>80)&&(randigevent<=100)){
Display("Woah, super cool");
}
}
}
)
) 
