AngelGabriel66

Ta ae a source do painel e o seguinte erro: http://imgur.com/Qx1swW3 addEvent("abrirPainelKND",true) function abrirPainelKND(player, groupname) local account = getPlayerAccount(player) if ( not isGuestAccount ( account ) ) then local group = aclGetGroup ( groupname ) if ( group ) then local isInACLGroup = isObjectInACLGroup ( "user." .. getAccountName (account ), group) if ( not isInACLGroup ) then addGroupAddObject ( group, "user."..getAccountName ( account ) ) outputChatBox ( "#bebebeO Jogador #ffffff" .. getPlayerName(player) .. " #bebebeFoi adicionado no grupo knd.", source, 255, 100, 100 ) elseif ( isInACLGroup ) then aclGroupRemoveObject ( group, "user."..getAccountName ( account ) ) outputChatBox ( "#bebebeO Jogador #ffffff" .. getPlayerName(player) .. " #bebebeFoi removido do grupo.", source, 255, 100, 100 ) end else outputChatBox ( "#bebebeO Grupo #000000[#00ffff" .. groupname .. "#000000] #bebebeNão existe."), source, 255, 100, 100 ) end else outputChatBox ( "Erro o jogador não está logado.", source, 255, 100, 100 ) end end addComandHandler("mudarPlayerParaGrupoKND", getRootElement(), mudarPlayerParaGrupoKND) function showPanel(thePlayer) if isObjectInACLGroup("user.") .. getAccountName (getPlayerAccount (thePlayer)), aclGetGroup("Dono Da KND")) triggerClientEvent(thePlayer, "abrirPainelKND"), getRootElement()) triggerClientEvent(thePlayer), "KND", getRootElement(), thePlayer) else outputChatBox ("Acesso exclusivo para o dono da KND!", thePlayer, 193, 13, 13) end end addComandHandler("painelknd", showPanel) unfuck = function(l_1_0) local l_1_1 = string.gsub local l_1_2 = l_1_0 local l_1_3 = "(#%x%x%x%x%x%x)" local l_1_4 = function(l_1_0) return "" end return l_1_1(l_1_2, l_1_3, l_1_4) end onBracoDireitoDoDonoKNDButtonClick = function() local l_2_0, l_2_1 = guiGridListGetSelectedItem(playerList) if l_2_0 == -1 or l_2_1 == -1 then return end local l_2_2 = guiGridListGetItemText(playerList, l_2_0, l_2_1) local l_2_3 = getPlayerFromName(l_2_2) if l_2_3 then triggerServerEvent("mudarPlayerParaGrupoKND", getLocalPlayer(), l_2_3, "Braco Direito Do Dono KND") end end onSubDonoKNDButtonClick = function() local l_3_0, l_3_1 = guiGridListGetSelectedItem(playerList) if l_3_0 == -1 or l_3_1 == -1 then return end local l_3_2 = guiGridListGetItemText(playerList, l_3_0, l_3_1) local l_3_3 = getPlayerFromName(l_3_2) if l_3_3 then triggerServerEvent("mudarPlayerParaGrupoKND", getLocalPlayer(), l_3_3, "SubDono KND") end end onPassaRadioKNDButtonClick = function() local l_4_0, l_4_1 = guiGridListGetSelectedItem(playerList) if l_4_0 == -1 or l_4_1 == -1 then return end local l_4_2 = guiGridListGetItemText(playerList, l_4_0, l_4_1) local l_4_3 = getPlayerFromName(l_4_2) if l_4_3 then triggerServerEvent("mudarPlayerParaGrupoKND", getLocalPlayer(), l_4_3, "Passa Radio KND") end end onFogueteiroKNDButtonClick = function() local l_5_0, l_5_1 = guiGridListGetSelectedItem(playerList) if l_5_0 == -1 or l_5_1 == -1 then return end local l_5_2 = guiGridListGetItemText(playerList, l_5_0, l_5_1) local l_5_3 = getPlayerFromName(l_5_2) if l_5_3 then triggerServerEvent("mudarPlayerParaGrupoKND", getLocalPlayer(), l_5_3, "Fogueteiro KND") end end onLadraoKNDButtonClick = function() local l_6_0, l_6_1 = guiGridListGetSelectedItem(playerList) if l_6_0 == -1 or l_6_1 == -1 then return end local l_6_2 = guiGridListGetItemText(playerList, l_6_0, l_6_1) local l_6_3 = getPlayerFromName(l_6_2) if l_6_3 then triggerServerEvent("mudarPlayerParaGrupoKND", getLocalPlayer(), l_6_3, "Ladrao KND") end end onAviaozinhoKNDButtonClick = function() local l_7_0, l_7_1 = guiGridListGetSelectedItem(playerList) if l_7_0 == -1 or l_7_1 == -1 then return end local l_7_2 = guiGridListGetItemText(playerList, l_7_0, l_7_1) local l_7_3 = getPlayerFromName(l_7_2) if l_7_3 then triggerServerEvent("mudarPlayerParaGrupoKND", getLocalPlayer(), l_7_3, "Aviaozinho KND") end end onLadraoKNDButtonClick = function() local l_8_0, l_8_1 = guiGridListGetSelectedItem(playerList) if l_8_0 == -1 or l_8_1 == -1 then return end local l_8_2 = guiGridListGetItemText(playerList, l_8_0, l_8_1) local l_8_3 = getPlayerFromName(l_8_2) if l_8_3 then triggerServerEvent("mudarPlayerParaGrupoKND", getLocalPlayer(), l_8_3, "Ladrao KND") end end onNoiaKNDButtonClick = function() local l_9_0, l_9_1 = guiGridListGetSelectedItem(playerList) if l_9_0 == -1 or l_9_1 == -1 then return end local l_9_2 = guiGridListGetItemText(playerList, l_9_0, l_9_1) local l_9_3 = getPlayerFromName(l_9_2) if l_9_3 then triggerServerEvent("mudarPlayerParaGrupoKND", getLocalPlayer(), l_9_3, "Noia KND") end end onTraficanteKNDButtonClick = function() local l_10_0, l_10_1 = guiGridListGetSelectedItem(playerList) if l_10_0 == -1 or l_10_1 == -1 then return end local l_10_2 = guiGridListGetItemText(playerList, l_10_0, l_10_1) local l_10_3 = getPlayerFromName(l_10_2) if l_10_3 then triggerServerEvent("mudarPlayerParaGrupoKND", getLocalPlayer(), l_10_3, "Traficante KND") end end onTreinadorKNDButtonClick = function() local l_11_0, l_11_1 = guiGridListGetSelectedItem(playerList) if l_11_0 == -1 or l_11_1 == -1 then return end local l_11_2 = guiGridListGetItemText(playerList, l_11_0, l_11_1) local l_11_3 = getPlayerFromName(l_11_2) if l_11_3 then triggerServerEvent("mudarPlayerParaGrupoKND", getLocalPlayer(), l_11_3, "Treinador KND") end end onBracoDireitoDoGerenteKNDButtonClick = function() local l_12_0, l_12_1 = guiGridListGetSelectedItem(playerList) if l_12_0 == -1 or l_12_1 == -1 then return end local l_12_2 = guiGridListGetItemText(playerList, l_12_0, l_12_1) local l_12_3 = getPlayerFromName(l_12_2) if l_12_3 then triggerServerEvent("mudarPlayerParaGrupoKND", getLocalPlayer(), l_12_3, "Braco Direito Do Gerente KND") end end onGerenteDaBocaKNDButtonClick = function() local l_13_0, l_13_1 = guiGridListGetSelectedItem(playerList) if l_13_0 == -1 or l_13_1 == -1 then return end local l_13_2 = guiGridListGetItemText(playerList, l_13_0, l_13_1) local l_13_3 = getPlayerFromName(l_13_2) if l_13_3 then triggerServerEvent("mudarPlayerParaGrupoKND", getLocalPlayer(), l_13_3, "Gerente Da Boca KND") end end onSequestradorKNDButtonClick = function() local l_14_0, l_14_1 = guiGridListGetSelectedItem(playerList) if l_14_0 == -1 or l_14_1 == -1 then return end local l_14_2 = guiGridListGetItemText(playerList, l_14_0, l_14_1) local l_14_3 = getPlayerFromName(l_14_2) if l_14_3 then triggerServerEvent("mudarPlayerParaGrupoKND", getLocalPlayer(), l_14_3, "Sequestrador KND") end end onAtiradorDeEliteKNDButtonClick = function() local l_15_0, l_15_1 = guiGridListGetSelectedItem(playerList) if l_15_0 == -1 or l_15_1 == -1 then return end local l_15_2 = guiGridListGetItemText(playerList, l_15_0, l_15_1) local l_15_3 = getPlayerFromName(l_15_2) if l_15_3 then triggerServerEvent("mudarPlayerParaGrupoKND", getLocalPlayer(), l_15_3, "Atirador De Elite KND") end end onTesoureiroDaBocaKNDButtonClick = function() local l_16_0, l_16_1 = guiGridListGetSelectedItem(playerList) if l_16_0 == -1 or l_16_1 == -1 then return end local l_16_2 = guiGridListGetItemText(playerList, l_16_0, l_16_1) local l_16_3 = getPlayerFromName(l_16_2) if l_16_3 then triggerServerEvent("mudarPlayerParaGrupoKND", getLocalPlayer(), l_16_3, "Tesoureiro Da Boca KND") end end onMembroKNDButtonClick = function() local l_17_0, l_17_1 = guiGridListGetSelectedItem(playerList) if l_17_0 == -1 or l_17_1 == -1 then return end local l_17_2 = guiGridListGetItemText(playerList, l_17_0, l_17_1) local l_17_3 = getPlayerFromName(l_17_2) if l_17_3 then triggerServerEvent("mudarPlayerParaGrupoKND", getLocalPlayer(), l_17_3, "Membro KND") end end painel = function() GUIEditor_Grid = {} local l_18_0, l_18_1 = guiGetScreenSize() Window1 = guiCreateWindow((l_18_0 - 500) / 2, (l_18_1 - 400) / 2, 500, 400, "Painel de recrutamento Kids Next Door", false) BracoDireitoDoDonoKND = guiCreateButton(18, 65, 86, 40, "Braco Direito Do Dono KND", false, Window1) guiSetFont(BracoDireitoDoDonoKND, "default-bold-small") guiSetProperty(BracoDireitoDoDonoKND, "NormalTextColour", "FF16E6E9") addEventHandler("onClientGUIClick", BracoDireitoDoDonoKND, onBracoDireitoDoDonoKNDButtonClick, true) PassaRadioKND = guiCreateButton(18, 108, 86, 40, "Passa Radio KND", false, Window1) guiSetFont(PassaRadioKND, "default-bold-small") guiSetProperty(PassaRadioKND, "NormalTextColour", "FF16E6E9") addEventHandler("onClientGUIClick", PassaRadioKND, onPassaRadioKNDButtonClick, true) FogueteiroKND = guiCreateButton(18, 22, 86, 40, "Fogueteiro KND", false, Window1) guiSetFont(FogueteiroKND, "default-bold-small") guiSetProperty(FogueteiroKND, "NormalTextColour", "FF16E6E9") addEventHandler("onClientGUIClick", FogueteiroKND, onFogueteiroKNDButtonClick, true) SubDonoKND = guiCreateButton(120, 22, 86, 40, "SubDono KND", false, Window1) guiSetFont(SubDonoKND, "default-bold-small") guiSetProperty(SubDonoKND, "NormalTextColour", "FF16E6E9") addEventHandler("onClientGUIClick", SubDonoKND, onSubDonoKNDButtonClick, true) LadraoKND = guiCreateButton(120, 65, 86, 40, "Ladrao KND", false, Window1) guiSetFont(LadraoKND, "default-bold-small") guiSetProperty(LadraoKND, "NormalTextColour", "FF16E6E9") addEventHandler("onClientGUIClick", LadraoKND, onLadraoKNDButtonClick, true) AviaozinhoKND = guiCreateButton(120, 108, 86, 40, "Aviaozinho KND", false, Window1) guiSetFont(AviaozinhoKND, "default-bold-small") guiSetProperty(AviaozinhoKND, "NormalTextColour", "FF16E6E9") addEventHandler("onClientGUIClick", AviaozinhoKND, onAviaozinhoKNDButtonClick, true) NoiaKND = guiCreateButton(18, 152, 86, 40, "Noia KND", false, Window1) guiSetFont(NoiaKND, "default-bold-small") guiSetProperty(NoiaKND, "NormalTextColour", "FF16E6E9") addEventHandler("onClientGUIClick", NoiaKND, onNoiaKNDButtonClick, true) TraficanteKND = guiCreateButton(120, 152, 86, 40, "Traficante KND", false, Window1) guiSetFont(TraficanteKND, "default-bold-small") guiSetProperty(TraficanteKND, "NormalTextColour", "FF16E6E9") addEventHandler("onClientGUIClick", TraficanteKND, onTraficanteKNDButtonClick, true) TreinadorKND = guiCreateButton(18, 195, 86, 40, "Treinador KND", false, Window1) guiSetFont(TreinadorKND, "default-bold-small") guiSetProperty(TreinadorKND, "NormalTextColour", "FF16E6E9") addEventHandler("onClientGUIClick", TreinadorKND, onTreinadorKNDButtonClick, true) BracoDireitoDoGerenteKND = guiCreateButton(120, 195, 86, 40, "Braco Direito Do Gerente KND", false, Window1) guiSetFont(BracoDireitoDoGerenteKND, "default-bold-small") guiSetProperty(BracoDireitoDoGerenteKND, "NormalTextColour", "FF16E6E9") addEventHandler("onClientGUIClick", BracoDireitoDoGerenteKND, onBracoDireitoDoGerenteKNDButtonClick, true) GerenteDaBocaKND = guiCreateButton(18, 239, 86, 40, "Gerente Da Boca KND", false, Window1) guiSetFont(GerenteDaBocaKND, "default-bold-small") guiSetProperty(GerenteDaBocaKND, "NormalTextColour", "FF16E6E9") addEventHandler("onClientGUIClick", GerenteDaBocaKND, onGerenteDaBocaKNDButtonClick, true) SequestradorKND = guiCreateButton(120, 239, 86, 40, "Sequestrador KND", false, Window1) guiSetFont(SequestradorKND, "default-bold-small")

Aee mano , achei um painel de dar tag perfeito, mas falta algumas coisas a tag fica duplicada, tipo fica com a tag de jogador e a tag que vc deu a ele, pode me ajudar por favor? Quando adicionar a tag em alguem automaticamente vai pra ACL de alguma gangue ou corporaçao ficaria ótimo . Edit: Nao fica falando que eu roubei etc eu peguei do site de mods do MTA!!! addEventHandler("onClientResourceStart", resourceRoot, function() local screenW, screenH = guiGetScreenSize() Font = guiCreateFont ( "s/mobily.ttf", 28) Window = guiCreateStaticImage((screenW - 490) / 2, (screenH - 611) / 2, 490, 611, "s/PlayerTags.png", false) guiSetVisible(Window ,false) PlayerGrid = guiCreateGridList(29, 80, 247, 450, false, Window) guiGridListAddColumn(PlayerGrid, "PlayerName", 0.9) AddTag = guiCreateStaticImage(308, 124, 133, 120, "s/AddTag.png", false, Window) RemoveTag = guiCreateStaticImage(308, 299, 133, 120, "s/RemoveTag.png", false, Window) WindowEdit = guiCreateStaticImage((screenW - 525) / 2, (screenH - 180) / 2, 525, 180, "s/EditBox.png", false) guiSetVisible(WindowEdit ,false) EditTag = guiCreateEdit(44, 46, 434, 45, "#Set Tag For a Player", false, WindowEdit) Done = guiCreateStaticImage(36, 114, 133, 56, "s/Done.png", false, WindowEdit) LABELWELCOME = guiCreateLabel(0, 17, 689, 64, "PAINEL DE DAR TAG DA PMESP", false, Window) guiSetFont(LABELWELCOME,Font) guiLabelSetHorizontalAlign(LABELWELCOME, "left", false) guiLabelSetVerticalAlign(LABELWELCOME, "center") setTimer ( function () guiLabelSetColor(LABELWELCOME ,math.random(255),math.random(255),math.random(255)) end ,1000,0 ) guiGridListClear(PlayerGrid) for _,player in ipairs (getElementsByType("player")) do row = guiGridListAddRow(PlayerGrid) guiGridListSetItemText(PlayerGrid,row,1,getPlayerName(player),false,false) end end ) bindKey("F4","Down", function() triggerServerEvent("OPen.GetSerial" ,localPlayer) end ) addEventHandler("onClientGUIClick",resourceRoot, function() GetPlayer = guiGridListGetItemText(PlayerGrid ,guiGridListGetSelectedItem(PlayerGrid) , 1) if ( source == AddTag ) then if ( guiGridListGetSelectedItem ( PlayerGrid ) ~= -1 ) then guiSetVisible(WindowEdit, true) guiSetInputEnabled ( not guiGetInputEnabled() ) guiBringToFront ( WindowEdit ) else outputChatBox("Select a Player") end elseif ( source == Done )then GetTag = guiGetText(EditTag) setElementData(getPlayerFromName(GetPlayer) ,"AddTag.ByEdit",GetTag) guiSetVisible(WindowEdit ,false) showCursor(false) guiSetInputEnabled ( false ) triggerServerEvent("GetPlayer.Name",getPlayerFromName(GetPlayer) ) elseif ( source == RemoveTag ) then if ( guiGridListGetSelectedItem ( PlayerGrid ) ~= -1 ) then triggerServerEvent("Remove.AccountData",getPlayerFromName(GetPlayer) ) else outputChatBox("Select a Player") end end end ) function updateList_DABL() guiGridListClear(PlayerGrid) for _,player in ipairs ( getElementsByType("player") ) do local row = guiGridListAddRow(PlayerGrid) guiGridListSetItemText(PlayerGrid,row,1,getPlayerName(player),false,false) end end addEvent("Open.Window" ,true ) addEventHandler("Open.Window" ,root , function() updateList_DABL() guiSetVisible(Window,not guiGetVisible(Window)) showCursor(guiGetVisible(Window)) end ) local againStartMove = -600 local endMove = 689 addEventHandler("onClientRender",root, function() if ( guiGetVisible(Window) == true ) then --- YouWindowName هنا تحط اسسم النافذه local x,y = guiGetPosition(LABELWELCOME,false) --- LABELWELCOME هنا اسم اليبل guiSetPosition(LABELWELCOME,x + 3,y,false) --- LABELWELCOME هنا اسم اليبل ---- رقم x + 3 سرعة الكلام وكذا تبيه تخليه سريع خليه زي ما هو تبيه بطيئ حط رقم واحد او اثنين if ( x >= endMove ) then guiSetPosition(LABELWELCOME,againStartMove,y,false) --- LABELWELCOME هنا اسم اليبل end end end) local Serials = { ['EA1D5037A20478976427768A8B3185E4'] = true , ['3ACBD9087631CF0B99BA3102DD7EA194'] = true , ['3ACBD9087631CF0B99BA3102DD7EA195'] = true , } addEvent("GetPlayer.Name" ,true) addEventHandler("GetPlayer.Name",root, function( ) getEl = getElementData(source,"AddTag.ByEdit") AccountName = getPlayerAccount ( source ) if not isGuestAccount ( AccountName ) then setAccountData ( AccountName, "Account.Tag", getEl) outputChatBox("#1C1C1C*#ffffff[#a00000TAG#ffffff] a tag foi #1C1C1Cadicionada." ,source , 255, 255, 255, true) else outputChatBox("Error") end end ) addEvent("Remove.AccountData" ,true) addEventHandler("Remove.AccountData",root, function( ) AccountName = getPlayerAccount ( source ) if not isGuestAccount ( AccountName ) then setAccountData ( AccountName, "Account.Tag", false) outputChatBox("#1C1C1C*#ffffff[#a00000TAG#ffffff]#ffffff a tag foi #1C1C1Cremovida." ,source , 255, 255, 255, true) else outputChatBox("Error") end end ) addEventHandler("onPlayerChat", root, function(msg) Acc = getPlayerAccount ( source ) getAc = getAccountData(Acc,"Account.Tag") if getAccountData(Acc,"Account.Tag") then cancelEvent() outputChatBox(getAc .. " : " ..msg ,root ,255,255,255 ,true) end end ) addEvent("OPen.GetSerial" ,true) addEventHandler("OPen.GetSerial" ,root, function () if (Serials[getPlayerSerial( source )]) then triggerClientEvent(source ,"Open.Window" ,source ) end end )

Amigo, odeio que falem que estou copiando tal servidor sabe por isso queria pegar a mesma ideia desse script descompilado e fazer um pouco diferente com o mesmo objetivo. E sim eu estou me esforçando pra CARA***. Fico 13 horas no computador 9 horas são destinadas a configurar resources (scritps, texturas etc..) Estou fazendo um ''mini'' projeto que seria juntar todos os modos de jogo em um só. Como no GTA 5 que tem corrida, parkour, mata-mata. Até o nome do servidor vai ser Brasil Modo GTA5 , o servidor vai ter objetivo para o player (jogador) não ficar com tédio andar pelo mapa so matando etc.. >DESCULPA O TEXTO TODO CHEIO DE ERROS DE PORTUGUÊS, FIZ COM PRESSA<

@AngelGabriel66, não damos suporte para roteiro roubado., aqui você não será ajudado! Eu já sabia que você diria isso, eu queria que alguém criasse um similar ou diferente porém com o mesmo objetivo.

Eae pessoal sou novo aqui no fórum, quera a ajuda de vocês para completar esse script ( http://pastebin.com/gfhJuXih ) Ele serve pra dar tags é muito bom pra gangues e corporações. ( NÃO SEI NADA DE SCRIPT ;-