src/game/materias.cpp

   1 /*
   2  *
   3  *  Iter Vehemens ad Necem (IVAN)
   4  *  Copyright (C) Timo Kiviluoto
   5  *  Released under the GNU General
   6  *  Public License
   7  *
   8  *  See LICENSING which should be included
   9  *  along with this file for more details
  10  *
  11  */
  12
  13 /* Compiled through materset.cpp */
  14
  15 void organic::ResetSpoiling() { SpoilCounter = SpoilLevel = 0; }
  16
  17 cchar* liquid::GetConsumeVerb() const { return "drinking"; }
  18
  19 truth powder::IsExplosive() const { return !Wetness && material::IsExplosive(); }
  20
  21 truth ironalloy::IsSparkling() const { return material::IsSparkling() && GetRustLevel() == NOT_RUSTED; }
  22
  23 void organic::Be(feuLong Flags)
  24 {
  25   if(SpoilCheckCounter++ >= 50)
  26   {
  27     if(MotherEntity->AllowSpoil())
  28     {
  29       if(Flags & HASTE)
  30   SpoilCounter += 125;
  31       else if(Flags & SLOW)
  32   SpoilCounter += 5;
  33       else
  34   SpoilCounter += 25;
  35
  36       if(SpoilCounter < GetSpoilModifier())
  37       {
  38   if(SpoilCounter << 1 >= GetSpoilModifier())
  39   {
  40     int NewSpoilLevel = ((SpoilCounter << 4) / GetSpoilModifier()) - 7;
  41
  42     if(NewSpoilLevel != SpoilLevel)
  43     {
  44       SpoilLevel = NewSpoilLevel;
  45       MotherEntity->SignalSpoilLevelChange(this);
  46     }
  47   }
  48       }
  49       else
  50       {
  51   SpoilLevel = 8;
  52   MotherEntity->SignalSpoil(this);
  53       }
  54     }
  55
  56     SpoilCheckCounter = 0;
  57   }
  58 }
  59
  60 void organic::Save(outputfile& SaveFile) const
  61 {
  62   material::Save(SaveFile);
  63   SaveFile << SpoilCounter << SpoilCheckCounter << SpoilLevel;
  64 }
  65
  66 void organic::Load(inputfile& SaveFile)
  67 {
  68   material::Load(SaveFile);
  69   SaveFile >> SpoilCounter >> SpoilCheckCounter >> SpoilLevel;
  70 }
  71
  72 void organic::PostConstruct()
  73 {
  74   SpoilLevel = SpoilCheckCounter = 0;
  75   SpoilCounter = (RAND() % GetSpoilModifier()) >> 5;
  76 }
  77
  78 void flesh::PostConstruct()
  79 {
  80   organic::PostConstruct();
  81   SkinColorSparkling = InfectedByLeprosy = false;
  82   SkinColor = GetColor();
  83 }
  84
  85 void flesh::Save(outputfile& SaveFile) const
  86 {
  87   organic::Save(SaveFile);
  88   SaveFile << SkinColor << SkinColorSparkling << InfectedByLeprosy;
  89 }
  90
  91 void flesh::Load(inputfile& SaveFile)
  92 {
  93   organic::Load(SaveFile);
  94   SaveFile >> SkinColor >> SkinColorSparkling >> InfectedByLeprosy;
  95 }
  96
  97 void powder::Be(feuLong)
  98 {
  99   if(Wetness > 0)
 100     --Wetness;
 101 }
 102
 103 void powder::Save(outputfile& SaveFile) const
 104 {
 105   material::Save(SaveFile);
 106   SaveFile << Wetness;
 107 }
 108
 109 void powder::Load(inputfile& SaveFile)
 110 {
 111   material::Load(SaveFile);
 112   SaveFile >> Wetness;
 113 }
 114
 115 material* organic::EatEffect(character* Eater, sLong Amount)
 116 {
 117   Amount = Volume > Amount ? Amount : Volume;
 118   GetMotherEntity()->SpecialEatEffect(Eater, Amount);
 119   Effect(Eater, TORSO_INDEX, Amount);
 120   Eater->ReceiveNutrition(GetNutritionValue() * Amount * 20 / (1000 * (GetSpoilLevel() + 1)));
 121
 122   if(IsInfectedByLeprosy() && Amount && !RAND_N(25000 / Amount))
 123     Eater->GainIntrinsic(LEPROSY);
 124
 125   if(GetSpoilLevel() > 0)
 126   {
 127     Eater->BeginTemporaryState(CONFUSED, int(Amount * GetSpoilLevel() * sqrt(GetNutritionValue()) / 1000));
 128
 129     if(GetBodyFlags() & CAN_HAVE_PARASITE
 130        && !(RAND() % (250 / GetSpoilLevel())))
 131       Eater->GainIntrinsic(PARASITIZED);
 132   }
 133
 134   if(GetSpoilLevel() > 4)
 135     Eater->BeginTemporaryState(POISONED, int(Amount * (GetSpoilLevel() - 4) * sqrt(GetNutritionValue()) / 1000));
 136
 137   if(Volume != Amount)
 138   {
 139     EditVolume(-Amount);
 140     return 0;
 141   }
 142   else
 143     return MotherEntity->RemoveMaterial(this);
 144 }
 145
 146 void organic::AddConsumeEndMessage(character* Eater) const
 147 {
 148   if(Eater->IsPlayer())
 149   {
 150     if(GetSpoilLevel() > 0 && GetSpoilLevel() <= 4)
 151       ADD_MESSAGE("Ugh. This stuff was slightly spoiled.");
 152     else if(GetSpoilLevel() > 4)
 153       ADD_MESSAGE("Ugh. This stuff was terribly spoiled!");
 154   }
 155
 156   material::AddConsumeEndMessage(Eater);
 157 }
 158
 159 void organic::SetSpoilCounter(int What)
 160 {
 161   SpoilCounter = What;
 162
 163   if(SpoilCounter < GetSpoilModifier())
 164   {
 165     if(SpoilCounter << 1 >= GetSpoilModifier())
 166     {
 167       int NewSpoilLevel = ((SpoilCounter << 4) / GetSpoilModifier()) - 7;
 168
 169       if(NewSpoilLevel != SpoilLevel)
 170       {
 171   SpoilLevel = NewSpoilLevel;
 172   MotherEntity->SignalSpoilLevelChange(this);
 173       }
 174     }
 175   }
 176   else
 177     MotherEntity->SignalSpoil(this);
 178 }
 179
 180 void ironalloy::SetRustLevel (int What) {
 181   if (GetRustLevel() != What) {
 182     if (!RustData) RustData = (RAND() & 0xFC) | What;
 183     else if (!What) RustData = 0;
 184     else RustData = (RustData & 0xFC) | What;
 185     if (MotherEntity) MotherEntity->SignalRustLevelChange();
 186   }
 187 }
 188
 189 int ironalloy::GetStrengthValue() const
 190 {
 191   int Base = material::GetStrengthValue();
 192
 193   switch(GetRustLevel())
 194   {
 195    case NOT_RUSTED: return Base;
 196    case SLIGHTLY_RUSTED: return ((Base << 3) + Base) / 10;
 197    case RUSTED: return ((Base << 1) + Base) >> 2;
 198    case VERY_RUSTED: return Base >> 1;
 199   }
 200
 201   return 0; /* not possible */
 202 }
 203
 204 truth ironalloy::AddRustLevelDescription(festring& Name, truth Articled) const
 205 {
 206   if(GetRustLevel() == NOT_RUSTED)
 207     return false;
 208
 209   if(Articled)
 210     Name << "a ";
 211
 212   switch(GetRustLevel())
 213   {
 214    case SLIGHTLY_RUSTED:
 215     Name << "slightly rusted ";
 216     break;
 217    case RUSTED:
 218     Name << "rusted ";
 219     break;
 220    case VERY_RUSTED:
 221     Name << "very rusted ";
 222     break;
 223   }
 224
 225   return true;
 226 }
 227
 228 void ironalloy::Save(outputfile& SaveFile) const
 229 {
 230   material::Save(SaveFile);
 231   SaveFile << RustData;
 232 }
 233
 234 void ironalloy::Load(inputfile& SaveFile)
 235 {
 236   material::Load(SaveFile);
 237   SaveFile >> RustData;
 238 }
 239
 240 void liquid::TouchEffect(item* Item, cfestring& LocationName)
 241 {
 242   if(GetRustModifier())
 243     Item->TryToRust(GetRustModifier() * GetVolume());
 244
 245   if(GetAcidicity())
 246     Item->ReceiveAcid(this, LocationName, Volume * GetAcidicity());
 247
 248   character* Char = Item->GetBodyPartMaster();
 249
 250   if(Char)
 251     Effect(Char, Item->GetBodyPartIndex(), Volume >> 6);
 252 }
 253
 254 void liquid::TouchEffect(lterrain* Terrain)
 255 {
 256   if(GetRustModifier())
 257     Terrain->TryToRust(GetRustModifier() * GetVolume());
 258
 259   if(GetAcidicity())
 260     Terrain->ReceiveAcid(this, Volume * GetAcidicity());
 261 }
 262
 263 void liquid::TouchEffect(character* Char, int BodyPartIndex)
 264 {
 265   if(GetRustModifier())
 266     Char->GetBodyPart(BodyPartIndex)->TryToRust(GetRustModifier() * GetVolume());
 267
 268   if(Char->IsEnabled() && GetAcidicity())
 269     Char->GetBodyPart(BodyPartIndex)->ReceiveAcid(this, CONST_S(""), Volume * GetAcidicity() >> 1);
 270
 271   if(Char->IsEnabled())
 272     Effect(Char, BodyPartIndex, Volume >> 9);
 273 }
 274
 275 /* Doesn't do the actual rusting, just returns whether it should happen */
 276
 277 truth ironalloy::TryToRust(sLong Modifier, sLong Volume)
 278 {
 279   if(GetRustLevel() != VERY_RUSTED)
 280   {
 281     if(!Volume)
 282       Volume = GetVolume();
 283
 284     sLong Chance = sLong(30000000. * sqrt(Volume) / (Modifier * GetRustModifier()));
 285
 286     if(Chance <= 1 || !(RAND() % Chance))
 287       return true;
 288   }
 289
 290   return false;
 291 }
 292
 293 int organic::GetSpoilPercentage() const
 294 {
 295   return 100 * SpoilCounter / GetSpoilModifier();
 296 }