LCOV - code coverage report
Current view: top level - omega-rpg-0.90-pa9 - mmelee.c (source / functions) Hit Total Coverage
Test: lcov.info Lines: 104 202 51.5 %
Date: 2017-08-31 19:31:11 Functions: 6 6 100.0 %
Branches: 75 161 46.6 %

           Branch data     Line data    Source code
       1                 :            : /* omega copyright (c) 1987,1988,1989 by Laurence Raphael Brothers */
       2                 :            : /* mmelee */
       3                 :            : /* various functions to do with monster melee */
       4                 :            : 
       5                 :            : #include "glob.h"
       6                 :            : 
       7                 :            : 
       8                 :          2 : void m_hit(pmt m, int dtype)
       9                 :            : {
      10         [ +  - ]:          2 :   if (m->uniqueness == COMMON) {
      11                 :          2 :     strcpy(Str3,"a ");
      12                 :          2 :     strcat(Str3,m->monstring);
      13                 :            :   }
      14                 :          0 :   else strcpy(Str3,m->monstring);
      15 [ -  + ][ #  # ]:          2 :   if ((Player.status[DISPLACED] > 0) && (random_range(2) == 1))
      16                 :          0 :     mprint("The attack was displaced!");
      17                 :          2 :   else  p_damage(random_range(m->dmg),dtype,Str3);
      18                 :          2 : }
      19                 :            : 
      20                 :            : 
      21                 :            : 
      22                 :            : /* execute monster attacks versus player */
      23                 :          8 : void tacmonster(pmt m)
      24                 :            : {
      25                 :          8 :   int i=0;
      26                 :          8 :   drawvision(Player.x,Player.y);
      27                 :          8 :   transcribe_monster_actions(m);
      28 [ +  + ][ +  - ]:         36 :   while ((i < strlen(m->meleestr)) && (m->hp > 0)) {
      29         [ +  - ]:         28 :     if (m->uniqueness == COMMON) {
      30                 :         28 :       strcpy(Str4,"The ");
      31                 :         28 :       strcat(Str4,m->monstring);
      32                 :            :     }
      33                 :          0 :     else strcpy(Str4,m->monstring);
      34         [ +  + ]:         28 :     if (m->meleestr[i] == 'A') {
      35                 :         10 :       strcat(Str4," attacks ");
      36                 :         10 :       strcat(Str4,actionlocstr(m->meleestr[i+1]));
      37         [ +  - ]:         10 :       if (Verbosity == VERBOSE) mprint(Str4);
      38                 :         10 :       monster_melee(m,m->meleestr[i+1],0);
      39                 :            :     }
      40         [ -  + ]:         18 :     else if (m->meleestr[i] == 'L') {
      41                 :          0 :       strcat(Str4," lunges ");
      42                 :          0 :       strcat(Str4,actionlocstr(m->meleestr[i+1]));
      43         [ #  # ]:          0 :       if (Verbosity == VERBOSE) mprint(Str4);
      44                 :          0 :       monster_melee(m,m->meleestr[i+1],m->level);
      45                 :            :     }
      46                 :         28 :     i+=2;
      47                 :            :   }
      48                 :          8 : }
      49                 :            : 
      50                 :            : 
      51                 :            : 
      52                 :         10 : void monster_melee(pmt m, char hitloc, int bonus)
      53                 :            : {
      54         [ -  + ]:         10 :   if (player_on_sanctuary())
      55                 :          0 :     print1("The aegis of your deity protects you!");
      56                 :            :   else {
      57                 :            :     /* being attacked wakes you up/stops fast move */
      58                 :         10 :     resetgamestatus(FAST_MOVE);
      59                 :            : 
      60                 :            :     /* It's lawful to wait to be attacked */
      61         [ +  + ]:         10 :     if (m->attacked==0) Player.alignment++;
      62                 :         10 :     m->attacked++;
      63         [ +  - ]:         10 :     if (m->uniqueness == COMMON) {
      64                 :         10 :       strcpy(Str2,"The ");
      65                 :         10 :       strcat(Str2,m->monstring);
      66                 :            :     }
      67                 :          0 :     else strcpy(Str2,m->monstring);
      68         [ +  + ]:         10 :     if (monster_hit(m,hitloc,bonus))
      69   [ +  +  -  -  :          3 :       switch(m->meleef) {
          -  -  -  -  -  
             -  -  -  - ]
      70                 :            :       case M_NO_OP: 
      71                 :          1 :         strcat(Str2," touches you.");
      72                 :          1 :         mprint(Str2);
      73                 :          1 :         break;
      74                 :            :       case M_MELEE_NORMAL:
      75                 :          2 :         strcat(Str2," hits you.");
      76                 :          2 :         mprint(Str2);
      77                 :          2 :         m_hit(m,NORMAL_DAMAGE);
      78                 :          2 :         break;
      79                 :            :       case M_MELEE_NG:
      80                 :          0 :         strcat(Str2," hits you.");
      81                 :          0 :         mprint(Str2);
      82                 :          0 :         m_hit(m,NORMAL_DAMAGE);
      83         [ #  # ]:          0 :         if (random_range(5)==3) m_sp_ng(m);
      84                 :          0 :         break;
      85                 :            :       case M_MELEE_FIRE:
      86                 :          0 :         strcat(Str2," blasts you with fire.");
      87                 :          0 :         mprint(Str2);
      88                 :          0 :         m_hit(m,FLAME);
      89                 :          0 :         break;
      90                 :            :       case M_MELEE_DRAGON:
      91                 :          0 :         strcat(Str2," hits you and blasts you with fire.");
      92                 :          0 :         mprint(Str2);
      93                 :          0 :         m_hit(m,NORMAL_DAMAGE);
      94                 :          0 :         m_hit(m,FLAME);
      95                 :          0 :         break;
      96                 :            :       case M_MELEE_ELEC:
      97                 :          0 :         strcat(Str2," lashes you with electricity.");
      98                 :          0 :         mprint(Str2);
      99                 :          0 :         m_hit(m,ELECTRICITY);
     100                 :          0 :         break;
     101                 :            :       case M_MELEE_COLD:
     102                 :          0 :         strcat(Str2," freezes you with cold.");
     103                 :          0 :         mprint(Str2);
     104                 :          0 :         m_hit(m,ELECTRICITY);
     105                 :          0 :         break;
     106                 :            :       case M_MELEE_POISON:
     107                 :          0 :         strcat(Str2," hits you.");
     108                 :          0 :         mprint(Str2);
     109                 :          0 :         m_hit(m,NORMAL_DAMAGE);
     110         [ #  # ]:          0 :         if (random_range(10) < m->level) {
     111                 :          0 :           mprint("You've been poisoned!");
     112                 :          0 :           p_poison(m->dmg);
     113                 :            :         }
     114                 :          0 :         break;
     115                 :            :       case M_MELEE_GRAPPLE:
     116                 :          0 :         strcat(Str2," grabs you.");
     117                 :          0 :         mprint(Str2);
     118                 :          0 :         m_hit(m,NORMAL_DAMAGE);
     119                 :          0 :         Player.status[IMMOBILE]++;
     120                 :          0 :         break;
     121                 :            :       case M_MELEE_SPIRIT:
     122                 :          0 :         strcat(Str2," touches you.");
     123                 :          0 :         mprint(Str2);
     124                 :          0 :         m_hit(m,NORMAL_DAMAGE);
     125                 :          0 :         drain_life(m->level);
     126                 :          0 :         break;
     127                 :            :       case M_MELEE_DISEASE:
     128                 :          0 :         strcat(Str2," hits you.");
     129                 :          0 :         mprint(Str2);
     130                 :          0 :         m_hit(m,NORMAL_DAMAGE);
     131         [ #  # ]:          0 :         if (random_range(10) < m->level) {
     132                 :          0 :           mprint("You've been infected!");
     133                 :          0 :           disease(m->level);
     134                 :            :         }
     135                 :          0 :         break;
     136                 :            :       case M_MELEE_SLEEP:
     137                 :          0 :         strcat(Str2," hit you.");
     138                 :          0 :         mprint(Str2);
     139                 :          0 :         m_hit(m,NORMAL_DAMAGE);
     140         [ #  # ]:          0 :         if (random_range(10) < m->level) {
     141                 :          0 :           mprint("You feel drowsy");
     142                 :          0 :           sleep_player(m->level);
     143                 :            :         }
     144                 :          3 :         break;
     145                 :            :       }
     146                 :            :     else {
     147         [ +  + ]:          7 :       if (random_range(10)) strcat(Str2," missed you.");
     148                 :            :       else {
     149         [ -  + ]:          2 :         if (Verbosity == TERSE) {
     150   [ #  #  #  # ]:          0 :           switch(random_range(10)) {
     151                 :            :             case 0:
     152                 :          0 :               strcat(Str2," blundered severely.");
     153                 :          0 :               m_damage(m,m->dmg,UNSTOPPABLE); break;
     154                 :            :             case 1:
     155                 :          0 :               strcat(Str2," tripped while attacking.");m_dropstuff(m);break;
     156                 :            :             case 2:
     157                 :          0 :               strcat(Str2," seems seriously confused.");
     158                 :          0 :               m->speed = min(30,m->speed*2); break;
     159                 :            :             default:
     160                 :          0 :               strcat(Str2," missed you.");
     161                 :            :           }
     162                 :            :         }
     163   [ -  +  -  -  :          2 :         switch(random_range(10)) {
          -  +  -  -  -  
                   -  - ]
     164                 :          0 :           case 0: strcat(Str2," flailed stupidly at you."); break;
     165                 :          1 :           case 1: strcat(Str2," made you laugh."); break;
     166                 :          0 :           case 2: strcat(Str2," blundered severely.");
     167                 :          0 :             m_damage(m,m->dmg,UNSTOPPABLE); break;
     168                 :          0 :           case 3: strcat(Str2," tripped while attacking.");m_dropstuff(m);break;
     169                 :          0 :           case 4: strcat(Str2," seems seriously confused.");
     170                 :          0 :             m->speed = min(30,m->speed*2); break;
     171                 :          1 :           case 5: strcat(Str2," is seriously ashamed."); break;
     172                 :          0 :           case 6: strcat(Str2," made a boo-boo."); break;
     173                 :          0 :           case 7: strcat(Str2," blundered."); break;
     174                 :          0 :           case 8: strcat(Str2," cries out in anger and frustration."); break;
     175                 :          0 :           case 9: strcat(Str2," curses your ancestry."); break;
     176                 :            :         }
     177                 :            :       }
     178                 :          7 :       mprint(Str2);
     179                 :            :     }
     180                 :            :   }
     181                 :         10 : }
     182                 :            : 
     183                 :            : 
     184                 :            : 
     185                 :            : /* checks to see if player hits with hitmod vs. monster m at location hitloc */
     186                 :         10 : int monster_hit(pmt m, char hitloc, int bonus)
     187                 :            : {
     188                 :         10 :   int i=0,blocks=FALSE,goodblocks=0,hit,riposte=FALSE;
     189         [ +  + ]:         28 :   while (i<strlen(Player.meleestr)) {
     190 [ +  + ][ -  + ]:         18 :     if ((Player.meleestr[i] == 'B') || (Player.meleestr[i] == 'R')) {
     191                 :          8 :       blocks = TRUE;
     192         [ +  + ]:          8 :       if (hitloc == Player.meleestr[i+1]) {
     193                 :          5 :         goodblocks++;
     194         [ -  + ]:          5 :         if (Player.meleestr[i] == 'R') riposte = TRUE;
     195                 :            :       }
     196                 :            :     }
     197                 :         18 :     i+=2;
     198                 :            :   }
     199         [ +  + ]:         10 :   if (! blocks) goodblocks = -1;
     200                 :         10 :   hit = hitp(m->hit+bonus,Player.defense+goodblocks*10);
     201 [ +  + ][ +  + ]:         10 :   if ((! hit) && (goodblocks > 0)) {
     202         [ +  - ]:          4 :     if (Verbosity == VERBOSE) mprint("You blocked it!");
     203         [ -  + ]:          4 :     if (riposte) {
     204         [ #  # ]:          0 :       if (Verbosity != TERSE) mprint("You got a riposte!");
     205         [ #  # ]:          0 :       if (hitp(Player.hit,m->ac)) {
     206                 :          0 :         mprint("You hit!");
     207                 :          0 :         weapon_use(0,Player.possessions[O_WEAPON_HAND],m);
     208                 :            :       }
     209                 :          0 :       else mprint("You missed.");
     210                 :            :     }
     211                 :            :   }
     212                 :         10 :   return(hit);
     213                 :            : }
     214                 :            : 
     215                 :            : 
     216                 :            : 
     217                 :            : /* decide monster actions in tactical combat mode */
     218                 :            : /* if monster is skilled, it can try see the player's attacks coming and
     219                 :            :    try to block appropriately. */
     220                 :            : 
     221                 :         15 : void transcribe_monster_actions(pmt m)
     222                 :            : {
     223                 :            :   int i;
     224                 :            :   char attack_loc,block_loc;
     225                 :            :   static char mmstr[80];
     226                 :            :   
     227                 :            :   int p_blocks[3];
     228                 :            :   int p_attacks[3];
     229                 :            : 
     230         [ +  + ]:         60 :   for(i=0;i<3;i++)p_blocks[i] = p_attacks[i] = 0;
     231                 :            : 
     232                 :            :   /* Find which area player blocks and attacks least in */
     233                 :         15 :   i = 0;
     234         [ +  + ]:         41 :   while (i<strlen(Player.meleestr)) {
     235 [ +  + ][ -  + ]:         26 :     if ((Player.meleestr[i] == 'B') ||
     236                 :         15 :         (Player.meleestr[i] == 'R')) {
     237         [ -  + ]:         11 :       if (Player.meleestr[i+1] == 'H') p_blocks[0]++;
     238         [ +  - ]:         11 :       if (Player.meleestr[i+1] == 'C') p_blocks[1]++;
     239         [ -  + ]:         11 :       if (Player.meleestr[i+1] == 'L') p_blocks[2]++;
     240                 :            :     }
     241 [ +  - ][ +  + ]:         15 :     else if ((Player.meleestr[i] == 'A') ||
     242                 :         15 :              (Player.meleestr[i] == 'L')) {
     243         [ -  + ]:          4 :       if (Player.meleestr[i+1] == 'H') p_attacks[0]++;
     244         [ +  - ]:          4 :       if (Player.meleestr[i+1] == 'C') p_attacks[1]++;
     245         [ -  + ]:          4 :       if (Player.meleestr[i+1] == 'L') p_attacks[2]++;
     246                 :            :     }
     247                 :         26 :     i+=2;
     248                 :            :   }
     249                 :            : 
     250 [ +  - ][ +  - ]:         15 :   if ((p_blocks[2] <= p_blocks[1]) &&
     251                 :         15 :       (p_blocks[2] <= p_blocks[0]))
     252                 :         15 :     attack_loc = 'L';
     253 [ #  # ][ #  # ]:          0 :   else if ((p_blocks[1] <= p_blocks[2]) &&
     254                 :          0 :            (p_blocks[1] <= p_blocks[0]))
     255                 :          0 :     attack_loc = 'C'; /* DG 12/31/98 */
     256                 :          0 :   else attack_loc = 'H';
     257 [ +  - ][ +  - ]:         15 :   if ((p_attacks[2] <= p_attacks[1]) &&
     258                 :         15 :       (p_attacks[2] <= p_attacks[0]))
     259                 :         15 :     block_loc = 'L';
     260 [ #  # ][ #  # ]:          0 :   else if ((p_attacks[1] <= p_attacks[2]) &&
     261                 :          0 :            (p_attacks[1] <= p_attacks[0]))
     262                 :          0 :     block_loc = 'C';
     263                 :          0 :   else block_loc = 'H';
     264                 :            : 
     265                 :         15 :   m->meleestr = mmstr;
     266                 :            : 
     267         [ +  - ]:         15 :   if (m->id != NPC)
     268                 :         15 :     strcpy(m->meleestr,Monsters[m->id].meleestr);
     269                 :            :   else {
     270                 :          0 :     strcpy(m->meleestr,"");
     271         [ #  # ]:          0 :     for(i=0;i<m->level;i+=2) 
     272                 :          0 :       strcat(m->meleestr,"L?R?");
     273                 :            :   }
     274                 :            : 
     275                 :         15 :   i = 0;
     276         [ +  + ]:         65 :   while (i<strlen(m->meleestr)) {
     277 [ +  + ][ -  + ]:         50 :     if ((m->meleestr[i] == 'A') || (m->meleestr[i] == 'L')) {
     278         [ -  + ]:         40 :       if (m->meleestr[i+1] == '?') {
     279         [ #  # ]:          0 :         if (m->level+random_range(30) > Player.level+random_range(20))
     280                 :          0 :           m->meleestr[i+1] = attack_loc;
     281                 :          0 :         else m->meleestr[i+1] = random_loc();
     282                 :            :       }
     283         [ +  + ]:         20 :       else if (m->meleestr[i+1] == 'X') m->meleestr[i+1] = random_loc();
     284                 :            :     }
     285 [ -  + ][ #  # ]:         30 :     else if ((m->meleestr[i] == 'B') || (m->meleestr[i] == 'R')) {
     286         [ +  - ]:         30 :       if (m->meleestr[i+1] == '?') { 
     287         [ +  + ]:         30 :         if (m->level+random_range(30) > Player.level+random_range(20))
     288                 :         26 :           m->meleestr[i+1] = block_loc;
     289                 :         30 :         else m->meleestr[i+1] = random_loc();
     290                 :            :       }
     291         [ #  # ]:          0 :       else if (m->meleestr[i+1] == 'X') m->meleestr[i+1] = random_loc();
     292                 :            :     }
     293                 :         50 :     i+=2;
     294                 :            :   }
     295                 :         15 : }
     296                 :            : 
     297                 :         14 : char random_loc(void)
     298                 :            : {
     299      [ +  +  + ]:         14 :   switch(random_range(3)) {
     300                 :          7 :   case 0:return('H');
     301                 :          3 :   case 1:return('C');
     302                 :          4 :   default:return('L');
     303                 :            :   }
     304                 :            : }

Generated by: LCOV version 1.11