- Joined
- Oct 20, 2008
- Messages
- 237
- Reaction score
- 39
These First Script named [Lua] So I herd u liek Mudkipz is made by hypersniper
--=[LUAS]=--
--=[[Lua] So I herd u liek Mudkipz]=--
Then you're in for a treat.
Requires Arcscripts r1028+
Mudkip PvP AI Companion
This script is a scripted item that summons a Mudkip NPC that follows the owner around like a guardian. This Mudkip is no ordinary mudkip. He takes on the role of an arena partner, imitating a PvP player. When in combat, he is a devastating force, when out of combat, he is a funny, fun-loving sidekick. It's AI is based on a prioritised "state" system; where the mudkip picks his state based on the environment. He has 5 state to choose from: non combat, regular combat, owner in danger, self in trouble, and self critical. He does different things in each state.
Non combat: Just follows you around and has 10 unique and funny chat messages that trigger roughly every 10 min.
Combat: This is his usual combat mode. He attacks using Frost shock, Frostbolt and Waterbolt depending on whether he has enough mana to cast them and if they are on cooldown. There is a rare chance that he may do something special instead of those regular spells .
Owner in danger: He performs a combo involving charging the enemy, sling mud (reducing hit chance) the enemy and healing the player.
Self in trouble: This is when the Mudkip is hindered in some way, he attempts to get out of his trouble via Trinket, Escape Artist or Ice block.
Self critical: The kip will activate his speed booster, run away from enemies and heal himself; he will also try to Ice block to protect himself if he's really in trouble.
Ending notes
That was just a summary of the script, what lies beneath is a hand-made spell casting and cooldown system, as well as extensive table use. Please ask any questions about the script here if I comments don't explain enough. I hope this can be fun as well as a learning opportunity. It's not 100% tested, but I tested the important things such as state transition and critical shared functions .
Recommended SQL
ITEM
NPC
Screenshots
--=[[Lua]Another Command System]=--
This command system for Voters and Donators of a server, and I decided to release script.
--=[[Lua] Combo NPC]=--
Description
Hi all. I maked this small Lua script.So what it does?? Hmm, Well its small "Combo NPC" He can teleport you to Mall,Lvling Road And he has some special Fuctions...
How menu looks?
Like this:
--Mall
--Leveling Area
--------------------
-NPC Windows
--Trainer
--InnKeeper
--Bank Window
--Auction Window
Nevermind
----------------
-Player Tools
--Player Speed (25)
--Sex Changer
Nevermind
--Show My Honor
--Show My Arena Points
Nevermind.
How to work
Copy this code down and read first lines before " --Do not touch after this comment-- " put it in scripts save as Itembank.lua and restart the server
Remember you need to make NPC..
-=[[Lua] Item Bank]=-
Description
Hi all. I maked these small Lua file for them that wants a quick and easy Banker.
How to work
Copy this code down change ItemID put it in scripts save as Itembank.lua and restart the server
Remember you need to make item...
--=[[Lua] Revive Tool]=--
THis script allow you to revive yourself with and item.
Here is script:
Change ITEMID and then add in scripts and restart server...
--=[SQL]=--
-=[[SQL]LunarSCR Leveling Road]=-
Description
Hi all. I maked these small SQL files for them that wants a quick and easy Leveling Road-Hyjal.
For now there are only spawned mobs but soon more game objects etc...
You will be suprised..
How to work
Execute the sql into your database and restart the server
Then do .recall port Hyjal and everything will be spawned
To DO: Add loots, Add Custom GoObjects,
Add Starter Gear with Npc, Add Buffer,
Custom Bosses -=[Lua]=-, Fancy begin of leveling road,
Items for level 1-255, At End Head Boss....
PICTURES
soon...
-=[Download]=-
-=[Credits:]=-
-=[Me - For spawning and creating mobs]=-
-=[[SQL]ArcEmu Funserver StarterGear Items + NPC]=-
Description
Okay so here are starter items for arcemu, 1 set and all types of weapons..
Remeber it is for Funservers if you don't like stats change them but do not change my credits from item please... if you wanna delete credits ask me.
How to work
[SIZE=2Well easy as hell. Just execute SQL files and restart your server...[/SIZE]
PICTURES
Download
-=[[SQL]Mega Go Objects]=-
Description
I wont add any screen because there is to many GOs.It is for Arcemu like all my other releases . So there are maybe about 900 !!CUSTOM!! go objects found by me..
How to work
Well easy as hell. Just execute SQL files and restart your server...
Download
--=[C++]=--
--=[[C++] Hello Message]=--
Okay here you go some simple C++ script..
When you enter in world you get in middle message like Raid Message..
--=[LUAS]=--
--=[[Lua] So I herd u liek Mudkipz]=--
Then you're in for a treat.
You must be registered to see links
Requires Arcscripts r1028+
Mudkip PvP AI Companion
This script is a scripted item that summons a Mudkip NPC that follows the owner around like a guardian. This Mudkip is no ordinary mudkip. He takes on the role of an arena partner, imitating a PvP player. When in combat, he is a devastating force, when out of combat, he is a funny, fun-loving sidekick. It's AI is based on a prioritised "state" system; where the mudkip picks his state based on the environment. He has 5 state to choose from: non combat, regular combat, owner in danger, self in trouble, and self critical. He does different things in each state.
Non combat: Just follows you around and has 10 unique and funny chat messages that trigger roughly every 10 min.
Combat: This is his usual combat mode. He attacks using Frost shock, Frostbolt and Waterbolt depending on whether he has enough mana to cast them and if they are on cooldown. There is a rare chance that he may do something special instead of those regular spells .
Owner in danger: He performs a combo involving charging the enemy, sling mud (reducing hit chance) the enemy and healing the player.
Self in trouble: This is when the Mudkip is hindered in some way, he attempts to get out of his trouble via Trinket, Escape Artist or Ice block.
Self critical: The kip will activate his speed booster, run away from enemies and heal himself; he will also try to Ice block to protect himself if he's really in trouble.
Ending notes
That was just a summary of the script, what lies beneath is a hand-made spell casting and cooldown system, as well as extensive table use. Please ask any questions about the script here if I comments don't explain enough. I hope this can be fun as well as a learning opportunity. It's not 100% tested, but I tested the important things such as state transition and critical shared functions .
You must be registered to see links
Recommended SQL
ITEM
You must be registered to see links
NPC
Code:
insert into `creature_names` (`entry`, `name`, `subname`, `info_str`, `Flags1`, `type`, `family`, `rank`, `killcredit1`, `killcredit2`, `male_displayid`, `female_displayid`, `male_displayid2`, `female_displayid2`, `unknown_float1`, `unknown_float2`, `leader`)
values ('133760', "Frenzied Mudkip", "", '', '0', '1', '0', '0', '0', '0', '25157', '0', '0', '0', '1', '1', '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`, `summonguard`)
values ('133760', '80', '80', '7', '23400', '23400', '43200', '1', '0', '1500', '0', '100', '200', '0', '0', '0', '0', '0', '2555', '0', '0', '0', '0', '0', '0', '0', '0', "0", '0', '0', '0', '0', '2.50', '8.00', '14.00', '0', '0', '0', '0', '0', '0', '0', '0');
Screenshots
--=[[Lua]Another Command System]=--
This command system for Voters and Donators of a server, and I decided to release script.
Code:
-- Locals --
--[[Messages]]--
local MSG_COMMANDS = ":commands" -- Provides info about all the player commands
local MSG_BG_MASTER = ":battlemaster" -- Creates a battlemaster
local MSG_HOME = ":home" -- Teleports player to hearthstone loc.
local MSG_SICKNESS = ":sickness" -- Removes ress sickness
local MSG_REPAIR = ":repair" -- Repairs all items
local MSG_SUPPLIES = ":supplies" -- Shows the submenus of different vendors
local MSG_SUPPLIES_REAGENT = ":supplies reagent" -- spawns reagent supply vendor
local MSG_SUPPLIES_TRADE = ":supplies trade" -- spawns trade supplies vendor
local MSG_BUFFS = ":buffs" -- Gives buffs to the player
local MSG_CLASS_TRAINER = ":classtrainer" -- Submenus with classtrainers
local MSG_CLASS_DK = ":classtrainer dk"
local MSG_CLASS_DRUID = ":classtrainer druid"
local MSG_CLASS_HUNTER = ":classtrainer hunter"
local MSG_CLASS_MAGE = ":classtrainer mage"
local MSG_CLASS_PALADIN = ":classtrainer paladin"
local MSG_CLASS_PRIEST = ":classtrainer priest"
local MSG_CLASS_ROGUE = ":classtrainer rogue"
local MSG_CLASS_SHAMAN = ":classtrainer shaman"
local MSG_CLASS_WARLOCK = ":classtrainer warlock"
local MSG_CLASS_WARRIOR = ":classtrainer warrior"
local MSG_MALL_ALLY = ":mall alliance" -- Teleports player to ally mall
local MSG_MALL_HORDE = ":mall horde" -- Teleports player to horde mall
--[[Donator Commands]]--
local MSG_BANK = ":bank" -- Opens a bank window for the player - DONATORS ONLY!
local MSG_HOME_SET = ":home set" -- Set's a home point at the players current position - DONATORS ONLY!
local MSG_TALENT_RESET = ":reset talents" -- Resets the players talents for free - DONATORS ONLY!
local MSG_REFRESHMENTS = ":refreshments" -- Adds food and water to the players inventory - DONATORS ONLY!
--[[Donator Commands]]--
--[[Messages]]--
--[[Variables]]--
local BUFFID = {58452, 48**** 48102, 48469, 61024, 20217, 48161, 48073, 48169, 54675, 15366, 33077, 53307, 43017, 56*** 1*** 1706, 16618, 48**** 58451} -- Put the buffs you want here
local FOOD = 45932 -- Put ID for food here
local DRINK = 42777 -- ID for water
--[[ This Command system uses a check for tokens aquired by Voters and Donators.
If there is requests, I'll make a command system without these]]--
local VOTETOKEN = -- Voters Token ID
local DONORTOKEN = -- Donators Token ID
--Alliance Mall Coords
local ALLYX = -- Put the X coords for alliance mall here
local ALLYY = -- Put Y coords for alliance mall here
local ALLYZ = -- Put Z coords for alliance mall here
local ALLYMAP = -- Ally MapID goes here
--Horde Mall Coords
local HORDEX = --X coords for horde mall
local HORDEY = --Y coords for the horde mall
local HORDEZ = --Z coords for the horde mall
local HORDEMAP = --MapID for the horde mall
--[[Variables]]--
--[[ Functions]]--
function PlayerCommands_OnChat(event, player, message, type, language)
local LCM = message:lower()
if (LCM == MSG_COMMANDS) then
if(player:GetItemCount(VOTETOKEN) == 1) then
if (player:GetItemCount(DONORTOKEN) == 1) then
player:SendBroadcastMessage("Current player commands are:")
player:SendBroadcastMessage("':battlemaster' - Spawns a 'personal' battlemaster which can grant access to all BG's")
player:SendBroadcastMessage("':buffs' - Grants you certain standard buffs")
player:SendBroadcastMessage("':classtrainer' - Shows submenus of different trainers")
player:SendBroadcastMessage("':home' - Instantly teleports you to your current hearthstone location")
player:SendBroadcastMessage("':mall <faction>' - Teleports you to your factions mall)")
player:SendBroadcastMessage("':sickness' - Removes Ressurection Sickness")
player:SendBroadcastMessage("':supplies' - Shows submenus for spawning supply vendors")
player:SendBroadcastMessage("|cff0000ffDonator Only Commands:")
player:SendBroadcastMessage("|cff0000ff':bank' - Opens a bank window for you to store items")
player:SendBroadcastMessage("|cff0000ff':home set' - Sets your current position as home. To teleport to home location see ':home'")
player:SendBroadcastMessage("|cff0000ff':reset talents' - Resets your talents with no gold cost")
player:SendBroadcastMessage("|cff0000ff':refreshments' - Adds food and water to your inventory")
player:SendBroadcastMessage("|cff0000ff':repair' - Instantly repairs all your items")
else
player:SendBroadcastMessage("Current player commands are:")
player:SendBroadcastMessage("':battlemaster' - Spawns a 'personal' battlemaster which can grant access to all BG's")
player:SendBroadcastMessage("':buffs' - Grants you certain standard buffs")
player:SendBroadcastMessage("':classtrainer' - Shows submenus of different trainers")
player:SendBroadcastMessage("':home' - Instantly teleports you to your current hearthstone location")
player:SendBroadcastMessage("':mall <faction>' - Teleports you to your factions mall)")
player:SendBroadcastMessage("':sickness' - Removes Ressurection Sickness")
player:SendBroadcastMessage("':supplies' - Shows submenus for spawning supply vendors")
player:SendBroadcastMessage("':repair' - Instantly repairs all your items")
end
else
player:SendAreaTriggerMessage("You do not have Voters Token! Get it by voting!")
end
end
if (LCM == MSG_BG_MASTER) then
if(player:GetItemCount(VOTETOKEN) == 1) then
local x = player:GetX()
local y = player:GetY()
local z = player:GetZ()
local o = player:GetO()
player:SpawnCreature(6090**** x, y, z, o, 35, 30000)
else
player:SendAreaTriggerMessage("|cff0000ffYou do not have Voters Token! Get it by voting!")
end
end
if (LCM == MSG_HOME) then
if(player:GetItemCount(VOTETOKEN) == 1) then
if (player:IsInCombat() == true) then
player:SendAreaTriggerMessage("|cff0000ffYou are in combat!")
else
player:CastSpell(8690)
end
else
player:SendAreaTriggerMessage("|cff0000ffYou do not have Voters Token! Get it by voting!")
end
end
if (LCM == MSG_SICKNESS) then
if(player:GetItemCount(VOTETOKEN) == 1) then
if(player:HasAura(15007) == true) then
player:RemoveAura(15007)
player:SendBroadcastMessage("You have been cured of that wretched sickness!")
else
player:SendBroadcastMessage("You do not currently have Resurrection Sickness!")
end
else
player:SendAreaTriggerMessage("|cff0000ffYou do not have Voters Token! Get it by voting!")
end
end
if (LCM == MSG_REPAIR) then
if(player:GetItemCount(VOTETOKEN) == 1) then
player:RepairAllPlayerItems()
player:SendBroadcastMessage("Your items are now repaired.")
else
player:SendAreaTriggerMessage("|cff0000ffYou do not have Voters Token! Get it by voting!")
end
end
if (LCM == MSG_SUPPLIES) then
if(player:GetItemCount(VOTETOKEN) == 1) then
player:SendBroadcastMessage("Supply vendors commands:")
player:SendBroadcastMessage("':supplies reagent' - Spawns a Reagent Supplies vendor for 30 seconds")
player:SendBroadcastMessage("':supplies trade' - Spawns a Trade Supplies vendor for 30 seconds")
else
player:SendAreaTriggerMessage("|cff0000ffYou do not have Voters Token! Get it by voting!")
end
end
if (LCM == MSG_SUPPLIES_REAGENT) then
if(player:GetItemCount(VOTETOKEN) == 1) then
local x = player:GetX()
local y = player:GetY()
local z = player:GetZ()
local o = player:GetO()
player:SpawnCreature(5139, x, y, z, o, 35, 30000)
else
player:SendAreaTriggerMessage("|cff0000ffYou do not have Voters Token! Get it by voting!")
end
end
if (LCM == MSG_SUPPLIES_TRADE) then
if(player:GetItemCount(VOTETOKEN) == 1) then
local x = player:GetX()
local y = player:GetY()
local z = player:GetZ()
local o = player:GetO()
player:SpawnCreature(3779, x, y, z, o, 35, 30000)
else
player:SendAreaTriggerMessage("|cff0000ffYou do not have Voters Token! Get it by voting!")
end
end
if (LCM == MSG_BUFFS) then
if(player:GetItemCount(VOTETOKEN) == 1) then
for k, v in pairs(BUFFS) do
player:CastSpell(v)
player:SendBroadcastMessage("You have been buffed")
end
else
player:SendAreaTriggerMessage("|cff0000ffYou do not have Voters Token! Get it by voting!")
end
end
if (LCM == MSG_CLASS_TRAINER) then
if(player:GetdItemCount(VOTETOKEN) == 1) then
player:SendBroadcastMessage("Class trainers commands:")
player:SendBroadcastMessage(":classtrainer dk")
player:SendBroadcastMessage(":classtrainer druid")
player:SendBroadcastMessage(":classtrainer hunter")
player:SendBroadcastMessage(":classtrainer mage")
player:SendBroadcastMessage(":classtrainer paladin")
player:SendBroadcastMessage(":classtrainer priest")
player:SendBroadcastMessage(":classtrainer rogue")
player:SendBroadcastMessage(":classtrainer shaman")
player:SendBroadcastMessage(":classtrainer warlock")
player:SendBroadcastMessage(":classtrainer warrior")
else
player:SendAreaTriggerMessage("|cff0000ffYou do not have Voters Token! Get it by voting!")
end
end
if (LCM == MSG_CLASS_DK) then
if(player:GetItemCount(VOTETOKEN) == 1) then
local x = player:GetX()
local y = player:GetY()
local z = player:GetZ()
local o = player:GetO()
player:SpawnCreature(28474, x, y, z, o, 35, 60000)
else
player:SendAreaTriggerMessage("|cff0000ffYou do not have Voters Token! Get it by voting!")
end
end
if (LCM == MSG_CLASS_DRUID) then
if(player:GetItemCount(VOTETOKEN) == 1) then
local x = player:GetX()
local y = player:GetY()
local z = player:GetZ()
local o = player:GetO()
player:SpawnCreature(3034, x, y, z, o, 35, 60000)
else
player:SendAreaTriggerMessage("|cff0000ffYou do not have Voters Token! Get it by voting!")
end
end
if (LCM == MSG_CLASS_HUNTER) then
if(player:GetItemCount(VOTETOKEN) == 1) then
local x = player:GetX()
local y = player:GetY()
local z = player:GetZ()
local o = player:GetO()
player:SpawnCreature(3039, x, y, z, o, 35, 60000)
else
player:SendAreaTriggerMessage("|cff0000ffYou do not have Voters Token! Get it by voting!")
end
end
if (LCM == MSG_CLASS_MAGE) then
if(player:GetItemCount(VOTETOKEN) == 1) then
local x = player:GetX()
local y = player:GetY()
local z = player:GetZ()
local o = player:GetO()
player:SpawnCreature(3047, x, y, z, o, 35, 60000)
else
player:SendAreaTriggerMessage("|cff0000ffYou do not have Voters Token! Get it by voting!")
end
end
if (LCM == MSG_CLASS_PALADIN) then
if(player:GetItemCount(VOTETOKEN) == 1) then
local x = player:GetX()
local y = player:GetY()
local z = player:GetZ()
local o = player:GetO()
player:SpawnCreature(928, x, y, z, o, 35, 60000)
else
player:SendAreaTriggerMessage("|cff0000ffYou do not have Voters Token! Get it by voting!")
end
end
if (LCM == MSG_CLASS_PRIEST) then
if(player:GetItemCount(VOTETOKEN) == 1) then
local x = player:GetX()
local y = player:GetY()
local z = player:GetZ()
local o = player:GetO()
player:SpawnCreature(376, x, y, z, o, 35, 60000)
else
player:SendAreaTriggerMessage("|cff0000ffYou do not have Voters Token! Get it by voting!")
end
end
if (LCM == MSG_CLASS_ROGUE) then
if(player:GetItemCount(VOTETOKEN) == 1) then
local x = player:GetX()
local y = player:GetY()
local z = player:GetZ()
local o = player:GetO()
player:SpawnCreature(918, x, y, z, o, 35, 60000)
else
player:SendAreaTriggerMessage("|cff0000ffYou do not have Voters Token! Get it by voting!")
end
end
if (LCM == MSG_CLASS_SHAMAN) then
if(player:GetItemCount(VOTETOKEN) == 1) then
local x = player:GetX()
local y = player:GetY()
local z = player:GetZ()
local o = player:GetO()
player:SpawnCreature(30*** x, y, z, o, 35, 60000)
else
player:SendAreaTriggerMessage("|cff0000ffYou do not have Voters Token! Get it by voting!")
end
end
if (LCM == MSG_CLASS_WARLOCK) then
if(player:GetItemCount(VOTETOKEN) == 1) then
local x = player:GetX()
local y = player:GetY()
local z = player:GetZ()
local o = player:GetO()
player:SpawnCreature(461, x, y, z, o, 35, 60000)
else
player:SendAreaTriggerMessage("|cff0000ffYou do not have Voters Token! Get it by voting!")
end
end
if (LCM == MSG_CLASS_WARRIOR) then
if(player:GetItemCount(VOTETOKEN) == 1) then
local x = player:GetX()
local y = player:GetY()
local z = player:GetZ()
local o = player:GetO()
player:SpawnCreature(914, x, y, z, o, 35, 60000)
else
player:SendAreaTriggerMessage("|cff0000ffYou do not have Voters Token! Get it by voting!")
end
end
if (LCM == MSG_MALL_ALLY) then
if(player:GetItemCount(VOTETOKEN) == 0) then
player:SendAreaTriggerMessage("|cff0000ffYou do not own the BlazeFury Voters Token. Get it by voting!")
else
if (player:IsInCombat() == true) then
player:SendAreaTriggerMessage("|cff0000ffYou are in combat!")
else
local race=player:GetPlayerRace()
if race==1 or race==3 or race==4 or race==7 or race==11 then
player:Teleport(ALLMAP, ALLYX, ALLYY, ALLYZ)
else
player:SendAreaTriggerMessage("|cff0000ffYou are not a member of the Alliance!")
end
end
end
end
if (LCM == MSG_MALL_HORDE) then
if(player:GetItemCount(VOTETOKEN) == 0) then
player:SendAreaTriggerMessage("|cff0000ffYou do not own the BlazeFury Voters Token. Get it by voting!")
else
if (player:IsInCombat() == true) then
player:SendAreaTriggerMessage("|cff0000ffYou are in combat!")
else
local race=player:GetPlayerRace()
if race==2 or race==5 or race==6 or race==8 or race==10 then
player:Teleport(HORDEMAP, HORDEX, HORDEY, HORDEZ)
else
player:SendAreaTriggerMessage("|cff0000ffYou are not a member of the Horde!")
end
end
end end
if (message == BANK_MSG) then
if(player:GetItemCount(DONORTOKEN) == 1) then
if (player:IsPlayerMoving() == true) then
player:SendAreaTriggerMessage("This feature can't be used while moving!")
else
player:SendBankWindow(unit)
end
else
player:SendAreaTriggerMessage("|cff0000ffYou are not a donator!")
end
end
if (message == BIND_MSG) then
if(player:GetItemCount(DONORTOKEN) == 1) then
player:SetBindPoint(x,y,z,map_id,zone_id)
end
else
player:SendAreaTriggerMessage("|cff0000ffYou are not a donator!")
end
if(message == MSG_TALENT_RESET) then
if(player:GetItemCount(DONORTOKEN) == 1) then
plr:SendBroadcastMessage("Your talents have been reseted!")
unit:ResetTalents()
else
player:SendAreaTriggerMessage("|cff0000ffYou are not a donator!")
end
end
if (message == MSG_REFRESHMENTS) then
if(player:GetItemCount(DONORTOKEN) == 1) then
player:AddItem(FOOD, 20)
player:AddItem(DRINK, 20)
else
player:SendAreaTriggerMessage("|cff0000ffYou are not a donator!")
end
end
end
--[[Functions]]--
--[[Register]]--
RegisterServerHook(16, "PlayerCommands_OnChat")
--=[[Lua] Combo NPC]=--
Description
Hi all. I maked this small Lua script.So what it does?? Hmm, Well its small "Combo NPC" He can teleport you to Mall,Lvling Road And he has some special Fuctions...
How menu looks?
Like this:
--Mall
--Leveling Area
--------------------
-NPC Windows
--Trainer
--InnKeeper
--Bank Window
--Auction Window
Nevermind
----------------
-Player Tools
--Player Speed (25)
--Sex Changer
Nevermind
--Show My Honor
--Show My Arena Points
Nevermind.
How to work
Copy this code down and read first lines before " --Do not touch after this comment-- " put it in scripts save as Itembank.lua and restart the server
Remember you need to make NPC..
Code:
-=[Combo NPC]=-
-=[LunarScriptors- Onlykl]=-
-- Change this down --
local NPC_ID = -- Npc ID here! You can make it with www.wow-v.com
local MallMapId = -- Enter Mall map id here
local MallMapX = -- Enter Mall X coords here
local MallMapY = -- Enter Mall Y coords here
local MallMapZ = -- Enter Mall Z coords here
local LevMapId = -- Enter LvlRoad map id here
local LevMapX = -- Enter LvlRoad leveling x coord here
local LevMapY = -- Enter LvlRoad leveling y coord here
local LevMapZ = -- Enter LvlRoad leveling z coord here
--Do not touch after this comment--
function Lunar_OnGossipTalk(pUnit, event, player)
pUnit:GossipCreateMenu(1, player, 0)
pUnit:GossipMenuAddItem(1,"Mall", 1, 0)
pUnit:GossipMenuAddItem(1,"Leveling Area", 2, 0)
pUnit:GossipMenuAddItem(0,"NPC Windows", 3,0)
pUnit:GossipMenuAddItem(0,"Player Tools", 4,0)
pUnit:GossipMenuAddItem(0,"Show My Honor", 5,0)
pUnit:GossipMenuAddItem(0,"Show My Arena Points", 6,0)
pUnit:GossipMenuAddItem(1,"Nevermind.", 9*** 0)
pUnit:GossipSendMenu(player)
end
function Lunar_OnGossipSelect(pUnit, Event, player, id, intid, code, pMisc)
if(intid == 1) then
player:Teleport(MallMapId, MallMapX, MallMapY, MallMapZ)
player:GossipComplete()
end
if(intid == 2) then
player:Teleport(LevMapId, LevMapX, LevMapY, LevMapZ)
player:GossipComplete()
end
if(intid == 3) then
pUnit:GossipCreateMenu(3545, player, 0)
pUnit:GossipMenuAddItem(0,"Trainer", 7,0)
pUnit:GossipMenuAddItem(0,"InnKeeper", 8,0)
pUnit:GossipMenuAddItem(0,"Bank Window", 9,0)
pUnit:GossipMenuAddItem(0,"Auction Window", 10,0)
pUnit:GossipMenuAddItem(0,"Nevermind", 9***0)
pUnit:GossipSendMenu(player)
end
if(intid == 4) then
pUnit:GossipCreateMenu(3546, player, 0)
pUnit:GossipMenuAddItem(0,"Player Speed (25)", 11,0)
pUnit:GossipMenuAddItem(0,"Sex Changer", 12,0)
pUnit:GossipMenuAddItem(0,"Nevermind", 9***0)
pUnit:GossipSendMenu(player)
end
if (intid == 5) then
player:GetTotalHonor()
player:GossipComplete()
end
if (intid == 6) then
player:GetArenaPoints()
player:GossipComplete()
end
if (intid == 7) then
player:SendTrainerWindow(unit)
player:GossipComplete()
end
if (intid == 8) then
player:SendInnkeeperWindow(unit)
player:GossipComplete()
end
if (intid == 9) then
player:SendBankWindow(unit)
player:GossipComplete()
end
if (intid == 10) then
player:SendAuctionWindow(unit)
player:GossipComplete()
end
if (intid == 11) then
player:SetPlayerSpeed(25)
player:GossipComplete()
end
if (intid == 12 and Player:GetGender() == 0) then
player:SendBroadcastMessage("Your gender has been changed!")
Player:SetGender(1)
elseif (Player:GetGender() == 1) then
Player:SendBroadcastMessage("Your gender has been changed!")
Player:SetGender(0)
end
if(intid == 999) then
player:GossipComplete()
end
end
RegisterUnitGossipEvent(NPC_ID, 1, "Lunar_OnGossipTalk")
RegisterUnitGossipEvent(NPC_ID, 2, "Lunar_OnGossipSelect")
Description
Hi all. I maked these small Lua file for them that wants a quick and easy Banker.
How to work
Copy this code down change ItemID put it in scripts save as Itembank.lua and restart the server
Remember you need to make item...
Code:
-=[LunarSCR-Onlykl]=-
local itemid = [COLOR=Red]ITEMID[/COLOR]
function Lunar_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(5555,player,0)
player:SendAreaTriggerMessage("Welcome to the bank service!")
item:GossipMenuAddItem(1, "<Bank>", 1, 0)
end
end
if (intid == 1) then
local x =player:GetX ()
local y =player:GetY ()
local z =player:GetZ ()
local o =player:GetO ()
player:SpawnCreature (8124, x, y+3, z, o, 35, 90000)
player:GossipComplete()
end
end
RegisterItemGossipEvent(ITEMID,1,"Lunar_Item_Trigger")
RegisterItemGossipEvent(ITEMID,2,"Lunar_OnSelect")
THis script allow you to revive yourself with and item.
Here is script:
Code:
---Coded by Lunar SCR Team---
--Our forum lunar-scr.info--
local itemid = ITEMID
function LunarSCR_Item_Trigger(item, event, player)
Item_menu(item, player)
end
function LunarSCR_Item_menu(item, player)
if (player:IsInCombat() == true) then
player:SendAreaTriggerMessage("You are in combat!")
else
item:GossipCreateMenu(**** player, 0)
item:GossipMenuAddItem(4, "Revive Me",1, 0)
item:GossipSendMenu(player)
end
if (intid == 1) then
player:FullCastSpellOnTarget(50768, player)
end
end
RegisterItemGossipEvent(ITEMID, 1,"LunarSCR_Item_Trigger")
RegisterItemGossipEvent(ITEMID, 2,"LunarSCR_Item_menu")
--=[SQL]=--
-=[[SQL]LunarSCR Leveling Road]=-
Description
Hi all. I maked these small SQL files for them that wants a quick and easy Leveling Road-Hyjal.
For now there are only spawned mobs but soon more game objects etc...
You will be suprised..
How to work
Execute the sql into your database and restart the server
Then do .recall port Hyjal and everything will be spawned
To DO: Add loots, Add Custom GoObjects,
Add Starter Gear with Npc, Add Buffer,
Custom Bosses -=[Lua]=-, Fancy begin of leveling road,
Items for level 1-255, At End Head Boss....
PICTURES
soon...
-=[Download]=-
You must be registered to see links
-=[Credits:]=-
-=[Me - For spawning and creating mobs]=-
-=[[SQL]ArcEmu Funserver StarterGear Items + NPC]=-
Description
Okay so here are starter items for arcemu, 1 set and all types of weapons..
Remeber it is for Funservers if you don't like stats change them but do not change my credits from item please... if you wanna delete credits ask me.
How to work
[SIZE=2Well easy as hell. Just execute SQL files and restart your server...[/SIZE]
PICTURES
Download
You must be registered to see links
-=[[SQL]Mega Go Objects]=-
Description
I wont add any screen because there is to many GOs.It is for Arcemu like all my other releases . So there are maybe about 900 !!CUSTOM!! go objects found by me..
How to work
Well easy as hell. Just execute SQL files and restart your server...
Download
You must be registered to see links
--=[C++]=--
--=[[C++] Hello Message]=--
Okay here you go some simple C++ script..
When you enter in world you get in middle message like Raid Message..
Code:
#include "StdAfx.h"
#include "Setup.h"
#ifdef WIN32
#pragma warning(disable:4305) // warning C4305: 'argument' : truncation from 'double' to 'float'
#endif
void OnEnterWorld(Player * pPlayer)
{
bool start = true;
while (start == true)
{
pPlayer->SendAreaTriggerMessage("Welcome! NAME, Visit us at www."); //Change this what is quoted in " ".
break;
}
}
void SetupEnterWorld(ScriptMgr * mgr)
{
mgr->register_hook(SERVER_HOOK_EVENT_ON_ENTER_WORLD, OnEnterWorld);
}