I updated the four-bar version of the CrossHair, using the new
syntax/services Bruce introduced in the latest build.
-----------------------------------------------------------------------
static
bShowing,ev,xpos,ypos,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)
xcrosshair1.newproperties("topmost back: 128 128 128 transparent: 128")
xcrosshair1.addproperties(" top: "++ypos-1++" bottom: "++ypos+1)
xcrosshair1.addproperties(" left: "++0++" right: "++xpos-1)
xcrosshair2=cl.create("xcrosshair2",1)
xcrosshair2.newproperties("topmost back: 128 128 128 transparent: 128")
xcrosshair2.addproperties(" top: "++ypos-1++" bottom: "++ypos+1)
xcrosshair2.addproperties(" left: "++xpos+1++" right: "++xscreen)
ycrosshair1=cl.create("ycrosshair1",1)
ycrosshair1.newproperties("topmost back: 128 128 128 transparent: 128")
ycrosshair1.addproperties(" left: "++xpos-1++" right: "++xpos+1)
ycrosshair1.addproperties(" top: "++0++" bottom: "++ypos-1)
ycrosshair2=cl.create("ycrosshair2",1)
ycrosshair2.newproperties("topmost back: 128 128 128 transparent: 128")
ycrosshair2.addproperties(" left: "++xpos-1++" right: "++xpos+1)
ycrosshair2.addproperties(" top: "++ypos+1++" bottom: "++yscreen)
xcrosshair1.show
xcrosshair2.show
ycrosshair1.show
ycrosshair2.show
else
if(event.exists(ev))
ev=ev.destroy
bShowing=0
xcrosshair1.close
xcrosshair2.close
ycrosshair1.close
ycrosshair2.close
endif
quit
@update
if(xmouse!=xpos || ymouse!=ypos)do
xpos=xmouse
ypos=ymouse
xcrosshair1.setrect(0,ypos-1,xpos-1,ypos+1)
xcrosshair2.setrect(xpos+1,ypos-1,xscreen,ypos+1)
ycrosshair1.setrect(xpos-1,0,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/
