Tudo que Danilo Rodrigues postou
-
Adicionando função na script
Como faço para add dias de premium account nessa script? -- Script SYtem vip 1.0 -- -- By Vodkart -- function onSay(cid, words, param) if(words == "!mega70") then if doPlayerRemoveItem(cid, 6089, 1) == TRUE then local days = 70 local daysvalue = days * 24 * 60 * 60 local storageplayer = getPlayerStorageValue(cid, 13542) local timenow = os.time() if getPlayerStorageValue(cid, 13542) - os.time() <= 0 then time = timenow + daysvalue else time = storageplayer + daysvalue end if string.find(tostring(getCreatureName(cid)),"[[Vip]]") then doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Foram adicionados ".. days .." dias de MEGA Vip no seu character.") setPlayerStorageValue(cid, 13542, time) local quantity = math.floor((getPlayerStorageValue(cid, 13542) - timenow)/(24 * 60 * 60)) doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Você tem ".. quantity .." dias de MEGA Vip restantes.") else doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Foram adicionados ".. days .." dias de MEGA Vip no seu character.") setPlayerStorageValue(cid, 13542, time) local name = getCreatureName(cid) db.executeQuery("UPDATE `players` SET `name` = '[Vip] "..name.."' WHERE `id` = "..getPlayerGUID(cid)..";") doRemoveCreature(cid) end else doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Você Não tem o Pacc de 70 dias, para comprar entrar em contato com [email protected].") end elseif(words == "!MegaDays") then local timenow = os.time() local quantity = math.floor((getPlayerStorageValue(cid, 13542) - timenow)/(24 * 60 * 60)) doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Você tem ".. (quantity < 0 and 0 or quantity) .." dias de MEGA Vip no seu character.") elseif(words == "/checkmega") then if getPlayerAccess(cid) == 5 then if not param then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Invalid param specified.") end local player = getPlayerByName(param) if not isPlayer(player) then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Player "..player.." not found.") end local timenow = os.time() local quantity = math.floor((getPlayerStorageValue(player, 13542) - timenow)/(24 * 60 * 60)) doPlayerPopupFYI(cid, "O jogador tem ".. (quantity < 0 and 0 or quantity) .." dias de MEGA Vip no character.") return TRUE end elseif(words == "/addmega") then if getPlayerAccess(cid) == 5 then local t = string.explode(param, ",") if not t[2] then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Invalid param specified.") end local player = getPlayerByName(t[1]) local name = getCreatureName(player) local days = t[2] local pid = getPlayerByNameWildcard(t[1]) if(not pid or (isPlayerGhost(pid) and getPlayerGhostAccess(pid) > getPlayerGhostAccess(cid))) then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Player with this name doesn\'t exist or is offline.") return TRUE end local daysvalue = days*3600*24 local storageplayer = getPlayerStorageValue(player, 13542) local timenow = os.time() local time = storageplayer <= 0 and (timenow + daysvalue) or (storageplayer + daysvalue) if string.find(tostring(getCreatureName(pid)),"[[Vip]]") then doPlayerSendTextMessage(player, MESSAGE_INFO_DESCR, "Foram adicionados "..days.." dias de MEGA Vip no seu character.") setPlayerStorageValue(player, 13542, time) local quantity = math.floor((getPlayerStorageValue(player,13542) - timenow)/(3600*24)) doPlayerSendTextMessage(player, MESSAGE_INFO_DESCR, "Você tem "..quantity.." dias de MEGA Vip restantes.") else setPlayerStorageValue(player, 13542, time) db.executeQuery("UPDATE `players` SET `name` = '[Vip] "..name.."' WHERE `id` = "..getPlayerGUID(player)..";") doRemoveCreature(player) end end elseif(words == "/delmega") then if getPlayerAccess(cid) == 5 then local dec = MESSAGE_INFO_DESCR if(param == "") then return TRUE,doPlayerSendTextMessage(cid,18,"Command param required.")end local C,t = {},string.explode(param, ",") C.pos = getPlayerPosition(cid) C.uid = getCreatureByName(t[1]) C.time = ((tonumber(t[2]) == nil) and 1 or tonumber(t[2]))*3600*24 --Tempo da vip por dia. C.days = (tonumber(t[2]) == nil) and 1 or tonumber(t[2]) --Dias de vip. if(getPlayerStorageValue(C.uid,13542) < C.time)then doPlayerSendTextMessage(cid,dec,'O jogador '..t[1]..' não possui '..C.days..' dias de MEGA Vip.') else doPlayerSendTextMessage(cid,dec,'Você removeu '..C.days..' dias de MEGA Vip do player '..t[1]..'.') setPlayerStorageValue(C.uid,13542,getPlayerStorageValue(C.uid,13542)-C.time) end doSendMagicEffect(C.pos, math.random(28,30)) end end end
-
Caça bandeira Bug
@Up
-
Erro no database
@up
-
[Resolvido] Dúvida
Exatamente isso =D Muito obrigado
-
Erro no database
Já fiz isso, mas ele dá esse erro em todas as outras tabelas tb '-' Não é só a de account não.
-
Caça bandeira Bug
Uso esse script para o talk do caça bandeira. Só que ele fica sempre aberto, e quando tento fechar, ele manda a mensagem que fechou mas continua aberto, e dá um pequeno erro no distro. Ajuda aê OBS.: ('-' Juro que essa vai ser a ultima dúvida de hoje u.u) --[[ Capture The Flag System Author: Maxwell Denisson(MaXwEllDeN) Version: 1.0 ]] function onSay(cid, words, param) local CTF = _CTF_LIB if not(CTF.nopen) then return false end if (param == "open") then if (getGlobalStorageValue(CTF.CTFSto) > 0) then return doPlayerSendTextMessage(cid, 27, "O CTF já está aberto!") end doBroadcastMessage("[CTF] Capture The Flag foi aberto!") setGlobalStorageValue(CTF.CTFSto, 1) doPlayerSendTextMessage(cid, 27, "CTF foi aberto com sucesso!") elseif (param == "close") then if (getGlobalStorageValue(CTF.CTFSto) < 1) then return doPlayerSendTextMessage(cid, 27, "O CTF já está fechado!") end doBroadcastMessage("[CTF] Capture The Flag foi fechado!") for a, _ in pairs(CTF.flags) do setGlobalStorageValue(a, 0) setGlobalStorageValue(a-15, 0) end for _, cid in pairs (getOnlinePlayers()) do local cid = getPlayerByNameWildcard(b) if (getPlayerStorageValue(cid, CTF.teamssto) > 0) then doPlayerSendTextMessage(cid, 22, "[CTF] Capture The Flag foi fechado e você saiu do evento!") if (getPlayerStorageValue(cid, CTF.Flagsto) > 0) then local bant = getPlayerStorageValue(cid, CTF.Flagsto) devolverFlag(cid, bant) end setPlayerStorageValue(cid, CTF.teamssto, -1) setPlayerStorageValue(cid, CTF.Flagsto, -1) doPlayerSetTown(cid, CTF.TownExit) doTeleportThing(cid, getTownTemplePosition(CTF.TownExit)) end end setGlobalStorageValue(CTF.CTFSto, -1) doPlayerSendTextMessage(cid, 27, "CTF foi fechado com sucesso!") end return true end
-
[Resolvido] Dúvida
Tipo, doPlayerSendTextMessage(cid, 20, "bla bla bla bla bla:") Esse código serve para enviar uma mensagem para o usuário. Se eu alterar o número ali, ele altera a forma da mensagem. (Na verade eu só sei disso pq alterei ) O que eu gostaria de saber é como eu sei quais tipos de mensagens aparecem para cada número. Não sei se fui claro '-'
-
Preciso de ajudar alterar uma script
Queria que esse ring desse xp em dobro sempre que o usuário estivesse equipado com ele. Creio que ela já dê xp em dobro, mas ele gasta mesmo sem equipar. Alguém pode me ajudar? <item id="7708" article="a" name="Ring Lothus"> <attribute key="weight" value="40" /> <attribute key="stopduration" value="1" /> <attribute key="showduration" value="1" /> <attribute key="duration" value="3600" /> <attribute key="decayTo" value="0" /> <attribute key="slotType" value="ring" />
-
Problema com script
kkkkkkkkkkkkkkkkkkkk Blz. Vou tentar corrigir aqui, se eu conseguir eu posto @edit Consegui arrumar um outro script com a mesma função que esse. Pode mover o tópico para resolvido.
-
Problema com script
-
Problema com script
Não adiantou :/ continua não dando nada '-'
-
Problema com script
Quando eu falo !buy, mostra o catálogo. Mas se eu digito !buy e mais algum nome de um item do catálogo, ele só faz repetir o que eu escrevi e não faz mais nada, nem tira os itens do meu inventário, nem coloca item nenhum '-'
-
Problema com script
Tipo, quando eu digo !buy, aparece a lista normal com os itens que estão para vender. Mas se eu digito !buy e o nome do item, simplesmente não acontece nada, só aparece no chat uma mensagem em laranja com o mesma coisa que escrevi. Vou tirar um print pra postar aqui
-
Problema com script
local minlevel = 10 -- level minimo para usar o comando local idmoeda = 12372 -- id da moeda para comprar os itens -- 2148 é gold coin local compra = { ["megastaff"] = {id = 7424, count = 1, price = 10}, --- [nome do item que aparecerá na loja] = id do item, quantidade, preço em idmoeda ["megaclub"] = {id = 7423, count = 1, price = 10}, ["megasword"] = {id = 7417, count = 1, price = 10}, ["megaaxe"] = {id = 2441, count = 1, price = 10}, ["megadistance"] = {id = 5907, count = 1, price = 10}, ["megaarmor"] = {id = 8877, count = 1, price = 12}, ["megarobe"] = {id = 12618, count = 1, price = 12}, ["megashield"] = {id = 12194, count = 1, price = 12}, ["megaorb"] = {id = 12608, count = 1, price = 12}, ["megaboots"] = {id = 2358, count = 1, price = 15}, ["megapacc1"] = {id = 6087, count = 1, price = 7}, ["megapacc2"] = {id = 6088, count = 1, price = 10}, ["megapacc3"] = {id = 6089, count = 1, price = 20}, ["scoin"] = {id = 2159, count = 1, price = 1}, ["keyvip"] = {id = 8978, count = 1, price = 5}, ["ringxp"] = {id = 7708, count = 1, price = 1}, ["pkclean"] = {id = 5350, count = 1, price = 1} } function onSay(cid, words, param) local shop = compra[param] if (shop) then if getPlayerLevel(cid) >= minlevel then if doPlayerRemoveItem(cid, idmoeda, compra[param:lower()].price) == TRUE then doPlayerAddItem(cid, compra[param:lower()].id, compra[param:lower()].count) doSendMagicEffect(getCreaturePosition(cid),13) doCreatureSay(cid, "Voce comprou " .. compra[param:lower()].count .." " .. param:lower() .. "!", TALKTYPE_ORANGE_1) else doPlayerSendTextMessage(cid, 22,"Você deve ter ".. compra[param:lower()].price .." ".. getItemNameById(idmoeda) .." para comprar esse item.") end else doPlayerSendTextMessage(cid, 22,"Você deve ter level " .. minlevel .. " ou mais para poder comprar na loja.") end end return true end function onSay(cid, words, param) if param == "" then local itensCompra = {"megastaff","megaclub","megasword","megaaxe","megadistance","megaarmor","megarobe","megashield","megaorb","megaboots","megapacc1","megapacc2","megapacc3","scoin","keyvip","ringcp","pkclean"} local text = "" for i=1, #itensCompra do if i == 1 then text = i.." - ".. itensCompra[i] .."\n" else text = text.. i .." - ".. itensCompra[i] .."\n" end end doShowTextDialog(cid,9004,text) return TRUE end end Peguei essa script com Daniel Mas tentei usar no server e n funfa '-' podem me dizer se tem algo errado?
-
[Resolvido] [PEDIDO] Talkaction
Já testei o seu e funfou fácil. Muito obrigado. Testarei o outro agora. Valeu
-
[Resolvido] [PEDIDO] Talkaction
Queria um talk que fizesse um certo item ser trocado por outro. Tipo, tenho vários itens que gostaria de vender (donate), mas pra isso preciso de um "item moeda" que servisse para comprar todos os itens donate. Ex.: O servidor tem sword donate = 10 scarab coin (exemplo de moeda), mage donate = 10 scarab coin, pally donate = 10 scarab coin. Eu tenho 50 scarab coins, e quero comprar uma sword donate, então eu digo !sworddonate, então 10 scarabs desaparecem do meu inventário e a sword aparece. Não sei se vcs entenderam (Pq escrevi um pouco confuso Nem eu sei exatamente o que quero).
-
[Resolvido] BUG HOUSE
Resolvi o problema da house. (Deletei ela ) Mesmo assim, obrigado pela ajuda =D Podem fechar esse tópico '-'
-
[Resolvido] BUG HOUSE
Usei uma do mesmo RAW das outras houses. Copiei a porta de outras houses e mesmo assim não abre '-'
-
[Resolvido] Encher life/mana ao upar
Valeu Funfou aqui. +rep
-
Erro no database
Eu crio o banco de dados normal, mas quando eu clico em alguma tabela (Nesse caso cliquei em accounts) ele dá esse erro. Alguém pode ajudar?
-
[Resolvido] Encher life/mana ao upar
Como faço para fazer o char se curar toda vez que upa lvl? '-' Os chars tão estão se curando quando upam
-
[Resolvido] BUG HOUSE
Tô com um bug na house que crio. Sempre que tento abrir a porta ela dá como se tivesse lacrada. Porém, eu já coloquei ela como saída e mesmo assim continua. Não consigo abrir nem com a acc de adm. E o segundo bug é que não consigo comprar casa nenhuma com um player normal. Diz que preciso de PA, mas já coloquei as 3 vips e mesmo assim continua dando o erro. Alguém pode me ajudar?
-
Editando mapa 8.6
Baixei o RME 2.2 para editar o mapa do meu server, porém quando tento abrir ele diz que não encontra os arquivos. Mesmo eu colocando o arquivo do client 8.6 e não abre. Tentei fazer o que tinha escrito nos tutoriais, baixar a versão 8.54, porém quando coloco o meu mapa ele dá conflito, pois o meu mapa tá em versão 8.6. Como faço pra resolver isso? '-'
-
Sistemas de Vips com [VIP] No Nome
Tô usando um script idêntico a esse. Ele add o nome VIP, mas alguns segundos depois ele desloga e diz que a vip acabou, mas o char continua com os benefícios vips, podendo passar até por portais vips. Tem como ajudar?