block load
{
	es_msg #lightgreen [Skyworld] Type !skyworld in chat for an uber special menu.
	es_load popup
	popup create skyworld_menu
	popup addline skyworld_menu "[Skyworld Menu]"
	popup addline skyworld_menu "->1. Speed Slow"
	popup addline skyworld_menu "->2. Speed Normal"
	popup addline skyworld_menu "--------------------"
	popup addline skyworld_menu "->3. Teleport Top"
	popup addline skyworld_menu "->4. Teleport Noob"
	popup addline skyworld_menu "--------------------"
	popup addline skyworld_menu "->5. Physpush"
	popup addline skyworld_menu "--------------------"
	popup addline skyworld_menu "->6. Respawn"
	popup addline skyworld_menu "--------------------"
	popup addline skyworld_menu "->0. Quit"
	popup menuselect skyworld_menu skyworld/choose
}
event player_say
{
	if (event_var(text) == "!skyworld") do
	{
		es popup send skyworld_menu event_var(userid)
	}
}
block choose
{
	if (server_var(_popup_choice) == 1) then es playerset speed server_var(_popup_userid) .5
	if (server_var(_popup_choice) == 2) then es playerset speed server_var(_popup_userid) 1
	if (server_var(_popup_choice) == 3) do
	{
		es_xset velocity_x 0
		es_xset velocity_y 0
		es_xset velocity_z 0

		// Get current velocity
		es_getplayerprop velocity_x server_var(_popup_userid) CBasePlayer.localdata.m_vecVelocity[0]
		es_getplayerprop velocity_y server_var(_popup_userid) CBasePlayer.localdata.m_vecVelocity[1]
		es_getplayerprop velocity_z server_var(_popup_userid) CBasePlayer.localdata.m_vecVelocity[2]

		// Negate velocity
		es_xmath velocity_x * -1
		es_xmath velocity_y * -1
		es_xmath velocity_z * -1

		// Turn negated velocity into a vector and push the player in that direction
		es_createvectorstring velocity_x server_var(velocity_x) server_var(velocity_y) server_var(velocity_z)
		es_setplayerprop server_var(_popup_userid) CBasePlayer.localdata.m_vecBaseVelocity server_var(velocity_x)
		es playerset location server_var(_popup_userid) -1855.987793 4.422288 7272.031250
	}
	if (server_var(_popup_choice) == 4) do
	{
		es_xset velocity_x 0
		es_xset velocity_y 0
		es_xset velocity_z 0

		// Get current velocity
		es_getplayerprop velocity_x server_var(_popup_userid) CBasePlayer.localdata.m_vecVelocity[0]
		es_getplayerprop velocity_y server_var(_popup_userid) CBasePlayer.localdata.m_vecVelocity[1]
		es_getplayerprop velocity_z server_var(_popup_userid) CBasePlayer.localdata.m_vecVelocity[2]

		// Negate velocity
		es_xmath velocity_x * -1
		es_xmath velocity_y * -1
		es_xmath velocity_z * -1

		// Turn negated velocity into a vector and push the player in that direction
		es_createvectorstring velocity_x server_var(velocity_x) server_var(velocity_y) server_var(velocity_z)
		es_setplayerprop server_var(_popup_userid) CBasePlayer.localdata.m_vecBaseVelocity server_var(velocity_x)
		es playerset location server_var(_popup_userid) -1023.985962 74.697731 7833.726074
	}
	if (server_var(_popup_choice) == 5) do
	{
		es est_teleport server_var(_popup_userid) -3207.69995 -2673.43359 5543.28760
		es est_PhysPush server_var(_popup_userid) 3100 -400 1100
	}
	if (server_var(_popup_choice) == 6) then es est_spawn server_var(_popup_userid)
	if (server_var(_popup_choice) in "1 2 3 4 5 6") then es popup send skyworld_menu server_var(_popup_userid)
}
event player_spawn
{
	es_tell event_var(userid) #lightgreen [Skyworld] Type !skyworld in chat for an uber special menu.
}
event player_activate
{
	es_tell event_var(userid) #lightgreen [Skyworld] Type !skyworld in chat for an uber special menu.
}
block unload
{
	popup unsendname skyworld_menu #all
	popup delete skyworld_menu
}