dim, ( array ) prüfung

Übersicht BlitzBasic Allgemein

Neue Antwort erstellen

Mathias-Kwiatkowski

Betreff: dim, ( array ) prüfung

BeitragSo, Dez 17, 2006 13:29
Antworten mit Zitat
Benutzer-Profile anzeigen
hi, leute ich habe ein problem, in meinem dim (array) feld werden zahlen hinterlegt


Code: [AUSKLAPPEN]

dim zahl(8)

for t=0 to 8
zahl(t)=rnd(10)
next


mein problem ist es nun ich muss wissen ob in diesem array 2 gleiche und 3 gleiche zahlen drin vorkommen, wie kann ich das machen?

habe schon etwas rumgespielt, bin aber irgendwie zu dum dazu... Embarassed

kann mir jemand helfen?
 

Dreamora

BeitragSo, Dez 17, 2006 13:33
Antworten mit Zitat
Benutzer-Profile anzeigen
Wenn du nicht genau weisst, was für Zahlen drin sein können, dann könntest du sie dir in eine Liste speichern und dann wenn du zur nächsten zahl kommst, einfach wieder ein element der zahl hinzufügen und am Ende die Liste einfach sortieren und zählen.

wenn du weisst, was für zahlen drin sein können und das nicht zuviele sind, wäre ein Zählarray (wo du einfach bei eintrag = zahl die anzahl speicherst und erhöhst) die bessere variante.
Ihr findet die aktuellen Projekte unter Gayasoft und könnt mich unter @gayasoft auf Twitter erreichen.
 

Problemchen

BeitragSo, Dez 17, 2006 14:51
Antworten mit Zitat
Benutzer-Profile anzeigen
Hi, wie wäre es mit so etwas in der Art:
Code: [AUSKLAPPEN]
Dim zahl(8)

Global checked_objekte.cobjekt
Type cobjekt
   Field zahl
   Field anzahl
End Type


For t=0 To 8
   zahl(t)=Rnd(10)

   gefunden=0
   For checked_objekte.cobjekt = Each cobjekt
      If (zahl(t)=checked_objekte\zahl) Then
         checked_objekte\anzahl=checked_objekte\anzahl
         gefunden=1
      EndIf
   Next
   If gefunden=0 Then
      checked_objekte.cobjekt= New cobjekt   ; weiteres Objekt hinzufügen
      checked_objekte\zahl = zahl(t)
      checked_objekte\anzahl=1
   EndIf

Next


So zähle ich häufig meinen Stuff ab, wenn ich was per Zufall generiere. Mag nicht unbedingt optimal sein, aber funktioniert Smile

gl damit

Neue Antwort erstellen


Übersicht BlitzBasic Allgemein

Gehe zu:

Powered by phpBB © 2001 - 2006, phpBB Group