XProfan

WhileLoop 10

    Imprimir "Zeile " + &Loop

EndWhile

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

imprimir "Zeile " + str$(&bucle)

imprimir "Zeile ";&bucle

WhileLoop 10

    Imprimir "Zeile " +

EndWhile

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

WhileLoop 10

    Imprimir  &Loop +

EndWhile

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

Var  a%=4

WhileLoop 10

    Imprimir a% +

EndWhile

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