rendered paste body--[[************************************ Multi Theft Auto - Admin Panel** gui\admin_spectator.lua** Original File by lil_Toady***************************************]]aSpectating = nilaSpecActions = nilfunction aSpectate ( player ) if ( player == getLocalPlayer() ) then aMessageBox ( "error", "You can not spectate yourself." ) else bindKey ( "arrow_l", "down", aSpecPlayerPrev ) bindKey ( "arrow_r", "down", aSpecPlayerNext ) aSpectating = player --if ( getPlayerOccupiedVehicle ( player ) ) then -- toggleCameraFixedMode ( false ) -- setCameraTarget ( getPlayerOccupiedVehicle ( player ) ) --else toggleCameraFixedMode ( false ) setCameraTarget ( player ) --end aSetSpectatorEnabled ( true ) endendfunction aSetSpectatorEnabled ( state ) if ( aSpecActions == nil ) then local x, y = guiGetScreenSize() aSpecActions = guiCreateWindow ( x - 190, y / 2 - 200, 160, 400, "Actions", false ) aSpecBan = guiCreateButton ( 0.10, 0.09, 0.80, 0.05, "Ban", true, aSpecActions ) aSpecKick = guiCreateButton ( 0.10, 0.15, 0.80, 0.05, "Kick", true, aSpecActions ) aSpecFreeze = guiCreateButton ( 0.10, 0.21, 0.80, 0.05, "Freeze", true, aSpecActions ) aSpecSetSkin = guiCreateButton ( 0.10, 0.27, 0.80, 0.05, "Set Skin", true, aSpecActions ) aSpecSetHealth = guiCreateButton ( 0.10, 0.33, 0.80, 0.05, "Set Health", true, aSpecActions ) aSpecSetArmour = guiCreateButton ( 0.10, 0.39, 0.80, 0.05, "Set Armour", true, aSpecActions ) aSpecSetStats = guiCreateButton ( 0.10, 0.45, 0.80, 0.05, "Set Stats", true, aSpecActions ) aSpecSlap = guiCreateButton ( 0.10, 0.51, 0.80, 0.05, "Slap! "..aCurrentSlap.."hp", true, aSpecActions ) aSpecSlaps = guiCreateGridList ( 0.10, 0.51, 0.80, 0.48, true, aSpecActions ) guiGridListAddColumn( aSpecSlaps, "", 0.85 ) guiSetVisible ( aSpecSlaps, false ) local i = 0 while i <= 10 do guiGridListSetItemText ( aSpecSlaps, guiGridListAddRow ( aSpecSlaps ), 1, tostring ( i * 10 ), false, false ) i = i + 1 end aSpecSkip = guiCreateCheckBox ( 0.08, 0.85, 0.84, 0.04, "Skip dead players", true, true, aSpecActions ) guiCreateLabel ( 0.08, 0.89, 0.84, 0.04, "____________________", true, aSpecActions ) aSpecBack = guiCreateButton ( 0.10, 0.93, 0.80, 0.05, "Back", true, aSpecActions ) aSpecPlayers = guiCreateWindow ( 30, y / 2 - 200, 160, 400, "Players", false ) guiWindowSetSizable ( aSpecPlayers, false ) aSpecPlayerList = guiCreateGridList ( 0.03, 0.07, 0.94, 0.92, true, aSpecPlayers ) guiGridListAddColumn( aSpecPlayerList, "Player Name", 0.85 ) for id, player in ipairs ( getElementsByType ( "player" ) ) do local row = guiGridListAddRow ( aSpecPlayerList ) guiGridListSetItemText ( aSpecPlayerList, row, 1, getPlayerName ( player ), false, false ) if ( player == aSpectating ) then guiGridListSetSelectedItem ( aSpecPlayerList, row, 1 ) end end aSpecPrev = guiCreateButton ( x / 2 - 100, y - 50, 70, 30, "< Previous", false ) aSpecNext = guiCreateButton ( x / 2 + 30, y - 50, 70, 30, "Next >", false ) addEventHandler ( "onClientGUIClick", _root, aSpecClientClick ) addEventHandler ( "onClientGUIDoubleClick", _root, aSpecClientDoubleClick ) addEventHandler ( "onClientPlayerWasted", _root, aSpecPlayerCheck ) addEventHandler ( "onClientPlayerQuit", _root, aSpecPlayerCheck ) addEventHandler ( "onClientVehicleEnter", _root, aSpecVehicleEnter ) addEventHandler ( "onClientVehicleExit", _root, aSpecVehicleExit ) aRegister ( "Spectator", aSpecActions, aSpectator, aSpectatorClose ) end guiSetVisible ( aSpecActions, true ) guiSetVisible ( aSpecPlayers, true ) guiSetVisible ( aSpecPrev, true ) guiSetVisible ( aSpecNext, true ) aAdminMenuClose ( false )endfunction aSpectatorClose ( destroy ) unbindKey ( "arrow_l", "down", aSpecPlayerPrev ) unbindKey ( "arrow_r", "down", aSpecPlayerNext ) if ( ( destroy ) or ( guiCheckBoxGetSelected ( aPerformanceSpectator ) ) ) then if ( aSpecActions ) then removeEventHandler ( "onClientGUIClick", _root, aSpecClientClick ) removeEventHandler ( "onClientGUIDoubleClick", _root, aSpecClientDoubleClick ) removeEventHandler ( "onClientPlayerWasted", _root, aSpecPlayerCheck ) removeEventHandler ( "onClientPlayerQuit", _root, aSpecPlayerCheck ) removeEventHandler ( "onClientVehicleEnter", _root, aSpecVehicleEnter ) removeEventHandler ( "onClientVehicleExit", _root, aSpecVehicleExit ) destroyElement ( aSpecActions ) destroyElement ( aSpecPlayers ) destroyElement ( aSpecPrev ) destroyElement ( aSpecNext ) aSpecActions = nil end else setCameraTarget ( getLocalPlayer() ) toggleCameraFixedMode ( false ) guiSetVisible ( aSpecActions, false ) guiSetVisible ( aSpecPlayers, false ) guiSetVisible ( aSpecPrev, false ) guiSetVisible ( aSpecNext, false ) aSpectating = nil end aAdminMenu()endfunction aSpecClientDoubleClick ( button ) if ( source == aSpecSlaps ) then if ( guiGridListGetSelectedItem ( aSpecSlaps ) ~= -1 ) then aCurrentSlap = guiGridListGetItemText ( aSpecSlaps, guiGridListGetSelectedItem ( aSpecSlaps ), 1 ) guiSetText ( aTab1.Slap, "Slap! "..aCurrentSlap.."hp" ) guiSetText ( aSpecSlap, "Slap! "..aCurrentSlap.."hp" ) end guiSetVisible ( aSpecSlaps, false ) endendfunction aSpecClientClick ( button ) if ( source == aSpecSlaps ) then return end guiSetVisible ( aSpecSlaps, false ) if ( button == "left" ) then if ( source == aSpecBack ) then aSpectatorClose ( false ) elseif ( source == aSpecBan ) then triggerEvent ( "onClientGUIClick", aTab1.Ban, "left" ) elseif ( source == aSpecKick ) then triggerEvent ( "onClientGUIClick", aTab1.Kick, "left" ) elseif ( source == aSpecFreeze ) then triggerEvent ( "onClientGUIClick", aTab1.Freeze, "left" ) elseif ( source == aSpecSetSkin ) then triggerEvent ( "onClientGUIClick", aTab1.SetSkin, "left" ) elseif ( source == aSpecSetHealth ) then triggerEvent ( "onClientGUIClick", aTab1.SetHealth, "left" ) elseif ( source == aSpecSetArmour ) then triggerEvent ( "onClientGUIClick", aTab1.SetArmour, "left" ) elseif ( source == aSpecSetStats ) then triggerEvent ( "onClientGUIClick", aTab1.SetStats, "left" ) elseif ( source == aSpecSlap ) then triggerEvent ( "onClientGUIClick", aTab1.Slap, "left" ) elseif ( source == aSpecNext ) then aSpecPlayerNext() elseif ( source == aSpecPrev ) then aSpecPlayerPrev() elseif ( source == aSpecPlayerList ) then if ( guiGridListGetSelectedItem ( source ) ~= -1 ) then aSpectate ( getPlayerFromNick ( guiGridListGetItemText ( source, guiGridListGetSelectedItem ( source ), 1 ) ) ) end end elseif ( button == "right" ) then if ( source == aSpecSlap ) then guiSetVisible ( aSpecSlaps, true ) end endendfunction aSpecPlayerCheck () if ( source == aSpectating ) then aSpecPlayerNext() endendfunction aSpecVehicleEnter ( player, seat ) if ( player == aSpectating ) then --outputChatBox ( "in a vehicle" ) aSetSpectatorEnabled ( true ) toggleCameraFixedMode ( false ) local success = setCameraTarget ( player ) outputChatBox( tostring(success) ) endendfunction aSpecVehicleExit ( player, seat ) if ( player == aSpectating ) then --outputChatBox ( "out a vehicle" ) aSpectate ( player ) endendfunction aSpecPlayerNext () local players = getElementsByType ( "player" ) if ( guiCheckBoxGetSelected ( aSpecSkip ) ) then local alive = aSpecGetAlive() if ( #alive <= 0 ) then aSpectatorClose ( false ) toggleCameraFixedMode ( false ) setCameraTarget ( getLocalPlayer() ) aMessageBox ( "warning", "Nobody to spectate" ) else local current = 0 for id, player in ipairs ( players ) do if ( player == aSpectating ) then current = id end if ( current > 0 ) then if ( isPlayerDead ( player ) == false ) then aSpectate ( player ) return end end end aSpectate ( alive[1] ) end else if ( #players == 1 ) then aSpectatorClose ( false ) toggleCameraFixedMode ( false ) setCameraTarget ( getLocalPlayer() ) else for id, player in ipairs ( players ) do if ( player == aSpectating ) then local next = id + 1 if ( next > #players ) then next = 1 end aSpectate ( players[next] ) return end end end endendfunction aSpecPlayerPrev () local players = getElementsByType ( "player" ) if ( guiCheckBoxGetSelected ( aSpecSkip ) ) then local alive = aSpecGetAlive() if ( #alive <= 0 ) then aSpectatorClose ( false ) toggleCameraFixedMode ( false ) setCameraTarget ( getLocalPlayer() ) aMessageBox ( "warning", "Nobody to spectate" ) else local last = nil for id, player in ipairs ( players ) do if ( player == aSpectating ) then if ( last ~= nil ) then aSpectate ( last ) end return end if ( isPlayerDead ( player ) == false ) then last = player end end aSpectate ( alive[#alive] ) end else if ( #players == 1 ) then aSpectatorClose ( false ) toggleCameraFixedMode ( false ) setCameraTarget ( getLocalPlayer() ) else for id, player in ipairs ( players ) do if ( player == aSpectating ) then local next = id - 1 if ( next <= 0 ) then next = #players end aSpectate ( players[next] ) return end end end endendfunction aSpecGetAlive () local alive = {} local i = 1 for id, player in ipairs ( getElementsByType ( "player" ) ) do if ( ( not isPlayerDead ( player ) ) and ( player ~= getLocalPlayer() ) ) then alive[i] = player i = i + 1 end end return aliveend