From 234ac1b9bbe8a03122a9092bf2fb68e11a344bd4 Mon Sep 17 00:00:00 2001
From: helixhorned <helixhorned@1a8010ca-5511-0410-912e-c29ae57300e0>
Date: Wed, 1 Dec 2010 22:07:46 +0000
Subject: [PATCH] Adds chselshade (change selected shade) to a.m32

git-svn-id: https://svn.eduke32.com/eduke32@1731 1a8010ca-5511-0410-912e-c29ae57300e0
---
 polymer/eduke32/samples/a.m32 | 25 ++++++++++++++++++++++++-
 1 file changed, 24 insertions(+), 1 deletion(-)

diff --git a/polymer/eduke32/samples/a.m32 b/polymer/eduke32/samples/a.m32
index b58d8d09a..0fca01788 100644
--- a/polymer/eduke32/samples/a.m32
+++ b/polymer/eduke32/samples/a.m32
@@ -33,6 +33,7 @@ gamevar use_custom_aspect 0 0  // this is now the same as r_usenewaspect
 gamevar davr 65536 0
 gamevar dayx 65536 0
 
+// see end of file for user key defs
 ////////// END USER SETTINGS //////////
 
 
@@ -388,9 +389,12 @@ defstate fiddlewithlights
     }
 ends
 
+defstate userkeys_3d ends  // forward-ref
+
 onevent EVENT_PREKEYS3D
 //    state testkeyavail
     state fiddlewithlights
+    state userkeys_3d
 endevent
 
 
@@ -817,7 +821,6 @@ onevent EVENT_ANALYZESPRITES
     state tduplin
 endevent
 
-
 onevent EVENT_KEYS3D
     var l m
 
@@ -1212,3 +1215,23 @@ defstate mkterrain
         }
     }
 ends
+
+defstate chselshade
+    for i selsectors
+    {
+        set sector[i].floorshade tempshade
+        set sector[i].ceilingshade tempshade
+
+        for j spritesofsector i
+            set .shade tempshade
+
+        for j wallsofsector i
+            set wall[j].shade tempshade
+    }
+ends
+
+
+////////// USER KEY SETTINGS //////////
+defstate userkeys_3d
+    ifholdkey KEY_SEMI ifhitkey KEY_C state chselshade
+ends