Different type of loop

Blitz3D Forums/Blitz3D Programming/Different type of loop

hi
try:
Graphics 800,600,0,2
Global Entradas
Global Salidas
SetBuffer BackBuffer()
AppTitle "Function loop ;)" 
omg_loop()
Function omg_loop() 
	Entradas = Entradas + 1
	If KeyHit(1) End
	Cls
	For k = 2 To 255
		If KeyDown(k)
			Color 255,255,255
			Rect 0,0,GraphicsWidth(),GraphicsHeight()
			Color 0,0,0
			Text GraphicsWidth()/2,GraphicsHeight()/2,":D OM NOm NomNNMOm TEH LEWP!!!11!!",1,1
		EndIf 
	Next
	Text 20,20,"Entradas/Salidas: "+Entradas+" / "+Salidas
	Flip
	omg_loop()
	Salidas = Salidas + 1
End Function 

as you can see, you are entering but never exiting the function, that should end with a stack overflow. If you call a function recursivelly you have to had a way out.

Juan