Add files via upload

This commit is contained in:
arc1tec4
2024-12-11 14:35:28 -07:00
committed by GitHub
parent 82cbb6c73a
commit 7c3d44b0ff

View File

@@ -3,4 +3,48 @@
Sets the angle the sprite is rotated by relative to its current rotation
#code
isFullScreen = false
vSync = true
winWidth = 640
winHeight = 480
canViewPortX = 0
canViewPortY = 0
OpenWindow("RotateSprite", winWidth, winHeight, isFullScreen, vSync)
sCanvas = OpenCanvasSpriteLayer(canViewPortX, canViewPortY, winWidth, winHeight)
Canvas(sCanvas)
DIM eye
DIM eyeW
DIM eyeH
DIM eyeAngle 'Variable to hold the sprites angle value
eyeAngle = 250
ReleaseKey = 0
eye = LoadImage("theEye.png")
GetImageSize(eye, eyeW, eyeH)
eyeSprite = CreateSprite(eye, eyeW, eyeH)
SetSpritePosition(eyeSprite, 100, 100)
'RotateSprite(eyeSprite, eyeAngle)
While Not Key(K_ESCAPE)
'ClearCanvas() For a sprite layer canvas, you don't need to call ClearCanvas. It's automatically called.
If Key(K_SPACE) And ReleaseKey = 0 Then
eyeAngle = 30
RotateSprite(eyeSprite, eyeAngle)
ReleaseKey = 1
ElseIf Not Key(K_SPACE) And ReleaseKey = 1 then
ReleaseKey = 0
End If
Update() 'Update automatically deals with drawing the sprites on the sprite canvas.
Wend
#/code
#image "images/theEye.png"
#ref SetSpriteRotation GetSpriteRotation