The new syntax is really of fun. Another update.

----------------------------------------------------------------------
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: 128");;+
.addproperties(" top: "++ypos-1++" bottom: "++ypos+1);;+
.addproperties(" left: "++0++" right: "++xpos-1);;+
.show

xcrosshair2=cl.create("xcrosshair2",1);;+
.newproperties("topmost back: 128 128 128 transparent: 128");;+
.addproperties(" top: "++ypos-1++" bottom: "++ypos+1);;+
.addproperties(" left: "++xpos+1++" right: "++xscreen);;+
.show

ycrosshair1=cl.create("ycrosshair1",1);;+
.newproperties("topmost back: 128 128 128 transparent: 128");;+
.addproperties(" left: "++xpos-1++" right: "++xpos+1);;+
.addproperties(" top: "++0++" bottom: "++ypos-1);;+
.show

ycrosshair2=cl.create("ycrosshair2",1);;+
.newproperties("topmost back: 128 128 128 transparent: 128");;+
.addproperties(" left: "++xpos-1++" right: "++xpos+1);;+
.addproperties(" top: "++ypos+1++" bottom: "++yscreen);;+
.show

/*
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/
 


Reply via email to