Summ

local ranks = { ['fist'] = {0}, ['club'] = {1}, ['sword'] = {2}, ['axe'] = {3}, ['distance'] = {4}, ['shield'] = {5}, ['fish'] = {6}, ['magic'] = {7}, ['level'] = {8}, } function onSay(cid, words, param) local msg = string.lower(param) if ranks[msg] ~= nil then str = getHighscoreString((ranks[msg][1])) else str = getHighscoreString((8)) end doPlayerPopupFYI(cid, str) return true end

Tente usar : function onUse(cid, item) if not getTileInfo(getThingPos(cid)).protection then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE,"You can't remove your skull in this area.") return true end if getCreatureSkullType(cid) == SKULL_RED or getCreatureSkullType(cid) == SKULL_black then db.executeQuery("UPDATE `killers` SET `unjustified` = 0 WHERE `id` IN (SELECT `kill_id` FROM `player_killers` WHERE `player_id` = " .. getPlayerGUID(cid) .. ")") db.executeQuery("UPDATE `players` SET `skulltime` = 0") doCreatureSetSkullType(cid, 0) doPlayerSendTextMessage(cid, 19, "Você removeu seus Frags/Skull com sucesso.") doSendMagicEffect(getThingPos(cid), 26) doRemoveItem(item.uid,1) doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Your skull has been removed!") else doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You do not have red/black skull!") end return true end

function onUse(cid, item) if not getTileInfo(getThingPos(cid)).protection then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE,"You can't remove your skull in this area.") return true end if getCreatureSkullType(cid) == SKULL_RED or getCreatureSkullType(cid) == SKULL_black then db.executeQuery("UPDATE `killers` SET `unjustified` = 0 WHERE `id` IN (SELECT `kill_id` FROM `player_killers` WHERE `player_id` = " .. getPlayerGUID(cid) .. ")") db.executeQuery("UPDATE `players` SET `skulltime` = 0") doCreatureSetSkullType(cid, 0) doPlayerSendTextMessage(cid, 19, "Você removeu seus Frags/Skull com sucesso.") doSendMagicEffect(getThingPos(cid), 26) doRemoveItem(item.uid,1) doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Your skull has been removed!") else doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You do not have red/black skull!") end return true end <action itemid="ITEMID" event="script" value="NOMEDOARQUIVO.lua"/> Já tava fazendo mesmo u.u, então postei

sim, creio que o prêmio vai continuar sim.

Não sei te dizer, ai é só testando pra saber mesmo...

player:addOutfitAddon(tabela[level].id, 3) player:addOutfitAddon(tabela[level].id2, 3) 3 = full 2 = addon 2 1 = addon 1 só colocar 1

A melhor coisa que tu pode fazer é encontrar outro namorado, por isso é só jogar ligui of léguis, que tu arruma outro namorado fácil

ss

Npcking : local keywordHandler = KeywordHandler:new() local npcHandler = NpcHandler:new(keywordHandler) NpcSystem.parseParameters(npcHandler) local talkState = {} function onCreatureAppear(cid) npcHandler:onCreatureAppear(cid) end function onCreatureDisappear(cid) npcHandler:onCreatureDisappear(cid) end function onCreatureSay(cid, type, msg) npcHandler:onCreatureSay(cid, type, msg) end function onThink() npcHandler:onThink() end function creatureSayCallback(cid, type, msg) if(not npcHandler:isFocused(cid)) then return false end local talkUser = NPCHANDLER_CONVbehavior == CONVERSATION_DEFAULT and 0 or cid local item = 2157 -- ID Do item a ser cobrado. local price = 10 -- Quantidade a ser cobrada. local vocations = {5,6,7,8} local viptimestorage = 15001 local storage = 91907 if msgcontains(msg, 'promotion') or msgcontains(msg, 'vip promotion') then selfSay('Você quer ser promovido vip por '..price..' moedas? {yes} ', cid) talkState[talkUser] = 1 elseif msgcontains(msg, 'yes') and talkState[talkUser] == 1 then if getPlayerStorageValue(cid, viptimestorage) >= os.time() then if isInArray(vocations, getPlayerVocation(cid)) then if getPlayerItemCount(cid, item) >= price then if getPlayerVocation(cid) == 5 then doPlayerSetVocation(cid, 9) doPlayerRemoveItem(cid, item, price) setPlayerStorageValue(cid, storage, 1) end if getPlayerVocation(cid) == 6 then doPlayerSetVocation(cid, 10) doPlayerRemoveItem(cid, item, price) setPlayerStorageValue(cid, storage, 1) end if getPlayerVocation(cid) == 7 then doPlayerSetVocation(cid, 11) doPlayerRemoveItem(cid, item, price) setPlayerStorageValue(cid, storage, 1) end if getPlayerVocation(cid) == 8 then doPlayerSetVocation(cid, 12) doPlayerRemoveItem(cid, item, price) setPlayerStorageValue(cid, storage, 1) end selfSay('Parabens! Você foi promovido vip! ', cid) talkState[talkUser] = 0 else selfSay('Você não tem ' .. price .. ' moedas para ser promovido a vip...', cid) talkState[talkUser] = 0 end else selfSay('Desculpe, você precisa ter a member promotion para ser promovido vip.', cid) talkState[talkUser] = 0 end else selfSay('Você precisa ser vip pra ter a promotion', cid) end elseif msg == "no" and talkState[talkUser] >= 1 then selfSay("Then not", cid) talkState[talkUser] = 0 npcHandler:releaseFocus(cid) end return true end npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback) npcHandler:addModule(FocusModule:new()) e cria um arquivo pra colocar isso : function onLogin(cid) local storage = 91907 local viptimestorage = 15001 local player = Player(cid) if player:getStorageValue(cid, viptimestorage) <= os.time() and player:getStorageValue(storage) == 1 then player:setVocation(player:getVocation() - 4) player:setStorageValue(storage, -1) end return true end eu não lembro como é tag do creaturescript.xml em 1.0, mas se tu não souber só avisar. ps : onLogin não registra creature event. #editado #ultimoedit

Sim funciona.

Posta o script que da a "master sorcerer vip".

Correct : C:/Users/Familia/Desktop / correto... e seu config.lua ta na área de trabalho ?

em outfits.XML tu ve o looktype : <list gender="0" lookType="136" name="Citizen"/> <list gender="1" lookType="128" name="Citizen"/> e dps só configurar no script : [40] = {type = "addon", id = 136, id2 = 128, msg = "Voce ganhou o addon citizen full por alcancar o level 40!"}, [level] = {type = "addon", id = looktype, id2 = outrolooktype, msg = "E BLÁ BLÁ DA MENSAGEM"}, um exemplo : <list gender="0" lookType="137" name="Hunter"/> <list gender="1" lookType="129" name="Hunter"/> [100] = {type = "addon", id = 137, id2 = 129, msg = "Voce ganhou o addon hunterfull por alcancar o level 100!"}, abrçs

local chance_shiny = 6 local chance_raro = 1 local shinys = { "Caterpie", "Venusaur", "Charizard", "Blastoise", "Metapod", "Butterfree", "Weedle", "Kakuna", "Beedrill", "Pidgey", "Pidgeotto", "Pidgeot", "Rattata", "Raticate", "Spearow", "Fearow", "Ekans", "Arbok", "Pikachu", "Raichu", "Sandshrew", "Sandslash", "Nidoran Female", "Nidorina", "Nidoqueen", "Nidoran Male", "Nidorino", "Nidoking", "Clefairy", "Clefable", "Vulpix", "Ninetales", "Jigglypuff", "Wigglytuff", "Zubat", "Golbat", "Oddish", "Gloom", "Vileplume", "Paras", "Parasect", "Venonat", "Venomoth", "Diglett", "Dugtrio", "Meowth", "Persian", "Psyduck", "Golduck", "Mankey", "Primeape", "Growlithe", "Arcanine", "Poliwhirl", "Poliwrath", "Machop", "Machoke", "Machamp", "Bellsprout", "Weepinbell", "Victreebel", "Tentacruel", "Geodude", "Graveler", "Golem", "Ponyta", "Rapidash", "Slowpoke", "Slowbro", "Magnemite", "Magneton", "Farfetch'd", "Doduo", "Dodrio", "Seel", "Dewgong", "Grimer", "Muk", "Shellder", "Cloyster", "Onix", "Drowzee", "Hypno", "Krabby", "Kingler", "Voltorb", "Electrode", "Exeggcute", "Exeggutor", "Cubone", "Marowak", "Hitmonlee", "Hitmonchan", "Lickitung", "Koffing", "Weezing", "Rhyhorn", "Rhydon", "Tangela", "Horsea", "Seadra", "Goldeen", "Seaking", "Staryu", "Starmie", "Mr. Mime", "Pinsir", "Tauros", "Gyarados", "Lapras", "Ditto", "Vaporeon", "Jolteon", "Flareon", "Porygon", "Kadabra", "Omanyte", "Magikarp", "Jynx", "Poliwag", "Tentacool", "Haunter", "Chansey", "Ivysaur", "Charmeleon", "Dragonair", "Wartortle", "Snorlax", "Omastar", "Dragonite", "Gengar", "Alakazam", "Electabuzz", "Magmar", "Kabuto", "Kabutops" } local raros = {"Bulbasaur", "Charmander", "Squirtle", "Dratini", "Eevee", "Scyther", "Gastly", "Kangaskhan", "Abra", "Articuno", "Zapdos", "Moltres", "Mew", "Mewtwo", "Aerodactyl"} local function doPokemonRegisterLevel(cid) if not isCreature(cid) then return true end if getWildPokemonLevel(cid) == -1 then setWildPokemonLevel(cid) end end local function doSetRandomGender(cid) if not isCreature(cid) then return true end local gender = 0 local name = getCreatureName(cid) if not newpokedex[name] then return true end local rate = newpokedex[name].gender if rate == 0 then gender = 3 elseif rate == 1000 then gender = 4 elseif rate == -1 then gender = 0 elseif math.random(1, 1000) <= rate then gender = 4 else gender = 3 end doCreatureSetSkullType(cid, gender) end local function doShiny(cid) if isCreature(cid) then if isSummon(cid) then return true end if getPlayerStorageValue(cid, 74469) >= 1 then return true end if isNpcSummon(cid) then return true end if isInArray(shinys, getCreatureName(cid)) then transform = math.random(chance_shiny, 100) --6% chance elseif isInArray(raros, getCreatureName(cid)) then transform = math.random(chance_raro, 100) --1% chance elseif not isInArray(raros, getCreatureName(cid)) and not isInArray(shinys, getCreatureName(cid)) then return true end if transform == 100 then doSendMagicEffect(getThingPos(cid), 18) local shi = doCreateMonster("Shiny ".. getCreatureName(cid) .."", getThingPos(cid)) setPlayerStorageValue(shi, 74469, 1) setPlayerStorageValue(cid, 74469, 1) doRemoveCreature(cid) else setPlayerStorageValue(cid, 74469, 1) end else return true end end function onSpawn(cid) registerCreatureEvent(cid, "GeneralConfiguration") registerCreatureEvent(cid, "DirectionSystem") registerCreatureEvent(cid, "CastSystem") if isSummon(cid) then registerCreatureEvent(cid, "SummonDeath") return true end registerCreatureEvent(cid, "Experience") addEvent(doPokemonRegisterLevel, 5, cid) addEvent(doSetRandomGender, 5, cid) addEvent(doShiny, 10, cid) return true end configura a porcentagem no começo do script : local chance_shiny = 6 local chance_raro = 1 está na chance padrão só mudar de acordo com a que tu quer...

Olá, estou aqui hoje para mostrar a vocês um App para Android, que permite você programar em diversas linguagens.. O nome dele se chama Quoda, ele é grátis na Play Store, ele tem suporte a todas as linguagens de programação. Você pode visualizar seu projeto no olho que tem na barra de ferramentas, você pode editar, abrir, salvar e criar. É o aplicativo mais completo para desenvolvedores/programadores . Segue imagens dele: Para saber mais sobre ele: Clique AQUI Clique AQUI2 créditos Caio

Não testei : local combat = createCombatObject() setCombatParam(combat, COMBAT_PARAM_TARGETCASTERORTOPMOST, true) setCombatParam(combat, COMBAT_PARAM_EFFECT, CONST_ME_MAGIC_RED) local condition = createConditionObject(CONDITION_PARALYZE) setConditionParam(condition, CONDITION_PARAM_TICKS, 20000) setConditionFormula(condition, -0.9, 0, -0.9, 0) setCombatCondition(combat, condition) function onCastSpell(cid, var) if not doCombat(cid, combat, var) then return false end doSendMagicEffect(getThingPosition(cid), CONST_ME_MAGIC_GREEN) return true end

vai em data/actions/scripts/ crie removeskull.lua : function onUse(cid, item) local noRemove = {SKULL_WHITE, SKULL_YELLOW} local playerSkull = getPlayerSkullType(cid) if getTitleInfo(getThingPos(cid)).protection then if isInArray(noRemove, playerSkull) then doPlayerSendCancel(cid, "You can't remove this type of skull.") doSendMagicEffect(getPlayerPosition(cid), CONST_ME_POFF) elseif playerSkull == SKULL_NONE then doPlayerSendCancel(cid, "You don't have skull.") doSendMagicEffect(getPlayerPosition(cid), CONST_ME_POFF) else db.executeQuery("UPDATE `killers` SET `unjustified` = 0 WHERE `id` IN (SELECT `kill_id` FROM `player_killers` WHERE `player_id` = " .. getPlayerGUID(cid) .. ")") doPlayerSendTextMessage(cid, 27, "Your frags & your skull have been removed!") doSendMagicEffect(getPlayerPosition(cid), CONST_ME_MAGIC_RED) doSendAnimatedText(getPlayerPosition(cid), "POFF!", 180) doCreatureSetSkullType(cid,0) doPlayerSetSkullEnd(cid, 0, playerSkull) doRemoveItem(item.uid, 1) end else doPlayerSendTextMessage(cid, 27, "You not is in pz-zone.!") end return true end em actions.XML <action itemid="IDDEALGUMITEM" event="script" value="removeskull.lua"/>

Muito bom

você testou o meu ? continuou dando o mesmo erro ? como você vê acima eu e o snows postamos e tu vem e só da um "up", não estamos na sua mente pra saber o que aconteceu então de maiores informações ou pelo menos fale que o erro persiste, é a segunda vez que já estou te falando sobre isso, na próxima não faço nem questão de ajudar, pois se tu mesmo não se ajuda por que eu vou ajudar... abrçs #edit já aproveita e tenta esse : Ajudante.lua local items = { voc1 = { {2160, 10}, {2159, 10}, {9778, 2}, }, voc2 = { {2159, 12}, {2160, 12}, }, voc3 = { {2159, 11}, {2160, 11}, }, voc4 = { {2159, 13}, {2160, 13}, }, } local storage = 6554 local keywordHandler = KeywordHandler:new() local npcHandler = NpcHandler:new(keywordHandler) NpcSystem.parseParameters(npcHandler) local talkState = {} function onCreatureAppear(cid) npcHandler:onCreatureAppear(cid) end function onCreatureDisappear(cid) npcHandler:onCreatureDisappear(cid) end function onCreatureSay(cid, type, msg) npcHandler:onCreatureSay(cid, type, msg) end function onThink() npcHandler:onThink() end function creatureSayCallback(cid, type, msg) if not npcHandler:isFocused(cid) then return false end local talkUser = NPCHANDLER_CONVBEHAVIOR == CONVERSATION_DEFAULT and 0 or cid msg = msg:lower() if getPlayerStorageValue(cid, storage) >= 1 then selfSay("Ja lhe entreguei os items, suma!", cid) return true end if msgcontains(msg, "yes") then if getPlayerVocation(cid) == 1 then for x = 1, #items.voc1 do doPlayerAddItem(cid, items.voc1[x][1], items.voc1[x][2]) end setPlayerStorageValue(cid, storage, 1) selfSay("Aqui, tome seus items.", cid) elseif getPlayerVocation(cid) == 2 then for x = 1, #items.voc2 do doPlayerAddItem(cid, items.voc2[x][1], items.voc2[x][2]) end setPlayerStorageValue(cid, storage, 1) selfSay("Aqui, tome seus items.", cid) elseif getPlayerVocation(cid) == 3 then for x = 1, #items.voc3 do doPlayerAddItem(cid, items.voc3[x][1], items.voc3[x][2]) end setPlayerStorageValue(cid, storage, 1) selfSay("Aqui, tome seus items.", cid) elseif getPlayerVocation(cid) == 4 then for x = 1, #items.voc4 do doPlayerAddItem(cid, items.voc4[x][1], items.voc4[x][2]) end setPlayerStorageValue(cid, storage, 1) selfSay("Aqui, tome seus items.", cid) end elseif msgcontains(msg, "no") then selfSay("Bye!!") end return true end npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback) npcHandler:addModule(FocusModule:new()) <?xml version="1.0" encoding="UTF-8"?> <npc name="Ajudante" script="Ajudante.lua" walkinterval="2000" speechbubble="1" floorchange="0"> <health now="100" max="100" /> <look type="160" head="98" body="95" legs="115" feet="114" addons="0"/> <parameters> <parameter key="message_greet" value="Ola, voce precisa de ajuda ? Eu dou items para os iniciantes! Quer os items ?" /> </parameters> </npc>

Esse é erro é causado, quando falta alguma coluna/tabela na database... vai no index.php coloca em databaseDEBUG coloca true e da f5 na pagina que vai falar qual coluna/tabela está faltando.

Boa sorte na rl

script what ? isso não é no site

Se sua dúvida/pedido foi sanada peço que escolha o post que mais te ajudou como melhor resposta, pro tópico ficar como resolvido