[EasyUO - REQ] script per prendere automaticamente il bod dal vendor

[TankGirl]

Mi capita spesso di non poter prendere il bod dal tailor o dal blacksmith causa lavoro dovendomi accontare così di un sol bod al giorno.
E' possibile realizzare un semplice script che automaticamente preleva il bod dal npg ?

[froncy]

Io uso questo file, però c'è da dire un paio di cose:
lo uso con una call, ad esempio

call getbodfromnpc %tailor

dentro il file ci sono delle call a file esterni:
checklag è uno script che fa war/peace finchè non cambia davvero. Serve per lag e save.
checkeuox usa #euover per capire se si sta usando easyuo 1.5 o 1.4qualcosa e mette #result a #true se è 1.5
findinjournal cerca nel journal una frase e mette #result a #true se c'è.

prendi spunto.

;getbodfromnpc.txt

set %npc %1
findnpcloop:
wait 1
finditem %npc
if #findkind = -1
{
	event sysmessage npc not found.
	exit
	halt
}
if #finddist > 6
{
	;event pathfind #findx #findy #findz
	move #findx #findy 3 2s
	goto findnpcloop
}
call lib\checkeuox
if #result = #true
{
 set %jindextemp #jindex
 exevent popup %npc 4
}
if #result = #false
{
 gosub worldXYZToScreenXY #findx #findy #findz
 set %_cursorY %_cursorY - 40

 click %_cursorX %_cursorY
 call lib\checklag
 set %timeout #scnt2 + 20
 waitforactionlist:
 wait 1
 if #scnt2 > %timeout
 	  goto findnpcloop
 if #contname <> normal_gump
	goto waitforactionlist
 set %_cursorX %_cursorX + 55
 set %_cursorY %_cursorY + 75
 set %jindextemp #jindex
 click %_cursorX %_cursorY
}
call lib\checklag
set %timeout #scnt2 + 20
waitforbodrequest:
wait 1
if #scnt2 > %timeout
{
	call lib\findinjournal %jindextemp an_offer_may_be_available
	if #result = #true
		exit
	goto findnpcloop
}
if #contname <> generic_gump
	goto waitforbodrequest
gosub getcontsizey #contsize
set %_cursorX #contposx + 110
set %_cursorY #contposy + #result - 25
click %_cursorX %_cursorY
call lib\checklag
event sysmessage bod accepted.
wait 10
exit
halt

sub getcontsizey
	set %csize %1
	str pos %csize _
	set %csizey #strres + 1
	str mid %csize %csizey 3
return #strres

sub worldXYZToScreenXY
	set %1 ( %1 - #charPosX ) * 22
	set %2 ( #charPosY - %2 ) * 22
	set %_cursorX #cliLeft + #cliXRes / 2 + %1 + %2
	set %_cursorY #cliTop + #cliYRes / 2 + %1 - %2 - ( %3 - #charPosZ ) * 4
return

[TankGirl]

Grazie mille ! Sei una persona squisitissima. Purtroppo la mia ignoranza in materia è palese. Provo a contattarti direttamente via icq per alcune spiegazioni.

Grazie cmq per il reply

[phpwriter]

qualcuno ha scritto questo script funzionante? giusto per dirvi il mio grado di scripter...

prendete il più ignorante di scripting di questo forum... ora elevatelo alla -10000000000000000000000000000 ed quello sono io...

[phpwriter]

Originally posted by Mitraton
Io uso questo file, però c'è da dire un paio di cose:
lo uso con una call, ad esempio

call getbodfromnpc %tailor

dentro il file ci sono delle call a file esterni:
checklag è uno script che fa war/peace finchè non cambia davvero. Serve per lag e save.
checkeuox usa #euover per capire se si sta usando easyuo 1.5 o 1.4qualcosa e mette #result a #true se è 1.5
findinjournal cerca nel journal una frase e mette #result a #true se c'è.

prendi spunto.

;getbodfromnpc.txt

set %npc %1
findnpcloop:
wait 1
finditem %npc
if #findkind = -1
{
	event sysmessage npc not found.
	exit
	halt
}
if #finddist > 6
{
	;event pathfind #findx #findy #findz
	move #findx #findy 3 2s
	goto findnpcloop
}
call lib\checkeuox
if #result = #true
{
 set %jindextemp #jindex
 exevent popup %npc 4
}
if #result = #false
{
 gosub worldXYZToScreenXY #findx #findy #findz
 set %_cursorY %_cursorY - 40

 click %_cursorX %_cursorY
 call lib\checklag
 set %timeout #scnt2 + 20
 waitforactionlist:
 wait 1
 if #scnt2 > %timeout
 	  goto findnpcloop
 if #contname <> normal_gump
	goto waitforactionlist
 set %_cursorX %_cursorX + 55
 set %_cursorY %_cursorY + 75
 set %jindextemp #jindex
 click %_cursorX %_cursorY
}
call lib\checklag
set %timeout #scnt2 + 20
waitforbodrequest:
wait 1
if #scnt2 > %timeout
{
	call lib\findinjournal %jindextemp an_offer_may_be_available
	if #result = #true
		exit
	goto findnpcloop
}
if #contname <> generic_gump
	goto waitforbodrequest
gosub getcontsizey #contsize
set %_cursorX #contposx + 110
set %_cursorY #contposy + #result - 25
click %_cursorX %_cursorY
call lib\checklag
event sysmessage bod accepted.
wait 10
exit
halt

sub getcontsizey
	set %csize %1
	str pos %csize _
	set %csizey #strres + 1
	str mid %csize %csizey 3
return #strres

sub worldXYZToScreenXY
	set %1 ( %1 - #charPosX ) * 22
	set %2 ( #charPosY - %2 ) * 22
	set %_cursorX #cliLeft + #cliXRes / 2 + %1 + %2
	set %_cursorY #cliTop + #cliYRes / 2 + %1 - %2 - ( %3 - #charPosZ ) * 4
return

non è che posteresti lo script completo? ^^

[froncy]

sostituite:
set %npc %1
con:
set %npc CURH ;(è il tailor di Luna)

sostituite tutti i:
call lib\checklag
con:
wait 5

sostituite:
call lib\checkeuox
con
set #result #false ;se non avete Easyuo 1.5
oppure
set #result #true ;se avete Easyuo 1.5

sostituite :
call lib\findinjournal %jindextemp an_offer_may_be_available
con:
set #result #false

e dovrebbe funzionare (con qualche piccolo malfunzionamento assolutamente sopportabile)

e questo è il massimo che vi darò, insopportabili sanguisughe.

[Ditra]

FUNZIONA e per prendere anche quelli da fabbro sempre a luna che stirnga aggiungo???POI NN ti rompo piu giuro

[Ditra]

Originally posted by Ditra
FUNZIONA e per prendere anche quelli da fabbro sempre a luna che stirnga aggiungo???POI NN ti rompo piu giuro

NOESSUNO RIESCE A RISPONDERE......BOYDON se la mia unica salvezza

[gabx]

set %npc %1
con:
set %npc CURH

Per prendere bod da Tailor a Luna

set %npc %1
con:
set %npc MIFF

Pre prendere bod da Fabbro a Luna

[Fixi]

lo postate gia modificato e funzionante x prendere bod fabbro e tailor...ma ne prende solo con un pg?? x farlo sloggare e rientrare con un altro e risloggare come si fa??

[froncy]

Io non voglio darvi le cose già fatte, vorrei che imparaste ad usare EasyUO. Anzi non solo non voglio, ODIO dare le cose già fatte.

Lo script che ho postato si può usare con una call all'interno di un altro programma. Questo programma deve avere una struttura del genere:

Logga col 1o pg
prendi bod tailor
prendi bod black
Logga col 2o pg
prendi bod tailor
prendi bod black
...
Logga col 5o pg
prendi bod tailor
prendi bod black
aspetta 1 ora
ricomincia.

Quindi agli ingredienti manca il pezzo di codic che logga con un pg a tua scelta. dovrebbe esserci uno script del genere in questo forum fatto da Falcor, credo...

[Fixi]

ma io mi metto a piangere x favore io nn so fare una sega...

[Ditra]

Originally posted by Hologram

set %npc %1
con:
set %npc CURH

Per prendere bod da Tailor a Luna

set %npc %1
con:
set %npc MIFF

Pre prendere bod da Fabbro a Luna

mettiamo che volessi prenderli tutte e due ,cioe quello da sarto e quello da fabbro nello script sopra e' sufficente fare questa aggiunta??

set %npc MIFF
set %npc CURH
findnpcloop:
wait 1
finditem %npc
if #findkind = -1
ecc....

oppure devo stravolgere lo script??
Perche' ho notato che cammina verso il pg settato e nn vorrei che mettendo due set ,cioe' e' una cavolata quella che ho fatto??o puo funzionare?

RINGRAZIO CHI HA LA PAZIENZA DI LEGGERE E RISPONDERE

[Boydon]

Se metti due set uno di fila all'altro il secondo sovrascrive il primo.

Quindi con quelle righe così prendi solo il bod da sarto (il secondo appunto).

[Ditra]

Magari mi dai un'aiutino Boydon???Bisogna fare modifiche grosse allo script per fargli prendere due BOD ?Perche se si non sono in grado ,ripeto mi sono studiato razor e da zero ho fatto macro per minare con recall.....ma questo linguaggio e' assai difficile!!!

CMQ SE TI VA DI AIUTARMI ti ringrazio tantissimo

Se no mi tocca fare partire due script ogni volta......