Dumme Frage

Übersicht

BlitzBasic

Allgemein

	WEBLink Betreff: Dumme Frage	Di, Aug 24, 2004 19:33 Antworten mit Zitat
Da ich seit nicht langer zeit mit Types angefangen habe habe ich folgende Frage. In einem Karteneditor kann man verschiedene Tiles wählen logisch ! Mit diesen Befehl lass ich sie zeichnen. For img.imga=Each imga ; For AZahlE = 1 To anzahl DrawImage Ebene1a(AZahlE),img\x + sk,img\y + sk2 ; Next Next AZahlE sind die verschiedenen Tiles. wenn ich eines ändere verändern sich die anderen auch. WIe kann ich es umgehen?

WEBLink

Betreff: Dumme Frage

Di, Aug 24, 2004 19:33
Antworten mit Zitat

Da ich seit nicht langer zeit mit Types angefangen habe habe ich folgende Frage.

In einem Karteneditor kann man verschiedene Tiles wählen logisch !

Mit diesen Befehl lass ich sie zeichnen.

For img.imga=Each imga

; For AZahlE = 1 To anzahl
DrawImage Ebene1a(AZahlE),img\x + sk,img\y + sk2
; Next

Next

AZahlE sind die verschiedenen Tiles. wenn ich eines ändere verändern sich die anderen auch. WIe kann ich es umgehen?

	DivineDominion	Di, Aug 24, 2004 19:45 Antworten mit Zitat
Noch immer diese nichtssagenden Variablennamen wie sk und sk2 anstatt ScrollX und ScrollY? Manche Dinge ändern sich nie Das lässt sich sehr einfach umgehen. Dein PRoblem ist, dass du folgendes schreibst: DrawImage Ebene1a(AZahlE), x, y Ich gehe davon aus, dass AZahlE=0 ist, weil die Schleife auskommentiert wurde. Jedenfalls malst du nur dieses Bild. Du hast am Ende leider Gottes keinen Frame-Parameter angegeben, den du womöglich brauchst, wenn du ein Tileset benutzt das aus mehr als einem Tile besteht. Ich ahbe keine Ahnung wie du das bei dir stehen ahst, ich empfehle dir aber sowas wie DrawImage Ebene1a(AZahlE),img\x + sk,img\y + sk2, img\frame Oder, wenn du die mTiles eineln speicherst oder sowas: DrawImage Ebene1a(img\bild),img\x + sk,img\y + sk2 Wäre praktisch wenn du anständige Variablennamen nimmst und den code vielleicht erläuterst Achja, meinst du mit "WIR SUCHEN EINEN GUTEN ALLEINSTÄNDIGEN PROGRAMMIERER" einen alleinstehenden? Hier sind viele Single, aber was willst du damit?
christian.tietze@gmail.com - https://christiantietze.de macOS

DivineDominion

Di, Aug 24, 2004 19:45
Antworten mit Zitat

Noch immer diese nichtssagenden Variablennamen wie sk und sk2 anstatt ScrollX und ScrollY? Manche Dinge ändern sich nie Wink

Das lässt sich sehr einfach umgehen.

Dein PRoblem ist, dass du folgendes schreibst:
DrawImage Ebene1a(AZahlE), x, y

Ich gehe davon aus, dass AZahlE=0 ist, weil die Schleife auskommentiert wurde.
Jedenfalls malst du nur dieses Bild.
Du hast am Ende leider Gottes keinen Frame-Parameter angegeben, den du womöglich brauchst, wenn du ein Tileset benutzt das aus mehr als einem Tile besteht.

Ich ahbe keine Ahnung wie du das bei dir stehen ahst, ich empfehle dir aber sowas wie
DrawImage Ebene1a(AZahlE),img\x + sk,img\y + sk2, img\frame

Oder, wenn du die mTiles eineln speicherst oder sowas:
DrawImage Ebene1a(img\bild),img\x + sk,img\y + sk2

Wäre praktisch wenn du anständige Variablennamen nimmst und den code vielleicht erläuterst Wink

Achja, meinst du mit "WIR SUCHEN EINEN GUTEN ALLEINSTÄNDIGEN PROGRAMMIERER" einen alleinstehenden? Hier sind viele Single, aber was willst du damit?

christian.tietze@gmail.com - https://christiantietze.de
macOS

	WEBLink	Di, Aug 24, 2004 19:56 Antworten mit Zitat
g jo die gewöhn ich mir einfach nicht mehr ab^^ Und da hast recht es ist für Scroll^^ Also ich ahbe die Tiles als einzellne Bilder gespeichert. Also kommt für mich eher Methode 2 DrawImage Ebene1a(img\bild),img\x + sk,img\y + sk2 in Frage. AZahlE geht zur Zeit bis 10 (10 verschiedene Bilder) Dieses passiert bei einem Klick auf die Linke Maustaste Code: [AUSKLAPPEN] [EINKLAPPEN] If nopaint = 0 Then If rechtemaus = 0 Then If Mousehit1 Then img.imga=New imga img\x=vierX - sk img\y=vierY - sk2 EndIf EndIf EndIf müsste es reichen wenn ich es so mach? DrawImage Ebene1a(img\AZahlE),img\x + sk,img\y + sk2 Würdest du empfehlen das ich alle Tiles von einer ebene in eine Bitmap packe? Ich meine mit ALLEINSTÄNDIGEN Programmierer jemand der auch mal alleine Zurecht kommt. Wenn er mal Textboxen etc. proggen soll^^

WEBLink

Di, Aug 24, 2004 19:56
Antworten mit Zitat

*g* jo die gewöhn ich mir einfach nicht mehr ab^^ Und da hast recht es ist für Scroll^^

Also ich ahbe die Tiles als einzellne Bilder gespeichert. Also kommt für mich eher Methode 2

DrawImage Ebene1a(img\bild),img\x + sk,img\y + sk2

in Frage. AZahlE geht zur Zeit bis 10 (10 verschiedene Bilder)

Dieses passiert bei einem Klick auf die Linke Maustaste

Code: [AUSKLAPPEN]

If nopaint = 0 Then

If rechtemaus = 0 Then
   If Mousehit1 Then
      img.imga=New imga
      img\x=vierX - sk
      img\y=vierY - sk2
   EndIf
EndIf

EndIf

müsste es reichen wenn ich es so mach?

DrawImage Ebene1a(img\AZahlE),img\x + sk,img\y + sk2

Würdest du empfehlen das ich alle Tiles von einer ebene in eine Bitmap packe?

Ich meine mit ALLEINSTÄNDIGEN Programmierer jemand der auch mal alleine Zurecht kommt. Wenn er mal Textboxen etc. proggen soll^^

	David	Di, Aug 24, 2004 20:06 Antworten mit Zitat
Hi! Pseudocode: Code: [AUSKLAPPEN] [EINKLAPPEN] for 0 to anzahl layer DrawImage( Layer( x )\Sprite\Image, Layer( x )\Sprite\x, Layer( x )\Sprite\y ) end for Klappt das nicht so? Ansonsten hab ich deinen Code nämlich nicht wirklich verstanden, sei's wegen den lustigen Variablennamen oder weil du wirklich nur das Mindestmaß an Code gepostet hast. Achja, was mir noch aufgefallen ist: Du kannst auch manche If-Anweisungen per "and" in eine Anweisung packen. Wieso hab ich (allgemein) in fast keinen Quellcode das Wörtchen "true" gefunden? Ich finde Anweisungen wie: Code: [AUSKLAPPEN] [EINKLAPPEN] if ( bGameOver = true ) ... sind doch viel schöner zu lesen, im gegensatz zu: Code: [AUSKLAPPEN] [EINKLAPPEN] if ( bGameOver = 1 ) ... oder? Naja, wie auch immer... grüße
http://bl4ckd0g.funpic.de

David

Di, Aug 24, 2004 20:06
Antworten mit Zitat

Hi!

Pseudocode:

Code: [AUSKLAPPEN]

for 0 to anzahl layer
DrawImage( Layer( x )\Sprite\Image, Layer( x )\Sprite\x, Layer( x )\Sprite\y )
end for

Klappt das nicht so?
Ansonsten hab ich deinen Code nämlich nicht wirklich verstanden, sei's wegen den lustigen Variablennamen oder weil du wirklich nur das Mindestmaß an Code gepostet hast.

Achja, was mir noch aufgefallen ist:

Du kannst auch manche If-Anweisungen per "and" in eine Anweisung packen.

Wieso hab ich (allgemein) in fast keinen Quellcode das Wörtchen "true" gefunden? Ich finde Anweisungen wie:

Code: [AUSKLAPPEN]

if ( bGameOver = true ) ...

sind doch viel schöner zu lesen, im gegensatz zu:

Code: [AUSKLAPPEN]

if ( bGameOver = 1 ) ...

oder?

Naja, wie auch immer...

grüße

http://bl4ckd0g.funpic.de