From 2e952bfde3e122a24fd940b76720edbe50e784d9 Mon Sep 17 00:00:00 2001
From: Dave Schmenk <dschmenk@gmail.com>
Date: Mon, 5 Mar 2018 22:14:49 -0800
Subject: [PATCH] New FOR/NEXT changes for terminal variable value

---
 src/samplesrc/rogue.map.pla | 18 +++++++++---------
 1 file changed, 9 insertions(+), 9 deletions(-)

diff --git a/src/samplesrc/rogue.map.pla b/src/samplesrc/rogue.map.pla
index b068fe1..3190296 100644
--- a/src/samplesrc/rogue.map.pla
+++ b/src/samplesrc/rogue.map.pla
@@ -279,7 +279,7 @@ export def drawmap(xorg, yorg, viewfield, viewdir, lightdist, viewdist)
   //
   darkness = 1
   imap     = (yorg << rowshift) + xorg
-  if ^(map + imap) & LIT_TILE or lightdist
+  if lightdist or ^(map + imap) & LIT_TILE
     //
     // Update current spot in viewmap
     //
@@ -358,7 +358,7 @@ export def drawmap(xorg, yorg, viewfield, viewdir, lightdist, viewdist)
         //
         // Run through visible octant beam points
         //
-        for l = l to dbeam[viewdist]
+        for l = dbeam[lightdist]+1 to dbeam[viewdist]
           //
           // Check parent visiblity
           //
@@ -429,7 +429,7 @@ export def drawmap(xorg, yorg, viewfield, viewdir, lightdist, viewdist)
             vispix[l] = 0
           fin
         next
-        for l = l to dbeam[viewdist]
+        for l = dbeam[lightdist]+1 to dbeam[viewdist]
           if vispix[vbeam[l]]
             imap = ((yorg - xbeam[l]) << rowshift) + xorg + ybeam[l]
             tile = ^(map + imap)
@@ -479,7 +479,7 @@ export def drawmap(xorg, yorg, viewfield, viewdir, lightdist, viewdist)
             vispix[l] = 0
           fin
         next
-        for l = l to dbeam[viewdist]
+        for l = dbeam[lightdist]+1 to dbeam[viewdist]
           if vispix[vbeam[l]]
             imap = ((yorg + xbeam[l]) << rowshift) + xorg + ybeam[l]
             tile = ^(map + imap)
@@ -529,7 +529,7 @@ export def drawmap(xorg, yorg, viewfield, viewdir, lightdist, viewdist)
             vispix[l] = 0
           fin
         next
-        for l = l to dbeam[viewdist]
+        for l = dbeam[lightdist]+1 to dbeam[viewdist]
           if vispix[vbeam[l]]
             imap = ((yorg + ybeam[l]) << rowshift) + xorg + xbeam[l]
             tile = ^(map + imap)
@@ -579,7 +579,7 @@ export def drawmap(xorg, yorg, viewfield, viewdir, lightdist, viewdist)
             vispix[l] = 0
           fin
         next
-        for l = l to dbeam[viewdist]
+        for l = dbeam[lightdist]+1 to dbeam[viewdist]
           if vispix[vbeam[l]]
             imap = ((yorg + ybeam[l]) << rowshift) + xorg - xbeam[l]
             tile = ^(map + imap)
@@ -629,7 +629,7 @@ export def drawmap(xorg, yorg, viewfield, viewdir, lightdist, viewdist)
             vispix[l] = 0
           fin
         next
-        for l = l to dbeam[viewdist]
+        for l = dbeam[lightdist]+1 to dbeam[viewdist]
           if vispix[vbeam[l]]
             imap = ((yorg + xbeam[l]) << rowshift) + xorg - ybeam[l]
             tile = ^(map + imap)
@@ -679,7 +679,7 @@ export def drawmap(xorg, yorg, viewfield, viewdir, lightdist, viewdist)
             vispix[l] = 0
           fin
         next
-        for l = l to dbeam[viewdist]
+        for l = dbeam[lightdist]+1 to dbeam[viewdist]
           if vispix[vbeam[l]]
             imap = ((yorg - xbeam[l]) << rowshift) + xorg - ybeam[l]
             tile = ^(map + imap)
@@ -729,7 +729,7 @@ export def drawmap(xorg, yorg, viewfield, viewdir, lightdist, viewdist)
             vispix[l] = 0
           fin
         next
-        for l = l to dbeam[viewdist]
+        for l = dbeam[lightdist]+1 to dbeam[viewdist]
           imap = ((yorg - ybeam[l]) << rowshift) + xorg - xbeam[l]
           if vispix[vbeam[l]]
             tile = ^(map + imap)