Jerky Movement - Socoder

-=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- (c) WidthPadding Industries 1987 0\|35\|0 -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=-
Socoder -> Blitz -> Jerky Movement
Tue, 02 Apr 2013, 21:30
dna	Here's some code that I wanted the little square to move smoothly across the screen. Graphics 640,600,16,2:SetBuffer BackBuffer() XX#=0:YY#=550 Repeat CH=0 While CH=0 CH=GetKey() Wend If CH=27 Then End RPT=MilliSecs() Repeat If MilliSecs()-RPT>500 Then Locate 20,20:Text 20,20,AM:Flip:Cls:AM=AM+1:XX#=XX#+1.0 Rect XX,YY,20,20,1:VWait Delay 200 Until Not KeyDown(209) Forever --v Another website told me to use floats which I did but nothing changed. Thanks for the help in advance. -=-=- DNA
Wed, 03 Apr 2013, 00:52
rockford	If you want smooth movement on any machine then "delta timing" is something you may want to look at. Basically delta timing involves increases or decreases in the positional movement of an object over a set period of time. This means that on a slow computer the object may move 10 pixels every step whereas on a fast pc the object may move 2 pixels per step - both will move the same number of pixels in the same time limit, but the fast pc will make the movement appear smoother. I don't use it myself (I've never seen conclusive proof that this does actually gives smoother movement), as realistically your pc may be doing other things in the background, which changes constantly and therefore affects the CPU time being used in your program. All you can do is give the impression of smooth movement by being consistant with your movement code. Be aware that floats can give odd readings when checking for collisions too, so you might get smoother movement, but your player might also go through walls or floors!
Wed, 03 Apr 2013, 02:04
waroffice	you went to another website?
Wed, 03 Apr 2013, 09:56
Dabz	I'd say your code is a bit messy, and defo in need a tidy up... Make it a little more readable... Anyway, if you looksy here:- www.blitzbasic.com/bpdocs/command.php?name=Flip&ref=2d_a-z How does the example in the link run for you? If you want to move it using the KeyDown whatsit, you can change it too something like:- ; Flip/Backbuffer()/Rect Example ; Set Graphics Mode Graphics 640,480 ; Go double buffering SetBuffer BackBuffer() ; Setup initial locations for the box box_x = -20 ; negative so it will start OFF screen box_y = 100 While Not KeyHit(1) If KeyDown(28) ;Space box_x = box_x + 1 ; Move the box over one pixel If box_x = 640 Then box_x=-20 ; If it leaves the Right edge, reset its x EndIf Cls ; Always clear screen first Rect box_x,box_y,20,20,1 ; Draw the box in the current x,y location Flip ; Flip it into view location Wend --v Dabz -=-=- Intel Core i5 6400 2.7GHz, NVIDIA GeForce GTX 1070 (8GB), 8Gig DDR4 RAM, 256GB SSD, 1TB HDD, Windows 10 64bit
Wed, 03 Apr 2013, 14:24
dna	Thanks Dabs. My code was misorganized. Graphics 640,600,16,2:SetBuffer BackBuffer() XX=0:YY=550 Repeat CH=0 While CH=0 CH=GetKey() Wend If CH=27 Then End RPT=MilliSecs() Repeat If MilliSecs()-RPT>500 Then Cls:Locate 20,20:Text 20,20,AM:Rect XX,YY,20,20,1:Flip:AM=AM+1:XX=XX+2.0 Until Not KeyDown(209) Forever --v I reformatted it and got better results. Thanks -=-=- DNA