INFO - FAQ - CC2-Forum - CCPro-Forum |
> hi leute > das ist mein erster beitrag hier, also seid nich zu streng mit mir ;) > zu meinem "problem" > im info unterricht haben wir die aufgabe bekommen ein kleines spielchen mit hilfe von ccbasic zu programmieren, die oben led blinken zufällig und man soll die led unter der blinkenden led klicken..dann bekommt man einen punkt. > so..ich will ja garnich wissen, wie man das programmiert, nur irgendwie hab ich gerad nen blackout, ich hab bis jetzt "nur" das zufällige aufblinken der leds geschafft, ich möchte jedoch, dass nach 10 aufgeblinkten leds das "spiel" beendet werden soll und das bekomm ich nich hin, das teil blinkt einfach weiter vor sich hin ;) > > hier ist der quelltext.. > DEFINE zahl BYTE > DEFINE runde BYTE > DEFINE led1 PORT[1] > DEFINE led2 PORT[2] > DEFINE led3 PORT[3] > DEFINE led4 PORT[4] > DEFINE led5 PORT[5] > DEFINE led6 PORT[6] > DEFINE led7 PORT[7] > DEFINE led8 PORT[8] > > #blinken > RANDOMIZE zahl > RANDOMIZE TIMER > zahl = RAND > zahl = zahl MOD 8 > > FOR runde = 1 TO 10 > IF runde > 10 THEN GOTO ende ELSE GOSUB leds > PAUSE 30 > GOTO blinken > NEXT > > #leds > IF zahl = 0 THEN led1 = ON ELSE led1 = OFF > IF zahl = 1 THEN led2 = ON ELSE led2 = OFF > IF zahl = 2 THEN led3 = ON ELSE led3 = OFF > IF zahl = 3 THEN led4 = ON ELSE led4 = OFF > IF zahl = 4 THEN led5 = ON ELSE led5 = OFF > IF zahl = 5 THEN led6 = ON ELSE led6 = OFF > IF zahl = 6 THEN led7 = ON ELSE led7 = OFF > IF zahl = 7 THEN led8 = ON ELSE led8 = OFF > RETURN > > #ende > END > > ich hoffe auf hilfe...danke schonmal > > > mfg > jens > > hallo jens, ändere mal das U-pro #blinken wie folgt: #blinken FOR runde = 1 TO 10 RANDOMIZE zahl RANDOMIZE TIMER zahl = RAND zahl = zahl MOD 8 GOSUB leds PAUSE 30 NEXT goto ende mfg Gerhard |
Antwort schreiben |