XProfan

WhileLoop 10

    Print "Zeile " + &Loop

EndWhile

Print "Taste drücken..."
Waitkey
End

print "Zeile " + str$(&loop)

print "Zeile ";&loop

WhileLoop 10

    Print "Zeile " +

EndWhile

Print "Taste drücken..."
Waitkey
End

WhileLoop 10

    Print  &Loop +

EndWhile

Print "Taste drücken..."
Waitkey
End

Var  a%=4

WhileLoop 10

    Print a% +

EndWhile

Print a%
Print "Taste drücken..."
Waitkey
End