This macro is setup for Neriak C for turning in Red Wine and warping to merchant to buy more wine when out.
This can be used to level low toons afk, or for faction.
Edit Red Wine
Turnin guy name and Merchant guy name to change to muffins for pandos.
I Finally contributed!!!!!!!!!!!!!!!!!!!!!!!!!!!
N
This can be used to level low toons afk, or for faction.
Edit Red Wine
Turnin guy name and Merchant guy name to change to muffins for pandos.
Rich (BB code):
|-----------------------------------------------------------------
|Red Wine Turnin MAcro
|Written by : Nijhal
|Usage : /macro nwine
|
|Description : This macro will loop turning in red wine to the npc
|in neriakc and buying more wine when it runs out.
|
|Thanks to Armysoldier and Z166204 for their help!
|------------------------------------------------------------------
#turbo 40
#include sell.inc
#include buy.inc
#include packs.inc
#include cleanpacks.inc
/declare Set int local
/varset CompA Red Wine
/echo |-------------------------
/echo |Red Win Macro Online.
/echo |-------------------------
/popup Red Wine Macro Online.
Sub Main
:start
/target Lokar To`Biath 10
/echo Heading to Lokar To`Biath
/popup Heading to Lokar To`Biath
/delay 1s
/warp target
/delay 1s
/face fast
/declare chips int local
:Loop
/doevents
/call GMCheck
/for chips 1 to 4
/ctrlkey /itemnotify ${FindItem[=Red Wine].InvSlot} leftmouseup
/if (!${FindItem[=Red Wine].InvSlot}) /call BuyWine
/delay 2
/if (${chips}==1) {
/click left target
/click left target
/delay 1s
}
/if (${chips}==2) {
/notify GiveWnd GVW_MyItemSlot1 leftmouseup
/delay 2
}
/if (${chips}==3) {
/delay 2
/notify GiveWnd GVW_MyItemSlot2 leftmouseup
}
/if (${chips}==4) {
/delay 2
/notify GiveWnd GVW_MyItemSlot3 leftmouseup
}
/next chips
/delay 2
/notify GiveWnd GVW_Give_Button leftmouseup
/delay 2
:cursorclear
/delay 2s
/destroy
/if (${Cursor.ID}) /goto :cursorclear
/goto :Loop
Sub BuyWine
/delay 1s
/autoinv
/autoinv
/autoinv
/delay 2s
/popup Heading to Cecile K`Jartan
/target Cecile K`Jartan
/face
/delay 2s
/warp loc 909, -1424, -81
/delay 2s
/nomodkey /click right target
/delay 2s
/call Buy "Red Wine" 60
/nomodkey /notify MerchantWnd MW_Done_Button LeftMouseUp
/delay 4s
/target Lokar To`Biath 10
/echo Heading to Lokar To`Biath
/popup Heading to Lokar To`Biath
/delay 1s
/warp target
/delay 1s
/face fast
/return
|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
|Clear Cursor
|
|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Sub ClearCursor
/declare x int local
:auto_inv
/if (${Cursor.ID}) {
/if (${Cursor.Container}) {
/for x 1 to 8
/if (!${InvSlot[pack${x}].Item.Container}) /nomodkey /itemnotify pack${x} leftmouseup
/next x
} else {
/timed 5 /autoinventory
}
/goto :auto_inv
}
/return
|--------------------------------------------------------------------------------
|SUB: GM Check
|--------------------------------------------------------------------------------
Sub GMCheck
/if (${Spawn[gm].ID}) {
/beep
/beep
/beep
/echo GM has entered the zone!
/echo FUCK HIM but ending the macro...
/keypress instant_camp
/endmacro
}
/returnI Finally contributed!!!!!!!!!!!!!!!!!!!!!!!!!!!
N
one line.. 
