I
got some question:
How make a backbuffer
How Flip
How do we need need to clean it with command
How Display sprite ((in my code it not working))
N.B:Below is my first and is inomplet what is better to do
Code: Select all
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Testing Pure Basic;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
InitSprite()
OpenScreen(640,480,16,"")
InitKeyboard()
InitSound()
SetFrameRate(60)
LoadSprite(0,"ball.bmp",0)
LoadSprite(1,"bat.bmp",0)
LoadSprite(2,"bat.bmp",0)
Global playerx
Global pLayery
Global opponentx
Global opponenty
Global ballx
Global bally
Global opponentScore
Global PlayerScore
playerx=0
playery=240
opponentx=640
opponenty=240
ballx=5
bally=5
opponentscore=0
playerscore=0
Procedure SetPlayer()
DisplaySprite(1,playerx,playery)
EndProcedure
Procedure SetOpponent()
DisplaySprite(2,opponentx,opponenty)
EndProcedure
Repeat
ExamineKeyboard()
SetPlayer()
SetOpponent()
Until KeyboardPushed(1)
End


