Fixed silicate:

- You can no longer infinitely reinforce them, they have a limit. This should prevent them from becoming so reinforced that they become literally invisible.
     - You can now rotate silicated windows without the icon not updating properly.
     - Silicate now doesn't automatically double a window's integrity, instead, it now depends on the volume of silicate. This prevents windows from becoming virtually invincible. 1 unit of silicate is only 1/100ths as effective as 100 units of silicate, etc.

git-svn-id: http://tgstation13.googlecode.com/svn/trunk@2072 316c924e-a436-60f5-8080-3fe189b3f50e

code/game/objects/window.dm

@@ -228,6 +228,8 @@
 
 	src.dir = turn(src.dir, 90)
 
+	updateSilicate()
+
 	update_nearby_tiles(need_rebuild=1)
 
 	src.ini_dir = src.dir
@@ -246,11 +248,26 @@
 
 	src.dir = turn(src.dir, 270)
 
+	updateSilicate()
+
 	update_nearby_tiles(need_rebuild=1)
 
 	src.ini_dir = src.dir
 	return
 
+/obj/window/proc/updateSilicate()
+	if(silicateIcon && silicate)
+		src.icon = initial(icon)
+
+		var/icon/I = icon(icon,icon_state,dir)
+
+		var/r = (silicate / 100) + 1
+		var/g = (silicate / 70) + 1
+		var/b = (silicate / 50) + 1
+		I.SetIntensity(r,g,b)
+		icon = I
+		silicateIcon = I
+
 /obj/window/New(Loc,re=0)
 	..()