[EasyUo] catalogare oggetti

[danyeleid]

dato che nn è uno script che avvantaggia qualcuno nel game, ho deciso di render pubblico il mio script per catalogare oggetti con easyuo, fatto circa 5 minuti fa con le mie manine :P, basta settare l'ID del container che contiene gli oggetti dove indicato, aprire il contenitore, e premere play^^

;===============================================
;===SETTARE L'ID DEL CONTAINER DA CATALOGARE===
;===============================================
SET %CONTAINER BYPGQMD
;===============================================
;================INIZIO SCRIPT===================
;===============================================

INIZIO:
	FINDITEM * C_ , %CONTAINER
	IF #FINDKIND <> 0
		{
		GOTO FINE
		}
	EVENT PROPERTY #FINDID
	SET %PROPS #PROPERTY
LOOP:
	STR POS %PROPS $
	IF #STRRES = 0
		{
		GOTO IGNORE
		}
	SET %LUNG #STRRES - 1
	STR LEFT %PROPS %LUNG
	EXECUTE CMD /C ECHO #STRRES >> CATALOGO.TXT
	EVENT SYSMESSAGE STAMPA
	SET %LUNG %LUNG + 1
	STR DEL %PROPS 1 %LUNG
	SET %PROPS #STRRES
	GOTO LOOP
IGNORE:
	IGNOREITEM #FINDID 1
	EXECUTE CMD /C ECHO -------------------------------- >> CATALOGO.TXT
	EVENT SYSMESSAGE OGGETTO COMPLETATO
	GOTO INIZIO
FINE:
	EVENT SYSMESSAGE CATALOGO COMPLETO
	EXECUTE CMD /C ECHO --- FINE CATALOGO ---- >> CATALOGO.TXT
	IGNOREITEM RESET 1
	HALT

ciau a tutti e buon game
ah.. dimenticavo, togliete la spunta in options>permissions, su "disable execute" e "only execute files in executable directory"

[mimim]

sbagliata sezione

evvai l'ho detto

[danyeleid]

Originally posted by elendil
sbagliata sezione

evvai l'ho detto

hanno messo il forum scripts??!
dove?
come?
spostate sorry^^"

[Dain_Piediferro]

Bello bello! Mi piace il fatto che te li mette in un file e poi puoi copiarli, incollarli, stamparli ecc....

Peccato la sezione sbagliata!

[mimim]

Originally posted by Noricum

hanno messo il forum scripts??!
dove?
come?
spostate sorry^^"

dentro al forum dubbi e domande

[danyeleid]

Originally posted by elendil

dentro al forum dubbi e domande

tnx la prox volta metto al posto giusto

[gmkeiji]

previo permesso dell'autore ho aggiunto la possibilità di targettare il container da catalogare e la possibilità di targettarne un'altro quando finita la catalogazione


code:--------------------------------------------------------------------------------
;===============================================
;===TARGETTARE IL CONTAINER DA CATALOGARE===
;===============================================
CONTAINER:
display ok Scegli il Container
wait 10
set #targcurs 1
target
targetloop:
if #targcurs = 1
goto targetloop
set %CONTAINER #LTARGETID
wait 1s
goto inizio
;===============================================
;================INIZIO SCRIPT===================
;===============================================

INIZIO:
FINDITEM * C_ , %CONTAINER
IF #FINDKIND <> 0
{
GOTO FINE
}
EVENT PROPERTY #FINDID
SET %PROPS #PROPERTY
LOOP:
STR POS %PROPS $
IF #STRRES = 0
{
GOTO IGNORE
}
SET %LUNG #STRRES - 1
STR LEFT %PROPS %LUNG
EXECUTE CMD /C ECHO #STRRES >> CATALOGO.TXT
EVENT SYSMESSAGE STAMPA
SET %LUNG %LUNG + 1
STR DEL %PROPS 1 %LUNG
SET %PROPS #STRRES
GOTO LOOP
IGNORE:
IGNOREITEM #FINDID 1
EXECUTE CMD /C ECHO -------------------------------- >> CATALOGO.TXT
EVENT SYSMESSAGE OGGETTO COMPLETATO
GOTO INIZIO
FINE:
EVENT SYSMESSAGE CATALOGO COMPLETO
EXECUTE CMD /C ECHO --- FINE CATALOGO ---- >> CATALOGO.TXT
IGNOREITEM RESET 1
msg STAMPA COMPLETATA$
display yesno Vuoi scegliere un'altro Container?
if #dispres = yes
{
goto CONTAINER
}
if #dispres = no
halt
}


--------------------------------------------------------------------------------

[danyeleid]

Originally posted by keiji

usa (code) e (/code)

[danyeleid]

vabbè dai lo metto in code

;===============================================
;===TARGETTARE IL CONTAINER DA CATALOGARE===
;===============================================
CONTAINER:
display ok Scegli il Container
wait 10
set #targcurs 1
target
targetloop:
if #targcurs = 1
  goto targetloop
set %CONTAINER #LTARGETID
wait 1s
  goto inizio
;===============================================
;================INIZIO SCRIPT===================
;===============================================

INIZIO:
	FINDITEM * C_ , %CONTAINER
	IF #FINDKIND <> 0
		{
		GOTO FINE
		}
	EVENT PROPERTY #FINDID
	SET %PROPS #PROPERTY
LOOP:
	STR POS %PROPS $
	IF #STRRES = 0
		{
		GOTO IGNORE
		}
	SET %LUNG #STRRES - 1
	STR LEFT %PROPS %LUNG
	EXECUTE CMD /C ECHO #STRRES >> CATALOGO.TXT
	EVENT SYSMESSAGE STAMPA
	SET %LUNG %LUNG + 1
	STR DEL %PROPS 1 %LUNG
	SET %PROPS #STRRES
	GOTO LOOP
IGNORE:
	IGNOREITEM #FINDID 1
	EXECUTE CMD /C ECHO -------------------------------- >> CATALOGO.TXT
	EVENT SYSMESSAGE OGGETTO COMPLETATO
	GOTO INIZIO
FINE:
	EVENT SYSMESSAGE CATALOGO COMPLETO
	EXECUTE CMD /C ECHO --- FINE CATALOGO ---- >> CATALOGO.TXT
	IGNOREITEM RESET 1
		msg STAMPA COMPLETATA$
     	display yesno Vuoi scegliere un'altro Container?
         	 if #dispres = yes
  {
   		 goto CONTAINER
				}
          if #dispres = no
                    halt
			}