1
Scripting Chat / Re: Recall home-Move items to my secure-recall spot
« on: September 30, 2012, 03:53:36 PM »
just EUO
This section allows you to view all posts made by this member. Note that you can only see posts made in areas you currently have access to.
set %loot F9
set %pet1 F10
set %pet2 F11
set %kapi F12
set %runebook e
set %dismount f
Event SysMessage Script Aktif
loop:
OnHotKey %loot
gosub loot
OnHotKey %pet1
gosub pet1
OnHotKey %pet2
gosub pet2
OnHotKey %kapi
gosub kapi
OnHotKey %runebook
gosub runebook
OnHotkey %dismount
gosub dismount
goto loop
sub loot
finditem YFM G_2
if #findcnt > 0
{
set #lobjectid #findid
set %ceset #findid
event macro 17 0
wait 10
ignoreitem #findid
finditem POF C_ , %ceset
find:
finditem * C_ , %ceset
if #findstack > 2
{
ignoreitem #findid
goto find
}
if #findcnt > 0
{
set %object #findid
gosub Check
event sysmessage %name %value
if %value > 70
{
exevent drag #findid #findstack
wait 15
exevent dropc #backpackID
wait 5
}
set %value 0
ignoreitem #findid
goto find
}
}
goto loop
sub runebook
set #lobjectid %runebook
wait 5
event macro 17 0
wait 5
goto loop
sub dismount
finditem %mount
if #findkind = 1
{
set #lobjectid #findid
wait 5
event macro 17 0
}
else
{
set #lobjectid #charid
wait 5
event macro 17 0
}
goto loop
sub pet1
event macro 1 0 [band
wait 2
set #ltargetid *pet1
wait 5
event macro 22 0
wait 10
return
sub pet2
event macro 1 0 [band
wait 2
set #ltargetid *pet2
wait 5
event macro 22 0
wait 10
return
sub kapi
finditem %kapi G_2
if #findcnt > 0
wait 5
set #lobjectid #findid
event macro 17 0
wait 5
goto loop