[RELEASE] Custom Morpher!

**RetailIsFailure** · 02-21-2009

Here is the SQL and LUA for the morpher!

Replace everything in red with what you want. Make sure you do replace all thats in red so the morpher actually works.

Code:

insert into `creature_names` (`entry`, `name`, `subname`, `info_str`, `Flags1`, `type`, `family`, `rank`, `unk4`, `spelldataid`, `male_displayid`, `female_displayid`, `male_displayid2`, `female_displayid2`, `unknown_float1`, `unknown_float2`, `civilian`, `leader`) 
values ('PUT ANY ENTRY ID HERE', "PUT NAME OF MORPHER HERE", "PUT SUBNAME OF MORPHER HERE", '', '0', '10', '0', '0', '0', '0', '24191', '0', '0', '0', '1', '1', '0', '0');

insert into `creature_proto` (`entry`, `minlevel`, `maxlevel`, `faction`, `minhealth`, `maxhealth`, `mana`, `scale`, `npcflags`, `attacktime`, `attacktype`, `mindamage`, `maxdamage`, `can_ranged`, `rangedattacktime`, `rangedmindamage`, `rangedmaxdamage`, `respawntime`, `armor`, `resistance1`, `resistance2`, `resistance3`, `resistance4`, `resistance5`, `resistance6`, `combat_reach`, `bounding_radius`, `auras`, `boss`, `money`, `invisibility_type`, `death_state`, `walk_speed`, `run_speed`, `fly_speed`, `extra_a9_flags`, `spell1`, `spell2`, `spell3`, `spell4`, `spell_flags`, `modImmunities`) 
values ('PUT THE ENTRY ID HERE', '100', '100', '35', '1234321', '1234321', '1234321', '1', '1', '1000', '0', '999999', '999999', '0', '0', '0', '0', '0', '99999', '999', '999', '999', '999', '999', '999', '0', '0', "0", '1', '0', '0', '0', '2.50', '8.00', '14.00', '0', '0', '0', '0', '0', '0', '0');

And the LUA for the Morpher, copy and paste this into Notepad and save it as .lua.

Code:

function On_Gossip(unit, event, player)
unit:GossipCreateMenu(50, player, 0)
unit:GossipMenuAddItem(0, "Morphs", 1, 0)
unit:GossipMenuAddItem(0, "Heal meh  please!", 3, 0)
unit:GossipSendMenu(player)
end

function Gossip_Submenus(unit, event, player, id, intid, code)
if(intid == 75) then
unit:GossipCreateMenu(69, player, 0)
unit:GossipMenuAddItem(0, "Morphs", 1, 0)
unit:GossipMenuAddItem(0, "Heal Me!", 3, 0)
unit:GossipSendMenu(player)
end

if(intid == 3) then
player:CastSpell(25840)
player:GossipComplete()
end

if(intid == 1) then
unit:GossipCreateMenu(51, player, 0)
unit:GossipMenuAddItem(1, "Succubus", 20, 0)
unit:GossipMenuAddItem(1, "The Lich King (Arthas)", 21, 0)
unit:GossipMenuAddItem(1, "Stormwind Guard Male", 22, 0)
unit:GossipMenuAddItem(1, "Stormwind Guard Female", 29, 0)
unit:GossipMenuAddItem(1, "Stormwind King", 23, 0)
unit:GossipMenuAddItem(1, "Defias Female", 24, 0)
unit:GossipMenuAddItem(1, "Defias Male", 25, 0)
unit:GossipMenuAddItem(1, "Child (Girl)", 26, 0)
unit:GossipMenuAddItem(1, "Child (Boy)", 27, 0)
unit:GossipMenuAddItem(1, "Ghost Scourge", 28, 0)
unit:GossipMenuAddItem(1, "Varimathras", 30, 0)
unit:GossipMenuAddItem(1, "Fel Hunter", 31, 0)
unit:GossipMenuAddItem(1, "Mini-Ent", 32, 0)
unit:GossipMenuAddItem(1, "Cow", 33, 0)
unit:GossipMenuAddItem(1, "Arugal", 34, 0)
unit:GossipMenuAddItem(1, "Mutant Troll", 35, 0)
unit:GossipMenuAddItem(1, "Next Page", 2, 0)
unit:GossipSendMenu(player)
end

if(intid == 2) then
unit:GossipCreateMenu(51, player, 0)
unit:GossipMenuAddItem(1, "Stone Golem", 36, 0)
unit:GossipMenuAddItem(1, "Beetle Fly", 37, 0)
unit:GossipMenuAddItem(1, "Gnome Racer", 38, 0)
unit:GossipMenuAddItem(1, "Pimp", 39, 0)
unit:GossipMenuAddItem(1, "Angel", 40, 0)
unit:GossipMenuAddItem(1, "Mine", 41, 0)
unit:GossipMenuAddItem(1, "T6 Draenei Paladin", 42, 0)
unit:GossipMenuAddItem(1, "Skunk", 43, 0)
unit:GossipMenuAddItem(1, "Wind Warrior", 44, 0)
unit:GossipMenuAddItem(1, "Wall-E", 45, 0)
unit:GossipMenuAddItem(1, "Kute-Penguin", 46, 0)
end

if(intid == 20) then
player:SetModel(159)
player:GossipComplete()
end

if(intid == 21) then
player:SetModel(24191)
player:GossipComplete()
end

if(intid == 22) then 
player:SetModel(3167)
player:GossipComplete()
end

if(intid == 23) then
player:SetModel(28127)
player:GossipComplete()
end

if(intid == 24) then
player:SetModel(2315)
player:GossipComplete()
end

if(intid == 25) then
player:SetModel(2314)
player:GossipComplete()
end

if(intid == 26) then
player:SetModel(252)
player:GossipComplete()
end

if(intid == 27) then
player:SetModel(251)
player:GossipComplete()
end

if(intid == 28) then
player:SetModel(26064)
player:GossipComplete()
end

if(intid == 29) then
player:SetModel(5446)
player:GossipComplete()
end

if(intid == 30) then
player:SetModel(11658)
player:GossipComplete()
end

if(intid == 31) then
player:SetModel(850)
player:GossipComplete()
end

if(intid == 32) then
player:SetModel(860)
player:GossipComplete()
end

if(intid == 33) then2353
player:SetModel(1060)
player:GossipComplete()
end

if(intid == 34) then
player:SetModel(2353)14832
player:GossipComplete()
end

if(intid == 35) then
player:SetModel(14832)
player:GossipComplete()
end

if(intid == 36) then
player:SetModel(2234)
player:GossipComplete()
end

if(intid == 37) then
player:SetModel(2303)
player:GossipComplete()
end

if(intid == 38) then
player:SetModel(2490)
player:GossipComplete()
end

if(intid == 39) then
player:SetModel(26075)
player:GossipComplete()
end

if(intid == 40) then
player:SetModel(26077)
player:GossipComplete()
end

if(intid == 41) then
player:SetModel(26120)
player:GossipComplete()
end

if(intid == 42) then
player:SetModel(22968)
player:GossipComplete()
end

if(intid == 43) then
player:SetModel(26301)
player:GossipComplete()
end

if(intid == 44) then
player:SetModel(26380)
player:GossipComplete()
end

if(intid == 45) then
player:SetModel(26442)
player:GossipComplete()
end

if(intid == 46) then
player:SetModel(26452)
player:GossipComplete()
end
end

RegisterUnitGossipEvent(PUT THE ENTRY ID HERE, 1, "On_Gossip")
RegisterUnitGossipEvent(PUT THE ENTRY ID HERE, 2, "Gossip_Submenus")

And there you go, hope it works! Tested on ArcEmu Ascent, works fine for meh.