Matrix-Effekt

[ph]

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

[ph]

hatte gerade noch eine andere idee...das ist zwar ein bissel beschiss, aber der effekt ist okay. und zwar folgender code:

ClrText
Lbl 1
Int 3Ran#->Z
Z=0=>Locate 1,7,"010010101110101011101"
Z=1=>Locate 1,7,"101010100111101110101"
Z=2=>Locate 1,7,"101010101000101000100"
" "
Goto 1

der rechner macht dann eine zufallsgesteuerte zeile von einsen und nullen (du kannst natürlich noch andere kombinationen nehmen) und dann ein Leerzeile. Das sieht auch coool aus :cool:
ciao

[*Alex]

Soetwas in die Richtung hab ich auch schon angedacht. Nur ich fände es einfach cooler, wenn die Zeilen nicht alle gleichzeitig kommen sondern etwas Zeitverstezt. Das ist mit dem Code leider nicht möglich. Muss also noch irgendwie anders gehen...

[ph]

jepp...schon kapiert

tja hab da jetz auf die schnelle auch keine lösung...aber morschen erste stunde is mathe *gggg* ....ich denk weiter über deinen matrix-effekt nach

cu

[Bytefish]

yo und du brauchst nichma mein komplizierten listenscheiss. :)
nice one. :D

[ph]

jo...das sieht doch wirklich net schlecht aus. glückwunsch...man hört sich

[*CasioFreak]

Hab hier von nem kollegen auch ein Matrix-Schoner:

Link
[url]www.cfx-9850-gb.de/CAT-Dateien/MATRIX1.CAT[/url]
Picture
[img]www.cfx-9850-gb.de/images/MATRIX11.BMP[/img]

[url]www.cfx-9850-gb.de/CAT-Dateien/MATRIX2.CAT[/url]
Picture
[img]www.cfx-9850-gb.de/images/MATRIX21.BMP[/img]

[CasioFreak]

Nochmal die Bilder. aus irgendeinen Grund gingen die nicht,
Picture Matrix1
[img]home.arcor.de/casio-page/images/MATRIX11.BMP[/img]

Picture Matrix2
[img]home.arcor.de/casio-page/images/MATRIX21.BMP[/img]



[Editiert durch CasioFreak am Samstag, Mai 17, 2003 @ 09:41]

[*Alex]

Hi, hab jetzt noch ein bisschen am Code rumgewerkelt und hab noch ein "Welcome"Screen eingebaut. Ich denk mal, jetzt isses ganz gut:

Locate 9,1," "
Locate 6,2,"The Matrix"
Locate 7,3,"Reloaded"
Locate 1,4," "
Locate 1,5,""
Locate 1,6,"Press EXE"
Locate 1,7,"to get into..."Ý
ClrText
Int 7Ran#->Z
Locate 1,1,"0 001 10111 101 11 0"
Locate 1,2,"0 011 10100 010 00 1"
Locate 1,3,"1 101 10100 101 00 0"
Locate 1,4,"0 001 10111 101 11 0"
Locate 1,5,"1 101 11011 101 10 0"
Locate 1,6,"1 100 01011 101 10 0"
Locate 1,7,"1 101 10100 101 00 0"
Lbl 1
Int 21Ran#->A
Locate A,1,Int 2Ran#
Locate A,2,Int 2Ran#
Locate A,3,Int 2Ran#
Locate A,4,Int 2Ran#
Locate A,5,Int 2Ran#
Locate A,6,Int 2Ran#
Locate A,7,Int 2Ran#
Lbl 0
Int 21Ran->W
Locate W,1," "
Locate W,2," "
Locate W,3," "
Locate W,4," "
Locate W,5," "
Locate W,6," "
Locate W,7," "
Goto 1

Grüße, man sieht sich und noch ein schönes WE,
Alex

[ph]

da hast du doch nen richtig schönen code hinbekommen...auch ein schönes WE