[CERCO]Script drag health bar

[cazzato]

Se qualcuno ne ha voglia o ne possiede già uno semplice ma funzionante avrei bisogno di uno script che apre le barre di status di un target e magari la trascina in un punto x y

IO HO TROVATO QUESTO PRENDE LA BARRA LA TRASCINA UN PO OVUNQUE
;################################################# #######
; Script Name: drag healthbar to pos
; Author: Egg
; Version: 1.1
; Client Tested with: EA 6.0.9.2
; EUO version tested with: 1.5 Version 142
; Shard OSI / FS: OSI Servers
; Revision Date: 26-07-2008
; Public Release: 25-07-2008
; Global Variables Used:
; Purpose: To drag a healthbar of any monster/pet/player via their ID
;################################################# ########
; @name: draghealthbartopos
; @author: Egg
; @param: %1 - The ITEMID of the Player or Monster
; @param: %2 - optional: The X-position, the healthbar should be dragged to.
; @param: %3 - optional: The Y-position, the healthbar should be dragged to.
; @param: %4 - optional: timeout in seconds, default is 5 seconds
; @Returns: #true or #false wether it suceeded or not.
; @Usage: if %2 and %3 are not given, the sub will only drag the healthbar but not move it.
; ---------------------------
sub draghealthbartopos
namespace push
namespace local ghealthsub , #random
set #result #false
set !oldlpc #lpc
set #lpc 1000
set !oldcontid #contid
if %4 = n/a
set %4 5 ;default timeout @ 5s
set !substarttime #scnt
if !oldcontid = %1
set #result #true
repeat
{
if #result
break
set !subruntime #scnt - !substarttime
if !subruntime > %4
break
finditem %1
set !nomove #true
set !curcharposx #charposx
set !curcharposy #charposY
set !curcharposz #charposZ
set !targetposx #findx
set !targetposy #findy
set !targetposz #findz
if #findkind = 1
{
;from the worldXYZToScreenXY sub, Alexandria Library:
set !tmpx ( #findx - #charPosX ) * 22
set !tmpy ( #charPosY - #findy ) * 22
set !_cursorX #cliLeft + #cliXRes / 2 + !tmpx + !tmpy
set !_cursorY #cliTop + #cliYRes / 2 + !tmpx - !tmpy - ( #findz - #charPosZ ) * 4
for !offset 1 20
{
set !_cursory !_cursory - 5
;savepix !_cursorx !_cursory 1
click !_cursorx !_cursory g
wait 1
if #contname = drag_gump
click !_cursorx !_cursory p
if #contkind = svrc && #contid = #findid && #contid <> !oldcontid
{
click #cursorx #cursory
set #result #true
break

}
if #contkind = svrc && #contid <> #findid && #contid <> !oldcontid
click !_cursorx !_cursorY r
;cmppix 1 f
finditem %1
if #findkind = 1
{
if !curcharposx <> #charposx || !curcharposy <> #charposy || !curcharposz <> #charposz || !targetposx <> #findx || !targetposy <> #findy || !targetposz <> #findz
{
set !nomove #false
break
}
}
else
break ;target left scanrange
}
}
}
until !nomove
if #result && %2 <> n/a && %3 <> n/a
{
while #contid = %1 && ( #contposx <> %2 || #contposy <> %3 )
contpos %2 %3
}
set #lpc !oldlpc
namespace clear
namespace pop
wait 2 ;restore #lpc
return #result