Roger Guay Wrote:
(snip)
on MouseUp
global V, Xo, Yo, Theta, T, X
--put item 1 of the rect of graphic "Yaxis" into Xo. Yaxis is a
vertical line and Xo,Yo define the origin of motion
--put item 4 of the rect of graphic "Yaxis" into Yo.
put field "V" into V ---- try a value of about 27 in field "V"
Put the value of field "Theta" into Theta ----try a value of 1.2 in field "Theta"
set the loc of graphic "mortor" to Xo,Yo ---- Graphic "mortor" is a
small red round ball.
show graphic "mortor"
put 0 into T
put xo into x
put Yo into y
play "Mortor.aiff"
repeat while Y <= Yo + 1
add 1 to T
put the value of (Xo+V*cos(Theta)*T ) into x
put the value of (Yo - V*sin(Theta)*T + .5*T^2 ) into Y
set the loc of graphic "mortor" to X,Y
wait 1
end repeat
Roger,
P.S.
You may want to consider using: sin(Theta*180/pi) so that you can use degrees instead of radians in you angle field. Or perhaps write a separate function:
function sine ang
return sin(ang*180/pi)
end sine
And do the same for cosine.
Jim
_______________________________________________
use-revolution mailing list
[EMAIL PROTECTED]
http://lists.runrev.com/mailman/listinfo/use-revolution
