Last update, I think. Need 4.5.13 PP.

----------------------- CrossHair.PowerPro ---------------------------
static bShowing,ev,xpos,ypos
static xcrosshair1,xcrosshair2,ycrosshair1,ycrosshair2

if(!bShowing)do

ev=event.createms(20,0,cb(scriptfolder++?"\"++scriptname++"@update"))
bShowing=1
xpos=xmouse
ypos=ymouse

xcrosshair1=cl.create("xcrosshair1",1);;+
.newproperties("topmost back: 128 128 128 transparent: 64");;+
.setrect(-1,ypos-1,xpos-1,ypos+1);;+
.show

xcrosshair2=cl.create("xcrosshair2",1);;+
.newproperties("topmost back: 128 128 128 transparent: 64");;+
.setrect(xpos+1,ypos-1,xscreen,ypos+1);;+
.show

ycrosshair1=cl.create("ycrosshair1",1);;+
.newproperties("topmost back: 128 128 128 transparent: 64");;+
.setrect(xpos-1,-1,xpos+1,ypos-1);;+
.show

ycrosshair2=cl.create("ycrosshair2",1);;+
.newproperties("topmost back: 128 128 128 transparent: 64");;+
.setrect(xpos-1,ypos+1,xpos+1,yscreen);;+
.show

else
if(event.exists(ev))
ev=ev.destroy
bShowing=0

xcrosshair1.close
xcrosshair2.close
ycrosshair1.close
ycrosshair2.close
endif
quit

@update
if(xpos <> xmouse || ypos <> ymouse)do
xpos=xmouse
ypos=ymouse

xcrosshair1.setrect(-1,ypos-1,xpos-1,ypos+1)
xcrosshair2.setrect(xpos+1,ypos-1,xscreen,ypos+1)
ycrosshair1.setrect(xpos-1,-1,xpos+1,ypos-1)
ycrosshair2.setrect(xpos-1,ypos+1,xpos+1,yscreen)
endif
quit
----------------------------------------------------------------------

Sean





Attention: PowerPro's Web site has moved: http://www.ppro.org 
Yahoo! Groups Links

<*> To visit your group on the web, go to:
    http://groups.yahoo.com/group/power-pro/

<*> Your email settings:
    Individual Email | Traditional

<*> To change settings online go to:
    http://groups.yahoo.com/group/power-pro/join
    (Yahoo! ID required)

<*> To change settings via email:
    mailto:[EMAIL PROTECTED] 
    mailto:[EMAIL PROTECTED]

<*> To unsubscribe from this group, send an email to:
    [EMAIL PROTECTED]

<*> Your use of Yahoo! Groups is subject to:
    http://docs.yahoo.com/info/terms/
 



Reply via email to