Difference between revisions of "Source:NetHack 3.6.0/src/track.c"

From NetHackWiki
Jump to navigation Jump to search
(Created page with "__MIXEDSYNTAXHIGHLIGHT__ Below is the full text to '''track.c''' from the source code of NetHack 3.6.0. To link to a particular line, write [...")
 
 
(One intermediate revision by the same user not shown)
Line 3: Line 3:
  
 
{{NGPL}}
 
{{NGPL}}
  <span id="line1">1.   /* NetHack 3.6 track.c $NHDT-Date: 1432512769 2015/05/25 00:12:49 $  $NHDT-Branch: master $:$NHDT-Revision: 1.9 $ */</span>
+
 
  <span id="line2">2.   /* Copyright (c) Stichting Mathematisch Centrum, Amsterdam, 1985. */</span>
+
== Top of file ==
  <span id="line3">3.   /* NetHack may be freely redistributed.  See license for details. */</span>
+
 
  <span id="line4">4.   /* track.c - version 1.0.2 */</span>
+
  <span id="line1">1. /* NetHack 3.6 track.c $NHDT-Date: 1432512769 2015/05/25 00:12:49 $  $NHDT-Branch: master $:$NHDT-Revision: 1.9 $ */</span>
  <span id="line5">5.   </span>
+
  <span id="line2">2. /* Copyright (c) Stichting Mathematisch Centrum, Amsterdam, 1985. */</span>
  <span id="line6">6.   #include "hack.h"</span>
+
  <span id="line3">3. /* NetHack may be freely redistributed.  See license for details. */</span>
  <span id="line7">7.   </span>
+
  <span id="line4">4. /* track.c - version 1.0.2 */</span>
  <span id="line8">8.   #define UTSZ 50</span>
+
  <span id="line5">5. </span>
  <span id="line9">9.   </span>
+
  <span id="line6">6. #include "hack.h"</span>
  <span id="line10">10.   STATIC_VAR NEARDATA int utcnt, utpnt;</span>
+
  <span id="line7">7. </span>
  <span id="line11">11.   STATIC_VAR NEARDATA coord utrack[UTSZ];</span>
+
  <span id="line8">8. #define UTSZ 50</span>
  <span id="line12">12.   </span>
+
  <span id="line9">9. </span>
  <span id="line13">13.   void</span>
+
  <span id="line10">10. STATIC_VAR NEARDATA int utcnt, utpnt;</span>
  <span id="line14">14.   initrack()</span>
+
  <span id="line11">11. STATIC_VAR NEARDATA coord utrack[UTSZ];</span>
  <span id="line15">15.   {</span>
+
  <span id="line12">12. </span>
  <span id="line16">16.       utcnt = utpnt = 0;</span>
+
 
  <span id="line17">17.   }</span>
+
== initrack ==
  <span id="line18">18.   </span>
+
   
  <span id="line19">19.   /* add to track */</span>
+
  <span id="line13">13. void</span>
  <span id="line20">20.   void</span>
+
  <span id="line14">14. initrack()</span>
  <span id="line21">21.   settrack()</span>
+
  <span id="line15">15. {</span>
  <span id="line22">22.   {</span>
+
  <span id="line16">16.     utcnt = utpnt = 0;</span>
  <span id="line23">23.       if (utcnt < UTSZ)</span>
+
  <span id="line17">17. }</span>
  <span id="line24">24.           utcnt++;</span>
+
  <span id="line18">18. </span>
  <span id="line25">25.       if (utpnt == UTSZ)</span>
+
 
  <span id="line26">26.           utpnt = 0;</span>
+
== settrack ==
  <span id="line27">27.       utrack[utpnt].x = u.ux;</span>
+
   
  <span id="line28">28.       utrack[utpnt].y = u.uy;</span>
+
  <span id="line19">19. /* add to track */</span>
  <span id="line29">29.       utpnt++;</span>
+
  <span id="line20">20. void</span>
  <span id="line30">30.   }</span>
+
  <span id="line21">21. settrack()</span>
  <span id="line31">31.   </span>
+
  <span id="line22">22. {</span>
  <span id="line32">32.   coord *</span>
+
  <span id="line23">23.     if (utcnt < UTSZ)</span>
  <span id="line33">33.   gettrack(x, y)</span>
+
  <span id="line24">24.         utcnt++;</span>
  <span id="line34">34.   register int x, y;</span>
+
  <span id="line25">25.     if (utpnt == UTSZ)</span>
  <span id="line35">35.   {</span>
+
  <span id="line26">26.         utpnt = 0;</span>
  <span id="line36">36.       register int cnt, ndist;</span>
+
  <span id="line27">27.     utrack[utpnt].x = u.ux;</span>
  <span id="line37">37.       register coord *tc;</span>
+
  <span id="line28">28.     utrack[utpnt].y = u.uy;</span>
  <span id="line38">38.       cnt = utcnt;</span>
+
  <span id="line29">29.     utpnt++;</span>
  <span id="line39">39.       for (tc = &utrack[utpnt]; cnt--;) {</span>
+
  <span id="line30">30. }</span>
  <span id="line40">40.           if (tc == utrack)</span>
+
  <span id="line31">31. </span>
  <span id="line41">41.               tc = &utrack[UTSZ - 1];</span>
+
 
  <span id="line42">42.           else</span>
+
== gettrack ==
  <span id="line43">43.               tc--;</span>
+
   
  <span id="line44">44.           ndist = distmin(x, y, tc->x, tc->y);</span>
+
  <span id="line32">32. coord *</span>
  <span id="line45">45.   </span>
+
  <span id="line33">33. gettrack(x, y)</span>
  <span id="line46">46.           /* if far away, skip track entries til we're closer */</span>
+
  <span id="line34">34. register int x, y;</span>
  <span id="line47">47.           if (ndist > 2) {</span>
+
  <span id="line35">35. {</span>
  <span id="line48">48.               ndist -= 2; /* be careful due to extra decrement at top of loop */</span>
+
  <span id="line36">36.     register int cnt, ndist;</span>
  <span id="line49">49.               cnt -= ndist;</span>
+
  <span id="line37">37.     register coord *tc;</span>
  <span id="line50">50.               if (cnt <= 0)</span>
+
  <span id="line38">38.     cnt = utcnt;</span>
  <span id="line51">51.                   return (coord *) 0; /* too far away, no matches possible */</span>
+
  <span id="line39">39.     for (tc = &utrack[utpnt]; cnt--;) {</span>
  <span id="line52">52.               if (tc < &utrack[ndist])</span>
+
  <span id="line40">40.         if (tc == utrack)</span>
  <span id="line53">53.                   tc += (UTSZ - ndist);</span>
+
  <span id="line41">41.             tc = &utrack[UTSZ - 1];</span>
  <span id="line54">54.               else</span>
+
  <span id="line42">42.         else</span>
  <span id="line55">55.                   tc -= ndist;</span>
+
  <span id="line43">43.             tc--;</span>
  <span id="line56">56.           } else if (ndist <= 1)</span>
+
  <span id="line44">44.         ndist = distmin(x, y, tc->x, tc->y);</span>
  <span id="line57">57.               return (ndist ? tc : 0);</span>
+
  <span id="line45">45. </span>
  <span id="line58">58.       }</span>
+
  <span id="line46">46.         /* if far away, skip track entries til we're closer */</span>
  <span id="line59">59.       return (coord *) 0;</span>
+
  <span id="line47">47.         if (ndist > 2) {</span>
  <span id="line60">60.   }</span>
+
  <span id="line48">48.             ndist -= 2; /* be careful due to extra decrement at top of loop */</span>
  <span id="line61">61.   </span>
+
  <span id="line49">49.             cnt -= ndist;</span>
  <span id="line62">62.   /*track.c*/</span>
+
  <span id="line50">50.             if (cnt <= 0)</span>
 +
  <span id="line51">51.                 return (coord *) 0; /* too far away, no matches possible */</span>
 +
  <span id="line52">52.             if (tc < &utrack[ndist])</span>
 +
  <span id="line53">53.                 tc += (UTSZ - ndist);</span>
 +
  <span id="line54">54.             else</span>
 +
  <span id="line55">55.                 tc -= ndist;</span>
 +
  <span id="line56">56.         } else if (ndist <= 1)</span>
 +
  <span id="line57">57.             return (ndist ? tc : 0);</span>
 +
  <span id="line58">58.     }</span>
 +
  <span id="line59">59.     return (coord *) 0;</span>
 +
  <span id="line60">60. }</span>
 +
  <span id="line61">61. </span>
 +
  <span id="line62">62. /*track.c*/</span>
 
[[Category:NetHack 3.6.0 source code|src/track.c]]
 
[[Category:NetHack 3.6.0 source code|src/track.c]]

Latest revision as of 22:16, 3 January 2016

Below is the full text to track.c from the source code of NetHack 3.6.0. To link to a particular line, write [[Source:NetHack 3.6.0/src/track.c#line123]], for example.

The NetHack General Public License applies to screenshots, source code and other content from NetHack.

This content was modified from the original NetHack source code distribution (by splitting up NetHack content between wiki pages, and possibly further editing). See the page history for a list of who changed it, and on what dates.

Top of file

 /* NetHack 3.6	track.c	$NHDT-Date: 1432512769 2015/05/25 00:12:49 $  $NHDT-Branch: master $:$NHDT-Revision: 1.9 $ */
 /* Copyright (c) Stichting Mathematisch Centrum, Amsterdam, 1985. */
 /* NetHack may be freely redistributed.  See license for details. */
 /* track.c - version 1.0.2 */
 
 #include "hack.h"
 
 #define UTSZ 50
 
 STATIC_VAR NEARDATA int utcnt, utpnt;
 STATIC_VAR NEARDATA coord utrack[UTSZ];
 

initrack

 void
 initrack()
 {
     utcnt = utpnt = 0;
 }
 

settrack

 /* add to track */
 void
 settrack()
 {
     if (utcnt < UTSZ)
         utcnt++;
     if (utpnt == UTSZ)
         utpnt = 0;
     utrack[utpnt].x = u.ux;
     utrack[utpnt].y = u.uy;
     utpnt++;
 }
 

gettrack

 coord *
 gettrack(x, y)
 register int x, y;
 {
     register int cnt, ndist;
     register coord *tc;
     cnt = utcnt;
     for (tc = &utrack[utpnt]; cnt--;) {
         if (tc == utrack)
             tc = &utrack[UTSZ - 1];
         else
             tc--;
         ndist = distmin(x, y, tc->x, tc->y);
 
         /* if far away, skip track entries til we're closer */
         if (ndist > 2) {
             ndist -= 2; /* be careful due to extra decrement at top of loop */
             cnt -= ndist;
             if (cnt <= 0)
                 return (coord *) 0; /* too far away, no matches possible */
             if (tc < &utrack[ndist])
                 tc += (UTSZ - ndist);
             else
                 tc -= ndist;
         } else if (ndist <= 1)
             return (ndist ? tc : 0);
     }
     return (coord *) 0;
 }
 
 /*track.c*/