abu5lf Posted March 28, 2012 Share Posted March 28, 2012 (edited) function playermenu () if ( guiGetVisible (mainwindow) == false ) then victimemt = getElementData ( getRootElement(), "adminclickselplayer" ) mainwindow = guiCreateWindow ( 750, 250, 240, 180, "Car menu", false ) -- delveh = guiCreateButton ( 0.05, 0.35, 0.4, 0.15, "Delete vehicle", true, mainwindow ) selowner = guiCreateButton ( 0.55, 0.55, 0.4, 0.15, "Select driver", true, mainwindow ) -- closebutton = guiCreateButton ( 0.30, 0.8, 0.4, 0.15, "Close", true, mainwindow ) end end addEvent ("carmenu", true) addEventHandler ("carmenu", getRootElement(), playermenu) function disable () guiSetVisible ( mainwindow, false) setElementData ( source, "adminclickselplayer", "none" ) setElementData (getRootElement(), "adminclickopen", false) end function selectowner () thecar = getElementData ( getRootElement(), "adminclickselplayer" ) occupant = getVehicleOccupant ( thecar ) guiSetVisible ( mainwindow, false) if ( occupant ) then setElementData ( getRootElement(), "adminclickselplayer", getPlayerName(occupant) ) triggerEvent ("playermenu", occupant) else outputChatBox ("This vehicle does not have a driver", 255, 0, 0 ) end end function de () thecar = getElementData ( getRootElement(), "adminclickselplayer" ) occupant = getVehicleOccupant ( thecar ) guiSetVisible ( mainwindow, false) if ( occupant ) then vehicles = getElementsByType("vehicle") for i,v in ipairs(vehicles) do destroyElement(v) else outputChatBox ("This vehicle", 255, 0, 0 ) end end end destroy vehicles not work Edited December 25, 2012 by Guest Link to comment
X-SHADOW Posted March 28, 2012 Share Posted March 28, 2012 occupant = getVehicleOccupant ( thecar ) Are you kidding me? the correct is occupant = getVehicleOccupant ( source ) Link to comment
abu5lf Posted March 28, 2012 Author Share Posted March 28, 2012 occupant = getVehicleOccupant ( thecar ) Are you kidding me? the correct is occupant = getVehicleOccupant ( source ) not work Link to comment
X-SHADOW Posted March 28, 2012 Share Posted March 28, 2012 try this function playermenu () if ( guiGetVisible (mainwindow) == false ) then victimemt = getElementData ( source, "adminclickselplayer" ) mainwindow = guiCreateWindow ( 750, 250, 240, 180, "Car menu", false ) -- delveh = guiCreateButton ( 0.05, 0.35, 0.4, 0.15, "Delete vehicle", true, mainwindow ) selowner = guiCreateButton ( 0.55, 0.55, 0.4, 0.15, "Select driver", true, mainwindow ) -- closebutton = guiCreateButton ( 0.30, 0.8, 0.4, 0.15, "Close", true, mainwindow ) end addEvent ("carmenu", true) addEventHandler ("carmenu", getRootElement(), playermenu) function disable () guiSetVisible ( mainwindow, false) setElementData ( source, "adminclickselplayer", "none" ) setElementData (source, "adminclickopen", false) end function selectowner () thecar = getElementData ( source, "adminclickselplayer" ) occupant = getVehicleOccupant ( source ) guiSetVisible ( mainwindow, false) if ( occupant ) then setElementData ( source, "adminclickselplayer", getPlayerName(occupant) ) triggerEvent ("playermenu", occupant) else outputChatBox ("This vehicle does not have a driver", 255, 0, 0 ) end function de () guiSetVisible ( mainwindow, false) thecar = getElementData ( source, "adminclickselplayer" ) occupant = getVehicleOccupant ( source ) if ( occupant ) then vehicles = getElementsByType("vehicle") for i,v in ipairs(vehicles) do destroyElement(v) end end end end end Link to comment
drk Posted March 28, 2012 Share Posted March 28, 2012 mainwindow = guiCreateWindow ( 750, 250, 240, 180, "Car menu", false ) elveh = guiCreateButton ( 0.05, 0.35, 0.4, 0.15, "Delete vehicle", true, mainwindow ) selowner = guiCreateButton ( 0.55, 0.55, 0.4, 0.15, "Select driver", true, mainwindow ) closebutton = guiCreateButton ( 0.30, 0.8, 0.4, 0.15, "Close", true, mainwindow ) guiSetVisible ( mainwindow, false ); addEvent ( 'onOpenMenu', true ); addEventHandler ( 'onOpenMenu', root, function ( ) if ( not guiGetVisible ( mainWindow ) ) then victimemt = getElementData ( source, 'adminclickselplayer' ); -- why you need this?? guiSetVisible ( mainwindow, true ); showCursor ( true ); end end ) function selectOwner ( ) local theCar = getElementData ( source, 'adminclickselplayer' ); -- source not defined local occupant = getVehicleOccupant ( source ); guiSetVisible ( mainwindow, false ); if ( occupant ) then setElementData ( source, 'adminclickselplayer', getPlayerName ( occupant ) ) triggerEvent ( 'onOpenMenu', occupant ); else outputChatBox ( 'This vehicle does not have a driver!', 255, 0, 0, false ); end end function disable ( ) guiSetVisible ( mainwindow, false ); local theCar = getElementData ( source, 'adminclickselplayer' ) -- source not defined local occupant = getVehicleOccupant ( source ) if ( occupant ) then for _, k in ipairs ( getElementsByType 'vehicle' ) do destroyElement ( k ) end end end That's a really mess X-SHADOW. What is source? Also, start tabulating your code. Link to comment
abu5lf Posted March 28, 2012 Author Share Posted March 28, 2012 mainwindow = guiCreateWindow ( 750, 250, 240, 180, "Car menu", false ) elveh = guiCreateButton ( 0.05, 0.35, 0.4, 0.15, "Delete vehicle", true, mainwindow ) selowner = guiCreateButton ( 0.55, 0.55, 0.4, 0.15, "Select driver", true, mainwindow ) closebutton = guiCreateButton ( 0.30, 0.8, 0.4, 0.15, "Close", true, mainwindow ) guiSetVisible ( mainwindow, false ); addEvent ( 'onOpenMenu', true ); addEventHandler ( 'onOpenMenu', root, function ( ) if ( not guiGetVisible ( mainWindow ) ) then victimemt = getElementData ( source, 'adminclickselplayer' ); -- why you need this?? guiSetVisible ( mainwindow, true ); showCursor ( true ); end end ) function selectOwner ( ) local theCar = getElementData ( source, 'adminclickselplayer' ); -- source not defined local occupant = getVehicleOccupant ( source ); guiSetVisible ( mainwindow, false ); if ( occupant ) then setElementData ( source, 'adminclickselplayer', getPlayerName ( occupant ) ) triggerEvent ( 'onOpenMenu', occupant ); else outputChatBox ( 'This vehicle does not have a driver!', 255, 0, 0, false ); end end function disable ( ) guiSetVisible ( mainwindow, false ); local theCar = getElementData ( source, 'adminclickselplayer' ) -- source not defined local occupant = getVehicleOccupant ( source ) if ( occupant ) then for _, k in ipairs ( getElementsByType 'vehicle' ) do destroyElement ( k ) end end end That's a really mess X-SHADOW. What is source? Also, start tabulating your code. not work Link to comment
drk Posted March 28, 2012 Share Posted March 28, 2012 Obviously, if it's the full code, will never work. Link to comment
abu5lf Posted March 28, 2012 Author Share Posted March 28, 2012 Obviously, if it's the full code, will never work. mainwindow = guiCreateWindow ( 750, 250, 240, 180, "Car menu", false ) elveh = guiCreateButton ( 0.05, 0.35, 0.4, 0.15, "Delete vehicle", true, mainwindow ) selowner = guiCreateButton ( 0.55, 0.55, 0.4, 0.15, "Select driver", true, mainwindow ) closebutton = guiCreateButton ( 0.30, 0.8, 0.4, 0.15, "Close", true, mainwindow ) guiSetVisible ( mainwindow, false ); addEventHandler( "onClientGUIClick", elveh, disable, false) addEventHandler( "onClientGUIClick", selowner, selectOwner, false) addEventHandler( "onClientGUIClick", closebutton, setteam, false) addEvent ( 'carmenu', true ); addEventHandler ( 'carmenu', root, function ( ) if ( not guiGetVisible ( mainWindow ) ) then victimemt = getElementData ( source, 'adminclickselplayer' ); -- why you need this?? guiSetVisible ( mainwindow, true ); showCursor ( true ); end end ) function selectOwner ( ) local theCar = getElementData ( source, 'adminclickselplayer' ); -- source not defined local occupant = getVehicleOccupant ( source ); guiSetVisible ( mainwindow, false ); if ( occupant ) then setElementData ( source, 'adminclickselplayer', getPlayerName ( occupant ) ) triggerEvent ( 'carmenu', occupant ); else outputChatBox ( 'This vehicle does not have a driver!', 255, 0, 0, false ); end end function disable ( ) guiSetVisible ( mainwindow, false ); local theCar = getElementData ( source, 'adminclickselplayer' ) -- source not defined local occupant = getVehicleOccupant ( source ) if ( occupant ) then for _, k in ipairs ( getElementsByType 'vehicle' ) do destroyElement ( k ) end end end Link to comment
drk Posted March 28, 2012 Share Posted March 28, 2012 mainwindow = guiCreateWindow ( 750, 250, 240, 180, "Car menu", false ) elveh = guiCreateButton ( 0.05, 0.35, 0.4, 0.15, "Delete vehicle", true, mainwindow ) selowner = guiCreateButton ( 0.55, 0.55, 0.4, 0.15, "Select driver", true, mainwindow ) closebutton = guiCreateButton ( 0.30, 0.8, 0.4, 0.15, "Close", true, mainwindow ) guiSetVisible ( mainwindow, true ); addEventHandler( "onClientGUIClick", elveh, disable, false) addEventHandler( "onClientGUIClick", selowner, selectOwner, false) addEventHandler( "onClientGUIClick", closebutton, setteam, false) addEvent ( 'carmenu', true ); addEventHandler ( 'carmenu', root, function ( ) if ( not guiGetVisible ( mainWindow ) ) then victimemt = getElementData ( source, 'adminclickselplayer' ); -- why you need this?? guiSetVisible ( mainwindow, true ); showCursor ( true ); end end ) function selectOwner ( ) local theCar = getElementData ( source, 'adminclickselplayer' ); -- source not defined local occupant = getVehicleOccupant ( source ); guiSetVisible ( mainwindow, false ); if ( occupant ) then setElementData ( source, 'adminclickselplayer', getPlayerName ( occupant ) ) triggerEvent ( 'carmenu', occupant ); else outputChatBox ( 'This vehicle does not have a driver!', 255, 0, 0, false ); end end function disable ( ) guiSetVisible ( mainwindow, false ); local theCar = getElementData ( source, 'adminclickselplayer' ) -- source not defined local occupant = getVehicleOccupant ( source ) if ( occupant ) then for _, k in ipairs ( getElementsByType 'vehicle' ) do destroyElement ( k ) end end end Link to comment
abu5lf Posted March 28, 2012 Author Share Posted March 28, 2012 mainwindow = guiCreateWindow ( 750, 250, 240, 180, "Car menu", false ) elveh = guiCreateButton ( 0.05, 0.35, 0.4, 0.15, "Delete vehicle", true, mainwindow ) selowner = guiCreateButton ( 0.55, 0.55, 0.4, 0.15, "Select driver", true, mainwindow ) closebutton = guiCreateButton ( 0.30, 0.8, 0.4, 0.15, "Close", true, mainwindow ) guiSetVisible ( mainwindow, true ); addEventHandler( "onClientGUIClick", elveh, disable, false) addEventHandler( "onClientGUIClick", selowner, selectOwner, false) addEventHandler( "onClientGUIClick", closebutton, setteam, false) addEvent ( 'carmenu', true ); addEventHandler ( 'carmenu', root, function ( ) if ( not guiGetVisible ( mainWindow ) ) then victimemt = getElementData ( source, 'adminclickselplayer' ); -- why you need this?? guiSetVisible ( mainwindow, true ); showCursor ( true ); end end ) function selectOwner ( ) local theCar = getElementData ( source, 'adminclickselplayer' ); -- source not defined local occupant = getVehicleOccupant ( source ); guiSetVisible ( mainwindow, false ); if ( occupant ) then setElementData ( source, 'adminclickselplayer', getPlayerName ( occupant ) ) triggerEvent ( 'carmenu', occupant ); else outputChatBox ( 'This vehicle does not have a driver!', 255, 0, 0, false ); end end function disable ( ) guiSetVisible ( mainwindow, false ); local theCar = getElementData ( source, 'adminclickselplayer' ) -- source not defined local occupant = getVehicleOccupant ( source ) if ( occupant ) then for _, k in ipairs ( getElementsByType 'vehicle' ) do destroyElement ( k ) end end end not work =( Link to comment
abu5lf Posted March 28, 2012 Author Share Posted March 28, 2012 function playermenu () if ( guiGetVisible (mainwindow) == false ) then victimemt = getElementData ( getRootElement(), "adminclickselplayer" ) mainwindow = guiCreateWindow ( 750, 250, 240, 180, "Car menu", false ) -- fixveh = guiCreateButton ( 0.05, 0.15, 0.4, 0.15, "Fix vehicle", true, mainwindow ) blowveh = guiCreateButton ( 0.55, 0.15, 0.4, 0.15, "Blow up vehicle", true, mainwindow ) -- delveh = guiCreateButton ( 0.05, 0.35, 0.4, 0.15, "Delete vehicle", true, mainwindow ) colveh = guiCreateButton ( 0.55, 0.35, 0.4, 0.15, "Colour vehicle", true, mainwindow ) -- upgveh = guiCreateButton ( 0.05, 0.55, 0.4, 0.15, "Upgrade vehicle", true, mainwindow ) selowner = guiCreateButton ( 0.55, 0.55, 0.4, 0.15, "Select driver", true, mainwindow ) -- closebutton = guiCreateButton ( 0.30, 0.8, 0.4, 0.15, "Close", true, mainwindow ) addEventHandler( "onClientGUIClick", delveh, vc, false) addEventHandler( "onClientGUIClick", closebutton, disable, false) addEventHandler( "onClientGUIClick", selowner, selectowner, false) -- addEventHandler( "onClientGUIClick", setteambutton, setteam, false) -- addEventHandler( "onClientGUIClick", mutebutton, mute, false) -- addEventHandler( "onClientGUIClick", freezebutton, freeze, false) -- addEventHandler( "onClientGUIClick", banbutton, ban, false) -- addEventHandler( "onClientGUIClick", kickbutton, kick, false) end end addEvent ("carmenu", true) addEventHandler ("carmenu", getRootElement(), playermenu) function disable () guiSetVisible ( mainwindow, false) setElementData ( source, "adminclickselplayer", "none" ) setElementData (getRootElement(), "adminclickopen", false) end function selectowner () thecar = getElementData ( getRootElement(), "adminclickselplayer" ) occupant = getVehicleOccupant ( thecar ) guiSetVisible ( mainwindow, false) if ( occupant ) then setElementData ( getRootElement(), "adminclickselplayer", getPlayerName(occupant) ) triggerEvent ("playermenu", occupant) else outputChatBox ("This vehicle does not have a driver", 255, 0, 0 ) end end function vc ( ) guiSetVisible ( mainwindow, false ); local theCar = getElementData ( source, 'adminclickselplayer' ) -- source not defined local occupant = getVehicleOccupant ( source ) if ( occupant ) then for _, k in ipairs ( getElementsByType 'vehicle' ) do destroyElement ( k ) end end end WARNING: adminclick\adminclickcars_cl.lua:48:Bad'vehicle'pointer@'getVehicleOccupant'(1) Link to comment
drk Posted March 28, 2012 Share Posted March 28, 2012 Dude, you are creating functions where source is nil! source is only used in events. Link to comment
abu5lf Posted March 28, 2012 Author Share Posted March 28, 2012 Dude, you are creating functions where source is nil!source is only used in events. Well, how do you do it ? Link to comment
drk Posted March 28, 2012 Share Posted March 28, 2012 You need create events and trigger the events ( events with the functions ) so source will be the triggered event target player. Link to comment
abu5lf Posted March 28, 2012 Author Share Posted March 28, 2012 You need create events and trigger the events ( events with the functions ) so source will be the triggered event target player. ????? function onPlayerTarget ( targetElem ) if getElementType ( targetElem ) == "vehicle" then end end addEventHandler ( "onPlayerTarget", getRootElement(), onPlayerTarget ) Link to comment
drk Posted March 28, 2012 Share Posted March 28, 2012 loooooooooooooooooool Are you kidding me?? addEvent ( 'yourEvent', true ); addEventHandler ( 'yourEvent', root, function ( ) -- your function end ) Link to comment
abu5lf Posted March 28, 2012 Author Share Posted March 28, 2012 looooooooooooooooooolAre you kidding me?? addEvent ( 'yourEvent', true ); addEventHandler ( 'yourEvent', root, function ( ) -- your function end ) So addEvent ( 'carmenu', true ); addEventHandler ( 'carmenu', root, function ( ) function vc ( ) guiSetVisible ( mainwindow, false ); local theCar = getElementData ( source, 'adminclickselplayer' ) -- source not defined local occupant = getVehicleOccupant ( source ) if ( occupant ) then for _, k in ipairs ( getElementsByType 'vehicle' ) do destroyElement ( k ) end end end end ) Link to comment
X-SHADOW Posted March 28, 2012 Share Posted March 28, 2012 addEvent ( 'carmenu', true ) addEventHandler ( 'carmenu', root, function ( ) guiSetVisible ( mainwindow, false ); local theCar = getElementData ( source, 'adminclickselplayer' ) local occupant = getVehicleOccupant ( source ) if ( occupant ) then for _, k in ipairs ( getElementsByType 'vehicle' ) do destroyElement ( k ) end end end) Link to comment
abu5lf Posted March 28, 2012 Author Share Posted March 28, 2012 addEvent ( 'carmenu', true ) addEventHandler ( 'carmenu', root, function ( ) guiSetVisible ( mainwindow, false ); local theCar = getElementData ( source, 'adminclickselplayer' ) local occupant = getVehicleOccupant ( source ) if ( occupant ) then for _, k in ipairs ( getElementsByType 'vehicle' ) do destroyElement ( k ) end end end) WARNING: adminclick\adminclickcars_cl.lua:52:Bad'vehicle' pointer @ 'getVehicleOccupant'(1)WARNING: adminclick\adminclickcars_cl.lua:16:Bad argument @ 'addEventHandler' [Expected function at argument 3, got nil] Link to comment
drk Posted March 28, 2012 Share Posted March 28, 2012 Cx.83, why don't you copy my code??? I posted correct code and you haven't used it. Link to comment
X-SHADOW Posted March 28, 2012 Share Posted March 28, 2012 Darken i think its not the full code adminclickcars_cl.lua:16:Bad and adminclickcars_cl.lua:52:Bad there is many errors with other code Link to comment
drk Posted March 28, 2012 Share Posted March 28, 2012 viewtopic.php?f=91&t=41730#p422626 See previous post. I posted the correct code and he used him fucking bugged code Link to comment
abu5lf Posted March 28, 2012 Author Share Posted March 28, 2012 adminclickcars_cl function playermenu () if ( guiGetVisible (mainwindow) == false ) then victimemt = getElementData ( getRootElement(), "adminclickselplayer" ) mainwindow = guiCreateWindow ( 750, 250, 240, 180, "Car menu", false ) -- fixveh = guiCreateButton ( 0.05, 0.15, 0.4, 0.15, "Fix vehicle", true, mainwindow ) blowveh = guiCreateButton ( 0.55, 0.15, 0.4, 0.15, "Blow up vehicle", true, mainwindow ) -- delveh = guiCreateButton ( 0.05, 0.35, 0.4, 0.15, "Delete vehicle", true, mainwindow ) colveh = guiCreateButton ( 0.55, 0.35, 0.4, 0.15, "Colour vehicle", true, mainwindow ) -- upgveh = guiCreateButton ( 0.05, 0.55, 0.4, 0.15, "Upgrade vehicle", true, mainwindow ) selowner = guiCreateButton ( 0.55, 0.55, 0.4, 0.15, "Select driver", true, mainwindow ) -- closebutton = guiCreateButton ( 0.30, 0.8, 0.4, 0.15, "Close", true, mainwindow ) addEventHandler( "onClientGUIClick", delveh, vc, false) addEventHandler( "onClientGUIClick", closebutton, disable, false) addEventHandler( "onClientGUIClick", selowner, selectowner, false) -- addEventHandler( "onClientGUIClick", setteambutton, setteam, false) -- addEventHandler( "onClientGUIClick", mutebutton, mute, false) -- addEventHandler( "onClientGUIClick", freezebutton, freeze, false) -- addEventHandler( "onClientGUIClick", banbutton, ban, false) -- addEventHandler( "onClientGUIClick", kickbutton, kick, false) end end addEvent ("carmenu", true) addEventHandler ("carmenu", getRootElement(), playermenu) function disable () guiSetVisible ( mainwindow, false) setElementData ( source, "adminclickselplayer", "none" ) setElementData (getRootElement(), "adminclickopen", false) end function selectowner () thecar = getElementData ( getRootElement(), "adminclickselplayer" ) occupant = getVehicleOccupant ( thecar ) guiSetVisible ( mainwindow, false) if ( occupant ) then setElementData ( getRootElement(), "adminclickselplayer", getPlayerName(occupant) ) triggerEvent ("playermenu", occupant) else outputChatBox ("This vehicle does not have a driver", 255, 0, 0 ) end end addEvent ( 'carmenu', true ) addEventHandler ( 'carmenu', root, function ( ) guiSetVisible ( mainwindow, false ); local theCar = getElementData ( source, 'adminclickselplayer' ) local occupant = getVehicleOccupant ( source ) if ( occupant ) then for _, k in ipairs ( getElementsByType 'vehicle' ) do destroyElement ( k ) end end end) adminclick_cl function playermenu () if ( guiGetVisible (mainwindow) == false ) then victimemt = getElementData ( getRootElement(), "adminclickselplayer" ) showCursor ( true ) mainwindow = guiCreateWindow ( 750, 250, 200, 180, "Player: " .. victimemt, false ) -- kickbutton = guiCreateButton ( 0.05, 0.15, 0.4, 0.15, "Kick player", true, mainwindow ) banbutton = guiCreateButton ( 0.55, 0.15, 0.4, 0.15, "Ban player", true, mainwindow ) -- freezebutton = guiCreateButton ( 0.05, 0.35, 0.4, 0.15, "Freeze player", true, mainwindow ) mutebutton = guiCreateButton ( 0.55, 0.35, 0.4, 0.15, "Mute player", true, mainwindow ) -- setteambutton = guiCreateButton ( 0.05, 0.55, 0.4, 0.15, "Set team", true, mainwindow ) killbutton = guiCreateButton ( 0.55, 0.55, 0.4, 0.15, "Kill player", true, mainwindow ) -- closebutton = guiCreateButton ( 0.30, 0.8, 0.4, 0.15, "Close", true, mainwindow ) addEventHandler( "onClientGUIClick", closebutton, disable, false) addEventHandler( "onClientGUIClick", killbutton, killplayer, false) addEventHandler( "onClientGUIClick", setteambutton, setteam, false) addEventHandler( "onClientGUIClick", mutebutton, mute, false) addEventHandler( "onClientGUIClick", freezebutton, freeze, false) addEventHandler( "onClientGUIClick", banbutton, ban, false) addEventHandler( "onClientGUIClick", kickbutton, kick, false) end end addEvent ("playermenu", true) addEventHandler ("playermenu", getRootElement(), playermenu) function disable () guiSetVisible ( mainwindow, false) showCursor ( false ) setElementData ( source, "adminclickselplayer", "none" ) setElementData (getRootElement(), "adminclickopen", false) end function killplayer () triggerServerEvent ("killplayer", getLocalPlayer()) end function setteam () teams = getElementsByType ("team") guiSetEnabled ( mainwindow, false) teamwindow = guiCreateWindow ( 750, 100, 200, 150, "Set Player Team", false ) setteam = guiCreateButton ( 0.1, 0.8, 0.4, 0.15, "Set Team", true, teamwindow ) closeteambutton = guiCreateButton ( 0.6, 0.8, 0.4, 0.15, "Close", true, teamwindow ) teamList = guiCreateGridList ( 0.05, 0.15, 0.9, 0.65, true, teamwindow ) teamname = guiGridListAddColumn( teamList, "Team name", 0.85 ) guiGridListSetSelectionMode ( teamList, 0 ) for theKey,team in ipairs(teams) do row = guiGridListAddRow ( teamList ) guiGridListSetItemText ( teamList, row, teamname, getTeamName ( team ), false, false ) end addEventHandler( "onClientGUIClick", setteam, setpteam, false) addEventHandler( "onClientGUIClick", closeteambutton, closeteambuttonact, false) end function mute () triggerServerEvent ("mute", getLocalPlayer()) end function freeze () triggerServerEvent ("freeze", getLocalPlayer()) end function kick () guiSetEnabled ( mainwindow, false) reasonwindowkick = guiCreateWindow ( 750, 100, 200, 100, "Enter reason", false ) kickp = guiCreateButton ( 0.065,0.72,0.45,0.20, "kick player", true, reasonwindowkick ) closekickbutton = guiCreateButton ( 0.55,0.72,0.45,0.20, "Close", true, reasonwindowkick ) thereasonkick = guiCreateEdit( 0.30,0.40,0.585,0.23, "", true, reasonwindowkick ) guiCreateLabel(0.05, 0.4,0.2,0.2,"Reason: ",true, reasonwindowkick) addEventHandler( "onClientGUIClick", kickp, kickplayer, false) addEventHandler( "onClientGUIClick", closekickbutton, closekickbuttonact, false) end function closeteambuttonact() guiSetVisible ( teamwindow, false) guiSetEnabled ( mainwindow, true) end function ban () guiSetEnabled ( mainwindow, false) reasonwindow = guiCreateWindow ( 750, 100, 200, 100, "Enter reason", false ) banp = guiCreateButton ( 0.065,0.72,0.45,0.20, "Ban player", true, reasonwindow ) closebanbutton = guiCreateButton ( 0.55,0.72,0.45,0.20, "Close", true, reasonwindow ) thereason = guiCreateEdit( 0.30,0.40,0.585,0.23, "", true, reasonwindow ) guiCreateLabel(0.05, 0.4,0.2,0.2,"Reason: ",true, reasonwindow) addEventHandler( "onClientGUIClick", banp, banplayer, false) addEventHandler( "onClientGUIClick", closebanbutton, closebanbuttonact, false) end function setpteam () selteamName = guiGridListGetItemText ( teamList, guiGridListGetSelectedItem ( teamList ), 1 ) if ( selteamName ) then teamname = tostring(selteamName) triggerServerEvent ("setpteam", getLocalPlayer(), teamname) closeteambuttonact() disable() else outputChatBox ("You must select a team.", 255, 0, 0 ) end end function banplayer() reason = guiGetText (thereason) triggerServerEvent ("ban", getLocalPlayer(), reason) closebanbuttonact() end function closebanbuttonact () guiSetVisible ( reasonwindow, false) guiSetEnabled ( mainwindow, true) end function closekickbuttonact () guiSetVisible ( reasonwindowkick, false) guiSetEnabled ( mainwindow, true) end function kickplayer() reason = guiGetText (thereasonkick) triggerServerEvent ("kick", getLocalPlayer(), reason) closekickbuttonact() disable() end adminclick player = getRootElement() setElementData (getRootElement(), "adminclickopen", false) setElementData (getRootElement(), "adminclickmousebind", false) function clickmenu (mouseButton, buttonState, clickedElement, worldPosX, worldPosY, worldPosZ, screenPosX, screenPosY) -- outputChatBox ("1") if ( buttonState == "down" ) then -- outputChatBox ("2") if ( hasObjectPermissionTo ( source, "function.kickPlayer", true ) ) then -- outputChatBox ("3") if ( getElementData ( getRootElement(), "adminclickopen" ) == false ) then -- outputChatBox ("4") if ( getElementData (getRootElement(), "adminclickmousebind") == true ) then -- outputChatBox ("5") if ( mouseButton == "right" ) then if ( clickedElement ) then if ( getElementType (clickedElement) == "player" ) then name = getPlayerName (clickedElement) setElementData (getRootElement(), "adminclickselplayer", tostring(name) ) setElementData (getRootElement(), "adminclickopen", true) triggerClientEvent (source,"playermenu", getRootElement() ) elseif ( getElementType (clickedElement) == "vehicle" ) then thecar = clickedElement setElementData (getRootElement(), "adminclickselplayer", thecar ) triggerClientEvent (source,"carmenu", getRootElement() ) --setElementVelocity ( clickedElement, 0, 0, 1.5) end end elseif ( mouseButton == "left" ) then --outputChatBox ( worldPosX .. "," .. worldPosY .. "," .. worldPosZ ) --[[ Random send cars & players flying, can be abused col = createColCircle ( worldPosX, worldPosY, 15) colelements = getElementsWithinColShape (col) for theKey,theElement in ipairs(colelements) do if ( getElementType (theElement) == "player" ) then setElementVelocity ( theElement, 2, 0, 5) elseif ( getElementType (theElement) == "vehicle" ) then setElementVelocity ( theElement, 2, 0, 1.5) end end --]] end end end end end end addEventHandler( "onPlayerClick", getRootElement(), clickmenu ) function onstart() players = getElementsByType ( "player" ) -- get a table of all the players in the server for theKey,player in ipairs(players) do if ( hasObjectPermissionTo ( player, "function.kickPlayer", true ) ) then setElementData (getRootElement(), "adminclickopen", false) setElementData (getRootElement(), "adminclickmousebind", false) bindKey (player, "o", "down", showmouse, player ) end end end addEventHandler ( "onResourceStart", getRootElement(), onstart ) function showmouse (player) if (isCursorShowing(player) == false ) then setElementData (getRootElement(), "adminclickmousebind", true) showCursor (player, true) else setElementData (getRootElement(), "adminclickmousebind", false) showCursor (player, false) end end function bindmouse (player) if ( hasObjectPermissionTo ( source, "function.kickPlayer", true ) ) then setElementData (getRootElement(), "adminclickopen", false) setElementData (getRootElement(), "adminclickmousebind", false) bindKey ( source, "o", "down", showmouse, player ) end end addEventHandler ("onPlayerLogin", getRootElement(), bindmouse ) function killplayer () victimemt = getElementData ( getRootElement(), "adminclickselplayer" ) victim = getPlayerFromName (tostring(victimemt)) if ( isElement(victim) ) then killPed (victim) outputChatBox ("You just killed " .. victimemt, source, 125, 125, 125 ) outputChatBox ("You just admin killed!", victim, 125, 125, 125 ) else outputChatBox ("This player is no longer connected.", source, 255, 0, 0 ) end end addEvent("killplayer", true) addEventHandler ("killplayer", getRootElement(), killplayer) function muteplayer () victimemt = getElementData ( getRootElement(), "adminclickselplayer" ) victim = getPlayerFromName (tostring(victimemt)) if ( isElement(victim) ) then if ( getElementData ( victim, "muted" ) == false ) then setPlayerMuted ( victim, true ) setElementData (victim, "muted", true) outputChatBox ("You just muted " .. victimemt, source, 125, 125, 125 ) outputChatBox ("You just got muted.", victim, 125, 125, 125 ) elseif ( getElementData ( victim, "muted" ) == true ) then setPlayerMuted ( victim, false ) setElementData (victim, "muted", false) outputChatBox ("You just unmuted " .. victimemt, source, 125, 125, 125 ) outputChatBox ("You just got unmuted.", victim, 125, 125, 125 ) end else outputChatBox ("This player is no longer connected.", source, 255, 0, 0 ) end end addEvent("mute", true) addEventHandler ("mute", getRootElement(), muteplayer) function freezeplayer () victimemt = getElementData ( getRootElement(), "adminclickselplayer" ) victim = getPlayerFromName (tostring(victimemt)) if ( isElement(victim) ) then if ( getElementData ( victim, "froozen" ) == false ) then toggleAllControls ( victim, false, true, false ) setElementData (victim, "froozen", true) outputChatBox ("You just freezed " .. victimemt, source, 125, 125, 125 ) outputChatBox ("You just got freezed.", victim, 125, 125, 125 ) elseif ( getElementData ( victim, "froozen" ) == true ) then toggleAllControls ( victim,true,true,true ) setElementData (victim, "froozen", false) outputChatBox ("You're now free to move " .. victimemt, source, 125, 125, 125 ) outputChatBox ("You just got un-froozen.", victim, 125, 125, 125 ) end else outputChatBox ("This player is no longer connected.", source, 255, 0, 0 ) end end addEvent("freeze", true) addEventHandler ("freeze", getRootElement(), freezeplayer) function banplayer (reason) victimemt = getElementData ( getRootElement(), "adminclickselplayer" ) victim = getPlayerFromName (tostring(victimemt)) if ( isElement(victim) ) then banPlayer ( victim, true, true, true, getRootElement(), tostring(reason), 20) outputChatBox ("You just banned " .. victimemt, source, 125, 125, 125 ) outputChatBox ( getPlayerName(source) .. " has just banned " .. victimemt .. " for: " .. tostring(reason), source, 255, 0, 0 ) else outputChatBox ("This player is no longer connected.", source, 255, 0, 0 ) end end addEvent("ban", true) addEventHandler ("ban", getRootElement(), banplayer) function kickplayer (reason) victimemt = getElementData ( getRootElement(), "adminclickselplayer" ) victim = getPlayerFromName (tostring(victimemt)) if ( isElement(victim) ) then kickPlayer ( victim, getRootElement(), reason) outputChatBox ("You just kicked " .. victimemt, source, 125, 125, 125 ) outputChatBox ( getPlayerName(source) .. " has just kicked " .. victimemt .. " for: " .. tostring(reason), source, 255, 0, 0 ) else outputChatBox ("This player is no longer connected.", source, 255, 0, 0 ) end end addEvent("kick", true) addEventHandler ("kick", getRootElement(), kickplayer) Link to comment
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now