Function GetSpriteType(sprite)

Returns the collison body type of a sprite.

By default, sprites are dynamic when they are created.

Possible types returned

isFullScreen = false 
vSync = true 
winWidth = 640 
winHeight = 480 
canViewPortX = 0 
canViewPortY = 0 
  
OpenWindow("GetSpriteType", winWidth, winHeight, isFullScreen, vSync) 
pCanvas = OpenCanvas(2008000200801)                                     'Need to open a canvas for drawing the text
sCanvas = OpenCanvasSpriteLayer(canViewPortX, canViewPortY, winWidth, winHeight) 
Canvas(sCanvas) 
  
DIM eye 
DIM eyeW 
DIM eyeH 
eyeSpriteX = 100 
eyeSpriteY = 100 
eyeSprite2X = 400 
eyeSprite2Y = 125 
  
DIM font1 
  
Font1 = LoadFont("DripOctober.ttf"16) 
SetFont(Font1) 
SetColor(RGB(100200200)) 
  
eye = LoadImage("theEye.png") 
GetImageSize(eye, eyeW, eyeH) 
  
eyeSprite = CreateSprite(eye, eyeW, eyeH) 
SetSpritePosition(eyeSprite, eyeSpriteX, eyeSpriteY) 
SetSpriteSolid(eyeSprite, 1) 
SetSpriteType(eyeSprite, SPRITE_TYPE_KINEMATIC) 
  
'The flags for each type are SPRITE_TYPE_STATIC = 0
' SPRITE_TYPE_KINEMATIC = 1
' SPRITE_TYPE_DYNAMIC = 2
  
eyeSprite2 = CreateSprite(eye, eyeW, eyeH) 
SetSpritePosition(eyeSprite2, eyeSprite2X, eyeSprite2Y) 
SetSpriteSolid(eyeSprite2, 1) 
SetSpriteType(eyeSprite2, SPRITE_TYPE_DYNAMIC) 
  
While Not Key(K_ESCAPE) 
ClearCanvas() 
Canvas(sCanvas) 
  
Canvas(pCanvas)                                            'change to the standard drawing canvas for drawing text
  
DrawText("Sprite on left type: " + STR$(GetSpriteType(eyeSprite))1030) 
  
Update() 
Wend 


Link to Font (It's locally on your computer, your not downloading anything from the internet)


Related: SetSpriteType