qualcuno potrebbe postare uno script x autoloot del gold efficente (mi serve x tokuno, il champ è generoso )
annuncio
Comprimi
Ancora nessun annuncio.
script gold-autoloot
Comprimi
X
-
Io uso questo:
; -Fixed a problem where the script was trying to loot from any container rather than just corpses.
; This also made it stop looting from treasure chests (wich I liked and might add back in later)
; -Changed the IgnoreMyGold sub to be more efficient. (Thanks Quintok)
;1.0:
; -Initial Release of script.
initevents
;--------------------------------------------------
;SETUP
;--------------------------------------------------
;Set %LootBagX and %LootBagY to the coords of a bag to drop the gold into
; (I use my backpack in the paperdoll)
;Set %BackPackID to the ID of your loot bag.
;--------------------------------------------------
SET %BackPackID VOJDKMD ;Loot Bag
SET %LootBagX 868
SET %LootBagY 81
;--------------------------------------------------
_init:
GoSub IgnoreMyGold
SET %CorpseID 0
SET %GoldID 0
_start:
GoSub FindCorpse
GoTo _start
SUB IgnoreMyGold
_IgnoreMyGoldLoop:
finditem POF C_ , %BackPackID
IF #FINDKIND <> -1
{
ignoreitem #FINDID
goto _IgnoreMyGoldLoop
}
RETURN
SUB FindCorpse
IF #CONTTYPE = YFM
{
SET %CorpseID #CONTID
GoSub FindGold
}
RETURN
SUB FindGold
findItem POF C_ , %CorpseID
SET %GoldID #FINDID
IF #FINDKIND <> -1
GoSub GrabLoot
IF #FINDKIND = -1
IgnoreItem %CorpseID
RETURN
SUB GrabLoot
Event Drag %GoldID
GoSub DragWait
KEY ENTER
If #CONTNAME = stack_gump
click 100 100
Click %LootBagX %LootBagY p
RETURN
SUB DragWait
for %i 1 5
{
IF #CONTSIZE = 168_74
RETURN
wait 5
}
Goto _start
RETURN
Preso da easyuo, byebye!
-
Loota solo i soldi.
Devi settare la posizione della borsa dove c'è
"SET %LootBagX 868
SET %LootBagY 81"
Così com'è adesso la borsa deve essere posizionata in alto a destra, se vuoi cambiarlo apri ultima e metti sopra la finestra di easyuo, muovendo il mouse ci sono dei numeri in basso k cambiano, sono le coordinate del mouse, spostalo nel punto dove vuoi k ti posi i soldi e modifica le coordinate dove ti ho detto prima. Ti consiglio, se non l'hai già fatto di andare in tools>options e selezionare la proprietà "don't move cursor" k è molto comoda.
Byebye!
Commenta
-
Hmmmm.... hanno pure inventato l'acqua calda sapete?
SET #LTARGETID N/A
DISPLAY OK Clicca sulla borsa. $
SET #TARGCURS 1
findbag:
WAIT 1
IF #TARGCURS = 1
GOTO findbag
SET %origx #CURSORX
SET %origy #CURSORY
SET %BackPackID #LTARGETID
SET %LootbagX %origx
SET %LootBagY %origy
Basta mettere le linee di codice al posto di:
SET %BackPackID VOJDKMD ;Loot Bag
SET %LootBagX 868
SET %LootBagY 81
e addio settaggi manuali
P.S. l'ho provato e funziona, però non apre i corpi...boh
Commenta
-
Originally posted by Wingman
[B]Io non so scriptare, se quando dai una mano fai meno il saputello fai un favore a tutti.
Originally posted by Wingman
Comunque no, non apre i corpi, è normale.
CUT-----------CUT-----------CUT-----------CUT-----------CUT
;cerco un corpo (YFM) a terra (G) a meno di 2 tiles
FINDITEM YFM G_2
;se non trovo nulla...
IF #FINDKIND = -1
{
;MODIFICARE PER IL PROPRIO SCRIPT
GOTO endloop
}
;ho trovato un corpo!
;mi serve prima di tutto il suo ID
SET %corpse #FINDID
;faccio in modo che non lo trovi più
ignoreitem %corpse 1
;setto dove aprire il corpo...
;eventualmente modificare per il punto in cui si preferisce ^^
SET #nextCPosX 660
SET #nextCPosY 290
SET #LOBJECTID %corpse
EVENT MACRO 17 0
event sysmessage corpo aperto!
CUT-----------CUT-----------CUT-----------CUT-----------CUT
Questo pezzo di script cerca un corpo a meno di due tiles e lo apre in un punto fisso. Può essere incollato nel tuo script subito dopo e al posto della ricerca dei corpi...putroppo sto per uscire e non ho il tempo di essere più preciso. Warning: putroppo utilizzandolo, ti si apriranno tutti i corpi a meno di due tiles sempre e comunque (mentre corri, casti, curi pet, etc etc) provocando qualche problemino... la soluzione sarebbe rendere lo script attivabile atttraverso la pressione di un tasto; alla prossima puntata!
Commenta
Commenta