/* Autor:      Silvy
 * Date:       13.07.98
 * Update:     13.07.98
 *
 * Specjal od skavenow. Ale spokojnie moze byc wykorzystywany
 * w innych miejscach
 */
/*int
pen_specjala(object liv,object wp)
{
   int wt=wp->query_wt();
   int sila=liv->query_stat(0),bron=liv->query_skill(wt);
   return random(sila/3)+random(bron/2);
}*/
int
special_attack(object enemy)
{
    int attacktype, i, penet;
    mixed* hitresult;
    string how, how1;
    object me=TO;
    string czym;
    object *broniew = query_weapon(-1);
    if(!sizeof(this_object() -> query_weapon(-1)) ) return 0;
    if (CAN_SEE(enemy, this_object()))
       czym = broniew[0]->short(4);
     else czym = "czyms";
    attacktype = random(4);
    if (!attacktype)
    {
          penet = PEN_SPECJALA;
          hitresult = enemy->hit_me(penet, W_SLASH, 30, me, -1);
            how = "nie czyniac na tobie zadnym obrazen";
            how1 = "nie powodujac zadnych obrazen";
          if (hitresult[0] > 0)
            {
            how = "lekko raniac twe zmysly okropnym zapachem";
            how1 = "lekko raniac " + enemy->query_zaimek(PL_DOP, 0) +"zmysly, "+
            "potwornym zapachem";
            }
          if (hitresult[0] > 25)
           {
            how = "a potworny zapach bolesnie wwierca Ci sie w glowe";
            how1 = "a potworny zapach bolesnie wwierca sie  " + 
	enemy->query_zaimek(PL_CEL, 0) + " sie w glowe";
           }
          if (hitresult[0] > 50)
           {
            how = "rozszarpujac ci glowe od wewnatrz okropnym zapachem";
            how1 = "rozszarpujac " + enemy->query_zaimek(PL_BIE, 0) + " glowe " +
            "okropnym zapachem";
           }
          if (hitresult[0] > 80)
           {
            how = ", bezlitosnie rozwalajac twoj mozg !";
            how1 = "i bezlitosnie " + enemy->query_zaimek(PL_BIE, 0) + " masakruje okropnym zapachem";
           }
          enemy->catch_msg("Nagle " + QIMIE(this_object(), PL_MIA) + " bierze potezny zamach " + czym +
          " ktora niczym blyskawica przelatuje przed Twym nosem " + how +
"!\n");
          tell_watcher("Nagle " + QIMIE(this_object(), PL_MIA) +
          " bierze potezny zamach " + czym +
          " ktora niczym blyskawica przelatuje przed nosem "+ QIMIE(enemy, PL_DOP) + " "
          + how1 + "!\n",enemy);
          if (enemy->query_hp() <= 0)
            enemy->do_die(TO);
          return 1;
      }
    return 0;
}