#title SpriteIsVisible [RCBasic Doc]
#header Function SpriteIsVisible(sprite)

Returns whether the sprite is visible

#code
isFullScreen = false
vSync = true
winWidth = 640
winHeight = 480
canViewPortX = 0
canViewPortY = 0

OpenWindow("SetSpriteVisible", winWidth, winHeight, isFullScreen, vSync)
sCanvas = OpenCanvasSpriteLayer(canViewPortX, canViewPortY, winWidth, winHeight)
Canvas(sCanvas)

DIM eye
DIM eyeW
DIM eyeH
DIM spriteTimer : spriteTimer = Timer()
DIM spriteTimerDiff : spriteTimerDiff = 2000

eye = LoadImage("theEye.png")
GetImageSize(eye, eyeW, eyeH)

eyeSprite = CreateSprite(eye, eyeW, eyeH)
SetSpritePosition(eyeSprite, 100, 100)
SetSpriteVisible(eyeSprite, 0)						'Set the flag to 0 for not visible


While Not Key(K_ESCAPE)
	If Timer() - spriteTimer > spriteTimerDiff Then
		SetSpriteVisible(eyeSprite, 1)
		Print ("Function Called")
	End If

	If SpriteIsVisible(eyeSprite) Then
		Print ("Sprite is Visible")
	else
		Print ("Sprite is not visible")
	End If
	Update()
Wend
#/code

#image "images/theEye.png"

#ref SetSpriteVisible