Darkmoon Faire Fast Buy Macro

[Jiba]

So Darkmoon faire is there again ,

As you might know there are 2 vendors that sell items that could be sold for more they u actualy buy em so here is a usefull macro

/run for i=1,GetMerchantNumItems() do local n, t, p, q, r, s, v = GetMerchantItemInfo(i) if (strfind(n, "Mote") or strfind(n,"Ruby") or strfind(n,"Night") or strfind(n,"Dawn") or strfind(n,"Lotus") or strfind(n,"dream")) then BuyMerchantItem(i,r) end end

Happy Farming

EDIT : for the ppl among us that dunno what this is :

there are 2 vendors selling : Fel lotus - Black lotus : Motes of (all sorts ) gems etc etc for cheap prices

[ubrpwnt]

Just make a macro for them individually it's very confusing as it is.

[Kanora]

going to try this macro once i get home.

[Jiba]

Its time saving and it works , why is it confusing ?

[Anthraxx]

Im goin to bot if this macro works

[Jiba]

Ive gotten like 15 Fel lotus and 10 Black lotus so far

I mean 4g is so cheap ^^

edited

[Anthraxx]

15 fel lotus and 10 fel lotus? OoOoOoOoO

[Jiba]

Yeah they respawn pretty Quikly somtimes u can buy 2 fel lotus 1 black lotus

Im kinda running around there with my alt

Note that u can get other stuff aswell

[Premium-mmo]

I made a little auto it script :P
(IS THE FIRST I MAKE SO IT'S BUGGED)
It launch the game , then when u press OK it press button 1 each like 2 minutes.
WHat u have to do is
OWNLOAD THE SCRIPT:
:PUT MACRO ON ACTION BAR n.1:
:CLOSE WOW:
:LAUNCH SCRIPT:
:GO TO THE VENDOR OPEN DIALOG:
:PRESS OK ON SCRIPT:


tadam! Gold farming while afk

Here are the link
(I SUX @ AUTO IT IS MY FIRST SCRIPT so it launch the game from the directory there are 2 download links, one if u have C:\World of warcraft the other if u have D:\ world of warcraft sry for who hasn't C or D)
THIS IS MY FIRST SCRIPT THIS SUX, BUT IT WORKS.
Code is wrong bcz it doesn't take the arrays $, but the exe works
Here's the code

 
 = "Predatorino Simple Clicking Script"
 = "Press Yes to load the script"
 = "D:World of Warcraft"
 = MsgBox( 1, ,  )
If  = 2 Then
    MsgBox( 0, "Bye!", "Thank you for using this script :D")
    Exit
EndIf
If  = 1  Then
    Shellexecute( "Wow","","C:World of Warcraft") 
EndIf
Winwait("World of Warcraft")
 = MsgBox( 1, "PredatorinO", "Press OK When you loaded WoW")
If  = 1 and Winwaitactive( "World of Warcraft" ) Then
     = MsgBox( 1, "PredatorinO Script", "Press OK When u want the script to start pressing Button 1 or press cancel to stop the script")
EndIf
If  = 2 Then
    Exit
EndIf
Autoitsetoption( "SendKeyDelay", 20000)
If  = 1 Then
     = Send("{1 9999999999999999999999999999999999999999999999999999999999999999999999999999}")
    Sendkeepactive("World of Warcraft", )
Endif

If u have wow installed on C: drive download:
RapidShare: 1-Click Webhosting







If u have wow installed on D: drive download:
RapidShare: 1-Click Webhosting





If u are maniac and think is a virus here's the virus scan( i did it so there aren't any virus >_>)(i don't know why E-SAFE says suspiscious anyway if u are maniac and think it's a virus just copy the Auto It Script and compile it yourself)
Antivirus Versione Ultimo aggiornamento Risultato AhnLab-V32008.3.4.02008.03.05-AntiVir7.6.0.732008.03.05-Authentium4.93.82008.03.04-Avast4.7.1098.02008.03.05-AVG7.5.0.5162008.03.05-BitDefender7.22008.03.05-CAT-QuickHeal9.502008.03.05-ClamAV0.92.12008.03.05-DrWeb4.44.0.091702008.03.05-eSafe7.0.15.02008.02.28suspicious Trojan/WormeTrust-Vet31.3.55902008.03.05-Ewido4.02008.03.05-FileAdvisor12008.03.05-Fortinet3.14.0.02008.03.05-F-Prot4.4.2.542008.03.05-F-Secure6.70.13260.02008.03.05-IkarusT3.1.1.202008.03.05IM-Worm.Win32.Sohanad.cv Informazioni addizionali File size: 256587 bytesMD5: 67f353bc7e41f4d6c59d5ac6dbfa0e79SHA1: e56b5516e1824031ff0f63c8d5c1fbaa81be74efPEiD: -packers: UPX




SOON COMING VERSION WITHOUT WOW LAUNCH XD!
Will do it when i come back from school tomorrow

[Xink]

So, there is a dreamfoil in there and used the macro but it didnt work :<
Do i need to target one or..? what do i need to do?

[Ylts]

repost!

better macros there: http://www.mmowned.com/forums/wow-gu...ade-legit.html