[EasyUO - REQ] Type Finder

[porkypig]

sono appena tornato... nn avevo niente da fare ed ho realizzato questo piccolo script che cerca automaticamente i type di un item/mobile

niente di che...

; *******************************
; Script name: Type Finder
; Author: dEnX
; Version 1.0.0
; Client tested with: 6.0.9.2
; Shard: UODreams
; Public release
; *******************************
set #lpc 100
gosub Menu

; ~~~~~~~~~~~~~~~~~~ MENU CODE BEGINS ~~~~~~~~~~~~~~~~~~
sub Menu
  menu hideEUO
	menu Window Title TFinder
	menu Window Color BtnFace
	menu Window Size 144 110
	
	menu Font Transparent #true
	menu Font Align Right
	menu Font Name MS Sans Serif
	menu Font Size 8
	menu Font Style
	menu Font Color WindowText
	menu Font Transparent #false
	menu Font Align Left
	
	menu Text Title 44 8 Type Finder
	menu Text type 8 32 Type:
	
	menu Button Find 12 76 75 25 Check
	menu Button ok 100 76 35 25 Exit
	
	menu Font Style b
	menu Font BGColor Window
	
	menu Edit edit 48 28 89 n/a
	menu Show 421 270
	
	set #MenuButton null
_loop:
	if #MenuButton = Find
     gosub checka
  else
     goto _next

_next:
     if #MenuButton = ok
        {
         Menu Set edit Closing...
         Menu Hide
         halt
        }
     goto _loop
     
_finda:
       menu hideEUO
       return
; ~~~~~~~~~~~~~~~~~~ MENU CODE ENDS ~~~~~~~~~~~~~~~~~~

sub checka
event ExMsg #Charid 3 0 Targetta l'item/mobile...
set #targcurs 1
while #targcurs = 1
      wait 5
finditem #LTARGETID
Menu Set edit #FindType
set #MenuButton Null
goto _loop
return

Edit: 1000 posts!! XD