point to point lines / motion?

-=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- (c) WidthPadding Industries 1987 0\|430\|0 -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=-
Socoder -> Blitz -> point to point lines / motion?
Wed, 30 May 2007, 05:52
spinal	This has me puzzled a little. I assumed it would be dead easy, but I can't figure it out. I have a sprite at point A, for arguments sake well say 16x,32y. and I would like it tome move to 0x,0y in exactly 204 moves, however I would like it to be able to move from anywhere on the screen to 0x,0y in 204 moves. can someone help me out? -=-=- Check out my excellent homepage!
Wed, 30 May 2007, 06:06
Jayenkai	Graphics 800,600,32,2 SetBuffer BackBuffer() XFrom=Rand(0,800) YFrom=Rand(0,600) XTo=Rand(0,800) YTo=Rand(0,600) Piece=0 MaxPiece=204 Repeat Color 80,80,80 Plot ShiftBetween(XFrom,XTo,Piece,MaxPiece),ShiftBetween(YFrom,YTo,Piece,MaxPiece) Piece=Piece+1 If Piece=MaxPiece Piece=1 XFrom=XTo YFrom=YTo XTo=Rand(0,800) YTo=Rand(0,600) EndIf Color 255,255,255 Plot ShiftBetween(XFrom,XTo,Piece,MaxPiece),ShiftBetween(YFrom,YTo,Piece,MaxPiece) Flip False Until KeyDown(1) Function ShiftBetween(PointA#,PointB#,Frame#,TotalFrames#) Return PointA+((Float(PointB-PointA)/TotalFrames)*Frame) End Function --v \|update\| Quicky tweak to make it work right! \|update\| -=-=- ''Load, Next List!''
Wed, 30 May 2007, 06:19
spinal	That was quick. Thanks Jay. BTW, its for the menu on DiagnoSe, I'm having trouble zooming properly. PALibs zoom isn't working as I expected, This is going to be difficult. -=-=- Check out my excellent homepage!