|
|
49
|
General Category / Quest and Guides / Combine HoH tokens macro..
|
on: May 18, 2016, 04:56:20 am
|
This is so you don't break your wrist trying to combine all those damn HoH tokens... Works best if you use more than 1 character if you are in a hurry to combine them. Otherwise just put tokens on one character and just watch a movie or something because it will take awhile if you have tons of tokens 
DO NOT RUN THIS IF YOU HAVE BAGS INSIDE BAGS... (not sure why but someone else had an error doing this.. just a heads up) |112921 - 112927 - T3 IDs
|112931 - 112937 - T4 IDs
#turbo 40
|||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
|||| Place A Magic Box in the 8th bag slot (bottom right) ||||
|||| Any loss of tokens is not my fault Kappa ||||
|||| Written By: Natedog ||||
|||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
Sub Main
/if (!${Defined[MagicBoxSlot]}) /declare MagicBoxSlot string outer
/varset MagicBoxSlot ${FindItem[=A Magic Box].InvSlot.Name}
||Lets open all bags!
/if (!${Defined[bag]}) /declare bag int local 0
/if (!${Defined[packnum]}) /declare packnum int 1
/if (!${Defined[tokenid]}) /declare tokenid int 112921
/if (!${Defined[T]}) /declare T int 1
/if (!${Defined[CurrentID]}) /declare CurrentID int outer
/if (!${Defined[ItemName]}) /declare ItemName string outer
/if (!${Defined[TokenItemCount]}) /declare TokenItemCount int outer
/for bag 1 to 8
/if (!${Window[pack${bag}].Open} && ${InvSlot[pack${bag}].Item.Container}) /nomodkey /itemnotify pack${bag} rightmouseup
/next bag
/for tokenid 112927 downto 112921
:retrycombine
/for packnum 1 to 8
/if (!${Window[pack${packnum}].Open} && ${InvSlot[pack${packnum}].Item.Container}) {
/itemnotify pack${packnum} rightmouseup
/delay 6
}
/if (${Window[pack${packnum}].Open} && ${InvSlot[pack${packnum}].Item.Container}) {
/for T 1 to 10
|Find the item by ID...
/if (${InvSlot[pack${packnum}].Item.Item[${T}].ID} == ${tokenid}) {
/varset CurrentID ${InvSlot[pack${packnum}].Item.Item[${T}].ID}
/varset ItemName ${InvSlot[pack${packnum}].Item.Item[${T}].Name}
/varset TokenItemCount ${FindItemCount[${ItemName}]}
/if (${TokenItemCount} < 2) {
|/echo Skipping ID.. ${CurrentID} - ${InvSlot[pack${packnum}].Item.Item[${T}].Name}
/goto :dont_upgrade
/echo Item skipped.. if we got here.. something is WRONG
} else {
|/echo We have .. ${AugmentItemCount} of this item.. ${InvSlot[pack${packnum}].Item.Item[${T}].Name}
/ctrlkey /itemnotify in pack${packnum} ${T} leftmouseup
/delay 6
/call CombineHoHToken
/call FindNextToken
/goto :retrycombine
}
}
/next T
}
/next packnum
:dont_upgrade
/next tokenid
|Close our bags back up...
/for bag 1 to 8
/if (${Window[pack${bag}].Open} && ${InvSlot[pack${bag}].Item.Container}) /nomodkey /itemnotify pack${bag} rightmouseup
/next bag
/return
sub FindNextToken
/if (!${Defined[P]}) /declare P int 1
/if (!${Defined[packnum2]}) /declare packnum2 int 1
/for packnum2 1 to 8
/if (!${Window[pack${packnum2}].Open} && ${InvSlot[pack${packnum2}].Item.Container}) {
/itemnotify pack${packnum2} rightmouseup
/delay 6
}
/if (${Window[pack${packnum2}].Open} && ${InvSlot[pack${packnum2}].Item.Container}) {
/for P 1 to 10
/if (${InvSlot[pack${packnum2}].Item.Item[${P}].ID} == ${CurrentID}) {
/ctrlkey /itemnotify in pack${packnum2} ${P} leftmouseup
/delay 6
/call CombineHoHToken
/return
}
/next P
}
/next packnum2
/return
Sub CombineHoHToken
|Make sure bag is open.. (it should be...)
/if (!${Window[${MagicBoxSlot}].Open} && ${InvSlot[${MagicBoxSlot}].Item.Container}) /nomodkey /itemnotify ${MagicBoxSlot} rightmouseup
/if (!${Defined[slot]}) /declare slot int 0
/varset slot ${Math.Calc[${FindItem[A Magic Box].Items}+1]}
/if (${slot} > 2) {
/autoinventory
/declare fixit int 1
:fixbox
/for fixit 1 to 10
/delay 5
/shiftkey /itemnotify in ${MagicBoxSlot} ${fixit} leftmouseup
/delay 5
/autoinventory
/next fixit
/if (${FindItem[A Magic Box].Items} > 0) {
/goto :fixbox
} else {
/goto :endcombine
}
}
/itemnotify in ${MagicBoxSlot} ${slot} leftmouseup
/delay 6
/if (${slot} == 2) {
/combine ${MagicBoxSlot}
/delay 1s
/autoinventory
/delay 15
}
:endcombine
/return
|
|
|
|
|
50
|
General Category / General Discussion / Re: Zone connects/Server Lag
|
on: April 17, 2016, 05:50:59 pm
|
|
This has nothing to do with the new netcode changes. Server stress is causing your return_items plugin to fail a key check of the "stop_return"
If the lag is caused from the netcode stuff.. then I guess it could contribute to the hangs of zones causing dupes from the code mentioned :p
|
|
|
|
|
56
|
General Category / Updates / Re: Updates - Donations, Upcoming AA Update, T10 Testing etc.
|
on: February 18, 2016, 09:55:27 am
|
Hi Hunter, Its have been a couple of years I had to leave playing on EZ due to family and heath reasons. I had 6 characters running (beastlord, mage, warrior, paladin, ...) but can't find none of them. Can you help me to re-establish connection ? You can use my personal e-mail With kind regards, Alrazor (player from Belgium) Search your everquest folder for this ... *_characters  The text I removed is the account name. This should at least tell you what accounts you were using to play. |
|
|
|
|
57
|
General Category / Suggestions / Re: Broken Stuff Repair Shop v2.0
|
on: January 25, 2016, 09:12:09 pm
|
Sounds like the check item is skippig the final bank slots. If EZ uses the base check item plugin.. it is incomplete and needs to be updated for those slots.
#checks to see if player has item
#useage plugin::check_hasitem($client, itemid);
sub check_hasitem {
my $client = shift;
my $itemid = shift;
my @slots = (0..30, 251..340, 2000..2023, 2030..2270, 2500..2501, 2531..2550, 9999);
foreach $slot (@slots) {
if ($client->GetItemIDAt($slot) == $itemid) {
return 1;
}
for ($i = 0; $i < 5; $i++) {
if ($client->GetAugmentIDAt($slot, $i) == $itemid) {
return 1;
}
}
}
return 0;
}
1;
script from Kinglykrab on the forums (this one doesn't check corpses however but EZ doesn't uses corpses) that is the slots range that should be checked. (old check_hasitem did not check the new bank slots) |
|
|
|
|
|
TinyPortal v1.0 beta 4 © Bloc |
Loading...
| |
Show Posts
FYI
