Code: Select all
FrameLimit 40
SCREEN 800,600,0, 0
floor=MakeObjectFloor()
texture=LoadImage("Media\mouse.bmp")
PaintObject floor,texture
Repeat
TurnCamera 5
MoveCamera 5
DrawGame
DrawScreen
Until EscapeKey()
Code: Select all
FrameLimit 40
SCREEN 800,600,0, 0
floor=MakeObjectFloor()
texture=LoadImage("Media\mouse.bmp")
PaintObject floor,texture
Repeat
TurnCamera 5
MoveCamera 5
DrawGame
DrawScreen
Until EscapeKey()