----- Original Message -----
From: "Alan Andrews" <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Sent: 08 December 2000 13:48
Subject: Re: <lingo-l> Lingo question_scrolling images with mouse position
> Hi...
> don't mind you butting in at all..
> I had noticed as I was playing with the file
> that there was an occasional
> error coming up...
> I wasn't sure why...!
> so thankyou Clars...
>
> have a good weekend...!
>
> alan
>
>
> ----- Original Message -----
> From: "Clars" <[EMAIL PROTECTED]>
> To: <[EMAIL PROTECTED]>
> Sent: 08 December 2000 13:41
> Subject: Re: <lingo-l> Lingo question_scrolling images with mouse position
>
>
> > Hi leon and alan-
> >
> > Hope you don't mind my butting in...
> > That's a nice little script. However, it has a flaw; positioning the
> > cursor over the center of the rotating sprite produces a "cannot divide
> > by zero" error. One way of amending this is to add a single line:
> >
> > if x2-x1 = 0 then exit
> >
> > so the entire script reads:
> >
> > on exitFrame me
> > -- get the mouse location
> > p = the mouseLoc
> > x1 = p.locH
> > y1 = p.locV
> >
> > -- get the sprite location
> > x2 = (sprite me.spriteNum).locH
> > y2 = (sprite me. spriteNum). locV
> >
> > --avoid "cannot divide by zero" error
> > if x2-x1 = 0 then exit
> >
> > -- use atan to compute the angle
> > angle = atan(float(y2-y1)/float(x2-x1))
> >
> > -- correct the angle
> > if x1 < x2 then angle = pi()+angle
> >
> > -- convert the angle to degrees
> > angle = angle*360.0/(2.0*pi())
> >
> > -- set sprite rotation
> > (sprite me.spriteNum).rotation = angle + 90
> > end
> >
> > regards,
> > Clars
> >
> > ----------------------------
> > Alan Andrews wrote:
> > > Hi leon..
> > > I found this the other day...
> > <snip>
> > > I think this may be what you are looking for...
> > > regards
> > > Alan
> > <snip>
> >
> > [To remove yourself from this list, or to change to digest mode, go to
> > http://www.penworks.com/LUJ/lingo-l.cgi To post messages to the list,
> > email [EMAIL PROTECTED] (Problems, email [EMAIL PROTECTED])
> > Lingo-L is for learning and helping with programming Lingo. Thanks!]
>
[To remove yourself from this list, or to change to digest mode, go to
http://www.penworks.com/LUJ/lingo-l.cgi To post messages to the list,
email [EMAIL PROTECTED] (Problems, email [EMAIL PROTECTED])
Lingo-L is for learning and helping with programming Lingo. Thanks!]
