tibiadevs Box Pokémon, com itens surpresas extras.

luzetti06 · 21 de Fevereiro

local a = {
	[11638] = {
		pokemons = {"Aron", "Bagon", "Slowpoke", "Magnemite", "Doduo", "Seel", "Grimer", "Drowzee", "Voltorb",
			"Cubone", "Koffing", "Cyndaquil", "Pidgeotto", "Weepinbell", "Wooper", "Dratini", "Dunsparce", "Pichu", "Slugma", "Remoraid", "Ledyba",
			"Goldeen", "Vulpix", "Tentacool", "Bulbasaur", "Charmander", "Squirtle", "Metapod", "Kakuna",
			"Teddiursa", "Chikorita", "Chinchou", "Cleffa", "Marill", "Natu", "Smoochum", "Phanpy", "Slugma",
			"Ekans", "Abra", "Mankey", "Psyduck", "Sandshrew", "Kabuto", "Beedrill", "Omanyte", "Butterfree", "Snubbul", "Togepi",
			"Zubat", "Diglett", "Venonat", "Shuckle", "Mareep",
			"Meowth", "Poliwag", "Growlithe", "Machop", "Ponyta", "Geodude", "Hoothoot", "Pineco", "Sentret",
			"Swinub", "Totodile"
		},
		items = {2006, 2007, 2008, 2010, 2015, 2016, 2031, 2032}
	},

	
		[11639] = {pokemons = {"Lairon", "Shelgon", "Skiploom", "Raticate", "Ariados", "Flaffy", "Delibird", "Fearow", "Clefairy", "Arbok",
			"Nidorino", "Nidorina", "Elekid", "Magby", "Ledian",
			"Dodrio", "Golbat", "Gloom", "Parasect", "Venomoth", "Dugtrio", "Persian",
			"Poliwhirl", "Machoke", "Quilava", "Yanma",
			"Graveler", "Slowbro", "Magneton", "Farfetch'd", "Kingler", "Electrode",
			"Weezing", "Seadra", "Bayleef", "Croconaw", "Qwilfish", "Tyrogue",
			"Jigglypuff", "Seaking", "Tauros", "Starmie", "Eevee", "Charmeleon",
			"Wartortle", "Ivysaur", "Pikachu"
		},
		items = {2006, 2007, 2008, 2010, 2015, 2016, 2031, 2032}	
		
	},
	
		[11640] = {pokemons = {"Salamence", "Politoed", "Magcargo", "Noctowl", "Poliwrath", "Nidoking", "Pidgeot", "Sandslash", "Ninetales", "Vileplume",
			"Primeape", "Nidoqueen", "Granbull", "Jumpluff", "Golduck", "Kadabra", "Rapidash", "Azumarill", "Murkrow",
			"Clefable", "Wigglytuff", "Dewgong", "Onix", "Cloyster", "Hypno", "Exeggutor", "Marowak",
			"Hitmonchan", "Quagsire", "Stantler", "Xatu", "Hitmonlee", "Bellossom", "Lanturn", "Pupitar", "Smeargle",
			"Lickitung", "Golem", "Chansey", "Tangela", "Mr. Mime", "Pinsir", "Espeon", "Umbreon", "Vaporeon", "Jolteon", 
			"Flareon", "Porygon", "Dragonair", "Hitmontop", "Octillery", "Sneasel"
		},
		
		items = {2006, 2007, 2008, 2010, 2015, 2016, 2031, 2032}
		
	},
	
	
		[11641] = {pokemons = {"Absol", "Dragonite", "Snorlax", "Kabutops", "Omastar", "Kingdra",
			"Ampharos", "Blissey", "Donphan", "Girafarig", "Mantine", "Miltank", "Porygon2", "Skarmory", "Lapras", "Gyarados", "Magmar", "Electabuzz", "Jynx", "Scyther", "Kangaskhan",
			"Venusaur", "Crobat", "Heracross", "Meganium", "Piloswine", "Scizor",
			"Machamp", "Arcanine", "Charizard", "Blastoise", "Tentacruel",
			"Alakazam", "Feraligatr", "Houndoom",
			"Rhydon", "Misdreavus", "Wobbuffet", "Raichu", "Slowking", "Steelix", "Sudowoodo", "Typhlosion", "Tyranitar", "Ursaring"
		},
		items = {2006, 2007, 2008, 2010, 2015, 2016, 2031, 2032}
		
	},
	
		[12331] = {pokemons = {"Shiny Abra"},
		items = {2006, 2007, 2008, 2010, 2015, 2016, 2031, 2032}
		
	},
		[12227] = {pokemons = {"Shiny Weezing", "Shiny Swampert", "Shiny Sceptile", "Shiny Tropius", "Shiny Venusaur", "Shiny Charizard", "Shiny Blastoise", "Shiny Arcanine", "Shiny Alakazam", "Shiny Ninetales",
			"Shiny Scyther", "Shiny Umbreon", "Shiny Pidgeot", "Shiny Raichu", "Shiny Tentacruel", "Shiny Ampharos", "Shiny Feraligatr", 
			"Shiny Jynx", "Shiny Gyarados", "Shiny Politoed", "Shiny Typhlosion", "Shiny Tauros", 
			"Shiny Venomoth", "Shiny Espeon", "Shiny Magneton", "Shiny Larvitar", 
			"Shiny Golbat", "Shiny Kingler", "Shiny Farfetch'd", "Shiny Pinsir", "Shiny Dratini",
		"Shiny Electrode", "Shiny Muk", "Shiny Stantler", "Shiny Seadra", "Shiny Mr. Mime"},
		items = {14440, 2160, 22003, 11442, 11441, 11447, 12401, 21079, 21998}
		
	},
	
	
		[15488] = {pokemons = {"Mega Absol", "Mega Steelix", "Mega Lucario", "Mega Swampert", "Mega Sceptile", "Mega Wobbuffet", "Mega Blaziken", "Mega Raichu", "Mega Blastoise", "Mega Alakazam", "Mega Slowbro", "Mega Aerodactyl", "Mega Scizor", "Mega Tyranitar", "Mega Gengar", "Mega Glalie", "Mega Kangaskhan", "Mega Ampharos", "Mega Venusaur"},
		items = {2006, 2007, 2008, 2010, 2015, 2016, 2031, 2032}
		
	},
		[1990] = {pokemons = {"Ditto"},
		items = {2006, 2007, 2008, 2010, 2015, 2016, 2031, 2032}
		
	},
		[15432] = {pokemons = {"Shedinja", "Shiny Hitmonlee", "Shiny Hitmonchan", "Wailord", "Electivire", "Magmortar", "Banette", "Sableye", "Honchkrow", "Abomasnow", "Swellow", "Shiftry", "Tropius", "Armaldo", "Ludicolo", "Togekiss", "Luxray", "Bronzong", "Lucario", "Tangrowth", "Flygon", "Aggron", "Mawile", "Slaking", "Duskinoir", "Glalie", "Ninjask", "Gardevoir", "Toxicroak", "Rhyperior", "Altaria"},
		items = {2006, 2007, 2008, 2010, 2015, 2016, 2031, 2032}
		
	}
	
	--se for por mais box por uma , ali na parte de cima
}

local uniqueItems = {
    [14440] = true,

}

local lostItems = {
    [14440] = true, 
}

function onUse(cid, item, frompos, item2, topos)
    local b = a[item.itemid]
    if not isPlayer(cid) then return true end 
    if not b then return true end
    local pokemon = b.pokemons[math.random(#b.pokemons)]
    if not pokes[pokemon] then return true end
    
    local prizeItemId = b.items[math.random(#b.items)] -- Seleciona um item aleatorio da lista de itens
    local prizeItemName = getItemNameById(prizeItemId) -- obtem o nome do item pelo ID
    local quantity = 1 -- Por padrao, assume que o item é unico
    
    if lostItems[prizeItemId] then
        -- Se o item está na tabela lostItems, reduza a chance de aparecer
        if math.random(300) <= 150 then
            doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Você abriu uma caixa de prêmios Pokémon, mas perdeu o item surpresa: "..prizeItemName..". Mais sorte na próxima vez!")
            doRemoveItem(item.uid, 1)
            -- Adiciona o poke independentemente do resultado do item perdido
            addPokeToPlayer(cid, pokemon, 0, nil, btype) -- Alterado v1.9
            return true
        end
    else
        -- Se o item nao esta na tabela lostItems, gera uma quantidade aleatorio de 1 a 5
        quantity = math.random(1, 5)
    end
    
    doPlayerSendTextMessage(cid, 27, "Você abriu uma caixa de prêmios Pokémon!")
    doPlayerSendTextMessage(cid, 27, "O Pokémon prêmio era um "..pokemon.." e você também recebeu "..quantity.." "..prizeItemName.."(s). Parabéns!")
    doSendMagicEffect(getThingPos(cid), 29)
    
    addPokeToPlayer(cid, pokemon, 0, nil, btype) -- Alterado v1.9
    if isPlayerOnline(cid) then
        doPlayerAddItem(cid, prizeItemId, quantity) -- Adiciona a quantidade aleatoria do item ao jogador
        doRemoveItem(item.uid, 1)
        if useOTClient then
            doCreatureExecuteTalkAction(cid, "/salvar")
        end
    else
        doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You are not online. Please log in to receive your prize.")
    end
    
    return true
end

	<action itemid="11638-11641" event="script" value="box2.lua"/>
	<action itemid="12331" event="script" value="box2.lua"/>
	<action itemid="15512" event="script" value="boxpascoa.lua"/>
     <action itemid="15511" event="script" value="box2.lua"/>
     <action itemid="1990" event="script" value="box2.lua"/>
	<action itemid="12227" event="script" value="box2.lua"/>
	<action itemid="15432" event="script" value="box2.lua"/>
	<action itemid="15488" event="script" value="box2.lua"/>

BEM GALERA, ESSA É UMA VERSÃO ATUALIZADA DAS BOX POKEMONS, AGORA PODENDO VIR ITENS ALEATORIOS JUNTO, NELA CONTEM TABELA DE UNIQUEITENS E LOSTITENS.

UNIQUE= OS ITENS INSERIDOS NA TABELA UNIQUE SÓ PODERA VIR UMA UNICA VEZ EXE: 11440 = BIKE, SÓ PODE VIR 1 DE SURPRESA

JA NA TABELA:

LOSTITES SE O ITEM 11440 ESTIVER NELA AS CHANCES DO ITEM VIR É RANDOMICO (300) <= 150, POREM O POKEMON CONTINUA VINDO NORMAL, O QUE NAO VEM É O ITEM INSERIDO NA TABELA LOST.

É ISSO ESPERO QUE GOSTEM.

Hirxzsx · 21 de Fevereiro

7 minutos atrás, luzetti06 disse:

local a = {
	[11638] = {
		pokemons = {"Aron", "Bagon", "Slowpoke", "Magnemite", "Doduo", "Seel", "Grimer", "Drowzee", "Voltorb",
			"Cubone", "Koffing", "Cyndaquil", "Pidgeotto", "Weepinbell", "Wooper", "Dratini", "Dunsparce", "Pichu", "Slugma", "Remoraid", "Ledyba",
			"Goldeen", "Vulpix", "Tentacool", "Bulbasaur", "Charmander", "Squirtle", "Metapod", "Kakuna",
			"Teddiursa", "Chikorita", "Chinchou", "Cleffa", "Marill", "Natu", "Smoochum", "Phanpy", "Slugma",
			"Ekans", "Abra", "Mankey", "Psyduck", "Sandshrew", "Kabuto", "Beedrill", "Omanyte", "Butterfree", "Snubbul", "Togepi",
			"Zubat", "Diglett", "Venonat", "Shuckle", "Mareep",
			"Meowth", "Poliwag", "Growlithe", "Machop", "Ponyta", "Geodude", "Hoothoot", "Pineco", "Sentret",
			"Swinub", "Totodile"
		},
		items = {2006, 2007, 2008, 2010, 2015, 2016, 2031, 2032}
	},

	
		[11639] = {pokemons = {"Lairon", "Shelgon", "Skiploom", "Raticate", "Ariados", "Flaffy", "Delibird", "Fearow", "Clefairy", "Arbok",
			"Nidorino", "Nidorina", "Elekid", "Magby", "Ledian",
			"Dodrio", "Golbat", "Gloom", "Parasect", "Venomoth", "Dugtrio", "Persian",
			"Poliwhirl", "Machoke", "Quilava", "Yanma",
			"Graveler", "Slowbro", "Magneton", "Farfetch'd", "Kingler", "Electrode",
			"Weezing", "Seadra", "Bayleef", "Croconaw", "Qwilfish", "Tyrogue",
			"Jigglypuff", "Seaking", "Tauros", "Starmie", "Eevee", "Charmeleon",
			"Wartortle", "Ivysaur", "Pikachu"
		},
		items = {2006, 2007, 2008, 2010, 2015, 2016, 2031, 2032}	
		
	},
	
		[11640] = {pokemons = {"Salamence", "Politoed", "Magcargo", "Noctowl", "Poliwrath", "Nidoking", "Pidgeot", "Sandslash", "Ninetales", "Vileplume",
			"Primeape", "Nidoqueen", "Granbull", "Jumpluff", "Golduck", "Kadabra", "Rapidash", "Azumarill", "Murkrow",
			"Clefable", "Wigglytuff", "Dewgong", "Onix", "Cloyster", "Hypno", "Exeggutor", "Marowak",
			"Hitmonchan", "Quagsire", "Stantler", "Xatu", "Hitmonlee", "Bellossom", "Lanturn", "Pupitar", "Smeargle",
			"Lickitung", "Golem", "Chansey", "Tangela", "Mr. Mime", "Pinsir", "Espeon", "Umbreon", "Vaporeon", "Jolteon", 
			"Flareon", "Porygon", "Dragonair", "Hitmontop", "Octillery", "Sneasel"
		},
		
		items = {2006, 2007, 2008, 2010, 2015, 2016, 2031, 2032}
		
	},
	
	
		[11641] = {pokemons = {"Absol", "Dragonite", "Snorlax", "Kabutops", "Omastar", "Kingdra",
			"Ampharos", "Blissey", "Donphan", "Girafarig", "Mantine", "Miltank", "Porygon2", "Skarmory", "Lapras", "Gyarados", "Magmar", "Electabuzz", "Jynx", "Scyther", "Kangaskhan",
			"Venusaur", "Crobat", "Heracross", "Meganium", "Piloswine", "Scizor",
			"Machamp", "Arcanine", "Charizard", "Blastoise", "Tentacruel",
			"Alakazam", "Feraligatr", "Houndoom",
			"Rhydon", "Misdreavus", "Wobbuffet", "Raichu", "Slowking", "Steelix", "Sudowoodo", "Typhlosion", "Tyranitar", "Ursaring"
		},
		items = {2006, 2007, 2008, 2010, 2015, 2016, 2031, 2032}
		
	},
	
		[12331] = {pokemons = {"Shiny Abra"},
		items = {2006, 2007, 2008, 2010, 2015, 2016, 2031, 2032}
		
	},
		[12227] = {pokemons = {"Shiny Weezing", "Shiny Swampert", "Shiny Sceptile", "Shiny Tropius", "Shiny Venusaur", "Shiny Charizard", "Shiny Blastoise", "Shiny Arcanine", "Shiny Alakazam", "Shiny Ninetales",
			"Shiny Scyther", "Shiny Umbreon", "Shiny Pidgeot", "Shiny Raichu", "Shiny Tentacruel", "Shiny Ampharos", "Shiny Feraligatr", 
			"Shiny Jynx", "Shiny Gyarados", "Shiny Politoed", "Shiny Typhlosion", "Shiny Tauros", 
			"Shiny Venomoth", "Shiny Espeon", "Shiny Magneton", "Shiny Larvitar", 
			"Shiny Golbat", "Shiny Kingler", "Shiny Farfetch'd", "Shiny Pinsir", "Shiny Dratini",
		"Shiny Electrode", "Shiny Muk", "Shiny Stantler", "Shiny Seadra", "Shiny Mr. Mime"},
		items = {14440, 2160, 22003, 11442, 11441, 11447, 12401, 21079, 21998}
		
	},
	
	
		[15488] = {pokemons = {"Mega Absol", "Mega Steelix", "Mega Lucario", "Mega Swampert", "Mega Sceptile", "Mega Wobbuffet", "Mega Blaziken", "Mega Raichu", "Mega Blastoise", "Mega Alakazam", "Mega Slowbro", "Mega Aerodactyl", "Mega Scizor", "Mega Tyranitar", "Mega Gengar", "Mega Glalie", "Mega Kangaskhan", "Mega Ampharos", "Mega Venusaur"},
		items = {2006, 2007, 2008, 2010, 2015, 2016, 2031, 2032}
		
	},
		[1990] = {pokemons = {"Ditto"},
		items = {2006, 2007, 2008, 2010, 2015, 2016, 2031, 2032}
		
	},
		[15432] = {pokemons = {"Shedinja", "Shiny Hitmonlee", "Shiny Hitmonchan", "Wailord", "Electivire", "Magmortar", "Banette", "Sableye", "Honchkrow", "Abomasnow", "Swellow", "Shiftry", "Tropius", "Armaldo", "Ludicolo", "Togekiss", "Luxray", "Bronzong", "Lucario", "Tangrowth", "Flygon", "Aggron", "Mawile", "Slaking", "Duskinoir", "Glalie", "Ninjask", "Gardevoir", "Toxicroak", "Rhyperior", "Altaria"},
		items = {2006, 2007, 2008, 2010, 2015, 2016, 2031, 2032}
		
	}
	
	--se for por mais box por uma , ali na parte de cima
}

local uniqueItems = {
    [14440] = true,

}

local lostItems = {
    [14440] = true, 
}

function onUse(cid, item, frompos, item2, topos)
    local b = a[item.itemid]
    if not isPlayer(cid) then return true end 
    if not b then return true end
    local pokemon = b.pokemons[math.random(#b.pokemons)]
    if not pokes[pokemon] then return true end
    
    local prizeItemId = b.items[math.random(#b.items)] -- Seleciona um item aleatorio da lista de itens
    local prizeItemName = getItemNameById(prizeItemId) -- obtem o nome do item pelo ID
    local quantity = 1 -- Por padrao, assume que o item é unico
    
    if lostItems[prizeItemId] then
        -- Se o item está na tabela lostItems, reduza a chance de aparecer
        if math.random(300) <= 150 then
            doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Você abriu uma caixa de prêmios Pokémon, mas perdeu o item surpresa: "..prizeItemName..". Mais sorte na próxima vez!")
            doRemoveItem(item.uid, 1)
            -- Adiciona o poke independentemente do resultado do item perdido
            addPokeToPlayer(cid, pokemon, 0, nil, btype) -- Alterado v1.9
            return true
        end
    else
        -- Se o item nao esta na tabela lostItems, gera uma quantidade aleatorio de 1 a 5
        quantity = math.random(1, 5)
    end
    
    doPlayerSendTextMessage(cid, 27, "Você abriu uma caixa de prêmios Pokémon!")
    doPlayerSendTextMessage(cid, 27, "O Pokémon prêmio era um "..pokemon.." e você também recebeu "..quantity.." "..prizeItemName.."(s). Parabéns!")
    doSendMagicEffect(getThingPos(cid), 29)
    
    addPokeToPlayer(cid, pokemon, 0, nil, btype) -- Alterado v1.9
    if isPlayerOnline(cid) then
        doPlayerAddItem(cid, prizeItemId, quantity) -- Adiciona a quantidade aleatoria do item ao jogador
        doRemoveItem(item.uid, 1)
        if useOTClient then
            doCreatureExecuteTalkAction(cid, "/salvar")
        end
    else
        doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You are not online. Please log in to receive your prize.")
    end
    
    return true
end

	<action itemid="11638-11641" event="script" value="box2.lua"/>
	<action itemid="12331" event="script" value="box2.lua"/>
	<action itemid="15512" event="script" value="boxpascoa.lua"/>
     <action itemid="15511" event="script" value="box2.lua"/>
     <action itemid="1990" event="script" value="box2.lua"/>
	<action itemid="12227" event="script" value="box2.lua"/>
	<action itemid="15432" event="script" value="box2.lua"/>
	<action itemid="15488" event="script" value="box2.lua"/>

BEM GALERA, ESSA É UMA VERSÃO ATUALIZADA DAS BOX POKEMONS, AGORA PODENDO VIR ITENS ALEATORIOS JUNTO, NELA CONTEM TABELA DE UNIQUEITENS E LOSTITENS.

UNIQUE= OS ITENS INSERIDOS NA TABELA UNIQUE SÓ PODERA VIR UMA UNICA VEZ EXE: 11440 = BIKE, SÓ PODE VIR 1 DE SURPRESA

JA NA TABELA:

LOSTITES SE O ITEM 11440 ESTIVER NELA AS CHANCES DO ITEM VIR É RANDOMICO (300) <= 150, POREM O POKEMON CONTINUA VINDO NORMAL, O QUE NAO VEM É O ITEM INSERIDO NA TABELA LOST.

É ISSO ESPERO QUE GOSTEM.

tópico aprovado, agradecemos por sua contribuição!

Wang · 21 de Fevereiro

Tópico Aprovado!
Somos gratos por sua contribuição, com certeza será útil para toda a comunidade! ❤️ REP+

Entrar

tibiadevs Box Pokémon, com itens surpresas extras.

Posts Recomendados

luzetti06 7

Link para o comentário

Compartilhar em outros sites

Hirxzsx 351

Link para o comentário

Compartilhar em outros sites

Wang 1.359

Link para o comentário

Compartilhar em outros sites

Crie uma conta ou entre para comentar

Criar uma conta

Entrar

Principal

Diversos

Suporte

Tutoriais

Atividade