Kirjautuminen

Haku

Tehtävät

Keskustelu: Koodit: QB: Kirjoitus-efekti

snakari [12.03.2002 12:41:07]

#

Tässä olis sitten tämmönen kirjotus-efekti, eli näyttää (pitäisi) siltä että tietokoneella kirjoitetaan.

teksti$ = "snakari on kingi!"


pituus% = LEN(teksti$)
CLS
FOR kohta% = 1 TO pituus%
j$ = LEFT$(teksti$, kohta%)
COLOR 2
LOCATE 1, 1: PRINT j$; "_"
paikka% = kohta% + 1
1 :
a = TIMER
WHILE k < .4
k = TIMER - a
WEND
a = 0
k = 0
NEXT kohta%

Aivolamppu [16.03.2002 11:52:52]

#

Ihan kiva.

Dj Wolf [15.06.2002 00:06:35]

#

Mullakin on samantyylinen. Se tosin on 100X monimutkaisempi :/...

mgv [30.07.2002 21:58:51]

#

Ihan hieno...

Vastaus

Aihe on jo aika vanha, joten et voi enää vastata siihen.

Tietoa sivustosta