[LUA] Flying Mount

[colincancer]

Like the title says this is an LUA Flying Mount...

The LUA

local itemid = Item Id
function Item_Trigger(item, event, player)
    Item_menu(item, player)
end
function Item_menu(item, player)
 
    if (player:IsInCombat() == true) then
    player:SendAreaTriggerMessage("You are in combat!")
    else                          
    item:GossipCreateMenu(3543, player, 0)
    item:GossipMenuAddItem(4, "Mount me on a Dragon", 2, 0)
    item:GossipMenuAddItem(4, "Dismount", 3, 0)
    item:GossipSendMenu(player)
    end
end
function OnSelect(item, event, player, id, intid, code)

    if (intid == 2) then
    Player:SetFlying()
    Player:ModifyRunSpeed(21)
    player:SetModel(22841)
    end
    if (intid == 3) then
    player:SetMovementType(256)
    player:ModifyRunSpeed(7.5)
    player:SetModel(0)
    end
end
 
RegisterItemGossipEvent(Item Id,1,"Item_Trigger")
RegisterItemGossipEvent(Item Id,2,"OnSelect")

The Item

INSERT INTO `items` (`class`, `subclass`, `name1`, `name2`, `name3`, `name4`, `displayid`, `quality`, `buyprice`, `sellprice`, `itemlevel`, `ContainerSlots`, `unique`, `maxcount`, `bonding`, `stat_type1`, `stat_value1`, `stat_type2`, `stat_value2`, `stat_type3`, `stat_value3`, `stat_type4`, `stat_value4`, `stat_type5`, `stat_value5`, `stat_type6`, `stat_value6`, `stat_type7`, `stat_value7`, `stat_type8`, `stat_value8`, `dmg_min1`, `dmg_max1`, `dmg_type1`, `dmg_min2`, `dmg_max2`, `dmg_type2`, `dmg_min3`, `dmg_max3`, `dmg_type3`, `dmg_min4`, `dmg_max4`, `dmg_type4`, `dmg_min5`, `dmg_max5`, `dmg_type5`, `delay`, `range`, `holy_res`, `fire_res`, `nature_res`, `frost_res`, `shadow_res`, `arcane_res`, `armor`, `block`, `spellid_1`, `spelltrigger_1`, `spellcharges_1`, `spellcooldown_1`, `spellcategory_1`, `spellcategorycooldown_1`, `spellid_2`, `spelltrigger_2`, `spellcharges_2`, `spellcooldown_2`, `spellcategory_2`, `spellcategorycooldown_2`, `spellid_3`, `spelltrigger_3`, `spellcharges_3`, `spellcooldown_3`, `spellcategory_3`, `spellcategorycooldown_3`, `spellid_4`, `spelltrigger_4`, `spellcharges_4`, `spellcooldown_4`, `spellcategory_4`, `spellcategorycooldown_4`, `spellid_5`, `spelltrigger_5`, `spellcharges_5`, `spellcooldown_5`, `spellcategory_5`, `spellcategorycooldown_5`, `allowableclass`, `allowablerace`, `RequiredSkill`, `RequiredSkillRank`, `RequiredSkillSubRank`, `RequiredFaction`, `RequiredFactionStanding`, `requiredlevel`, `inventorytype`, `quest_id`, `sheathID`, `itemset`, `MaxDurability`, `Description`, `socket_color_1`, `socket_color_2`, `socket_color_3`, `socket_bonus`, `entry`) VALUES ('8', '-1', 'Custom Mount', 'Custom Mount', 'Custom Mount', 'Custom Mount', '2324', '1', '0', '0', '0', '0', '1', '1', '1', '0', '0', '0', '0', '0', '0', '0', '0', '0', '0', '0', '0', '0', '0', '0', '0', '0', '0', '0', '0', '0', '0', '0', '0', '0', '0', '0', '0', '0', '0', '0', '0', '0', '0', '0', '0', '0', '0', '0', '0', '0', '33208', '0', '579', '0', '0', '0', '0', '0', '0', '0', '0', '0', '0', '0', '0', '0', '0', '0', '0', '0', '0', '0', '0', '0', '0', '0', '0', '0', '0', '0', '1503', '1791', '0', '0', '0', '0', '0', '0', '0', '0', '0', '0', '0', '', '0', '0', '0', '0', 'Item Id');

Make sure to modify the red bold things...enjoy!

[EmiloZ]

omfg thx, +Rep x4

[RoRo9300]

How is it different from normal mounts, besides being a lua?

[EmiloZ]

With this one you can make it give you another speed and model to ride on.

[forces]

You can turn any item into a mount. That's how.

[2dgreengiant]

this is actually pretty hawt +9

[Shao111]

Good stuff, I don't currently use LUA (I'm on Mangos) but, +Rep

[colincancer]

haha thanks

[rm60kid]

sick.....+Rep

[marcojoao]

i cant use... :/ i usimg whydb and rebornemu...
need help! i give +rep! for helper

[Twisted7]

This is awesome, nice job dude!

[kreegoth]

local itemid = 88765
function Item_Trigger(item, event, player)
    Item_menu(item, player)
end
function Item_menu(item, player)
 
    if (player:IsInCombat() == true) then
    player:SendAreaTriggerMessage("You are in combat!")
    else                          
    item:GossipCreateMenu(3543, player, 0)
    item:GossipMenuAddItem(4, "Mount", 2, 0)
    item:GossipMenuAddItem(4, "Dismount", 3, 0)
    item:GossipSendMenu(player)
    end
end
function OnSelect(item, event, player, id, intid, code)

    if (intid == 2) then
    Player:SetFlying()
    Player:ModifyRunSpeed(15)
    player:SetModel(6376)
    end
    if (intid == 3) then
    player:SetMovementType(256)
    player:ModifyRunSpeed(7.5)
    player:SetModel(0)
    end
end
 
RegisterItemGossipEvent(88765,1,"Item_Trigger")
RegisterItemGossipEvent(88765,2,"OnSelect")

Loads fine in Worldserver.exe.

But when i click item i get the menu.
I click mount Nothing happens.

In window i get
Value expected near player got nil.

Any suggestions?

[Anthraxx]

Very nice +rep x2 to you

[EmiloZ]

local itemid = 88765
function Item_Trigger(item, event, player)
    Item_menu(item, player)
end
function Item_menu(item, player)
 
    if (player:IsInCombat() == true) then
    player:SendAreaTriggerMessage("You are in combat!")
    else                          
    item:GossipCreateMenu(3543, player, 0)
    item:GossipMenuAddItem(4, "Mount", 2, 0)
    item:GossipMenuAddItem(4, "Dismount", 3, 0)
    item:GossipSendMenu(player)
    end
end
function OnSelect(item, event, player, id, intid, code)

    if (intid == 2) then
    Player:SetFlying()
    Player:ModifyRunSpeed(15)
    player:SetModel(6376)
    end
    if (intid == 3) then
    player:SetMovementType(256)
    player:ModifyRunSpeed(7.5)
    player:SetModel(0)
    end
end
 
RegisterItemGossipEvent(88765,1,"Item_Trigger")
RegisterItemGossipEvent(88765,2,"OnSelect")

Loads fine in Worldserver.exe.

But when i click item i get the menu.
I click mount Nothing happens.

In window i get
Value expected near player got nil.

Any suggestions?

Me too :S It loads fine but the items i clicks just dosnt do anything. Dosnt bring up the menu,
If you know what i mean

[Mr.Jebus Christ]

no offense but it looks like this was stolen from [Leet RELEASE] Lua Flying Mount - AC Web