home *** CD-ROM | disk | FTP | other *** search
/ InfoMagic Source Code 1993 July / THE_SOURCE_CODE_CD_ROM.iso / gnu / nethack-3.1 / src / sounds.c < prev    next >
Encoding:
C/C++ Source or Header  |  1993-01-08  |  16.8 KB  |  711 lines
  1. /*    SCCS Id: @(#)sounds.c    3.1    92/07/07
  2. /*     Copyright (c) 1989 Janet Walz, Mike Threepoint */
  3. /* NetHack may be freely redistributed.  See license for details. */
  4.  
  5. #include "hack.h"
  6. #include "edog.h"
  7.  
  8. #ifdef OVLB
  9.  
  10. static int FDECL(domonnoise,(struct monst *));
  11. static int NDECL(dochat);
  12.  
  13. #endif /* OVLB */
  14.  
  15. #ifdef SOUNDS
  16.  
  17. #ifdef OVL0
  18.  
  19. void
  20. dosounds()
  21. {
  22.     register xchar hallu;
  23.     register struct mkroom *sroom;
  24.     register int vx, vy;
  25. #if defined(AMIGA) && defined(AZTEC_C_WORKAROUND)
  26.     int xx;
  27. #endif
  28.  
  29.     hallu = Hallucination ? 1 : 0;
  30.  
  31.     if(!flags.soundok || u.uswallow || Underwater) return;
  32.  
  33.     if (level.flags.nfountains && !rn2(400))
  34.     switch (rn2(3)+hallu) {
  35.         case 0:
  36.         You("hear bubbling water.");
  37.         break;
  38.         case 1:
  39.         You("hear water falling on coins.");
  40.         break;
  41.         case 2:
  42.         You("hear the splashing of a naiad.");
  43.         break;
  44.         case 3:
  45.         You("hear a soda fountain!");
  46.         break;
  47.     }
  48.     if (level.flags.nsinks && !rn2(300))
  49.     switch (rn2(2)+hallu) {
  50.         case 0:
  51.         You("hear a slow drip.");
  52.         break;
  53.         case 1:
  54.         You("hear a gurgling noise.");
  55.         break;
  56.         case 2:
  57.         You("hear dishes being washed!");
  58.         break;
  59.     }
  60.  
  61.     if (level.flags.has_court && !rn2(200)) {
  62.     switch (rn2(3)+hallu) {
  63.         case 0:
  64.         You("hear the tones of courtly conversation.");
  65.         break;
  66.         case 1:
  67.         You("hear a sceptre being pounded in judgment.");
  68.         break;
  69.         case 2:
  70.         pline("Someone just shouted \"Off with %s head!\"",
  71.             flags.female ? "her" : "his");
  72.         break;
  73.         case 3:
  74.         You("hear Queen Beruthiel's cats!");
  75.         break;
  76.     }
  77.     return;
  78.     }
  79.     if (level.flags.has_swamp && !rn2(200)) {
  80.     switch (rn2(2)+hallu) {
  81.         case 0:
  82.         You("hear mosquitoes!");
  83.         break;
  84.         case 1:
  85.         You("smell marsh gas!");    /* so it's a smell...*/
  86.         break;
  87.         case 2:
  88.         You("hear Donald Duck!");
  89.         break;
  90.     }
  91.     return;
  92.     }
  93.     if (level.flags.has_vault && !rn2(200)) {
  94.     if (!(sroom = search_special(VAULT))) {
  95.         /* strange ... */
  96.         level.flags.has_vault = 0;
  97.         return;
  98.     }
  99.     if(gd_sound())
  100.         switch (rn2(2)+hallu) {
  101.         case 1: {
  102.             boolean gold_in_vault = FALSE;
  103.  
  104.             for (vx = sroom->lx;vx <= sroom->hx; vx++)
  105.             for (vy = sroom->ly; vy <= sroom->hy; vy++)
  106.                 if (g_at(vx, vy))
  107.                 gold_in_vault = TRUE;
  108. #if defined(AMIGA) && defined(AZTEC_C_WORKAROUND)
  109.             /* Bug in aztec assembler here. Workaround below */
  110.             xx = ROOM_INDEX(sroom) + ROOMOFFSET;
  111.             xx = (xx != vault_occupied(u.urooms));
  112.             if(xx)
  113. #else
  114.             if (vault_occupied(u.urooms) != 
  115.              (ROOM_INDEX(sroom) + ROOMOFFSET))
  116. #endif /* AZTEC_C_WORKAROUND */
  117.             {
  118.             if (gold_in_vault)
  119.                 You(!hallu ? "hear someone counting money." :
  120.                 "hear the quarterback calling the play.");
  121.             else
  122.                 You("hear someone searching.");
  123.             break;
  124.             }
  125.             /* fall into... (yes, even for hallucination) */
  126.         }
  127.         case 0:
  128.             You("hear the footsteps of a guard on patrol.");
  129.             break;
  130.         case 2:
  131.             You("hear Ebenezer Scrooge!");
  132.             break;
  133.         }
  134.     return;
  135.     }
  136.     if (level.flags.has_beehive && !rn2(200)) {
  137.     switch (rn2(2)+hallu) {
  138.         case 0:
  139.         You("hear a low buzzing.");
  140.         break;
  141.         case 1:
  142.         You("hear an angry drone.");
  143.         break;
  144.         case 2:
  145.         You("hear bees in your %sbonnet!",
  146.             uarmh ? "" : "(nonexistent) ");
  147.         break;
  148.     }
  149.     return;
  150.     }
  151.     if (level.flags.has_morgue && !rn2(200)) {
  152.     switch (rn2(2)+hallu) {
  153.         case 0:
  154.         You("suddenly realize it is unnaturally quiet.");
  155.         break;
  156.         case 1:
  157.         pline("The hair on the back of your %s stands up.",
  158.             body_part(NECK));
  159.         break;
  160.         case 2:
  161.         pline("The hair on your %s seems to stand up.",
  162.             body_part(HEAD));
  163.         break;
  164.     }
  165.     return;
  166.     }
  167. #ifdef ARMY
  168.     if (level.flags.has_barracks && !rn2(200)) {
  169.     switch (rn2(3)+hallu) {
  170.         case 0:
  171.         You("hear blades being honed.");
  172.         break;
  173.         case 1:
  174.         You("hear loud snoring.");
  175.         break;
  176.         case 2:
  177.         You("hear dice being thrown.");
  178.         break;
  179.         case 3:
  180.         You("hear General MacArthur!");
  181.         break;
  182.     }
  183.     return;
  184.     }
  185. #endif /* ARMY */
  186.     if (level.flags.has_zoo && !rn2(200)) {
  187.     switch (rn2(2)+hallu) {
  188.         case 0:
  189.     You("hear a sound reminding you of an elephant stepping on a peanut.");
  190.         break;
  191.         case 1:
  192.         You("hear a sound reminding you of a trained seal.");
  193.         break;
  194.         case 2:
  195.         You("hear Doctor Doolittle!");
  196.         break;
  197.     }
  198.     return;
  199.     }
  200.     if (level.flags.has_shop && !rn2(200)) {
  201.     if (!(sroom = search_special(ANY_SHOP))) {
  202.         /* strange... */
  203.         level.flags.has_shop = 0;
  204.         return;
  205.     }
  206.         if(tended_shop(sroom) && 
  207.        !index(u.ushops, ROOM_INDEX(sroom) + ROOMOFFSET))
  208.         switch (rn2(2)+hallu) {
  209.         case 0:
  210.             You("hear someone cursing shoplifters.");
  211.             break;
  212.         case 1:
  213.             You("hear the chime of a cash register.");
  214.             break;
  215.         case 2:
  216.             You("hear Neiman and Marcus arguing!");
  217.             break;
  218.         }
  219.         return;
  220.     }
  221. }
  222.  
  223. #endif /* OVL0 */
  224. #ifdef OVLB
  225.  
  226. #include "eshk.h"
  227.  
  228. void
  229. growl(mtmp)
  230. register struct monst *mtmp;
  231. {
  232.     if (mtmp->msleep || !mtmp->mcanmove) return;
  233.     /* presumably nearness and soundok checks have already been made */
  234.     switch (mtmp->data->msound) {
  235.     case MS_SILENT:
  236.         break;
  237.     case MS_MEW:
  238.     case MS_HISS:
  239.         pline("%s hisses!", Monnam(mtmp));
  240.         break;
  241.     case MS_BARK:
  242.     case MS_GROWL:
  243.         pline("%s growls!", Monnam(mtmp));
  244.         break;
  245.     case MS_ROAR:
  246.         pline("%s roars!", Monnam(mtmp));
  247.         break;
  248.     case MS_BUZZ:
  249.         pline("%s buzzes!", Monnam(mtmp));
  250.         break;
  251.     case MS_SQEEK:
  252.         pline("%s squeals!", Monnam(mtmp));
  253.         break;
  254.     case MS_SQAWK:
  255.         pline("%s screeches!", Monnam(mtmp));
  256.         break;
  257.     case MS_NEIGH:
  258.         pline("%s neighs!", Monnam(mtmp));
  259.         break;
  260.     case MS_WAIL:
  261.         pline("%s wails!", Monnam(mtmp));
  262.         break;
  263.     }
  264. }
  265.  
  266. void
  267. yelp(mtmp)
  268. register struct monst *mtmp;
  269. /* the sounds of mistreated pets */
  270. {
  271.     if (mtmp->msleep || !mtmp->mcanmove) return;
  272.     /* presumably nearness and soundok checks have already been made */
  273.     switch (mtmp->data->msound) {
  274.     case MS_MEW:
  275.         pline("%s yowls!", Monnam(mtmp));
  276.         break;
  277.     case MS_BARK:
  278.     case MS_GROWL:
  279.         pline("%s yelps!", Monnam(mtmp));
  280.         break;
  281.     case MS_ROAR:
  282.         pline("%s snarls!", Monnam(mtmp));
  283.         break;
  284.     case MS_SQEEK:
  285.         pline("%s squeals!", Monnam(mtmp));
  286.         break;
  287.     case MS_SQAWK:
  288.         pline("%s screaks!", Monnam(mtmp));
  289.         break;
  290.     case MS_WAIL:
  291.         pline("%s wails!", Monnam(mtmp));
  292.         break;
  293.     }
  294. }
  295.  
  296. void
  297. whimper(mtmp)
  298. register struct monst *mtmp;
  299. /* the sounds of distressed pets */
  300. {
  301.     if (mtmp->msleep || !mtmp->mcanmove) return;
  302.     /* presumably nearness and soundok checks have already been made */
  303.     switch (mtmp->data->msound) {
  304.     case MS_MEW:
  305.     case MS_GROWL:
  306.         pline("%s whimpers.", Monnam(mtmp));
  307.         break;
  308.     case MS_BARK:
  309.         pline("%s whines.", Monnam(mtmp));
  310.         break;
  311.     case MS_SQEEK:
  312.         pline("%s squeals.", Monnam(mtmp));
  313.         break;
  314.     }
  315. }
  316.  
  317. #endif /* OVLB */
  318.  
  319. #endif /* SOUNDS */
  320.  
  321. #ifdef OVLB
  322.  
  323. static int
  324. domonnoise(mtmp)
  325. register struct monst *mtmp;
  326. {
  327.     /* presumably nearness and sleep checks have already been made */
  328.     if (!flags.soundok) return(0);
  329.     switch (mtmp->data->msound) {
  330.     case MS_ORACLE:
  331.         return doconsult(mtmp);
  332.     case MS_PRIEST:
  333.         priest_talk(mtmp);
  334.         break;
  335. #ifdef SOUNDS
  336.     case MS_SILENT:
  337.         break;
  338.     case MS_SQEEK:
  339.         pline("%s squeaks.", Monnam(mtmp));
  340.         break;
  341.     case MS_SQAWK:
  342.         pline("%s squawks.", Monnam(mtmp));
  343.         break;
  344.     case MS_MEW:
  345.         if (mtmp->mtame) {
  346.         if (mtmp->mconf || mtmp->mflee || mtmp->mtrapped || 
  347.             moves > EDOG(mtmp)->hungrytime || mtmp->mtame < 5)
  348.             pline("%s yowls.", Monnam(mtmp));
  349.         else if (EDOG(mtmp)->hungrytime > moves + 1000)
  350.             pline("%s purrs.", Monnam(mtmp));
  351.         else
  352.             pline("%s mews.", Monnam(mtmp));
  353.         }
  354.     case MS_HISS:
  355.         if (!mtmp->mpeaceful)
  356.         pline("%s hisses!", Monnam(mtmp));
  357.         break;
  358.     case MS_BUZZ:
  359.         if (!mtmp->mpeaceful)
  360.         pline("%s buzzes angrily.", Monnam(mtmp));
  361.         break;
  362.     case MS_GRUNT:
  363.         pline("%s grunts.", Monnam(mtmp));
  364.         break;
  365.     case MS_BARK:
  366.         if (flags.moonphase == FULL_MOON && night()) {
  367.         pline("%s howls.", Monnam(mtmp));
  368.         break;
  369.         } else if (mtmp->mpeaceful) {
  370.         if (mtmp->mtame &&
  371.             (mtmp->mconf || mtmp->mflee || mtmp->mtrapped ||
  372.              moves > EDOG(mtmp)->hungrytime || mtmp->mtame < 5))
  373.             pline("%s whines.", Monnam(mtmp));
  374.         else if (EDOG(mtmp)->hungrytime > moves + 1000)
  375.             pline("%s yips.", Monnam(mtmp));
  376.         else
  377.             pline("%s barks.", Monnam(mtmp));
  378.         break;
  379.         }
  380.     case MS_GROWL:
  381.         if (!mtmp->mpeaceful)
  382.         pline("%s growls!", Monnam(mtmp));
  383.         break;
  384.     case MS_ROAR:
  385.         if (!mtmp->mpeaceful)
  386.         pline("%s roars!", Monnam(mtmp));
  387.         break;
  388.     case MS_NEIGH:
  389.         pline("%s neighs.", Monnam(mtmp));
  390.         break;
  391.     case MS_WAIL:
  392.         pline("%s wails mournfully.", Monnam(mtmp));
  393.         break;
  394.     case MS_GURGLE:
  395.         pline("%s gurgles.", Monnam(mtmp));
  396.         break;
  397.     case MS_BURBLE:
  398.         pline("%s burbles.", Monnam(mtmp));
  399.         break;
  400.     case MS_SHRIEK:
  401.         pline("%s shrieks.", Monnam(mtmp));
  402.         aggravate();
  403.         break;
  404.     case MS_IMITATE:
  405.         pline("%s imitates you.", Monnam(mtmp));
  406.         break;
  407.     case MS_DJINNI:
  408.         if (mtmp->mtame) verbalize("Thank you for freeing me!");
  409.         else if (mtmp->mpeaceful) verbalize("I'm free!");
  410.         else verbalize("This will teach you not to disturb me!");
  411.         break;
  412.     case MS_MUMBLE:
  413.         pline("%s mumbles incomprehensibly.", Monnam(mtmp));
  414.         break;
  415. #ifdef MULDGN
  416.     case MS_LEADER:
  417.     case MS_NEMESIS:
  418.     case MS_GUARDIAN:
  419.         quest_chat(mtmp);
  420.         break;
  421. #endif
  422.     case MS_BONES:
  423.         pline("%s rattles noisily.", Monnam(mtmp));
  424.         You("freeze momentarily.");
  425.         nomul(-2);
  426.         break;
  427.     case MS_HUMANOID:
  428.         if(In_endgame(&u.uz) && is_mplayer(mtmp->data))
  429.             mplayer_talk(mtmp);
  430.         /* Generic humanoid behaviour. */
  431.         if (!mtmp->mpeaceful) break;
  432.         if (mtmp->mflee)
  433.         pline("%s wants nothing to do with you.", Monnam(mtmp));
  434.         else if (mtmp->mhp < mtmp->mhpmax/4)
  435.         pline("%s moans.", Monnam(mtmp));
  436.         else if (mtmp->mconf || mtmp->mstun)
  437.         verbalize(!rn2(3) ? "Huh?" : rn2(2) ? "What?" : "Eh?");
  438.         else if (!mtmp->mcansee)
  439.         verbalize("I can't see!");
  440.         else if (mtmp->mtrapped)
  441.         verbalize("I'm trapped!");
  442.         else if (mtmp->mhp < mtmp->mhpmax/2)
  443.         pline("%s asks for a potion of healing.", Monnam(mtmp));
  444.         /* Specific monster's interests */
  445.         else if (is_elf(mtmp->data))
  446.         pline("%s curses orcs.", Monnam(mtmp));
  447.         else if (is_dwarf(mtmp->data))
  448.         pline("%s talks about mining.", Monnam(mtmp));
  449.         else if (likes_magic(mtmp->data))
  450.         pline("%s talks about spellcraft.", Monnam(mtmp));
  451.         else if (carnivorous(mtmp->data))
  452.         pline("%s discusses what kinds of meat are safe to eat.", Monnam(mtmp));
  453.         else switch (monsndx(mtmp->data)){
  454.         case PM_HOBBIT:
  455.             if (mtmp->mhpmax - mtmp->mhp >= 10)
  456. pline("%s complains about unpleasant dungeon conditions.", Monnam(mtmp));
  457.             else
  458.                 pline("%s asks you about the One Ring.", Monnam(mtmp));
  459.             break;
  460.         case PM_ARCHEOLOGIST:
  461. pline("%s describes a recent article in \"Spelunker Today\" magazine.", Monnam(mtmp));
  462.             break;
  463.         case PM_TOURIST:
  464.             verbalize("Aloha.");
  465.             break;
  466.         default:
  467.             pline("%s discusses dungeon exploration.", Monnam(mtmp));
  468.         }
  469.         break;
  470.     case MS_SEDUCE:
  471. # ifdef SEDUCE
  472.         if (mtmp->data->mlet != S_NYMPH &&
  473.         could_seduce(mtmp, &youmonst, (struct attack *)0) == 1) {
  474.             (void) doseduce(mtmp);
  475.             break;
  476.         }
  477.         switch ((poly_gender() != mtmp->female) ? rn2(3) : 0) {
  478. # else
  479.         switch ((poly_gender() == 0) ? rn2(3) : 0) {
  480. # endif
  481.         case 2:
  482.             verbalize("Hello, sailor.");
  483.             break;
  484.         case 1:
  485.             pline("%s comes on to you.", Monnam(mtmp));
  486.             break;
  487.         default:
  488.             pline("%s cajoles you.", Monnam(mtmp));
  489.         }
  490.         break;
  491. # ifdef KOPS
  492.     case MS_ARREST:
  493.         if (mtmp->mpeaceful)
  494.         verbalize("Just the facts, %s.",
  495.               flags.female ? "Ma'am" : "Sir");
  496.         else switch (rn2(3)) {
  497.         case 1:
  498.             verbalize("Anything you say can be used against you.");
  499.             break;
  500.         case 2:
  501.             verbalize("You're under arrest!");
  502.             break;
  503.         default:
  504.             verbalize("Stop in the name of the Law!");
  505.         }
  506.         break;
  507. # endif
  508.     case MS_LAUGH:
  509.         switch (rn2(4)) {
  510.         case 1:
  511.             pline("%s giggles.", Monnam(mtmp));
  512.             break;
  513.         case 2:
  514.             pline("%s chuckles.", Monnam(mtmp));
  515.             break;
  516.         case 3:
  517.             pline("%s snickers.", Monnam(mtmp));
  518.             break;
  519.         default:
  520.             pline("%s laughs.", Monnam(mtmp));
  521.         }
  522.         break;
  523.     case MS_BRIBE:
  524.         if (mtmp->mpeaceful && !mtmp->mtame) {
  525.         (void) demon_talk(mtmp);
  526.         break;
  527.         }
  528.         /* fall through */
  529.     case MS_CUSS:
  530.         if (!mtmp->mpeaceful)
  531.         cuss(mtmp);
  532.         break;
  533.     case MS_GUARD:
  534.         if (u.ugold)
  535.         verbalize("Please drop that gold and follow me.");
  536.         else
  537.         verbalize("Please follow me.");
  538.         break;
  539.     case MS_NURSE:
  540.         if (uwep)
  541.         verbalize("Put that weapon away before you hurt someone!");
  542.         else if (uarmc || uarm || uarmh || uarms || uarmg || uarmf)
  543.         if (pl_character[0] == 'H')
  544.             verbalize("Doc, I can't help you unless you cooperate.");
  545.         else
  546.             verbalize("Please undress so I can examine you.");
  547. # ifdef TOURIST
  548.         else if (uarmu)
  549.         verbalize("Take off your shirt, please.");
  550. # endif
  551.         else verbalize("Relax, this won't hurt a bit.");
  552.         break;
  553.     case MS_SELL: /* pitch, pay, total */
  554.         if (ANGRY(mtmp))
  555.         pline("%s mentions how much %s dislikes %s customers.",
  556.             ESHK(mtmp)->shknam,
  557.             mtmp->female ? "she" : "he",
  558.             ESHK(mtmp)->robbed ? "non-paying" : "rude");
  559.         else if (ESHK(mtmp)->following)
  560.         if (strncmp(ESHK(mtmp)->customer, plname, PL_NSIZ)) {
  561.             verbalize("Hello %s!  I was looking for %s.",
  562.                 plname, ESHK(mtmp)->customer);
  563.             ESHK(mtmp)->following = 0;
  564.         } else {
  565.             verbalize("Hello %s!  Didn't you forget to pay?",
  566.                 plname);
  567.         }
  568.         else if (ESHK(mtmp)->robbed)
  569.         pline("%s complains about a recent robbery.", ESHK(mtmp)->shknam);
  570.         else if (ESHK(mtmp)->billct)
  571.         pline("%s reminds you that you haven't paid yet.", ESHK(mtmp)->shknam);
  572.         else if (mtmp->mgold < 50)
  573.         pline("%s complains that business is bad.", ESHK(mtmp)->shknam);
  574.         else if (mtmp->mgold > 4000)
  575.         pline("%s says that business is good.", ESHK(mtmp)->shknam);
  576.         else
  577.         pline("%s talks about the problem of shoplifters.", ESHK(mtmp)->shknam);
  578.         break;
  579.     case MS_SOLDIER:
  580.         if (!mtmp->mpeaceful)
  581.         switch (rn2(3)) {
  582.         case 2:
  583.             verbalize("Resistance is useless!");
  584.             break;
  585.         case 1:
  586.             verbalize("You're dog meat!");
  587.             break;
  588.         default:
  589.             verbalize("Surrender!");
  590.         } else
  591.         switch (rn2(3)) {
  592.         case 2:
  593.             verbalize("What lousy pay we're getting here!");
  594.             break;
  595.         case 1:
  596.             verbalize("The food's not fit for Orcs!");
  597.             break;
  598.         default:
  599.             verbalize("My feet hurt, I've been on them all day!");
  600.         }
  601.         break;
  602.     case MS_DEATH:
  603.         pline("%s is busy reading a copy of Sandman #9.", Monnam(mtmp));
  604.         break;
  605.     case MS_PESTILENCE:
  606.     case MS_FAMINE:
  607.         verbalize("Who do you think you are, War?");
  608.         break;
  609. #endif /* SOUNDS */
  610.     }
  611.     return(1);
  612. }
  613.  
  614.  
  615. int
  616. dotalk()
  617. {
  618.     int result;
  619.     boolean save_soundok = flags.soundok;
  620.     flags.soundok = 1;    /* always allow sounds while chatting */
  621.     result = dochat();
  622.     flags.soundok = save_soundok;
  623.     return result;
  624. }
  625.  
  626. static int
  627. dochat()
  628. {
  629.     register struct monst *mtmp;
  630.     register int tx,ty;
  631.     struct obj *otmp;
  632.  
  633. #ifdef POLYSELF
  634.     if (uasmon->msound == MS_SILENT) {
  635.     Your("current form seems unable to speak.");
  636.     return(0);
  637.     }
  638. #endif
  639.     if (Strangled) {
  640.     You("can't speak.  You're choking!");
  641.     return(0);
  642.     }
  643.     if (u.uswallow) {
  644.     pline("They won't hear you out there.");
  645.     return(0);
  646.     }
  647.     if (Underwater) {
  648.     pline("All you can utter is a mouthful of air bubbles.");
  649.     return(0);
  650.     }
  651.  
  652.     if (!Blind && (otmp = shop_object(u.ux, u.uy)) != (struct obj *)0) {
  653.     /* standing on something in a shop and chatting causes the shopkeeper
  654.        to describe the price(s).  This can inhibit other chatting inside
  655.        a shop, but that shouldn't matter much.  shop_object() returns an
  656.        object iff inside a shop and the shopkeeper is present and willing
  657.        (not angry) and able (not asleep) to speak and the position contains
  658.        any objects other than just gold.
  659.     */
  660.     price_quote(otmp);
  661.     return(1);
  662.     }
  663.  
  664.     (void) getdir("Talk to whom? [in what direction]");
  665.  
  666.     if (u.dz) {
  667.     pline("They won't hear you %s there.", u.dz < 0 ? "up" : "down");
  668.     return(0);
  669.     }
  670.  
  671.     if (u.dx == 0 && u.dy == 0) {
  672. /*
  673.  * Let's not include this.  It raises all sorts of questions: can you wear
  674.  * 2 helmets, 2 amulets, 3 pairs of gloves or 6 rings as a marilith,
  675.  * etc...  --KAA
  676. #ifdef POLYSELF
  677.     if (u.umonnum == PM_ETTIN) {
  678.         You("discover that your other head makes boring conversation.");
  679.         return(1);
  680.     }
  681. #endif
  682. */
  683.     pline("Talking to yourself is a bad habit for a dungeoneer.");
  684.     return(0);
  685.     }
  686.  
  687.     tx = u.ux+u.dx; ty = u.uy+u.dy;
  688.     mtmp = m_at(tx, ty);
  689.     if ((Blind && !Telepat) || !mtmp || mtmp->mundetected ||
  690.         mtmp->m_ap_type == M_AP_FURNITURE ||
  691.         mtmp->m_ap_type == M_AP_OBJECT) {
  692.     pline("I see nobody there.");
  693.     return(0);
  694.     }
  695.     if (!mtmp->mcanmove || mtmp->msleep) {
  696.     pline("%s seems not to notice you.", Monnam(mtmp));
  697.     return(0);
  698.     }
  699.  
  700.     if (mtmp->mtame && mtmp->meating) {
  701.     pline("%s is eating noisily.", Monnam(mtmp));
  702.     return (0);
  703.     }
  704.  
  705.     return domonnoise(mtmp);
  706. }
  707.  
  708. #endif /* OVLB */
  709.  
  710. /*sounds.c*/
  711.