da müsstest du jetz noch eine laufvariable mit nehmen. dass könnte ungefähr so aussehen:
0->I
Lbl 1
If I<20
Then Int 2Ran#->Z
Locate 1,7,Z
" "
IfEnd
I+1->I
I=30=>0->I
Goto 1
damit kommt nun eine zahl wenn I kleiner 20 ist, das ist genau 20* der Fall. Wenn I dann größer als 20 ist, kommt kein Zeichen. Erst wenn I=30 wird I wieder auf Null gesetzt und es kommen wieder zeichen. Es gibt bestimmt auch andere Wege dass zu realisieren. da sind dir keine grenzen gesetzt.
ciao