|
|
| Line 1: |
Line 1: |
| − | Below is the full text to '''timeout.c''' from the [[NetHack 1.4f source code|source code]] of [[NetHack 1.4f]]. To link to a particular line, write [[NetHack 1.4f/timeout.c#line123|<nowiki>[[NetHack 1.4f/timeout.c#line123]]</nowiki>]], for example.
| + | The source code file '''timeout.c''' in [[NetHack 1.4f source code|NetHack 1.4f]] is unchanged from [[NetHack 1.3d/timeout.c]]. |
| − | | + | [[Category:NetHack 1.4f source code]] |
| − | '''Warning!''' This is the source code from an old release. For the latest release, see [[Source code]]
| |
| − | | |
| − | {{CWI}}
| |
| − | <span id="line1">1. /* SCCS Id: @(#)timeout.c 1.3 87/07/14</span>
| |
| − | <span id="line2">2. /* Copyright (c) Stichting Mathematisch Centrum, Amsterdam, 1985. */</span>
| |
| − | <span id="line3">3. /* timeout.c - version 1.0.3 */</span>
| |
| − | <span id="line4">4. </span>
| |
| − | <span id="line5">5. #include "hack.h"</span>
| |
| − | <span id="line6">6. </span>
| |
| − | <span id="line7">7. timeout(){</span>
| |
| − | <span id="line8">8. register struct prop *upp;</span>
| |
| − | <span id="line9">9. #ifdef KAA</span>
| |
| − | <span id="line10">10. register struct monst *mtmp;</span>
| |
| − | <span id="line11">11. #endif</span>
| |
| − | <span id="line12">12. if(Stoned) stoned_dialogue();</span>
| |
| − | <span id="line13">13. #ifdef KAA</span>
| |
| − | <span id="line14">14. if(u.mtimedone) if (!--u.mtimedone) rehumanize();</span>
| |
| − | <span id="line15">15. # ifdef KOPS</span>
| |
| − | <span id="line16">16. if(u.ucreamed > 0) u.ucreamed--;</span>
| |
| − | <span id="line17">17. # endif</span>
| |
| − | <span id="line18">18. #endif</span>
| |
| − | <span id="line19">19. for(upp = u.uprops; upp < u.uprops+SIZE(u.uprops); upp++)</span>
| |
| − | <span id="line20">20. if((upp->p_flgs & TIMEOUT) && !(--upp->p_flgs & TIMEOUT)) {</span>
| |
| − | <span id="line21">21. if(upp->p_tofn) (*upp->p_tofn)();</span>
| |
| − | <span id="line22">22. else switch(upp - u.uprops){</span>
| |
| − | <span id="line23">23. case STONED:</span>
| |
| − | <span id="line24">24. killer = "cockatrice";</span>
| |
| − | <span id="line25">25. done("died");</span>
| |
| − | <span id="line26">26. break;</span>
| |
| − | <span id="line27">27. case SICK:</span>
| |
| − | <span id="line28">28. pline("You die because of food poisoning.");</span>
| |
| − | <span id="line29">29. killer = u.usick_cause;</span>
| |
| − | <span id="line30">30. done("died");</span>
| |
| − | <span id="line31">31. break;</span>
| |
| − | <span id="line32">32. case FAST:</span>
| |
| − | <span id="line33">33. pline("You feel yourself slowing down.");</span>
| |
| − | <span id="line34">34. break;</span>
| |
| − | <span id="line35">35. case CONFUSION:</span>
| |
| − | <span id="line36">36. if (Hallucination) pline("You feel less trippy now.");</span>
| |
| − | <span id="line37">37. else</span>
| |
| − | <span id="line38">38. pline("You feel less confused now.");</span>
| |
| − | <span id="line39">39. break;</span>
| |
| − | <span id="line40">40. case BLIND:</span>
| |
| − | <span id="line41">41. if (Hallucination) pline("Oh like wow! What a rush.");</span>
| |
| − | <span id="line42">42. else pline("You can see again.");</span>
| |
| − | <span id="line43">43. setsee();</span>
| |
| − | <span id="line44">44. break;</span>
| |
| − | <span id="line45">45. case INVIS:</span>
| |
| − | <span id="line46">46. on_scr(u.ux,u.uy);</span>
| |
| − | <span id="line47">47. if (!See_invisible)</span>
| |
| − | <span id="line48">48. pline("You are no longer invisible.");</span>
| |
| − | <span id="line49">49. break;</span>
| |
| − | <span id="line50">50. case WOUNDED_LEGS:</span>
| |
| − | <span id="line51">51. heal_legs();</span>
| |
| − | <span id="line52">52. break;</span>
| |
| − | <span id="line53">53. #ifdef KAA</span>
| |
| − | <span id="line54">54. case HALLUCINATION:</span>
| |
| − | <span id="line55">55. pline("Everything looks SO boring now.");</span>
| |
| − | <span id="line56">56. setsee();</span>
| |
| − | <span id="line57">57. for (mtmp=fmon; mtmp; mtmp=mtmp->nmon)</span>
| |
| − | <span id="line58">58. if ((Blind && Telepat) || canseemon(mtmp))</span>
| |
| − | <span id="line59">59. atl(mtmp->mx, mtmp->my, (!mtmp->mappearance || </span>
| |
| − | <span id="line60">60. Protection_from_shape_changers) </span>
| |
| − | <span id="line61">61. ? mtmp->data->mlet : mtmp->mappearance);</span>
| |
| − | <span id="line62">62. break;</span>
| |
| − | <span id="line63">63. #endif</span>
| |
| − | <span id="line64">64. }</span>
| |
| − | <span id="line65">65. }</span>
| |
| − | <span id="line66">66. }</span>
| |
| − | <span id="line67">67. </span>
| |
| − | <span id="line68">68. /* He is being petrified - dialogue by inmet!tower */</span>
| |
| − | <span id="line69">69. char *stoned_texts[] = {</span>
| |
| − | <span id="line70">70. "You are slowing down.", /* 5 */</span>
| |
| − | <span id="line71">71. "Your limbs are stiffening.", /* 4 */</span>
| |
| − | <span id="line72">72. "Your limbs have turned to stone.", /* 3 */</span>
| |
| − | <span id="line73">73. "You have turned to stone.", /* 2 */</span>
| |
| − | <span id="line74">74. "You are a statue." /* 1 */</span>
| |
| − | <span id="line75">75. };</span>
| |
| − | <span id="line76">76. </span>
| |
| − | <span id="line77">77. stoned_dialogue()</span>
| |
| − | <span id="line78">78. {</span>
| |
| − | <span id="line79">79. register long i = (Stoned & TIMEOUT);</span>
| |
| − | <span id="line80">80. </span>
| |
| − | <span id="line81">81. if(i > 0 && i <= SIZE(stoned_texts))</span>
| |
| − | <span id="line82">82. pline(stoned_texts[SIZE(stoned_texts) - i]);</span>
| |
| − | <span id="line83">83. if(i == 5)</span>
| |
| − | <span id="line84">84. Fast = 0;</span>
| |
| − | <span id="line85">85. if(i == 3)</span>
| |
| − | <span id="line86">86. nomul(-3);</span>
| |
| − | <span id="line87">87. }</span>
| |
| − | [[Category:NetHack 1.4f source code|timeout.c]] | |
