FreeBasic forum and examples/previews quicklist

[Z!re]

Or read my topic in the debate forum and stop arguing.


And:

Code:

Flag = 0
For a = 0 to 10000
If Array(a) = 0 Then Flag = 1: Exit For
Next
If Flag = 0 Then
Print "Aaaw, no free slot!"
End
End if
array(a) = 1

Code:

For a = 0 to 10000
If Array(a) = 0 Then Goto GotIndex
Next
Print "Aaaaw, no free slot!"
End
GotIndex:
array(a) = 1