SamppaFIN
14.08.2002, 12:56
#define JAKSAA_OLLA_TOISSA 3
#define VITUTUS_RAJA_BAARIA_VARTEN 3
#define OLUEN_HINTA 3.8
int TehdytTunnit(0);
double LompakossaRahaa(10);
BOOL LuottokorttiMatkassa = TRUE;
void Main()
{
if (TehdytTunnit > JAKSAA_OLLA_TOISSA * VITUTUS_RAJA_BAARIA_VARTEN)
MeneBaariin(LompakossaRahaa, LuottokorttiMatkassa);
else TehdytTunnit++;
}
BOOL Baari::MeneBaariin(double LompakossaRahaa, BOOL LuottokorttiMarkassa)
{
for(int JuotujenKaljojenMaara = 0; JuotujenKaljojenMaara++;JuotujenKaljojenMaara > ViinaPaa)
{
if(LompakossaRahaa > OLUEN_HINTA)
VahennaLompakonTilavuutta(TilaaOlut(), LompakossaRahaa)
else if (LuottokorttiMatkassa)
HoylaaKorttiaJaItkeMyohemmin();
else return Kotio;
if (VirtsaRakkoOverflows == TRUE) Rakko->Tyhjenna();
if (iLMLights > 0) PoltaSavuke(iLMLights--);
else OstaAski(iLMLights = 20, LuottoKortti|LompakossaRahaa);
}
BeginWaitPortsar();
Retteloi();
EndWaitPortsar();
return Rahalle;
}
Jos tulee muita toimintoja mieleen, saa määritellä..
#define VITUTUS_RAJA_BAARIA_VARTEN 3
#define OLUEN_HINTA 3.8
int TehdytTunnit(0);
double LompakossaRahaa(10);
BOOL LuottokorttiMatkassa = TRUE;
void Main()
{
if (TehdytTunnit > JAKSAA_OLLA_TOISSA * VITUTUS_RAJA_BAARIA_VARTEN)
MeneBaariin(LompakossaRahaa, LuottokorttiMatkassa);
else TehdytTunnit++;
}
BOOL Baari::MeneBaariin(double LompakossaRahaa, BOOL LuottokorttiMarkassa)
{
for(int JuotujenKaljojenMaara = 0; JuotujenKaljojenMaara++;JuotujenKaljojenMaara > ViinaPaa)
{
if(LompakossaRahaa > OLUEN_HINTA)
VahennaLompakonTilavuutta(TilaaOlut(), LompakossaRahaa)
else if (LuottokorttiMatkassa)
HoylaaKorttiaJaItkeMyohemmin();
else return Kotio;
if (VirtsaRakkoOverflows == TRUE) Rakko->Tyhjenna();
if (iLMLights > 0) PoltaSavuke(iLMLights--);
else OstaAski(iLMLights = 20, LuottoKortti|LompakossaRahaa);
}
BeginWaitPortsar();
Retteloi();
EndWaitPortsar();
return Rahalle;
}
Jos tulee muita toimintoja mieleen, saa määritellä..