Wind Proc And Player Panel Changes

code/modules/admin/admin.dm

@@ -62,6 +62,7 @@ proc/admin_notice(var/message, var/rights)
 		<b>Mob type</b> = [M.type]<br><br>
 		<A href='?src=\ref[src];boot2=\ref[M]'>Kick</A> |
 		<A href='?_src_=holder;warn=[M.ckey]'>Warn</A> |
+		<a href='?src=\ref[src];warnsearchckey=[M.ckey]'>Warnings</a> |
 		<A href='?src=\ref[src];newban=\ref[M]'>Ban</A> |
 		<A href='?src=\ref[src];jobban2=\ref[M]'>Jobban</A> |
 		<A href='?src=\ref[src];notes=show;mob=\ref[M]'>Notes</A>
@@ -69,6 +70,7 @@ proc/admin_notice(var/message, var/rights)
 
 	if(M.client)
 		body += "| <A HREF='?src=\ref[src];sendtoprison=\ref[M]'>Prison</A> | "
+		body += "<a href='?src=\ref[src];admin_wind_player=\ref[M]'>Wind</a>"
 		var/muted = M.client.prefs.muted
 		body += {"<br><b>Mute: </b>
 			\[<A href='?src=\ref[src];mute=\ref[M];mute_type=[MUTE_IC]'><font color='[(muted & MUTE_IC)?"red":"blue"]'>IC</font></a> |
@@ -1413,3 +1415,17 @@ proc/admin_notice(var/message, var/rights)
 	message_admins("[key_name(usr)] attempting to force mode latespawn.")
 	ticker.mode.next_spawn = 0
 	ticker.mode.try_latespawn()
+
+/client/proc/cmd_admin_wind(mob/M as mob in mob_list)
+	set category = null
+	set name = "Wind Player"
+
+	M.wind_mob(src.mob)
+	return
+
+/client/proc/cmd_admin_unwind(mob/M as mob in mob_list)
+	set category = null
+	set name = "Unwind Player"
+
+	M.unwind_mob(src.mob)
+	return

code/modules/admin/admin_verbs.dm

@@ -59,6 +59,8 @@ var/list/admin_verbs_admin = list(
 	/client/proc/toggle_hear_radio,		/*toggles whether we hear the radio*/
 	/client/proc/investigate_show,		/*various admintools for investigation. Such as a singulo grief-log*/
 	/client/proc/secrets,
+	/client/proc/cmd_admin_wind,
+	/client/proc/cmd_admin_unwind,
 	/datum/admins/proc/toggleooc,		/*toggles ooc on/off for everyone*/
 	/datum/admins/proc/togglelooc,		/*toggles looc on/off for everyone*/
 	/datum/admins/proc/toggleoocdead,	/*toggles ooc on/off for everyone who is dead*/
@@ -288,7 +290,9 @@ var/list/admin_verbs_mod = list(
 	/datum/admins/proc/show_player_panel,
 	/client/proc/check_antagonists,
 	/client/proc/jobbans,
-	/client/proc/cmd_admin_subtle_message 	/*send an message to somebody as a 'voice in their head'*/
+	/client/proc/cmd_admin_subtle_message, 	/*send an message to somebody as a 'voice in their head'*/
+	/client/proc/cmd_admin_wind,
+	/client/proc/cmd_admin_unwind
 )
 
 var/list/admin_verbs_mentor = list(

code/modules/admin/player_panel.dm

@@ -82,6 +82,7 @@
 					body += "<a href='?src=\ref[usr];priv_msg=\ref"+ref+"'>PM</a> - "
 					body += "<a href='?src=\ref[src];subtlemessage="+ref+"'>SM</a> - "
 					body += "<a href='?src=\ref[src];adminplayerobservejump="+ref+"'>JMP</a><br>"
+					body += "<a hreF='?src=\ref[src];admin_wind_player="+ref+"'>WIND</a><br>"
 					if(antagonist > 0)
 						body += "<font size='2'><a href='?src=\ref[src];check_antagonist=1'><font color='red'><b>Antagonist</b></font></a></font>";
 

code/modules/admin/topic.dm

@@ -2678,6 +2678,17 @@
 		show_notes_sql(playerckey, adminckey)
 		return
 
+	else if(href_list["admin_wind_player"])
+
+		var/mob/M = locate(href_list["admin_wind_player"])
+		if(!ismob(M))
+			usr << "This can only be used on instances of type /mob"
+			return
+
+		M.wind_mob(usr)
+
+		return
+
 mob/living/proc/can_centcom_reply()
 	return 0
 

code/modules/mob/mob.dm

@@ -1073,3 +1073,39 @@ mob/proc/yank_out_object()
 	src.in_throw_mode = 1
 	if(src.throw_icon)
 		src.throw_icon.icon_state = "act_throw_on"
+
+//Admin helpers
+/mob/proc/wind_mob(var/mob/admin)
+	if (!admin)
+		return
+
+	if (!check_rights((R_MOD|R_ADMIN), 1, admin))
+		return
+
+	if (alert(admin, "Wind [src]?",,"Yes","No")!="Yes")
+		return
+
+	SetWeakened(200)
+	visible_message("<font color='#002eb8'><b>OOC Information:</b></font> <font color='red'>[src] has been winded by a member of staff! Please freeze all roleplay involving their character until the matter is resolved! Adminmhelp if you have further questions.</font>", "<font color='red'><b>You have been winded by a member of staff! Please stand by until they contact you!</b></font>")
+	log_admin("[key_name(admin)] winded [key_name(src)]!")
+	message_admins("[key_name_admin(admin)] winded [key_name_admin(src)]!", 1)
+
+	feedback_add_details("admin_verb", "WIND")
+
+	return
+
+/mob/proc/unwind_mob(var/mob/admin)
+	if (!admin)
+		return
+
+	if (!check_rights((R_MOD|R_ADMIN), 1, admin))
+		return
+
+	SetWeakened(0)
+	visible_message("<font color='#002eb8'><b>OOC Information:</b></font> <font color='green'>[src] has been unwinded by a member of staff!</font>", "<font color='red'><b>You have been unwinded by a member of staff!</b></font>")
+	log_admin("[key_name(admin)] unwinded [key_name(src)]!")
+	message_admins("[key_name_admin(admin)] unwinded [key_name_admin(src)]!", 1)
+
+	feedback_add_details("admin_verb", "UNWIND")
+
+	return