Alien fixes/changes:

Alien stun chance on harm decreased.
Alien stab intent changed to stun intent which deals light damage. It does have a very high chance of knock down and an even higher chance of disarming the target.
Hud icon changed to reflect this.
Upped the chance aliens stunning cyborgs with stun intent.
Updated aliens attacking monkeys code.
Aliens can now directly attack the AI.
General code cleanup for alien attacks and others attacking aliens (hand to hand).
Humanoid aliens may no longer run on tables.
Fixed a typo in the Corrode ability.
Increased the amount of abuse resin walls can take. Changed how damaging them works (as windows). Hulks may now smash straight through resin walls. Aliens may now destroy them without acid (and can no longer use acid on them).
Spit now produces a message when used.
Fixed aliens not being stunned by stun batons.
Aliens can now attack/destroy turrets.
Removed alien vision loss from being shot by lasors.
Aliens are not deterred by flash now (flashbangs should still work).
You can no-longer stab aliens in their nonexistent eyes with screwdrivers or forks.
Changing a mob into an alien now properly sets their intent (help).
Minor, misc alien code adjustments.

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

code/game/objects/items/weapons/kitchen.dm

@@ -32,10 +32,15 @@ KNIFE
 	if(!(user.zone_sel.selecting == ("eyes" || "head")))
 		return ..()
 	var/mob/living/carbon/human/H = M
+
 	if(istype(M, /mob/living/carbon/human) && ((H.head && H.head.flags & HEADCOVERSEYES) || (H.wear_mask && H.wear_mask.flags & MASKCOVERSEYES) || (H.glasses && H.glasses.flags & GLASSESCOVERSEYES)))
 		// you can't stab someone in the eyes wearing a mask!
 		user << "\blue You're going to need to remove that mask/helmet/glasses first."
 		return
+	if(istype(M, /mob/living/carbon/alien))//Aliens don't have eyes./N
+		user << "\blue You cannot locate any eyes on this creature!"
+		return
+
 	for(var/mob/O in viewers(M, null))
 		if(O == (user || M))	continue
 		if(M == user)	O.show_message(text("\red [] has stabbed themself with []!", user, src), 1)

code/game/objects/items/weapons/swords_axes_etc.dm

@@ -127,7 +127,7 @@ STUN BATON
 			if(status == 1 && charges == 0)
 				user << "\red Not enough charge"
 			return
-	if((charges > 0 && status == 1) && (istype(H, /mob/living/carbon/human)))
+	if((charges > 0 && status == 1) && (istype(H, /mob/living/carbon)))
 		flick("baton_active", src)
 		if (user.a_intent == "hurt")
 		/*	if (!istype(H:r_hand, /obj/item/weapon/shield/riot) && prob(40))
@@ -176,39 +176,6 @@ STUN BATON
 			M.lastattacker = user
 		for(var/mob/O in viewers(M))
 			if (O.client)	O.show_message("\red <B>[M] has been stunned with the stun baton by [user]!</B>", 1, "\red You hear someone fall", 2)
-	else if((charges > 0 && status == 1) && (istype(M, /mob/living/carbon/monkey)))
-		flick("baton_active", src)
-		if (user.a_intent == "hurt")
-			playsound(src.loc, 'Genhit.ogg', 50, 1, -1)
-			if(isrobot(user))
-				var/mob/living/silicon/robot/R = user
-				R.cell.charge -= 20
-			else
-				charges--
-			if (M.weakened < 1 && (!(M.mutations & 8)) )
-				M.weakened = 1
-			if (M.stuttering < 1 && (!(M.mutations & 8)) )
-				M.stuttering = 1
-			..()
-			if (M.stunned < 1 && (!(M.mutations & 8)) )
-				M.stunned = 1
-		else
-			playsound(src.loc, 'Egloves.ogg', 50, 1, -1)
-			if(isrobot(user))
-				var/mob/living/silicon/robot/R = user
-				R.cell.charge -= 20
-			else
-				charges--
-			if (M.weakened < 10 && (!(M.mutations & 8)) )
-				M.weakened = 10
-			if (M.stuttering < 10 && (!(M.mutations & 8)) )
-				M.stuttering = 10
-			if (M.stunned < 10 && (!(M.mutations & 8)) )
-				M.stunned = 10
-			user.lastattacked = M
-			M.lastattacker = user
-		for(var/mob/O in viewers(M))
-			if (O.client)	O.show_message("\red <B>[M] has been stunned with the stun baton by [user]!</B>", 1, "\red You hear someone fall", 2)
 
 /obj/item/weapon/classic_baton/attack(mob/M as mob, mob/user as mob)
 	if ((usr.mutations & 16) && prob(50))

code/game/objects/items/weapons/tools.dm

@@ -36,10 +36,15 @@ WELDINGTOOOL
 	if(!(user.zone_sel.selecting == ("eyes" || "head")))
 		return ..()
 	var/mob/living/carbon/human/H = M
+
 	if(istype(M, /mob/living/carbon/human) && ((H.head && H.head.flags & HEADCOVERSEYES) || (H.wear_mask && H.wear_mask.flags & MASKCOVERSEYES) || (H.glasses && H.glasses.flags & GLASSESCOVERSEYES)))
 		// you can't stab someone in the eyes wearing a mask!
 		user << "\blue You're going to need to remove that mask/helmet/glasses first."
 		return
+	if(istype(M, /mob/living/carbon/alien))//Aliens don't have eyes./N
+		user << "\blue You cannot locate any eyes on this creature!"
+		return
+
 	for(var/mob/O in viewers(M, null))
 		if(O == (user || M))	continue
 		if(M == user)	O.show_message(text("\red [] has stabbed themself with []!", user, src), 1)