PureBoard

Code: Alles auswählen

InitSprite()

OpenWindow(2,0,0,800,600,#pb_window_screencentered,"Test")
OpenWindowedScreen(WindowID(2),0,0,800,600,0,0,0)
InitNetwork()
InitMouse() 
 
LoadImage(1, "Maus.BMP") 

Repeat


ExamineMouse() 
x=MouseX()
y=MouseY()

StartDrawing(WindowOutput()) 
DrawImage(1,x,y)
StopDrawing()

FlipBuffers() 
ClearScreen(0, 128, 255) 

forever

Code: Alles auswählen

InitSprite()

OpenWindow(2,0,0,800,600,#pb_window_screencentered,"Test")
OpenWindowedScreen(WindowID(2),0,0,800,600,0,0,0)
InitNetwork()
InitMouse()
 
LoadImage(1, "Maus.BMP")

Repeat
  
  WaitWindowEvent()
  ExamineMouse()
  x = MouseX()
  y = MouseY()
  
  StartDrawing(ScreenOutput())
  DrawImage(UseImage(1), x, y)
  StopDrawing()
  FlipBuffers()
  ClearScreen(0, 128, 255)
  Delay(1)
forever