A-Stern Algorithmus

Diese Seite verwendet Cookies. Durch die Nutzung unserer Seite erklären Sie sich damit einverstanden, dass wir Cookies setzen. Weitere Informationen

  • A-Stern Algorithmus

    Hallo ich habe versucht den A-Stern Algorithmus zu programmieren aber es klapt irgendwie nicht so wie ich es will. Denn er macht einfach nichts. Da her wollte ich wissen was ich falsch gemacht habe da ich durch den Debug modus auch nicht schau werde. Das ist warscheinlich auch nicht die smarteste Wariante.


    GML-Quellcode

    1. openh = 0
    2. closeh = 1
    3. open[0,0] = 0
    4. close[0,1] = argument0 // die X-Koortditane des start punktes ( Argumennt2 ist die des Ziels)
    5. close[0,2] = argument1 // die Y_Koordiante des start punktes ( Argumennt3 ist die des Ziels)
    6. close[0,3] = -1
    7. close[0,4] = 0
    8. find = false
    10. while (find == false){ //die Schleife
    11. for (i = 0; i > 4; i++){ //Schaut sich alle 4 nachbarn von dem letzten in der close list an
    12. add = true
    13. switch i{
    14. case 1:
    16. for (i = 0; i < closeh; i++){ //Schaut ob ein nachbar schon in der close lost ist
    17. if (open[i,1] = close[closeh,1]-1 and close[i,2] = close[closeh,2]){
    18. add = false
    19. }
    20. }
    22. for ( j = 0; j < closeh; j++){// schaut ob der nachbar schon in der open list ist
    23. if (close[j,1] = close[closeh,1]-1 and close[j,2] = close[closeh,2]){
    24. add = false
    25. }
    26. }
    27. if global.grid[close[closeh,1]-1,close[closeh,2]] > 10{ // Schaut ob das Feld begebar ist
    28. add = false
    29. }
    31. if close[closeh,1]-1 = argument2 and close[closeh,2] = argument3{ // schaut ob das Feld das Ziel Feld ist
    32. closeh += 1
    34. close[closeh,0] = close[closeh-1,0]+1 // der Wert des Felde
    35. close[closeh,1] = argument2 // die X-Koordinate
    36. close[closeh,2] = argument3 // die Y-Koordinate
    37. close[closeh,3] = closeh-1 // das Feld von dem man kam
    38. close[closeh,4] = close[closeh-1,4]+1 // der bisherige Weg wert
    40. find = true
    41. }
    43. if add = true{ // fügt das Feld der openlist hinzu
    44. openh += 1
    46. open[openh,1] = close[closeh,1]-1
    47. open[openh,2] = close[closeh,2]
    48. open[openh,3] = closeh
    49. open[openh,4] = close[closeh,4]+1
    50. open[openh,0] = open[openh,4]+1+abs(open[openh,1]-argument2)+abs(open[openh,2]-argument3)
    52. }
    54. break; // das gleiche für ein anderen Nachbarn
    55. case 2:
    57. for (i = 0; i < closeh; i++){
    58. if (open[i,1] = close[closeh,1]-1 and close[i,2] = close[closeh,2]){
    59. add = false
    60. }
    61. }
    63. for ( j = 0; j < closeh; j++){
    64. if (close[j,1] = close[closeh,1]-1 and close[j,2] = close[closeh,2]){
    65. add = false
    66. }
    67. }
    68. if global.grid[close[closeh,1]-1,close[closeh,2]] > 10{
    69. add = false
    70. }
    72. if close[closeh,1]-1 = argument2 and close[closeh,2] = argument3{
    73. closeh += 1
    75. close[closeh,0] = close[closeh-1,0]+1
    76. close[closeh,1] = argument2
    77. close[closeh,2] = argument3
    78. close[closeh,3] = closeh-1
    79. close[closeh,4] = close[closeh-1,4]+1
    81. find = true
    82. }
    84. if add = true{
    85. openh += 1
    87. open[openh,1] = close[closeh,1]-1
    88. open[openh,2] = close[closeh,2]
    89. open[openh,3] = closeh
    90. open[openh,4] = close[closeh,4]+1
    91. open[openh,0] = open[openh,4]+1+abs(open[openh,1]-argument2)+abs(open[openh,2]-argument3)
    93. }
    95. break;
    96. case 3:// das gleiche für ein anderen Nachbarn
    98. for (i = 0; i < closeh; i++){
    99. if (open[i,1] = close[closeh,1]-1 and close[i,2] = close[closeh,2]){
    100. add = false
    101. }
    102. }
    104. for ( j = 0; j < closeh; j++){
    105. if (close[j,1] = close[closeh,1]-1 and close[j,2] = close[closeh,2]){
    106. add = false
    107. }
    108. }
    109. if global.grid[close[closeh,1]-1,close[closeh,2]] > 10{
    110. add = false
    111. }
    113. if close[closeh,1]-1 = argument2 and close[closeh,2] = argument3{
    114. closeh += 1
    116. close[closeh,0] = close[closeh-1,0]+1
    117. close[closeh,1] = argument2
    118. close[closeh,2] = argument3
    119. close[closeh,3] = closeh-1
    120. close[closeh,4] = close[closeh-1,4]+1
    122. find = true
    123. }
    125. if add = true{
    126. openh += 1
    128. open[openh,1] = close[closeh,1]-1
    129. open[openh,2] = close[closeh,2]
    130. open[openh,3] = closeh
    131. open[openh,4] = close[closeh,4]+1
    132. open[openh,0] = open[openh,4]+1+abs(open[openh,1]-argument2)+abs(open[openh,2]-argument3)
    134. }
    136. break;
    137. case 4:// das gleiche für ein anderen Nachbarn
    139. for (i = 0; i < closeh; i++){
    140. if (open[i,1] = close[closeh,1]-1 and close[i,2] = close[closeh,2]){
    141. add = false
    142. }
    143. }
    145. for ( j = 0; j < closeh; j++){
    146. if (close[j,1] = close[closeh,1]-1 and close[j,2] = close[closeh,2]){
    147. add = false
    148. }
    149. }
    150. if global.grid[close[closeh,1]-1,close[closeh,2]] > 10{
    151. add = false
    152. }
    153. if close[closeh,1]-1 = argument2 and close[closeh,2] = argument3{
    154. closeh += 1
    156. close[closeh,0] = close[closeh-1,0]+1
    157. close[closeh,1] = argument2
    158. close[closeh,2] = argument3
    159. close[closeh,3] = closeh-1
    160. close[closeh,4] = close[closeh-1,4]+1
    162. find = true
    163. }
    165. if add = true{
    166. openh += 1
    168. open[openh,1] = close[closeh,1]-1
    169. open[openh,2] = close[closeh,2]
    170. open[openh,3] = closeh
    171. open[openh,4] = close[closeh,4]+1
    172. open[openh,0] = open[openh,4]+1+abs(open[openh,1]-argument2)+abs(open[openh,2]-argument3)
    174. }
    176. break;
    179. jt = 0
    180. for (i = 1; i < openh; i ++){
    181. if open[jt,1] > open[i,1]{ // schaut nach dem kleinsten Wert in der openlist
    182. jt = i
    183. }
    184. }
    185. closeh += 1 // fügt den kleinsten Wert der close list hinzu
    186. close[closeh,0] = open[jt,0]
    187. close[closeh,1] = open[jt,1]
    188. close[closeh,2] = open[jt,2]
    189. close[closeh,3] = open[jt,3]
    190. close[closeh,4] = open[jt,4]
    192. }
    193. }
    195. }
    197. if find = true{
    198. fal[0,0] = argument2 // setzt den Ziel punkt und den letzten in der close list als start punkt vom Pfad zum ziel
    199. fal[0,1] = argument3
    200. fal[1,0] = close[closeh,1]
    201. fal[1,1] = close[closeh,2]
    202. l = 1
    203. k = close[closeh,3]
    206. while !path = true{ // Folgt den Pfad rückwerts zum Startpunkt
    207. l += 1
    208. fal[i,0] = close[k,1]
    209. fal[i,1] = close[k,2]
    210. k = close[k,3]
    212. if fal[i,0] = argument0 and fal[i,1] = argument1{ // hat er den Start punkt erreicht?
    213. path = true
    214. }
    216. }
    217. }
    Alles anzeigen



    Ich hoffe ihr werdet daraus schau und überseht meine Rechtscheibfehler.

  • Es gibt ein gutes Tutorial zum Pathfinding und dem A* Algorithmus von Heartbeast:



    Vielleicht hilft dir das weiter. Den der Algorithmus wird von Gamemaker selbst auch genutzt, ohne das man ihn selbst programmieren "Muss".

    Falls du ihn dennoch selber programmieren magst, hoffe ich das dir jemand helfen kann. :)

  • Stimmt danke. Ich habe ein anderes Tutorial mit ungefär den gleichen Inhalt gesehen. Wusste aber nicht wie ich es anstellen kann wenn mehre Objekte mit anderen ihrer art auch kollidieren. Aber das geht ja ganz einfach indem der hinter sich nachhinten bewegt und der Vordere sich nach Vorne wenn sich sich berühren.

  • Sorry hab mir jetzt nicht alles durchgelesen aber was ich gleich von anhieb erkannt habe war das bei deiner erstem forschleife steht i=0; i >4; i++ und somit startet die for-schleife nichtmal ... es müsste ja heissen solange i <4 dann i++
    Wir stehen zusammen und wir fallen zusammen