;graphics etc
Graphics3D 1024,768,32
SetBuffer BackBuffer()
Global player,score=0,y


;camera i svet
camera=CreateCamera()
light=CreateLight()
AmbientLight 0,0,0
PositionEntity camera,0,0,-5
PositionEntity light,0,5,-5
LightColor light,255,250,215

;player
player=CreateSphere(32)
ScaleEntity player,.5,.5,.5
PositionEntity player,x#,-2.5,0

;cycle
Repeat
x#=0


If KeyDown(203) =True
x#=x#-.07
MoveEntity player,x#,0,0
EndIf

If KeyDown(205)=True 
x#=x#+.07
MoveEntity player,x#,0,0
EndIf

If EntityX(player) > 4.2
PositionEntity player,4.2,-2.5,0
EndIf

If EntityX(player) < -4.2
PositionEntity player,-4.2,-2.5,0
EndIf




UpdateWorld
RenderWorld
Flip
Until KeyHit(1)