With Image:
Code: Select all
InitSprite()
InitKeyboard()
UsePNGImageDecoder()
MyImage = LoadImage(#PB_Any, "./Media/Devil.png")
OpenScreen(800,600,32,"Something...",#PB_Screen_SmartSynchronization)
X.w = 0
Y.w = 0
ClearScreen(RGB(0,0,0))
For c = 1 To 1000
X = Random(798) + 1
Y = Random(598) + 1
StartDrawing(ScreenOutput())
DrawImage(ImageID(MyImage),X,Y)
StopDrawing()
FlipBuffers()
Next
Delay(1000)
End
Code: Select all
InitSprite()
InitKeyboard()
UsePNGImageDecoder()
;MySprite = LoadSprite(#PB_Any,"./Media/Devil.png")
LoadSprite(0,"./Media/Devil.png")
OpenScreen(800,600,32,"Something...",#PB_Screen_SmartSynchronization)
X.w = 0
Y.w = 0
ClearScreen(RGB(0,0,0))
For c = 1 To 1000
X = Random(798) + 1
Y = Random(598) + 1
DisplaySprite(SpriteID(0),X,Y)
FlipBuffers()
Next
Delay(1000)
End
**INFO: I am running a Linux box.