src/game/humans/humanoid_alchemist.cpp

   1 #ifdef HEADER_PHASE
   2 CHARACTER(alchemist, humanoid)
   3 {
   4 protected:
   5   virtual void GetAICommand ();
   6   int GetSpellAPCost () const;
   7 };
   8
   9
  10 #else
  11
  12
  13
  14 void alchemist::GetAICommand () {
  15   SeekLeader(GetLeader());
  16   if (FollowLeader(GetLeader())) return;
  17   //
  18   character *NearestEnemy = 0;
  19   sLong NearestEnemyDistance = 0x7FFFFFFF;
  20   v2 Pos = GetPos();
  21   //
  22   for (int c = 0; c < game::GetTeams(); ++c) {
  23     if (GetTeam()->GetRelation(game::GetTeam(c)) == HOSTILE) {
  24       for (std::list<character*>::const_iterator i = game::GetTeam(c)->GetMember().begin(); i != game::GetTeam(c)->GetMember().end(); ++i) {
  25         if ((*i)->IsEnabled()) {
  26           sLong ThisDistance = Max<sLong>(abs((*i)->GetPos().X - Pos.X), abs((*i)->GetPos().Y-Pos.Y));
  27           //
  28           if ((ThisDistance < NearestEnemyDistance || (ThisDistance == NearestEnemyDistance && !(RAND()%3))) && (*i)->CanBeSeenBy(this)) {
  29             NearestEnemy = *i;
  30             NearestEnemyDistance = ThisDistance;
  31           }
  32         }
  33       }
  34     }
  35   }
  36   //
  37   truth Interrupt = false;
  38   // here we insert code for the alchemy
  39   if (NearestEnemy && !StateIsActivated(CONFUSED) && !(RAND()%2)) {
  40     if (NearestEnemy->IsHumanoid()) {
  41       beamdata Beam(
  42         this,
  43         CONST_S("killed by the spells of ") + GetName(INDEFINITE),
  44         YOURSELF,
  45         0
  46       );
  47       lsquare *Square = NearestEnemy->GetLSquareUnder();
  48       EditAP(-GetSpellAPCost());
  49       if (CanBeSeenByPlayer()) ADD_MESSAGE("%s invokes a spell!", CHAR_NAME(DEFINITE));
  50       Square->DrawParticles(RED);
  51       Square->SoftenMaterial(Beam);
  52       Interrupt = true;
  53     }
  54     if (Interrupt) {
  55       if (CanBeSeenByPlayer()) {
  56         NearestEnemy->DeActivateVoluntaryAction(CONST_S("The spell of ")+GetName(DEFINITE)+CONST_S(" interrupts you."));
  57       } else {
  58         NearestEnemy->DeActivateVoluntaryAction(CONST_S("The spell interrupts you."));
  59       }
  60     }
  61     return;
  62   }
  63   /*
  64   truth Changed = false;
  65   item* MainArmor = 0;
  66
  67     int BodyPartToHit = NearestEnemy->GetRandomBodyPart();
  68
  69     switch(BodyPartToHit) // okay, this is broken because it seg-faults, it needs to be replaced by a BEAM, in lsquare.cpp, as per mage: LowerEnchantment(), say
  70     {
  71       case TORSO_INDEX:
  72       MainArmor = NearestEnemy->GetEquipment(BODY_ARMOR_INDEX);
  73       break;
  74       case HEAD_INDEX:
  75       MainArmor = NearestEnemy->GetEquipment(HELMET_INDEX);
  76       break;
  77       case RIGHT_ARM_INDEX:
  78       MainArmor = NearestEnemy->GetEquipment(RIGHT_GAUNTLET_INDEX);
  79       break;
  80       case LEFT_ARM_INDEX:
  81       MainArmor = NearestEnemy->GetEquipment(LEFT_GAUNTLET_INDEX);
  82       break;
  83       case GROIN_INDEX:
  84       MainArmor = NearestEnemy->GetEquipment(BELT_INDEX);
  85       break;
  86       case RIGHT_LEG_INDEX:
  87       MainArmor = NearestEnemy->GetEquipment(RIGHT_BOOT_INDEX);
  88       break;
  89       case LEFT_LEG_INDEX:
  90       MainArmor = NearestEnemy->GetEquipment(LEFT_BOOT_INDEX);
  91       break;
  92       case NONE_INDEX:
  93       MainArmor = 0;
  94       break;
  95     }
  96
  97     if(MainArmor)
  98     {
  99       festring Desc;
 100       MainArmor->AddName(Desc, UNARTICLED);
 101
 102       if((MainArmor->GetMainMaterial()->GetCategoryFlags() & IS_METAL) && (MainArmor->GetMainMaterial()->GetConfig() != TIN))
 103       {
 104         MainArmor->ChangeMainMaterial(MAKE_MATERIAL(TIN));
 105         Changed = true;
 106         Interrupt = true;
 107       }
 108       else if((MainArmor->GetMainMaterial()->GetCategoryFlags() & CAN_BE_TAILORED) && (MainArmor->GetMainMaterial()->GetConfig() != CLOTH))
 109       {
 110         MainArmor->ChangeMainMaterial(MAKE_MATERIAL(CLOTH));
 111         Changed = true;
 112         Interrupt = true;
 113       }
 114
 115       if(Changed && NearestEnemy->IsPlayer())
 116       {
 117         ADD_MESSAGE("Your %s softens into %s!", Desc.CStr(), MainArmor->GetMainMaterial()->GetName(false, false).CStr());
 118       }
 119       else if(Changed)
 120         ADD_MESSAGE("%s's %s softens into %s!", NearestEnemy->CHAR_DESCRIPTION(DEFINITE), Desc.CStr(), MainArmor->GetMainMaterial()->GetName(false, false).CStr());
 121     }
 122     if(!Changed) //may not need this message
 123       if(NearestEnemy->IsPlayer())
 124       {
 125         ADD_MESSAGE("Your %s vibrates slightly but remains unchanged.", MainArmor->CHAR_NAME(UNARTICLED) );
 126       }
 127       else
 128         ADD_MESSAGE("%s's %s vibrates slightly but remains unchanged.", NearestEnemy->CHAR_DESCRIPTION(DEFINITE), MainArmor->CHAR_NAME(UNARTICLED) );
 129   */
 130   //
 131   if (NearestEnemy && (NearestEnemyDistance < 10 || StateIsActivated(PANIC)) && (RAND()&3)) {
 132     SetGoingTo((Pos << 1)-NearestEnemy->GetPos());
 133     if (MoveTowardsTarget(true)) return;
 134   }
 135   //
 136   if (CheckForUsefulItemsOnGround()) return;
 137   if (CheckForDoors()) return;
 138   if (CheckSadism()) return;
 139   if (MoveRandomly()) return;
 140   EditAP(-1000);
 141 }
 142
 143
 144
 145 int alchemist::GetSpellAPCost () const {
 146   //switch (GetConfig()) {
 147   //  case APPRENTICE_NECROMANCER: return 2000;
 148   //  case MASTER_NECROMANCER: return 1000;
 149   //}
 150   return 2000;
 151 }
 152 #endif