INFO - FAQ - CC2-Forum - CCPro-Forum |
|
Hallo Manfred, ich gehe davon aus, das durch jeden durchlauf der Schleife die Zufallszahl neu generiert wird? Somit sollte eine der 7 Led's Zufällig an gehen und nach einer bestimmten Zeit wieder aus. Beispiel vom 13.09.2007: 'Vorweg noch die Dekleration der Variablen usw. ' ' ' 'Anfang Hauptprogramm ----------------------------------------------------- Randomize = 100 'Initialisierung #anfang 'Anfang Schleife wert = RAND / 37 'Zufallszahl (0 ... 6) ? if wert=0 then gosub led-0 'Sprung Led0 an if wert=1 then gosub led-1 'Sprung Led1 an if wert=2 then gosub led-2 'Sprung Led2 an if wert=3 then gosub led-3 'Sprung Led3 an if wert=4 then gosub led-4 'Sprung Led4 an if wert=5 then gosub led-5 'Sprung Led5 an if wert=6 then gosub led-6 'Sprung Led6 an pause 10 gosub led-aus 'Sprung Led's aus pause 10 gosub anfang 'Sprung zum Anfang der Schleife 'Ende Hauptprogramm -------------------------------------------------------- 'Anfang Unterrotienen --------------------------------------------------------- #led-0 led0=an return #led-1 led1=an return #led-2 led2=an return #led-3 led3=an return #led-4 led4=an return #led-5 led5=an return #led-6 led6=an return #led-aus led0=aus led1=aus led2=aus led3=aus led4=aus led5=aus led6=aus return 'Ende Unterrotienen ---------------------------------------------------------- 'Ende Programm --------------------------------------------------------------- Mit freundlichem Gruß Heinz ********************************************************************************************************** |
Antwort schreiben |