Likes: 0
Results 1 to 3 of 3
Thread: [LUA] Vendor S8
-
11-04-10, 08:38 AM #1
[LUA] Vendor S8
Register to remove this adS8 Vendor Lua Script
Hello , it's my first lua script .
Credit:
Basic Lua Script is in Repack 10 of Ac-Web
This patch is French because i'm french .
Code:local npcid = 900000 function Vendor_OnGossip(pUnit,event,player) pUnit:VendorRemoveAllItems() pUnit:GossipCreateMenu(100, player, 0) if (player:GetPlayerClass() == "Warrior") then pUnit:GossipMenuAddItem(0,"Ensemble d'arène 8 Guerriers",1,0) end if (player:GetPlayerClass() == "Paladin") then pUnit:GossipMenuAddItem(0,"Ensemble d'arène 8 Paladin"s,4,0) end if (player:GetPlayerClass() == "Hunter") then pUnit:GossipMenuAddItem(0,"Ensemble d'arène 8 Chasseurs",8,0) end if (player:GetPlayerClass() == "Rogue") then pUnit:GossipMenuAddItem(0,"Ensemble d'arène 8 Voleurs",10,0) end if (player:GetPlayerClass() == "Priest") then pUnit:GossipMenuAddItem(0,"Ensemble d'arène 8 Prêtres",3,0) end if (player:GetPlayerClass() == "Death Knight") then pUnit:GossipMenuAddItem(0,"Ensemble d'arène 8 Chevaliers de la mort",7,0) end if (player:GetPlayerClass() == "Shaman") then pUnit:GossipMenuAddItem(0,"Ensemble d'arène 8 Chamans",2,0) end if (player:GetPlayerClass() == "Mage") then pUnit:GossipMenuAddItem(0,"Ensemble d'arène 8 Mages",6,0) end if (player:GetPlayerClass() == "Warlock") then pUnit:GossipMenuAddItem(0,"Ensemble d'arène 8 Demonistes",9,0) end if (player:GetPlayerClass() == "Druid") then pUnit:GossipMenuAddItem(0,"Ensemble d'arène 8 Druides",5,0) end pUnit:GossipMenuAddItem(0,"Armes",11,0) pUnit:GossipMenuAddItem(0,"Hors-Set",12,0) pUnit:GossipMenuAddItem(4, "Peu importe",999,0) pUnit:GossipSendMenu(player) end function Vendor_OnSelect(pUnit,event,player,id,intid,code) if (intid == 1) then pUnit:VendorAddItem(51541,1,0) pUnit:VendorAddItem(51542,1,0) pUnit:VendorAddItem(51543,1,0) pUnit:VendorAddItem(51544,1,0) pUnit:VendorAddItem(51545,1,0) pUnit:GossipCreateMenu(101, player, 0) pUnit:GossipMenuAddItem(0,"Ensemble d'arène 8 Guerrier",100,0) pUnit:GossipMenuAddItem(4, "Peu importe",999,0) pUnit:GossipSendMenu(player) end if (intid == 2) then pUnit:GossipCreateMenu(102, player, 0) pUnit:GossipMenuAddItem(0,"Ensemble Spé Amélioration",13,0) pUnit:GossipMenuAddItem(0,"Ensemble Spé Elémentaire",14,0) pUnit:GossipMenuAddItem(0,"Ensemble Spé Réstauration",15,0) pUnit:GossipSendMenu(player) end if (intid == 3) then pUnit:GossipCreateMenu(102, player, 0) pUnit:GossipMenuAddItem(0,"Ensemble Spé Sacré et Discipline",16,0) pUnit:GossipMenuAddItem(0,"Ensemble Spé Ombre",17,0) pUnit:GossipSendMenu(player) end if (intid == 4) then pUnit:GossipCreateMenu(102, player, 0) pUnit:GossipMenuAddItem(0,"Ensemble Spé Sacré ",18,0) pUnit:GossipMenuAddItem(0,"Ensemble Spé Vindicite et Protection",19,0) pUnit:GossipSendMenu(player) end if (intid == 5) then pUnit:GossipCreateMenu(102, player, 0) pUnit:GossipMenuAddItem(0,"Ensemble Spé Réstauration",20,0) pUnit:GossipMenuAddItem(0,"Ensemble Spé Combat Farouche",21,0) pUnit:GossipMenuAddItem(0,"Ensemble Spé Equilibre",22,0) pUnit:GossipSendMenu(player) end if (intid == 6) then pUnit:VendorAddItem(51463,1,0) pUnit:VendorAddItem(51464,1,0) pUnit:VendorAddItem(51465,1,0) pUnit:VendorAddItem(51466,1,0) pUnit:VendorAddItem(51467,1,0) pUnit:GossipCreateMenu(101, player, 0) pUnit:GossipMenuAddItem(0,"Ensemble d'arène 8 Mage",100,0) pUnit:GossipMenuAddItem(4, "Peu importe",999,0) pUnit:GossipSendMenu(player) end if (intid == 7) then pUnit:VendorAddItem(51413,1,0) pUnit:VendorAddItem(51414,1,0) pUnit:VendorAddItem(51415,1,0) pUnit:VendorAddItem(51416,1,0) pUnit:VendorAddItem(51418,1,0) pUnit:GossipCreateMenu(101, player, 0) pUnit:GossipMenuAddItem(0,"Ensemble d'arène 8 Chevalier de la Mort",100,0) pUnit:GossipMenuAddItem(4, "Peu importe",999,0) pUnit:GossipSendMenu(player) end if (intid == 8) then pUnit:VendorAddItem(51458,1,0) pUnit:VendorAddItem(51459,1,0) pUnit:VendorAddItem(51460,1,0) pUnit:VendorAddItem(51461,1,0) pUnit:VendorAddItem(51462,1,0) pUnit:GossipCreateMenu(101, player, 0) pUnit:GossipMenuAddItem(0,"Ensemble d'arène 8 Chasseur",100,0) pUnit:GossipMenuAddItem(4, "Peu importe",999,0) pUnit:GossipSendMenu(player) end if (intid == 9) then pUnit:VendorAddItem(51536,1,0) pUnit:VendorAddItem(51537,1,0) pUnit:VendorAddItem(51538,1,0) pUnit:VendorAddItem(51539,1,0) pUnit:VendorAddItem(51540,1,0) pUnit:GossipCreateMenu(101, player, 0) pUnit:GossipMenuAddItem(0,"Ensemble d'arène 8 Demoniste",100,0) pUnit:GossipMenuAddItem(4, "Peu importe",999,0) pUnit:GossipSendMenu(player) end if (intid == 10) then pUnit:VendorAddItem(51492,1,0) pUnit:VendorAddItem(51493,1,0) pUnit:VendorAddItem(51494,1,0) pUnit:VendorAddItem(51495,1,0) pUnit:VendorAddItem(51496,1,0) pUnit:GossipCreateMenu(101, player, 0) pUnit:GossipMenuAddItem(0,"Ensemble d'arène 8 Voleur",100,0) pUnit:GossipMenuAddItem(4, "Peu importe",999,0) pUnit:GossipSendMenu(player) end if (intid == 11) then pUnit:VendorAddItem(51403,1,0) pUnit:VendorAddItem(51398,1,0) pUnit:VendorAddItem(51393,1,0) pUnit:VendorAddItem(51401,1,0) pUnit:VendorAddItem(51391,1,0) pUnit:VendorAddItem(51440,1,0) pUnit:VendorAddItem(51442,1,0) pUnit:VendorAddItem(51528,1,0) pUnit:VendorAddItem(51524,1,0) pUnit:VendorAddItem(51432,1,0) pUnit:VendorAddItem(51481,1,0) pUnit:VendorAddItem(51516,1,0) pUnit:VendorAddItem(51529,1,0) pUnit:VendorAddItem(51444,1,0) pUnit:VendorAddItem(51457,1,0) pUnit:VendorAddItem(51522,1,0) pUnit:VendorAddItem(51399,1,0) pUnit:VendorAddItem(51446,1,0) pUnit:VendorAddItem(51395,1,0) pUnit:VendorAddItem(51412,1,0) pUnit:VendorAddItem(51454,1,0) pUnit:VendorAddItem(51450,1,0) pUnit:VendorAddItem(51405,1,0) pUnit:VendorAddItem(51518,1,0) pUnit:VendorAddItem(51526,1,0) pUnit:VendorAddItem(51389,1,0) pUnit:VendorAddItem(51448,1,0) pUnit:VendorAddItem(51520,1,0) pUnit:VendorAddItem(51452,1,0) pUnit:VendorAddItem(51407,1,0) pUnit:VendorAddItem(51396,1,0) pUnit:VendorAddItem(51408,1,0) pUnit:VendorAddItem(51455,1,0) pUnit:VendorAddItem(51409,1,0) pUnit:VendorAddItem(51533,1,0) pUnit:VendorAddItem(51532,1,0) pUnit:VendorAddItem(51404,1,0) pUnit:VendorAddItem(51406,1,0) pUnit:VendorAddItem(51445,1,0) pUnit:VendorAddItem(51390,1,0) pUnit:VendorAddItem(51525,1,0) pUnit:VendorAddItem(51515,1,0) pUnit:VendorAddItem(51388,1,0) pUnit:VendorAddItem(51456,1,0) pUnit:VendorAddItem(51402,1,0) pUnit:VendorAddItem(51453,1,0) pUnit:VendorAddItem(51392,1,0) pUnit:VendorAddItem(51439,1,0) pUnit:VendorAddItem(51411,1,0) pUnit:VendorAddItem(51530,1,0) pUnit:GossipCreateMenu(101, player, 0) pUnit:GossipMenuAddItem(0,"Ensemble d'arène 8 (Armes)",100,0) pUnit:GossipMenuAddItem(4, "Peu importe",999,0) pUnit:GossipSendMenu(player) end if (intid == 12) then pUnit:VendorAddItem(51345,1,0) pUnit:VendorAddItem(51342,1,0) pUnit:VendorAddItem(51370,1,0) pUnit:VendorAddItem(51343,1,0) pUnit:VendorAddItem(51340,1,0) pUnit:VendorAddItem(51368,1,0) pUnit:VendorAddItem(51344,1,0) pUnit:VendorAddItem(51341,1,0) pUnit:VendorAddItem(51369,1,0) pUnit:VendorAddItem(51361,1,0) pUnit:VendorAddItem(51364,1,0) pUnit:VendorAddItem(51337,1,0) pUnit:VendorAddItem(51327,1,0) pUnit:VendorAddItem(51365,1,0) pUnit:VendorAddItem(51339,1,0) pUnit:VendorAddItem(51329,1,0) pUnit:VendorAddItem(51367,1,0) pUnit:VendorAddItem(51359,1,0) pUnit:VendorAddItem(51362,1,0) pUnit:VendorAddItem(51360,1,0) pUnit:VendorAddItem(51363,1,0) pUnit:VendorAddItem(51375,1,0) pUnit:VendorAddItem(51372,1,0) pUnit:VendorAddItem(51351,1,0) pUnit:VendorAddItem(51338,1,0) pUnit:VendorAddItem(51328,1,0) pUnit:VendorAddItem(51366,1,0) pUnit:VendorAddItem(51374,1,0) pUnit:VendorAddItem(51371,1,0) pUnit:VendorAddItem(51350,1,0) pUnit:VendorAddItem(51376,1,0) pUnit:VendorAddItem(51373,1,0) pUnit:VendorAddItem(51352,1,0) pUnit:GossipCreateMenu(101, player, 0) pUnit:GossipMenuAddItem(0,"Ensemble d'arène saison 8 (Hors-Set)",100,0) pUnit:GossipMenuAddItem(4, "Peu importe",999,0) pUnit:GossipSendMenu(player) end if (intid == 13) then pUnit:VendorAddItem(51503,1,0) pUnit:VendorAddItem(51504,1,0) pUnit:VendorAddItem(51505,1,0) pUnit:VendorAddItem(51506,1,0) pUnit:VendorAddItem(51508,1,0) pUnit:GossipCreateMenu(101, player, 0) pUnit:GossipMenuAddItem(0,"Ensemble d'arène 8 Chaman",100,0) pUnit:GossipMenuAddItem(4, "Peu importe",999,0) pUnit:GossipSendMenu(player) end if (intid == 14) then pUnit:VendorAddItem(51509,1,0) pUnit:VendorAddItem(51510,1,0) pUnit:VendorAddItem(51511,1,0) pUnit:VendorAddItem(51512,1,0) pUnit:VendorAddItem(51514,1,0) pUnit:GossipCreateMenu(101, player, 0) pUnit:GossipMenuAddItem(0,"Ensemble d'arène 8 Chaman 2",100,0) pUnit:GossipMenuAddItem(4, "Peu importe",999,0) pUnit:GossipSendMenu(player) end if (intid == 15) then pUnit:VendorAddItem(51497,1,0) pUnit:VendorAddItem(51498,1,0) pUnit:VendorAddItem(51499,1,0) pUnit:VendorAddItem(51500,1,0) pUnit:VendorAddItem(51502,1,0) pUnit:GossipCreateMenu(101, player, 0) pUnit:GossipMenuAddItem(0,"Ensemble d'arène 8 Chaman 3",100,0) pUnit:GossipMenuAddItem(4, "Peu importe",999,0) pUnit:GossipSendMenu(player) end if (intid == 16) then pUnit:VendorAddItem(51482,1,0) pUnit:VendorAddItem(51483,1,0) pUnit:VendorAddItem(51484,1,0) pUnit:VendorAddItem(51485,1,0) pUnit:VendorAddItem(51486,1,0) pUnit:GossipCreateMenu(101, player, 0) pUnit:GossipMenuAddItem(0,"Ensemble d'arène 8 Prêtre 1",100,0) pUnit:GossipMenuAddItem(4, "Peu importe",999,0) pUnit:GossipSendMenu(player) end if (intid == 17) then pUnit:VendorAddItem(51487,1,0) pUnit:VendorAddItem(51488,1,0) pUnit:VendorAddItem(51489,1,0) pUnit:VendorAddItem(51490,1,0) pUnit:VendorAddItem(51491,1,0) pUnit:GossipCreateMenu(101, player, 0) pUnit:GossipMenuAddItem(0,"Ensemble d'arène 8 Prêtre 2",100,0) pUnit:GossipMenuAddItem(4, "Peu importe",999,0) pUnit:GossipSendMenu(player) end if (intid == 18) then pUnit:VendorAddItem(51468,1,0) pUnit:VendorAddItem(51469,1,0) pUnit:VendorAddItem(51470,1,0) pUnit:VendorAddItem(51471,1,0) pUnit:VendorAddItem(51473,1,0) pUnit:GossipCreateMenu(101, player, 0) pUnit:GossipMenuAddItem(0,"Ensemble d'arène 8 Paladin 1",100,0) pUnit:GossipMenuAddItem(4, "Peu importe",999,0) pUnit:GossipSendMenu(player) end if (intid == 19) then pUnit:VendorAddItem(51474,1,0) pUnit:VendorAddItem(51475,1,0) pUnit:VendorAddItem(51476,1,0) pUnit:VendorAddItem(51477,1,0) pUnit:VendorAddItem(51479,1,0) pUnit:GossipCreateMenu(101, player, 0) pUnit:GossipMenuAddItem(0,"Ensemble d'arène 8 Paladin 2",100,0) pUnit:GossipMenuAddItem(4, "Peu importe",999,0) pUnit:GossipSendMenu(player) end if (intid == 20) then pUnit:VendorAddItem(51419,1,0) pUnit:VendorAddItem(51420,1,0) pUnit:VendorAddItem(51421,1,0) pUnit:VendorAddItem(51422,1,0) pUnit:VendorAddItem(51424,1,0) pUnit:GossipCreateMenu(101, player, 0) pUnit:GossipMenuAddItem(0,"Ensemble d'arène 8 Druides 1",100,0) pUnit:GossipMenuAddItem(4, "Peu importe",999,0) pUnit:GossipSendMenu(player) end if (intid == 21) then pUnit:VendorAddItem(51425,1,0) pUnit:VendorAddItem(51426,1,0) pUnit:VendorAddItem(51427,1,0) pUnit:VendorAddItem(51428,1,0) pUnit:VendorAddItem(51430,1,0) pUnit:GossipCreateMenu(101, player, 0) pUnit:GossipMenuAddItem(0,"Ensemble d'arène 8 Druides 2",100,0) pUnit:GossipMenuAddItem(4, "Peu importe",999,0) pUnit:GossipSendMenu(player) end if (intid == 22) then pUnit:VendorAddItem(51433,1,0) pUnit:VendorAddItem(51434,1,0) pUnit:VendorAddItem(51435,1,0) pUnit:VendorAddItem(51436,1,0) pUnit:VendorAddItem(51438,1,0) pUnit:GossipCreateMenu(101, player, 0) pUnit:GossipMenuAddItem(0,"Ensemble d'arène 8 Druides 3",100,0) pUnit:GossipMenuAddItem(4, "Peu importe",999,0) pUnit:GossipSendMenu(player) end if (intid == 100) then player:SendVendorWindow(pUnit) end if (intid == 999) then player:GossipComplete() end end RegisterUnitGossipEvent(900000, 1, "Vendor_OnGossip") RegisterUnitGossipEvent(900000, 2, "Vendor_OnSelect")
If you found any error , send PM .
Excuse me for my bad english .
Thank You .
› See More: [LUA] Vendor S8
-
11-04-10, 06:43 PM #2
Very Good Ragnork. I like this script alot. I might use you on my server.
Contact me at [email protected] For a Scripting Position.
Don't Forget to for useful releases!. It gives you good luck! Just Like Lucky charms!
-
11-04-10, 07:17 PM #3
Register to remove this adIt's Ok for me .