Telebaton stun rebalance (#3811)

# About the pull request

This PR lowers the base stun force of a telebaton to 40.

This PR creates multipliers for the stun force based on the user's
policing skill.

The stun force is offset by melee armor rather than energy armor
(regular stun batons). Melee armor is far more abundant on just about
every role and so a little more beef is required for it to be an
effective non-lethal tool.

# Explain why it's good for the game

I'd like to see the roles that have access to a telebaton be able to
effectively handle situations non-lethally as they see fit. A CO or
synth hitting someone a few times with a conveniently storable telebaton
is preferable to a CO insta-BE'ing someone or a synth getting rudely
bullied and relying on CQC luck.


# Testing Photographs and Procedure
<details>
<summary>Screenshots & Videos</summary>

Put screenshots and videos here with an empty line between the
screenshots and the `<details>` tags.

</details>


# Changelog

:cl: Morrow
balance: Telebaton now scales in stunforce effectiveness based on
policing skill
/:cl:

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

@@ -45,7 +45,7 @@
 	w_class = SIZE_SMALL
 	force = MELEE_FORCE_WEAK
 	var/on = 0
-	var/stunforce = 60
+	var/stun_force = 10
 
 /obj/item/weapon/telebaton/attack(mob/living/carbon/human/target, mob/living/user)
 	if(!istype(target) || !on)
@@ -67,6 +67,7 @@
 		item_state = "telebaton_1"
 		w_class = SIZE_MEDIUM
 		force = MELEE_FORCE_VERY_STRONG
+		stun_force = 40
 		attack_verb = list("smacked", "struck", "slapped", "beat")
 	else
 		user.visible_message(SPAN_NOTICE("Using a smooth, practiced movement, [user] collapses \his [src]."),\
@@ -75,7 +76,8 @@
 		icon_state = "telebaton_0"
 		item_state = "telebaton_0"
 		w_class = SIZE_SMALL
-		force = MELEE_FORCE_WEAK//not so robust now
+		force = MELEE_FORCE_WEAK
+		stun_force = initial(stun_force)
 		attack_verb = list("hit", "punched")
 
 	if(istype(user,/mob/living/carbon/human))
@@ -100,8 +102,17 @@
 	user.flick_attack_overlay(target, "punch")
 	log_interact(user, target, "[key_name(user)] stunned [key_name(target)] with \the [src]")
 	// Hit 'em
+	var/final_stun_force = stun_force
+	var/datum/skills/user_skills = user.skills
+	if(user_skills)
+		switch(user_skills.get_skill_level(SKILL_POLICE))
+			if(SKILL_POLICE_FLASH)
+				final_stun_force *= 1.5
+			if(SKILL_POLICE_SKILLED)
+				final_stun_force *= 3
+
 	var/target_zone = check_zone(user.zone_selected)
-	target.apply_stamina_damage(stunforce, target_zone, ARMOR_MELEE)
+	target.apply_stamina_damage(final_stun_force, target_zone, ARMOR_MELEE)
 	if(target.stamina.current_stamina <= 0)
 		user.visible_message(SPAN_DANGER("[user] knocks down [target] with \the [src]!"),\
 							SPAN_WARNING("You knock down [target] with \the [src]!"))