Prüfen ob sich 2 Types treffen von 250

Übersicht BlitzBasic Beginners-Corner

Neue Antwort erstellen

 

Shoker

Betreff: Prüfen ob sich 2 Types treffen von 250

BeitragFr, Aug 22, 2008 15:25
Antworten mit Zitat
Benutzer-Profile anzeigen
Hey,

Habe nen Problem mit Types.

Ich möchte überprüfen ob sich 2 Types treffen. Doch das möchte einfach nicht funktionieren. Die Menschen sind nur ein Pixel gross, von daher sollte das PosX = PosX ja richtig sein.

Code: [AUSKLAPPEN]

For I = 1 To 250
If Mensch(I)\PosX = Mensch(I)\PosX and Mensch(I)\ID <> Mensch(I)\ID Then
End
EndIf
Next

Xeres

Moderator

BeitragFr, Aug 22, 2008 15:41
Antworten mit Zitat
Benutzer-Profile anzeigen
Trotzdem du einen Type-Array verwendest, sollte folgendes gehen...

Code: [AUSKLAPPEN]
For t1.<TypeName> = Each <TypeName>
   For t2.<TypeName> = Each <TypeName>
      If t1 = t2 Then Exit
      ;* Wechselwirkungen
   Next
Next

Jedes gegen jedes Prüfen, es sei denn, es ist der gleiche Eintrag.
Win10 Prof.(x64)/Ubuntu 16.04|CPU 4x3Ghz (Intel i5-4590S)|RAM 8 GB|GeForce GTX 960
Wie man Fragen richtig stellt || "Es geht nicht" || Video-Tutorial: Sinus & Cosinus
T
HERE IS NO FAIR. THERE IS NO JUSTICE. THERE IS JUST ME. (Death, Discworld)
 

Shoker

BeitragFr, Aug 22, 2008 15:47
Antworten mit Zitat
Benutzer-Profile anzeigen
Habs gerade rausgekriegt Very Happy

Danke für deine Antwort

Hab noch ein 2tes For genommen ; )

Neue Antwort erstellen


Übersicht BlitzBasic Beginners-Corner

Gehe zu:

Powered by phpBB © 2001 - 2006, phpBB Group