ok. also, hier mein quelltext:
screen 7
RANDOMIZE TIMER
spalte% = INT(RND * 40)
zeichen% = INT(RND * 93) + 33
zeit2% = INT(RND * 2)
zeile% = 1
zeit% = 1
SLEEP zeit2%
LOCATE zeile%, spalte%
COLOR 10
PRINT CHR$(zeichen%)
SLEEP zeit%
COLOR 2
LOCATE zeile%, spalte%
PRINT CHR$(zeichen%)
COLOR 10
zeile% = zeile% + 1
LOCATE zeile%, spalte%
PRINT CHR$(zeichen%)
schleife% = 0
1 IF schleife% = 21 THEN
SLEEP zeit%
COLOR 2
LOCATE zeile%, spalte%
PRINT CHR$(zeichen%)
COLOR 8
zeile% = zeile% - 1
LOCATE zeile%, spalte%
PRINT CHR$(zeichen%)
SLEEP zeit%
COLOR 8
zeile% = zeile% + 1
LOCATE zeile%, spalte%
PRINT CHR$(zeichen%)
COLOR 0
GOTO 2
END IF
schleife% = schleife% + 1
SLEEP zeit%
COLOR 2
LOCATE zeile%, spalte%
PRINT CHR$(zeichen%)
COLOR 8
zeile% = zeile% - 1
LOCATE zeile%, spalte%
PRINT CHR$(zeichen%)
COLOR 10
zeile% = zeile% + 2
LOCATE zeile%, spalte%
PRINT CHR$(zeichen%)
GOTO 1
2 END
und diese befehle sollen gestartet werden und wärend sie laufen soll der dieses paket wieder gestertet werden, so das es 2x läuft. falls dich ineressiert, was es bwirkt, es soll so ne art matrix sein, wo die buchstaben herunterfallen. die vorab version findest du unter www.SteffenPhilippi.de.vu unter download.
mfg
steffen