Jump to content

Alguem me ajuda nesse codigo


Recommended Posts

Posted

Acho que esse element-data é pra privar o uso do comando para a Staff, se quiser fazer uma verificação só com admins, tente isto:

function DAR_XP_AIRNEWSCR ( source, cmd, pname, Quantidade )
	outputChatBox ("01", source)
	if pname and tonumber(Quantidade) then
		outputChatBox ("02", source)
		local cliente = getPlayerFromPartialName(pname)
		if isElement(cliente) then
			outputChatBox ("03", source)
			if (isObjectInACLGroup("user." ..getAccountName(getPlayerAccount(source)), aclGetGroup("Admin"))) then
				outputChatBox ("04", source)
				setElementData ( cliente, "Level", Quantidade )
				exports.Scripts_Dxmessages:outputDx(source, "Você Setou o Level do(a) Jogador(a) "..getPlayerName(cliente).."#ffffff para "..Quantidade.." com Sucesso!", "success")
				exports.Scripts_Dxmessages:outputDx(cliente, "O(A) Admin "..getPlayerName(source).."#ffffff Setou seu Level para "..Quantidade.." com Sucesso!", "success")
			end
		else
			outputChatBox ("05", source)
			exports.Scripts_Dxmessages:outputDx(source, "O Jogador Não Foi Encontrado", "error")
		end
	end
end
addCommandHandler ( "level", DAR_XP_AIRNEWSCR )

 

Please do not PM me with scripting related question nor support, use the forums instead.

Posted
1 minute ago, Lord Henry said:

Ué. Não foi vc quem fez?

Se essa data não tem utilidade, pq ela está no código?

 

2 minutes ago, Lord Henry said:

Repita o comando mas use essa função:


function DAR_XP_AIRNEWSCR ( source, cmd, pname, Quantidade )
	outputChatBox ("01", source)
	if pname and tonumber(Quantidade) then
		outputChatBox ("02", source)
		local cliente = getPlayerFromPartialName(pname)
		if isElement(cliente) then
			outputChatBox ("03", source)
			if getElementData ( source, "Console_AirNewSCR" ) == "Sim" then
				outputChatBox ("04", source)
				setElementData ( cliente, "Level", Quantidade )
				exports.Scripts_Dxmessages:outputDx(source, "Você Setou o Level do(a) Jogador(a) "..getPlayerName(cliente).."#ffffff para "..Quantidade.." com Sucesso!", "success")
				exports.Scripts_Dxmessages:outputDx(cliente, "O(A) Admin "..getPlayerName(source).."#ffffff Setou seu Level para "..Quantidade.." com Sucesso!", "success")
			else
				outputChatBox ("05", source)
				exports.Scripts_Dxmessages:outputDx(source, "O Jogador Foi Encontrado Mas Não Possui A Data Necessária", "error")
			end
		else
			outputChatBox ("06", source)
			exports.Scripts_Dxmessages:outputDx(source, "O Jogador Não Foi Encontrado", "error")
		end
	end
end
addCommandHandler ( "level", DAR_XP_AIRNEWSCR )

 

Olha usei o codigo que voce me mandou e usei o comando : /level Lucas 50

e me retorno o seguinte

 

unknown.png

1 minute ago, Lord Henry said:

Código sem o uso daquela data:


function DAR_XP_AIRNEWSCR ( source, cmd, pname, Quantidade )
	outputChatBox ("01", source)
	if pname and tonumber(Quantidade) then
		outputChatBox ("02", source)
		local cliente = getPlayerFromPartialName(pname)
		if isElement(cliente) then
			outputChatBox ("03", source)
			setElementData ( cliente, "Level", Quantidade )
			exports.Scripts_Dxmessages:outputDx(source, "Você Setou o Level do(a) Jogador(a) "..getPlayerName(cliente).."#ffffff para "..Quantidade.." com Sucesso!", "success")
			exports.Scripts_Dxmessages:outputDx(cliente, "O(A) Admin "..getPlayerName(source).."#ffffff Setou seu Level para "..Quantidade.." com Sucesso!", "success")
		else
			outputChatBox ("04", source)
			exports.Scripts_Dxmessages:outputDx(source, "O Jogador Não Foi Encontrado", "error")
		end
	end
end
addCommandHandler ( "level", DAR_XP_AIRNEWSCR )

 

Valeu mano voce é 1 mito

 

unknown.png

unknown.png

  • Moderators
Posted
1 minute ago, DNL291 said:

Acho que esse element-data é pra privar o uso do comando para a Staff, se quiser fazer uma verificação só com admins, tente isto:

Esqueceu do feedback de escape. Que avisa ao usuário que o comando não funcionou por falta de permissão.

function DAR_XP_AIRNEWSCR ( source, cmd, pname, Quantidade )
	outputChatBox ("01", source)
	if pname and tonumber(Quantidade) then
		outputChatBox ("02", source)
		local cliente = getPlayerFromPartialName(pname)
		if isElement(cliente) then
			outputChatBox ("03", source)
			if (isObjectInACLGroup("user." ..getAccountName(getPlayerAccount(source)), aclGetGroup("Admin"))) then
				outputChatBox ("04", source)
				setElementData ( cliente, "Level", Quantidade )
				exports.Scripts_Dxmessages:outputDx(source, "Você Setou o Level do(a) Jogador(a) "..getPlayerName(cliente).."#ffffff para "..Quantidade.." com Sucesso!", "success")
				exports.Scripts_Dxmessages:outputDx(cliente, "O(A) Admin "..getPlayerName(source).."#ffffff Setou seu Level para "..Quantidade.." com Sucesso!", "success")
			else
				outputChatBox ("Acesso negado.", source, 255, 0, 0)
			end
		else
			outputChatBox ("05", source)
			exports.Scripts_Dxmessages:outputDx(source, "O Jogador Não Foi Encontrado", "error")
		end
	end
end
addCommandHandler ( "level", DAR_XP_AIRNEWSCR )

 

  • Thanks 1

Eu te ajudei ou achou meu comentário útil? Não esqueça de deixar um Thanksspacer.png

Minhas contribuições para a comunidade: LordHenry - MTA Wiki Profile
Inscreva-se no meu canal do YouTube: Lord Henry - Entertainment
Discord Oficial do MTA: https://mtasa.com/discord
Blacklist e Whitelist de Scripters: Planilha

Por favor, não me envie mensagens privadas solicitando suporte. Crie um tópico no fórum em vez disso.

Posted
3 minutes ago, DNL291 said:

Acho que esse element-data é pra privar o uso do comando para a Staff, se quiser fazer uma verificação só com admins, tente isto:


function DAR_XP_AIRNEWSCR ( source, cmd, pname, Quantidade )
	outputChatBox ("01", source)
	if pname and tonumber(Quantidade) then
		outputChatBox ("02", source)
		local cliente = getPlayerFromPartialName(pname)
		if isElement(cliente) then
			outputChatBox ("03", source)
			if (isObjectInACLGroup("user." ..getAccountName(getPlayerAccount(source)), aclGetGroup("Admin"))) then
				outputChatBox ("04", source)
				setElementData ( cliente, "Level", Quantidade )
				exports.Scripts_Dxmessages:outputDx(source, "Você Setou o Level do(a) Jogador(a) "..getPlayerName(cliente).."#ffffff para "..Quantidade.." com Sucesso!", "success")
				exports.Scripts_Dxmessages:outputDx(cliente, "O(A) Admin "..getPlayerName(source).."#ffffff Setou seu Level para "..Quantidade.." com Sucesso!", "success")
			end
		else
			outputChatBox ("05", source)
			exports.Scripts_Dxmessages:outputDx(source, "O Jogador Não Foi Encontrado", "error")
		end
	end
end
addCommandHandler ( "level", DAR_XP_AIRNEWSCR )

 

Ja conseguir mais agradeço

  • Moderators
Posted

E depois que conseguir, vc pode remover aqueles outputChatBox de números. Eles servem somente pra debuggar o código.

E poste como ficou o código para vermos se ficou correto.

Eu te ajudei ou achou meu comentário útil? Não esqueça de deixar um Thanksspacer.png

Minhas contribuições para a comunidade: LordHenry - MTA Wiki Profile
Inscreva-se no meu canal do YouTube: Lord Henry - Entertainment
Discord Oficial do MTA: https://mtasa.com/discord
Blacklist e Whitelist de Scripters: Planilha

Por favor, não me envie mensagens privadas solicitando suporte. Crie um tópico no fórum em vez disso.

Posted
1 minute ago, Lord Henry said:

Esqueceu do feedback de escape. Que avisa ao usuário que o comando não funcionou por falta de permissão.


function DAR_XP_AIRNEWSCR ( source, cmd, pname, Quantidade )
	outputChatBox ("01", source)
	if pname and tonumber(Quantidade) then
		outputChatBox ("02", source)
		local cliente = getPlayerFromPartialName(pname)
		if isElement(cliente) then
			outputChatBox ("03", source)
			if (isObjectInACLGroup("user." ..getAccountName(getPlayerAccount(source)), aclGetGroup("Admin"))) then
				outputChatBox ("04", source)
				setElementData ( cliente, "Level", Quantidade )
				exports.Scripts_Dxmessages:outputDx(source, "Você Setou o Level do(a) Jogador(a) "..getPlayerName(cliente).."#ffffff para "..Quantidade.." com Sucesso!", "success")
				exports.Scripts_Dxmessages:outputDx(cliente, "O(A) Admin "..getPlayerName(source).."#ffffff Setou seu Level para "..Quantidade.." com Sucesso!", "success")
			else
				outputChatBox ("Acesso negado.", source, 255, 0, 0)
			end
		else
			outputChatBox ("05", source)
			exports.Scripts_Dxmessages:outputDx(source, "O Jogador Não Foi Encontrado", "error")
		end
	end
end
addCommandHandler ( "level", DAR_XP_AIRNEWSCR )

 

Eu não usaria essa mensagem. Se eu privar um comando não vejo motivos pra informar outros jogadores, mas depende da opção do dono do server.

 

3 minutes ago, GuysTREM said:

Ja conseguir mais agradeço

Caso não saiba o que essa verificação significa, os jogadores vão poder usar esse comando e setar o level deles.

Please do not PM me with scripting related question nor support, use the forums instead.

Posted
Just now, Lord Henry said:

E depois que conseguir, vc pode remover aqueles outputChatBox de números. Eles servem somente pra debuggar o código.

E poste como ficou o código para vermos se ficou correto.

Conseguir mano valeu mesmo agradeço e vou tirar aki muito obrigado

3 minutes ago, Lord Henry said:

E depois que conseguir, vc pode remover aqueles outputChatBox de números. Eles servem somente pra debuggar o código.

E poste como ficou o código para vermos se ficou correto.

 

Botei so pra console o comando e escondi o comando pra players nao sabe que existem

 

function DAR_XP_AIRNEWSCR ( source, cmd, pname, Quantidade )
    if pname and tonumber(Quantidade) then
        local cliente = getPlayerFromPartialName(pname)
        if isElement(cliente) then
            if (isObjectInACLGroup("user." ..getAccountName(getPlayerAccount(source)), aclGetGroup("Console"))) then
                setElementData ( cliente, "Level", Quantidade )
                exports.Scripts_Dxmessages:outputDx(source, "Você Setou o Level do(a) Jogador(a) "..getPlayerName(cliente).."#ffffff para "..Quantidade.." com Sucesso!", "success")
                exports.Scripts_Dxmessages:outputDx(cliente, "O(A) Admin "..getPlayerName(source).."#ffffff Setou seu Level para "..Quantidade.." com Sucesso!", "success")
            end
        else
            exports.Scripts_Dxmessages:outputDx(source, "O Jogador Não Foi Encontrado", "error")
        end
    end
end
addCommandHandler ( "level", DAR_XP_AIRNEWSCR )

 

  • Moderators
Posted

De nada mano, quando precisar estamos aqui pra ajudar. ?

  • Thanks 2

Eu te ajudei ou achou meu comentário útil? Não esqueça de deixar um Thanksspacer.png

Minhas contribuições para a comunidade: LordHenry - MTA Wiki Profile
Inscreva-se no meu canal do YouTube: Lord Henry - Entertainment
Discord Oficial do MTA: https://mtasa.com/discord
Blacklist e Whitelist de Scripters: Planilha

Por favor, não me envie mensagens privadas solicitando suporte. Crie um tópico no fórum em vez disso.

Posted

Olá, não sei  oque pode está acontecendo agora, mais depois que modificamos o Script de level, quando eu dou level para alguem o script da agencia de emprego não está funcionando, está dando o seguinte erro no console. 

 

[14:30:22] ERROR: [airnew]\Scripts_AgenciaEmpregos\AirNew_s.lua:174: attempt to
compare number with string

 

vou compartilhar o script da agencia de emprego com vocês.

function PizzaBoyAirNew ()
    local Level = getElementData ( source, "Level" ) or 0
    if Level > 4 then
        TudoInvisivel ()
        setElementVisibleTo ( PizzaBoy, source, true )
        setElementData ( source, "AirNew>Encaminhamento", "PizzaBoy" )
        MensagemAirNewSCR ( "Emprego: Para Iniciar os Serviços siga o Checkpoint Vermelho em seu Minimapa", "success" )
		triggerClientEvent ( source, "AirNew>FecharAgencia", root )
        setElementData ( source, "Emprego", false )
	else
	    MensagemAirNewSCR ( "Emprego: Você não possui Nivel suficiente para essa Profissão!", "error" )
    end
end
addEvent( "Encaminhar>PizzaBoy", true )
addEventHandler( "Encaminhar>PizzaBoy", getRootElement(), PizzaBoyAirNew )

 

Posted

O level foi definido como uma string no comando /level - provavelmente é isso.

Versão corrigida do comando:


function DAR_XP_AIRNEWSCR ( source, cmd, pname, Quantidade )
	if pname and tonumber(Quantidade) and (isObjectInACLGroup("user." ..getAccountName(getPlayerAccount(source)), aclGetGroup("Console"))) then
		local cliente = getPlayerFromPartialName(pname)
		if isElement(cliente) then
			setElementData ( cliente, "Level", tonumber(Quantidade) )
			exports.Scripts_Dxmessages:outputDx(source, "Você Setou o Level do(a) Jogador(a) "..getPlayerName(cliente).."#ffffff para "..Quantidade.." com Sucesso!", "success")
			exports.Scripts_Dxmessages:outputDx(cliente, "O(A) Admin "..getPlayerName(source).."#ffffff Setou seu Level para "..Quantidade.." com Sucesso!", "success")
		else
			exports.Scripts_Dxmessages:outputDx(source, "O Jogador Não Foi Encontrado", "error")
		end
	end
end
addCommandHandler ( "level", DAR_XP_AIRNEWSCR )

 

Please do not PM me with scripting related question nor support, use the forums instead.

Posted
15 minutes ago, DNL291 said:

O level foi definido como uma string no comando /level - provavelmente é isso.

Versão corrigida do comando:


function DAR_XP_AIRNEWSCR ( source, cmd, pname, Quantidade )
	if pname and tonumber(Quantidade) and (isObjectInACLGroup("user." ..getAccountName(getPlayerAccount(source)), aclGetGroup("Console"))) then
		local cliente = getPlayerFromPartialName(pname)
		if isElement(cliente) then
			setElementData ( cliente, "Level", tonumber(Quantidade) )
			exports.Scripts_Dxmessages:outputDx(source, "Você Setou o Level do(a) Jogador(a) "..getPlayerName(cliente).."#ffffff para "..Quantidade.." com Sucesso!", "success")
			exports.Scripts_Dxmessages:outputDx(cliente, "O(A) Admin "..getPlayerName(source).."#ffffff Setou seu Level para "..Quantidade.." com Sucesso!", "success")
		else
			exports.Scripts_Dxmessages:outputDx(source, "O Jogador Não Foi Encontrado", "error")
		end
	end
end
addCommandHandler ( "level", DAR_XP_AIRNEWSCR )

 

Vou testar agora! Obrigado. 

Retorno para falar se funcionou ou nao :D

19 minutes ago, DNL291 said:

O level foi definido como uma string no comando /level - provavelmente é isso.

Versão corrigida do comando:


function DAR_XP_AIRNEWSCR ( source, cmd, pname, Quantidade )
	if pname and tonumber(Quantidade) and (isObjectInACLGroup("user." ..getAccountName(getPlayerAccount(source)), aclGetGroup("Console"))) then
		local cliente = getPlayerFromPartialName(pname)
		if isElement(cliente) then
			setElementData ( cliente, "Level", tonumber(Quantidade) )
			exports.Scripts_Dxmessages:outputDx(source, "Você Setou o Level do(a) Jogador(a) "..getPlayerName(cliente).."#ffffff para "..Quantidade.." com Sucesso!", "success")
			exports.Scripts_Dxmessages:outputDx(cliente, "O(A) Admin "..getPlayerName(source).."#ffffff Setou seu Level para "..Quantidade.." com Sucesso!", "success")
		else
			exports.Scripts_Dxmessages:outputDx(source, "O Jogador Não Foi Encontrado", "error")
		end
	end
end
addCommandHandler ( "level", DAR_XP_AIRNEWSCR )

 

Agora deu o seguinte erro

[16:23:17] SCRIPT ERROR: [meusmods]\[airnew]\Scripts_LevelSystem\AirNew_s.lua:47
: unexpected symbol near 'ï'
[16:23:17] ERROR: Loading script failed: [meusmods]\[airnew]\Scripts_LevelSystem
\AirNew_s.lua:47: unexpected symbol near 'ï'

 

Posted
4 minutes ago, SnoopSCR said:

Vou testar agora! Obrigado. 

Retorno para falar se funcionou ou nao :D

Certo

Please do not PM me with scripting related question nor support, use the forums instead.

Posted
1 minute ago, SnoopSCR said:

Desculpe-me por ser leigo.. mais dependo muito da sua ajuda ❤️

Faz parte, eu também dependo de ajuda de outros pra aprender, é assim que funciona, ninguém nasce sabendo.

Please do not PM me with scripting related question nor support, use the forums instead.

Posted
Just now, DNL291 said:

Faz parte, eu também dependo de ajuda de outros pra aprender, é assim que funciona, ninguém nasce sabendo.

Obrigado pelo suporte! ?

 

Você viu o outro erro que está ocorrendo?

[16:23:17] SCRIPT ERROR: [meusmods]\[airnew]\Scripts_LevelSystem\AirNew_s.lua:47
: unexpected symbol near 'ï'
[16:23:17] ERROR: Loading script failed: [meusmods]\[airnew]\Scripts_LevelSystem
\AirNew_s.lua:47: unexpected symbol near 'ï'

 

(print do console) http://prntscr.com/mcwq6o

Posted
2 minutes ago, SnoopSCR said:

Obrigado pelo suporte! ?

 

Você viu o outro erro que está ocorrendo?


[16:23:17] SCRIPT ERROR: [meusmods]\[airnew]\Scripts_LevelSystem\AirNew_s.lua:47
: unexpected symbol near 'ï'
[16:23:17] ERROR: Loading script failed: [meusmods]\[airnew]\Scripts_LevelSystem
\AirNew_s.lua:47: unexpected symbol near 'ï'

 

Essa linha está no comando ou é de outro código?

Às vezes ocorre uns bugs quando copia o código aqui do fórum, tenta copiando o código por aqui: https://pastebin.com/07KFvhJQ

Please do not PM me with scripting related question nor support, use the forums instead.

Posted (edited)
5 minutes ago, DNL291 said:

Essa linha está no comando ou é de outro código?

Às vezes ocorre uns bugs quando copia o código aqui do fórum, tenta copiando o código por aqui: https://pastebin.com/07KFvhJQ

Sim, está linha está no comando.. Na função que estamos mexendo.

Copiei o codigo pelo pastbin e ainda está ocorrendo o mesmo erro!

(Print do notepad++) http://prntscr.com/mcwt95

(Print do Console) http://prntscr.com/mcwuf5

 

Edited by SnoopSCR
Posted

Tem um símbolo desconhecido causando esse erro, você precisa remover do código, se quiser pode me mandar o código por privado que eu vejo aqui e mando corrigido.

Please do not PM me with scripting related question nor support, use the forums instead.

Posted
1 minute ago, DNL291 said:

Tem um símbolo desconhecido causando esse erro, você precisa remover do código, se quiser pode me mandar o código por privado que eu vejo aqui e mando corrigido.

Ok, vou enviar em seu Privado!

Posted

Era mesmo um símbolo bugando o script ?

Resolvido por privado.

Please do not PM me with scripting related question nor support, use the forums instead.

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 account

Sign in

Already have an account? Sign in here.

Sign In Now
  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...