I am using PureBasic 5.71 LTS. It appears that RotateCoordinates' X and Y parameters are completely unresponsive. Here is a modified example from the manual (I input WindowMouseX and WindowMouseY to show that changing the origin does nothing):
Code: Select all
If OpenWindow(0, 0, 0, 400, 200, "VectorDrawing", #PB_Window_SystemMenu | #PB_Window_ScreenCentered)
CanvasGadget(0, 0, 0, 400, 200)
LoadImage(0, #PB_Compiler_Home + "examples/Sources/Data/PureBasicLogo.bmp")
Repeat
Event = WindowEvent()
If StartVectorDrawing(CanvasVectorOutput(0))
AddPathBox(0, 0, 400, 200)
VectorSourceColor(RGBA(255, 255, 255, 255))
FillPath()
MovePathCursor(50 + WindowMouseX(0), 50)
DrawVectorImage(ImageID(0), 127)
MovePathCursor(75, 75)
DrawVectorImage(ImageID(0), 127, ImageWidth(0) / 2, ImageHeight(0))
MovePathCursor(120, 0)
RotateCoordinates(WindowMouseX(0), WindowMouseY(0), 35) ; <-- here
DrawVectorImage(ImageID(0), 127)
StopVectorDrawing()
EndIf
Delay(10)
Until Event = #PB_Event_CloseWindow
EndIf