Random Dungeon Generationscript - wer findet den Fehler?

  • Random Dungeon Generationscript - wer findet den Fehler?

    Hallihallo, ich habe ein Script gecodet, dass ein zufälliges dungeon aus mehreren, unterschiedlich großen Räumen generiert. (Durchgänge fehlen noch) Wenn es so funzt wie gewollt ensteht sowas:



    Aber manchmal kommt es vor, dass sich mehrere Räumer überlappen, was nicht sein darf. Sieht z.B. so aus:



    Mein Code sieht wie folgt aus:

    GML-Quellcode

    1. // Variablen die benötigt werden
    2. r = 1;
    3. richtung[r] = 0;
    4. raum_width[r] = 8;
    5. raum_height[r] = 8;
    6. raum_x[r] = room_width/2 - raum_width[r]*16;
    7. raum_y[r] = room_height/2 - raum_height[r]*16;
    9. // die Wände des ersten Raumes werden erstellt
    10. for (i=0; i<=raum_width[r]; i+=1)
    11. {
    12. instance_create(raum_x[r]+i*32,raum_y[r]-16,wall_hori);
    13. instance_create(raum_x[r]+i*32,raum_y[r]+raum_height[r]*32+16,wall_hori);
    14. }
    15. for (i=0; i<=raum_height[r]; i+=1)
    16. {
    17. instance_create(raum_x[r]-16,raum_y[r]+i*32,wall_verti);
    18. instance_create(raum_x[r]+raum_width[r]*32+16,raum_y[r]+i*32,wall_verti);
    19. }
    21. // weiteres 11 Räume werden erstellt
    22. for (r=2; r<=12; r+=1)
    23. {
    24. randomize();
    26. // jeder Raum hat eine zufällige Größe
    27. raum_width[r] = choose(4,8,12,16);
    28. raum_height[r] = raum_width[r];
    30. // nun wird der Ort bestimmt wo der nächste Raum platziert wird vom vorherigen Raum aus gesehen
    31. richtung[r] = choose(1,2,3,4);
    32. repeat(32) // je höher die Zahl ist desto unwahrscheinlicher ist es, dass eine Richtung übrig bleibt die nicht sein darf
    33. {
    34. if richtung[r] = 1
    35. {
    36. raum_x[r] = raum_x[r-1] - 48-raum_width[r]*32;
    37. raum_y[r] = raum_y[r-1];
    38. // es wird geprüft ob der neue Raum sich dort mit einem anderen überschneiden würde
    39. if collision_rectangle(raum_x[r],raum_y[r],raum_x[r]+raum_width[r]*32+1,raum_y[r]+raum_height[r]*32+1,wall_par,true,false)
    40. {
    41. richtung[r] = 2;
    42. }
    43. }
    44. if richtung[r] = 2
    45. {
    46. raum_x[r] = raum_x[r-1] + 48 + raum_width[r-1]*32;
    47. raum_y[r] = raum_y[r-1];
    48. // es wird geprüft ob der neue Raum sich dort mit einem anderen überschneiden würde
    49. if collision_rectangle(raum_x[r],raum_y[r],raum_x[r]+raum_width[r]*32+1,raum_y[r]+raum_height[r]*32+1,wall_par,true,false)
    50. {
    51. richtung[r] = 3;
    52. }
    53. }
    54. if richtung[r] = 3
    55. {
    56. raum_x[r] = raum_x[r-1];
    57. raum_y[r] = raum_y[r-1] - 48 - raum_height[r]*32;
    58. // es wird geprüft ob der neue Raum sich dort mit einem anderen überschneiden würde
    59. if collision_rectangle(raum_x[r],raum_y[r],raum_x[r]+raum_width[r]*32+1,raum_y[r]+raum_height[r]*32+1,wall_par,true,false)
    60. {
    61. richtung[r] = 4;
    62. }
    63. }
    64. if richtung[r] = 4
    65. {
    66. raum_x[r] = raum_x[r-1];
    67. raum_y[r] = raum_y[r-1] + 48 + raum_height[r-1]*32;
    68. // es wird geprüft ob der neue Raum sich dort mit einem anderen überschneiden würde
    69. if collision_rectangle(raum_x[r],raum_y[r],raum_x[r]+raum_width[r]*32+1,raum_y[r]+raum_height[r]*32+1,wall_par,true,false)
    70. {
    71. richtung[r] = choose(1,2,3);
    72. }
    73. }
    74. }
    76. // der Raum der an der Reihe ist wird erstellt
    77. for (i=0; i<=raum_width[r]; i+=1)
    78. {
    79. instance_create(raum_x[r]+i*32,raum_y[r]-16,wall_hori);
    80. instance_create(raum_x[r]+i*32,raum_y[r]+raum_height[r]*32+16,wall_hori);
    81. }
    82. for (i=0; i<=raum_height[r]; i+=1)
    83. {
    84. instance_create(raum_x[r]-16,raum_y[r]+i*32,wall_verti);
    85. instance_create(raum_x[r]+raum_width[r]*32+16,raum_y[r]+i*32,wall_verti);
    86. }
    87. }
    Alles anzeigen



    Wer findet meinen Denkfehler? Warum überlappen sich manchmal Räume? Ich guck mir den Code schon ewig an und die Zeichen verschwimmen schon vor meinen Augen. :)