Brauch Hilfe mit Types :(

Übersicht

BlitzBasic

Beginners-Corner

	shootermaker Betreff: Brauch Hilfe mit Types :(	So, Jun 22, 2008 13:28 Antworten mit Zitat
Hallo, hänge nun schon zwei Tage an dem Problem. Ich hab hier einen type erstellt: Type ant Field x Field y Field energy Field team end Type wenn "team" 0 ist, ist es eine Einheit vom Spieler. wenn "team" 1 ist, ist es ein Gegner. Aber wie würde jetzt die Abfrage aussehen, wenn ich prüfen möcht, ob eine Einheit vom Team 0 (also eine meiner Einheit) die gleiche x bzw. y Position hat wie eine Gegnerische Einheit (Team 1). Hab schon so viele Möglichkeiten ausprobiert... unter anderem einen neuen Type erstellt (ant2) aber ich möchte es gerne mit einen Type bewerkstelligen. EDIT: Spiel ist in 2D.

shootermaker

Betreff: Brauch Hilfe mit Types :(

So, Jun 22, 2008 13:28
Antworten mit Zitat

Hallo, hänge nun schon zwei Tage an dem Problem.

Ich hab hier einen type erstellt:

Type ant
Field x
Field y
Field energy
Field team
end Type

wenn "team" 0 ist, ist es eine Einheit vom Spieler.
wenn "team" 1 ist, ist es ein Gegner.

Aber wie würde jetzt die Abfrage aussehen, wenn ich prüfen möcht, ob eine Einheit vom Team 0 (also eine meiner Einheit) die gleiche x bzw. y Position hat wie eine Gegnerische Einheit (Team 1).

Hab schon so viele Möglichkeiten ausprobiert... unter anderem einen neuen Type erstellt (ant2) aber ich möchte es gerne mit einen Type bewerkstelligen. Sad

EDIT: Spiel ist in 2D.

	Eingeproggt	So, Jun 22, 2008 13:40 Antworten mit Zitat
Code: [AUSKLAPPEN] [EINKLAPPEN] For a.ant=Each ant If a\team=0 Then For b.ant=Each ant If b\team=1 Then If a\x=b\x and a\y=b\y Then Print "JUHU" Endif Endif Next Endif Next Es gibt dann noch andere Konstrukte, wodurch sich die Anzahl der Schleifendurchläufe verringert, aber so ists fürn Anfang mal ganz in Ordnung. mfG, Christoph
Gewinner des BCC 18, 33 und 65 sowie MiniBCC 9

Eingeproggt

So, Jun 22, 2008 13:40
Antworten mit Zitat

Code: [AUSKLAPPEN]

For a.ant=Each ant
If a\team=0 Then
For b.ant=Each ant
If b\team=1 Then
If a\x=b\x and a\y=b\y Then
Print "JUHU"
Endif
Endif
Next
Endif
Next

Es gibt dann noch andere Konstrukte, wodurch sich die Anzahl der Schleifendurchläufe verringert, aber so ists fürn Anfang mal ganz in Ordnung.

mfG, Christoph

Gewinner des BCC 18, 33 und 65 sowie MiniBCC 9