Das deutsche QBasic- und FreeBASIC-Forum

[Thong]

Hallo Leute ,
Ich habe ein Problem:
wie macht man,
dass wenn ein Objekt zum Beispiel auf ein Hinderniss trifft , dass es dann zum beispiel explodiert oder so. und wenn möglich sogar eine Kettenreaktion auslöst an den hintenstehenden Objekten.

(ich bin ein qbasic anfänger , wenn ihr euch fragt was dass für eine Frage sein soll)

[Devilkevin]

Ähnliches Thema mit ähnlichen Fragen die ich mal gestellt habe:

http://forum.qbasic.at/viewtopic.php?t=400&highlight=
_________________
www.piratenpartei.de

[dreael]

Es kommt immer darauf an, wie präzise die Kollisionsabfrage sein soll.

Die früheren Commodore-Rechner (C 64 und Amiga) hatten eine präzise Kollisionsabfrage in ihrer Video-Hardware implementiert, welche wirklich nur dann das Bit auf 1 setzte, wenn ein Pixel mit dem Hintergrund überlappte.

All dies fehlt natürlich beim PC, so dass man dies softwaremässig lösen muss. Für einfache Ansprüche genügt der Rechteckumriss-Koordinatenvergleich. Wenn es dagegen C 64-mässig ebenfalls präzise sein muss, so würde ich eine Art Kollisionsbitmap generieren: Unsichtbarer Bildbereich (z.B. nicht dargestellte Seite in SCREEN 7), wo jeder Pixel einem bestimmten relativen Abstand der beiden Sprites entspricht und entweder 0 oder 1 als Farbe besitzt => diese Bitmap als einmalige Initialisierung zu Beginn des Spiels berechnen. Tipp dazu: Sihouetten bilden, die eine Farbe 1 und die andere Farbe 2, beide jeweils mit XOR übereinanderPUTten und nach POINT(x,y)=3 im Überlappungsbereich suchen.

Im Spiel selber würde ich den Rechteckvergleich anwenden. Trifft dieser zu, so würde ich das zum relativen Abstand der beiden Sprites zugehörige Kollisionsbitmap-Pixel mit POINT() abfragen und entsprechend -1 (TRUE) oder 0 (FALSE) zurückgeben.
_________________
Teste die PC-Sicherheit mit www.sec-check.net

[Distelpalme]

Öm...
Wenn ich jetzt aber z.B. ne Bowlingsimulation HÄTTE (!!!) und fragen will, ja, trifft denn der ball den kegel? Ich hab eine kollisionsabfrage geschrieben die abfragt ob die kreise punktgenau aufeinander treffen, also so: OO (bumm )
aber wenn die kugeln schräg aufeinander treffen klappts nicht
(ich hoffe das war verständlich formuliert... hab mit thonk über skype telefoniert
p.s. tönkis skypename: t.tran meiner: distelpalme )

[MisterD]

also eigentlich bei zwei runden Objekten ist der Abstand gleich der Wurzel der summe der quadrate der einzelnen Abstände, also
SQR(Dx^2 + Dy^2)
(D = groß-Delta, Differenz, Da = a2 - a1)
und wenn das was da rauskommt kleiner als radius1+radius2 ist stecken die Objekte ineinander.
_________________
"It is practically impossible to teach good programming to students that have had a prior exposure to BASIC: as potential programmers they are mentally mutilated beyond hope of regeneration."
Edsger W. Dijkstra

[Thong]

Danke für die Erklährung , leider.......
ist das für einen kleinen 14 Jährigen wie mich zu kompliziert .......
und Distelpalme tscheckts auch nich

Bitte um eine Ausführung......

[Distelpalme]

jo ich checks nich

[jb]

Vielleicht spart ihr euch mal die ganzen Smilies.

jb

[MisterD]

ihr lol0rs xD

also, ihr habt den Kegel mit x1|y1 als Koordinaten und r1 als Radius und die Kugel mit x2|y2 als Kordinaten und r2 als Radius. dann prüfst du eine Kollision mit dem Vergleich

IF r1 + r2 <= SQR((x2 - x1) ^ 2 + (y2 - y1) ^ 2) THEN blablabla
_________________
"It is practically impossible to teach good programming to students that have had a prior exposure to BASIC: as potential programmers they are mentally mutilated beyond hope of regeneration."
Edsger W. Dijkstra

[Distelpalme]

Jo ich lass die smileys weg, wie man sieht xD
Ok, aber was ist SQR?
und öm, habs ausprobiert und da funzt was nicht. hier der code:

[Sebastian]

Mit SQR ziehst du die Quadratwurzel aus einer Zahl. Bei 256 wäre das z.B. 16, oder bei 123 wäre das 11,090536506... Genaueres in der MonFAQ.
_________________

Die gefährlichsten Familienclans | Opas Leistung muss sich wieder lohnen - für 6 bis 10 Generationen!

[Devilkevin]

[Distelpalme]

[quote="Devilkevin"]

[Thong]

Danke für die Erlklärung , was Wurzel ziehen ist, aber dass weiss jeder .Warum aber der Code von Distelpalme nicht funktioniert weiss ich immer noch nicht
Weiss dass überhaupt JEMAND ?????????????

[Sebastian]

Hallo.

Bitte weniger Smilies verwenden.

Viele Grüße!
Sebastian
_________________

Die gefährlichsten Familienclans | Opas Leistung muss sich wieder lohnen - für 6 bis 10 Generationen!

[E-P-S]

dann halt hier:

dreh mal die Bedingung in der DO WHILE um:

[Distelpalme]

Man tönk, hör doch mal mit den smileys auf

Also, ich poste hier nochmal den "defekten"

[dreael]

Ein hübsches Beispiel, wo man sehen kann, wie ich dieses Problem seinerzeit einmal gelöst habe, findet man in

http://www.dreael.ch/Deutsch/Download/Billard-Simulation.html
_________________
Teste die PC-Sicherheit mit www.sec-check.net

[MisterD]

http://phpfi.com/65272

das is die kleinere Version, da funktioniert die Kollisionsabfrage mit genau der Formel die ich euch gegeben hab..

Die Kollision an sich müsst ihr dann aber selbst machen Da bewegen die Kugeln sich nur vertikal in die entgegengesetzte richtung weiter, egal von wo sie kommen.. Oder ihr nehmt einfach dreaels programm, da is kollision auch schon drin. weiß nicht, welche ihr versteht.
_________________
"It is practically impossible to teach good programming to students that have had a prior exposure to BASIC: as potential programmers they are mentally mutilated beyond hope of regeneration."
Edsger W. Dijkstra

[Distelpalme]

Hey, D
Du hast da in dem code

DIM kugel(1) AS ball

Wozu ist das "AS ball" gut? Oo