[EasyUO - REQ] Script ke inserisce le Scroll negli Spellbook

[Ikki_of_Phoenix2]

C.d.t.

[Ikki_of_Phoenix2]

Up!!!!

[Ikki_of_Phoenix2]

Sikkome nn trovavo quello script ho kiesto a Denx di aiutarmi a farlo ma lui si è blokkato in questo punto, ovvero dopo aver settato la cassa kontenente le migliaia di scroll mi cerca lo SpellBook nello zaino, una volta trovato vi nserisce una scroll, nn si sa perkè pero' vi inserisce sempre e solo quella!!!
Se qualkuno riesce a risolver questo inkonveniente mi fa un favore immensissimo!


;= Drag & Drop in Spellbook =
set %spellbook ZMF_MPF
set %scrolls LMF_OMF_NMF_YMF_XMF_ANF_DPF_YOF_XOF_APF_ZOF_KPF_JP F_QXL_PXL_AYL_ZXL_CYL_BYL_WXL_VXL_YXL_XXL_IYL_HYL_ JYL_EYL_DYL_GYL_FYL_STL_RTL_UTL_TTL_NTL_PTL_CUL_BU L_XTL_HUL_KUL_DUL_GUL_FUL_PUL_SUL_MUL_OUL_NUL_YUL_ UUL_TUL_BVL_EVL_DVL_OVL_NVL_QVL_CZM_BZM_EZM_DZM_YY M_XYM_AZM_ZYM_KZM_JZM
gosub findlibro

; )) First Sub ((
Sub findlibro
finditem %spellbook C_ , #backpackid
if #findkind = 0
{
wait 10
gosub dragndrop
}
else
{
event sysmessage Nessuno Spellbook trovato.
wait 10
event sysmessage Metti uno SpellBook nello Zaino... Aspetta 10 seconds...
wait 10s
gosub findlibro
}
return

; Drag & Drop
Sub dragndrop
finditem %scrolls C_ , BHZREND
set %scroll1 #findid
if #findkind = 0
{
event sysmessage Scroll trovata... attendere
wait 1
finditem %spellbook C_ , #backpackid
{
if #findkind = 0
exevent drag %scroll1 #findstack
wait 10
exevent dropc #findid
ignoreitem #LLIFTEDID
gosub control
}
}
return

Sub control
scanjournal 1
if That_spell in #journal
{
event sysmessage La Scroll e' presente nello SpellBook oppure lo Spellbook e' pieno... controlla...
wait 10s
}
else
{
wait 1
gosub findlibro
}
return

[Boydon]

Così ad occhio vedo un paio di errori.

Il primo d'impostazione, ma grave: questo script produce un loop infinito in quanto le sub che chiami non eseguono mai l'istruzione di return.

Mi spiego meglio: inizia lo script e dopo aver inizializzato le varibili chiami la sub findlibro, la quale, se trova i libro, chiama, a sua volta, la sub draganddrop, che dragga e poi chiama la sub control. All'interno della sub control (e qui è dove generi il loop infinito) richiami la sub findlibro e così via all'infinito. In pratica se nella sub findlibro trovi uno spellbook hai una cosa del tipo:

gosub findlibro
	gosub dragndrop
		gosub control
			gosub findlibro
				gosub dragndrop
					gosub control
						gosub findlibro
							...

Una cosa simile accade anche se non trovi il libro:

gosub findlibro
	gosub findlibro
		gosub findlibro
			gosub findlibro
				...

E continua così finchè non trovi il libro (a quel punto inizia con l'altro loop infnito).
Benchè easyuo abbia dei controlli per evitare problemi generati da questo tipo di script è una pratica scorretta che può causare probelmi ed in quanto tale va evitata. Per ovviare il problema dovresti chiamare le sub una volta sola (così che possano eseguire il return) all'interno di un loop (un while o un goto, come preferisci).

il secondo errore è in questa parte della sub drandrop:

finditem %spellbook C_ , #backpackid
{
	if #findkind = 0
	exevent drag %scroll1 #findstack
	wait 10
	exevent dropc #findid
	ignoreitem #LLIFTEDID
	gosub control
}

Non noti nulla di strano? :P

In pratica fai il finditem e apri le parentesi dell'if prima della dichiarazione stessa dell'if (la quale a sua volta è all'interno delle parentesi).

Questo conduce a dei risultati inattesi.

Inoltre poi sempre in quel punto ci sta questa linea:

	ignoreitem #LLIFTEDID

che non solo è errata, ma non mi sembra neanche il massimo della correttezza in termini di logica.

La linea giusta sarebbe dovuta essere:

ignoreitem %scroll1

e questo perchè con gli Exevents di Drag e di Drop le variabili #lliftedid e #lliftedkind non funzionano. Questa linea è cmq sbagliata in termini di logica e ti spiego subito perchè: se lo spell viene aggiunto al libro (come si spera) non lo devi ignorare perchè la volta successiva non sarà più nel tuo backpack e finditem non lo troverà; a maggior ragione non lo devi ignorare se l'id che ignori è l'id di tutto lo stack (come fai te): così facendo non ignori il singolo scroll, ma tutto lo stack che quindi la volta dopo che fai finditem non sarà trovato.

Sistema questi problemi e riprova.

[Ikki_of_Phoenix2]

UH THX Boydon!!! Denx ha provveduto ma ankora nn va :°(
Legge le scroll ma poi si impalla :°( PERKé?



;= Drag & Drop in Spellbook =
set %spellbook ZMF_MPF
set %scrolls LMF_OMF_NMF_YMF_XMF_ANF_DPF_YOF_XOF_APF_ZOF_KPF_JP F_QXL_PXL_AYL_ZXL_CYL_BYL_WXL_VXL_YXL_XXL_IYL_HYL_ JYL_EYL_DYL_GYL_FYL_STL_RTL_UTL_TTL_NTL_PTL_CUL_BU L_XTL_HUL_KUL_DUL_GUL_FUL_PUL_SUL_MUL_OUL_NUL_YUL_ UUL_TUL_BVL_EVL_DVL_OVL_NVL_QVL_CZM_BZM_EZM_DZM_YY M_XYM_AZM_ZYM_KZM_JZM_WUL
gosub findlibro

; )) First Sub ((
Sub findlibro
finditem %spellbook C_ , #backpackid
set %book #findid
if #findkind = 0
{
wait 10
gosub dragndrop
}
else
{
event sysmessage Nessuno spellbook trovato.
wait 5
event sysmessage Lo script verra' fermato
wait 1s
event exmsg #charid 3 80 Stopped.
halt
}
return

; Drag & Drop
Sub dragndrop
finditem %scrolls C_ , BHZREND
set %scroll1 #findid
if #findkind = 0
{
event sysmessage Scroll trovata... attendere
wait 15
exevent drag #findid #findstack
wait 10
exevent dropc %book
gosub control
}
return

Sub control
scanjournal 1
if That_spell in #journal
{
event sysmessage La Scroll e' presente nello SpellBook oppure lo Spellbook e' pieno... controlla...
ignoreitem #findid
wait 1s
gosub findlibro
}
if That_spell notin #journal
{
wait 1
gosub dragndrop
}
return
; ============================== End ==============================

[phpwriter]

A me era venuto in mente il fatto del'ignoreitem, ma ho visto che già è presente quindi non saprei...

[froncy]

al posto di:

gosub findlibro

devi mettere:

loop:
  gosub findlibro
goto loop

[Ikki_of_Phoenix2]

UP
Ho provato a sistemare kome consigliato ma nn parte nemmeno + ora :I

[froncy]

Ripostalo, perchè secondo me non hai applicato bene le modifiche che ti abbiamo suggerito.

[Boydon]

Le modifiche che ho suggerito io le hai fatte solo in parte.

[RibelleVero]

potreste postare lo script completo plz
tnx a tutti

[Ikki_of_Phoenix2]

Ora ho trovato un buono script su EasyUO
Questo non va :/

;= Drag & Drop in Spellbook =
set %spellbook ZMF_MPF
set %scrolls LMF_OMF_NMF_YMF_XMF_ANF_DPF_YOF_XOF_APF_ZOF_KPF_JP F_QXL_PXL_AYL_ZXL_CYL_BYL_WXL_VXL_YXL_XXL_IYL_HYL_ JYL_EYL_DYL_GYL_FYL_STL_RTL_UTL_TTL_NTL_PTL_CUL_BU L_XTL_HUL_KUL_DUL_GUL_FUL_PUL_SUL_MUL_OUL_NUL_YUL_ UUL_TUL_BVL_EVL_DVL_OVL_NVL_QVL_CZM_BZM_EZM_DZM_YY M_XYM_AZM_ZYM_KZM_JZM_WUL
gosub findlibro

; )) First Sub ((
Sub findlibro
finditem %spellbook C_ , #backpackid
set %book #findid
if #findkind = 0
{
wait 10
gosub dragndrop
}
else
{
event sysmessage Nessuno Spellbook trovato.
wait 5
event sysmessage Lo script verra' fermato
wait 1s gosub findlibrogosub findlibrogosub findlibrogosub findlibrogosub findlibrogosub findlibrogosub findlibrogosub findlibrogosub findlibrogosub findlibrogosub findlibrogosub findlibrogosub findlibrogosub findlibrogosub findlibrogosub findlibrogosub findlibrogosub findlibro
event exmsg #charid 3 80 Stopped.
halt
}
return

; Drag & Drop
Sub dragndrop
finditem %scrolls C_ , BHZREND
set %scroll1 #findid
if #findkind = 0
{
event sysmessage Scroll trovata... attendere
wait 15
exevent drag #findid #findstack
wait 10
exevent dropc %book
gosub control
}
return

Sub control
scanjournal 1
if That_spell in #journal
{
event sysmessage La Scroll e' presente nello SpellBook oppure lo Spellbook e' pieno... controlla...
ignoreitem #findid
wait 1s
loop:
gosub findlibro
goto loop
}
if That_spell notin #journal
{
wait 1
gosub dragndrop
}
return
; ============================== End ==============================