Hallihallo ich wollte mir ein programm schreiben was wir per random die zahlen 1 bis 8 in einer schleife ausgibt. Im prinzip kein problem und des habe ich auch hinbekommen. Nun will ich aber nicht dass nachdem die zahl 1 gekommen ist dass danach die zahl 4 kommt und bei der zahl 2 dass nicht die zahl 5 kommt usw..Ich schreibe mal was nicht darf also 1 und 4; 2 und 5;3 und 6; 7 und 8. Die entgegengesetzten zahlen sollen sich nach 4 maligem wiederholen ich dachte dass es sich am besten in einem array am besten zu bewerkstelligen wäre aber ich kenne ich da leider nicht so gut aus. Ich gebe mal noch ein beispiel wie des aussehen soll und wie nicht Also es soll z.b. 1536 aber nicht 1436 sein weil ja 1 und 4 entgegengesetzt ist wenn das Random dann weitergelaufen ist dann verschwindet die 6 am ende und eine neue zahl soll am anfang erscheinen z.b. die 7 also heißt es 7153.
SO ich denke dies ist ziemlich verwirrend deswegen scheibe ich es mal soweit hin wie ich es mir gedacht hatte aber ich kenn mich mit arrays gar nicht aus
Spoiler anzeigen
While 1
$random = Random (1,8,1)
If $random = 1 Then
Msgbox (0,"","$random Ist 1. Die 1 mag die 4 nicht.")
EndIf
If $random = 2 Then
Msgbox (0,"","$random Ist 2. Die 2 mag die 5 nicht.")
EndIf
If $random = 3 Then
Msgbox (0,"","$random Ist 3. Die 3 mag die 6 nicht.")
EndIf
If $random = 4 Then
Msgbox (0,"","$random Ist 4. Die 4 mag die 1 nicht.")
EndIf
If $random = 5 Then
Msgbox (0,"","$random Ist 5. Die 5 mag die 2 nicht.")
EndIf
If $random = 6 Then
Msgbox (0,"","$random Ist 6. Die 6 mag die 3 nicht.")
EndIf
If $random = 7 Then
Msgbox (0,"","$random Ist 7. Die 7 mag die 8 nicht.")
EndIf
If $random = 8 Then
Msgbox (0,"","$random Ist 8. Die 8 mag die 7 nicht.")
EndIf
; Hier weiß ich nicht weiter mit dem Array
; es soll ja die zahl die eben ausgegeben wurde speichern
; und eben verhindern dass random die entgegengesetzte zahl nach
; 4 maligem wiederholen der ziffernfolge zurückgibt.
Wend
Ich bedank mich schon mal für die antworten