2d - Haus bauen

Übersicht BlitzBasic Beginners-Corner

Neue Antwort erstellen

 

Sterbendes Lüftlein

Betreff: 2d - Haus bauen

 BeitragSa, Aug 21, 2010 10:14
Antworten mit Zitat
Benutzer-Profile anzeigen
Text entfernt

Xeres

Moderator

BeitragSa, Aug 21, 2010 10:18
Antworten mit Zitat
Benutzer-Profile anzeigen
Benutze Types oder, wenn du eine Tilemap verwendest, ein entsprechendes Feld.
Und aussagekräftige Variablennamen wären auch nicht übel.
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
THERE IS NO FAIR. THERE IS NO JUSTICE. THERE IS JUST ME. (Death, Discworld)
 

Sterbendes Lüftlein

 BeitragSa, Aug 21, 2010 10:27
Antworten mit Zitat
Benutzer-Profile anzeigen
Text entfernt

Xeres

Moderator

BeitragSa, Aug 21, 2010 10:30
Antworten mit Zitat
Benutzer-Profile anzeigen
Du erstellst einen Type THaus und für jedes Gebäude eine neues Objekt davon mit xy Position und ggf Bild. Dann kannst du mit For...Each alle THaus Objekte durchgehen und einzeichnen.
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
THERE IS NO FAIR. THERE IS NO JUSTICE. THERE IS JUST ME. (Death, Discworld)
 

Sterbendes Lüftlein

 BeitragSa, Aug 21, 2010 10:33
Antworten mit Zitat
Benutzer-Profile anzeigen
Text entfernt

Xeres

Moderator

BeitragSa, Aug 21, 2010 10:42
Antworten mit Zitat
Benutzer-Profile anzeigen
BlitzBasic: [AUSKLAPPEN] 
Graphics(800,600,0,2)
Local FrameTimer = CreateTimer(60)
Global mh1, mx, my

Type THaus
	Field x, y
	;[...]
	
End Type


Repeat
	Cls
	
	mh1 = MouseHit(1)
	mx = MouseX()
	my = MouseY()
	
	If mh1 Then ErstelleHaus(mx, my)
	
	ZeichneHaeuser()
	
	WaitTimer(FrameTimer)
	Flip(0)
Until KeyHit(1)


Function ErstelleHaus(x,y)
	Local H.THaus = New THaus
	H\x = x
	H\y = y
End Function

Function ZeichneHaeuser()
	Local H.THaus
	For H = Each THaus
		Rect(H\x,H\y,32,32)
	Next
	
End Function

Schau dir NEW, DELETE usw. an. Gibt auch im Forum ein paar Tutorials.
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
THERE IS NO FAIR. THERE IS NO JUSTICE. THERE IS JUST ME. (Death, Discworld)

Eingeproggt

 BeitragSa, Aug 21, 2010 12:31
Antworten mit Zitat
Benutzer-Profile anzeigen
Auch auf die Gefahr hin dass ich nun nach langer Zeit wieder einen Beitrag von mir im Trash finden werde, ich kann grad nicht anders als 2 Aussagen von Totensturm untereinander zu zitieren:

Totensturm am 19.8.2010 hat Folgendes geschrieben:
ja, ich verwende types


Totensturm am 21.8.2010 hat Folgendes geschrieben:
und was solllen mir die types da bringen?


Ich weiß, dass diese beiden Zitate aus jeweils anderen Threads genommen sind aber jemand der Types mal benutzt hat sollte wissen was sie bringen oder? Oder zumindest ohne vorgekautem Code das umsetzen was Xeres freundlicherweise sogar erklärt hat?

mfG, Christoph.
Gewinner des BCC 18, 33 und 65 sowie MiniBCC 9

Neue Antwort erstellen


Übersicht BlitzBasic Beginners-Corner

Nach Oben

Gehe zu:

Powered by phpBB © 2001 - 2006, phpBB Group