diff --git a/polymer/eduke32/a.m32 b/polymer/eduke32/a.m32
index 0b8eb829b..60a397a5d 100644
--- a/polymer/eduke32/a.m32
+++ b/polymer/eduke32/a.m32
@@ -247,7 +247,7 @@ onevent EVENT_ENTER3DMODE
     state setas
 endevent
 
-defstate cmp_by_lotag
+defstate cmp_by_lotag  // comparator subroutine for sorting
     set RETURN sprite[SV2].lotag
     sub RETURN sprite[SV1].lotag
 ends
@@ -496,3 +496,24 @@ defstate replacestuff
 //        ife sprite[i].picnum AMMO set sprite[i].picnum BATTERYAMMO
         ifactor parm[0] cactor parm[1]
 ends
+
+defstate convlights  // convert (0,0,0) lights to (255,255,255)-ones
+	for i allsprites ifactor 1 ifge .lotag 49 ifle .lotag 50 ife .xvel 0 ife .yvel 0 ife .zvel 0
+        { set .xvel 255 set .yvel 255 set .zvel 255 }
+ends
+
+defstate resetallws  // reset all sprites and walls to default repeat/panning
+    for i allsprites
+	{
+		set .xrepeat 64
+        set .yrepeat 64
+	}
+    for i allwalls
+	{
+		set wall[i].cstat 0
+		set wall[i].xpanning 0
+		set wall[i].ypanning 0
+		set wall[i].yrepeat 8
+		fixrepeats i
+	}
+ends
diff --git a/polymer/eduke32/m32script_ex.map b/polymer/eduke32/m32script_ex.map
index 0d79ee674..0a98c6c13 100755
Binary files a/polymer/eduke32/m32script_ex.map and b/polymer/eduke32/m32script_ex.map differ
diff --git a/polymer/eduke32/source/m32def.c b/polymer/eduke32/source/m32def.c
index 0d96865cc..e48f3c241 100644
--- a/polymer/eduke32/source/m32def.c
+++ b/polymer/eduke32/source/m32def.c
@@ -341,6 +341,7 @@ const char *keyw[] =
     "prevspritesect",
     "nextspritesect",
     "sectorofwall",
+    "fixrepeats",
 
     "addlogvar",
     "addlog",
@@ -2833,6 +2834,9 @@ repeatcase:
         C_GetNextVar();
         return 0;
 
+    case CON_FIXREPEATS:
+        C_GetNextVar();
+        return 0;
 
 // *** stuff
     case CON_ADDLOGVAR:
diff --git a/polymer/eduke32/source/m32def.h b/polymer/eduke32/source/m32def.h
index 3b2fd641f..dd1647d76 100644
--- a/polymer/eduke32/source/m32def.h
+++ b/polymer/eduke32/source/m32def.h
@@ -419,6 +419,7 @@ enum ScriptKeywords_t
     CON_PREVSPRITESECT,
     CON_NEXTSPRITESECT,
     CON_SECTOROFWALL,
+    CON_FIXREPEATS,
 
 // stuff
     CON_ADDLOGVAR,
diff --git a/polymer/eduke32/source/m32exec.c b/polymer/eduke32/source/m32exec.c
index b9aaea687..999d338e1 100644
--- a/polymer/eduke32/source/m32exec.c
+++ b/polymer/eduke32/source/m32exec.c
@@ -1937,6 +1937,14 @@ badindex:
             }
             continue;
 
+        case CON_FIXREPEATS:
+            insptr++;
+            {
+                extern void fixrepeats(int16_t i);
+                fixrepeats(Gv_GetVarX(*insptr++));
+            }
+            continue;
+
 // *** stuff
         case CON_GETTIMEDATE:
             insptr++;