Hirnschmelzaufgabe [AKS]

[Engel der Furcht]

Hallöle
Ich hab mir mal ne ganz simple Trefferabfrage.
Sie ist SEHR Simpel.Ich habe einfach jedes Feld um den Helden einzeln geprüft und abgefragt,ob ein oder mehr Gegner "im Radius" sind.
An sich ist das ne Sache von 10 Sekunden(da man den gleichen Code nur mehrmals kopieren und minimal ändern muss),das Resultat ist aber in Ordnung.
Die Trefferabfrage setzt vorraus,dass Gegner 1,2 und 3 immer EventID 1,2 und 3 haben,man sollte also eine Dummymap anbringen,auf der die Trefferabfrage und die Gegner stimmen.

- SCRIPT -
<> Change Variable: [35] = X position on map (tiles) of hero
<> Change Variable: [36] = Y position on map (tiles) of hero
<> Fork Condition: If Hero is facing up then ...
. <> Change Variable: [36] -= 1
. <> Get Event ID: (V[35], V[36]), Store in var. [37]
. <> Fork Condition: If Variable [37] == 1 then ...
. . <> Play Sound Effect: strike10, Volume 100%, Speed 100%, Pan Center
. . <> Flash Event: Event #1, (R31, G14, B0, S31), 1.0 sec.
. . <> Change Switch: [21] = ON
. . <>
. : Else ...
. . <> Fork Condition: If Variable [37] == 2 then ...
. . . <> Play Sound Effect: strike10, Volume 100%, Speed 100%, Pan Center
. . . <> Flash Event: Event #2, (R31, G14, B0, S31), 1.0 sec.
. . . <> Change Switch: [22] = ON
. . . <>
. . : Else ...
. . . <> Fork Condition: If Variable [37] == 3 then ...
. . . . <> Play Sound Effect: strike10, Volume 100%, Speed 100%, Pan Center
. . . . <> Flash Event: Event #3, (R31, G14, B0, S31), 1.0 sec.
. . . . <> Change Switch: [23] = ON
. . . . <>
. . . : Else ...
. . . . <> Play Sound Effect: schwung1, Volume 100%, Speed 80%, Pan Center
. . . . <>
. . . : End of fork
. . . <>
. . : End of fork
. . <>
. : End of fork
. <> Change Variable: [35] -= 1
. <> Get Event ID: (V[35], V[36]), Store in var. [37]
. <> Fork Condition: If Variable [37] == 1 then ...
. . <> Play Sound Effect: strike10, Volume 100%, Speed 100%, Pan Center
. . <> Flash Event: Event #1, (R31, G14, B0, S31), 1.0 sec.
. . <> Change Switch: [21] = ON
. . <>
. : Else ...
. . <> Fork Condition: If Variable [37] == 2 then ...
. . . <> Play Sound Effect: strike10, Volume 100%, Speed 100%, Pan Center
. . . <> Flash Event: Event #2, (R31, G14, B0, S31), 1.0 sec.
. . . <> Change Switch: [22] = ON
. . . <>
. . : Else ...
. . . <> Fork Condition: If Variable [37] == 3 then ...
. . . . <> Play Sound Effect: strike10, Volume 100%, Speed 100%, Pan Center
. . . . <> Flash Event: Event #3, (R31, G14, B0, S31), 1.0 sec.
. . . . <> Change Switch: [23] = ON
. . . . <>
. . . : Else ...
. . . . <> Play Sound Effect: schwung1, Volume 100%, Speed 80%, Pan Center
. . . . <>
. . . : End of fork
. . . <>
. . : End of fork
. . <>
. : End of fork
. <> Change Variable: [35] += 2
. <> Get Event ID: (V[35], V[36]), Store in var. [37]
. <> Fork Condition: If Variable [37] == 1 then ...
. . <> Play Sound Effect: strike10, Volume 100%, Speed 100%, Pan Center
. . <> Flash Event: Event #1, (R31, G14, B0, S31), 1.0 sec.
. . <> Change Switch: [21] = ON
. . <>
. : Else ...
. . <> Fork Condition: If Variable [37] == 2 then ...
. . . <> Play Sound Effect: strike10, Volume 100%, Speed 100%, Pan Center
. . . <> Flash Event: Event #2, (R31, G14, B0, S31), 1.0 sec.
. . . <> Change Switch: [22] = ON
. . . <>
. . : Else ...
. . . <> Fork Condition: If Variable [37] == 3 then ...
. . . . <> Play Sound Effect: strike10, Volume 100%, Speed 100%, Pan Center
. . . . <> Flash Event: Event #3, (R31, G14, B0, S31), 1.0 sec.
. . . . <> Change Switch: [23] = ON
. . . . <>
. . . : Else ...
. . . . <> Play Sound Effect: schwung1, Volume 100%, Speed 80%, Pan Center
. . . . <>
. . . : End of fork
. . . <>
. . : End of fork
. . <>
. : End of fork
. <>
: Else ...
. <> Fork Condition: If Hero is facing right then ...
. . <> Change Variable: [35] += 1
. . <> Get Event ID: (V[35], V[36]), Store in var. [37]
. . <> Fork Condition: If Variable [37] == 1 then ...
. . . <> Play Sound Effect: strike10, Volume 100%, Speed 100%, Pan Center
. . . <> Flash Event: Event #1, (R31, G14, B0, S31), 1.0 sec.
. . . <> Change Switch: [21] = ON
. . . <>
. . : Else ...
. . . <> Fork Condition: If Variable [37] == 2 then ...
. . . . <> Play Sound Effect: strike10, Volume 100%, Speed 100%, Pan Center
. . . . <> Flash Event: Event #2, (R31, G14, B0, S31), 1.0 sec.
. . . . <> Change Switch: [22] = ON
. . . . <>
. . . : Else ...
. . . . <> Fork Condition: If Variable [37] == 3 then ...
. . . . . <> Play Sound Effect: strike10, Volume 100%, Speed 100%, Pan Center
. . . . . <> Flash Event: Event #3, (R31, G14, B0, S31), 1.0 sec.
. . . . . <> Change Switch: [23] = ON
. . . . . <>
. . . . : Else ...
. . . . . <> Play Sound Effect: schwung1, Volume 100%, Speed 80%, Pan Center
. . . . . <>
. . . . : End of fork
. . . . <>
. . . : End of fork
. . . <>
. . : End of fork
. . <> Change Variable: [36] -= 1
. . <> Get Event ID: (V[35], V[36]), Store in var. [37]
. . <> Fork Condition: If Variable [37] == 1 then ...
. . . <> Play Sound Effect: strike10, Volume 100%, Speed 100%, Pan Center
. . . <> Flash Event: Event #1, (R31, G14, B0, S31), 1.0 sec.
. . . <> Change Switch: [21] = ON
. . . <>
. . : Else ...
. . . <> Fork Condition: If Variable [37] == 2 then ...
. . . . <> Play Sound Effect: strike10, Volume 100%, Speed 100%, Pan Center
. . . . <> Flash Event: Event #2, (R31, G14, B0, S31), 1.0 sec.
. . . . <> Change Switch: [22] = ON
. . . . <>
. . . : Else ...
. . . . <> Fork Condition: If Variable [37] == 3 then ...
. . . . . <> Play Sound Effect: strike10, Volume 100%, Speed 100%, Pan Center
. . . . . <> Flash Event: Event #3, (R31, G14, B0, S31), 1.0 sec.
. . . . . <> Change Switch: [23] = ON
. . . . . <>
. . . . : Else ...
. . . . . <> Play Sound Effect: schwung1, Volume 100%, Speed 80%, Pan Center
. . . . . <>
. . . . : End of fork
. . . . <>
. . . : End of fork
. . . <>
. . : End of fork
. . <> Change Variable: [36] += 2
. . <> Get Event ID: (V[35], V[36]), Store in var. [37]
. . <> Fork Condition: If Variable [37] == 1 then ...
. . . <> Play Sound Effect: strike10, Volume 100%, Speed 100%, Pan Center
. . . <> Flash Event: Event #1, (R31, G14, B0, S31), 1.0 sec.
. . . <> Change Switch: [21] = ON
. . . <>
. . : Else ...
. . . <> Fork Condition: If Variable [37] == 2 then ...
. . . . <> Play Sound Effect: strike10, Volume 100%, Speed 100%, Pan Center
. . . . <> Flash Event: Event #2, (R31, G14, B0, S31), 1.0 sec.
. . . . <> Change Switch: [22] = ON
. . . . <>
. . . : Else ...
. . . . <> Fork Condition: If Variable [37] == 3 then ...
. . . . . <> Play Sound Effect: strike10, Volume 100%, Speed 100%, Pan Center
. . . . . <> Flash Event: Event #3, (R31, G14, B0, S31), 1.0 sec.
. . . . . <> Change Switch: [23] = ON
. . . . . <>
. . . . : Else ...
. . . . . <> Play Sound Effect: schwung1, Volume 100%, Speed 80%, Pan Center
. . . . . <>
. . . . : End of fork
. . . . <>
. . . : End of fork
. . . <>
. . : End of fork
. . <>
. : Else ...
. . <> Fork Condition: If Hero is facing down then ...
. . . <> Change Variable: [36] += 1
. . . <> Get Event ID: (V[35], V[36]), Store in var. [37]
. . . <> Fork Condition: If Variable [37] == 1 then ...
. . . . <> Play Sound Effect: strike10, Volume 100%, Speed 100%, Pan Center
. . . . <> Flash Event: Event #1, (R31, G14, B0, S31), 1.0 sec.
. . . . <> Change Switch: [21] = ON
. . . . <>
. . . : Else ...
. . . . <> Fork Condition: If Variable [37] == 2 then ...
. . . . . <> Play Sound Effect: strike10, Volume 100%, Speed 100%, Pan Center
. . . . . <> Flash Event: Event #2, (R31, G14, B0, S31), 1.0 sec.
. . . . . <> Change Switch: [22] = ON
. . . . . <>
. . . . : Else ...
. . . . . <> Fork Condition: If Variable [37] == 3 then ...
. . . . . . <> Play Sound Effect: strike10, Volume 100%, Speed 100%, Pan Center
. . . . . . <> Flash Event: Event #3, (R31, G14, B0, S31), 1.0 sec.
. . . . . . <> Change Switch: [23] = ON
. . . . . . <>
. . . . . : Else ...
. . . . . . <> Play Sound Effect: schwung1, Volume 100%, Speed 80%, Pan Center
. . . . . . <>
. . . . . : End of fork
. . . . . <>
. . . . : End of fork
. . . . <>
. . . : End of fork
. . . <> Change Variable: [35] -= 1
. . . <> Get Event ID: (V[35], V[36]), Store in var. [37]
. . . <> Fork Condition: If Variable [37] == 1 then ...
. . . . <> Play Sound Effect: strike10, Volume 100%, Speed 100%, Pan Center
. . . . <> Flash Event: Event #1, (R31, G14, B0, S31), 1.0 sec.
. . . . <> Change Switch: [21] = ON
. . . . <>
. . . : Else ...
. . . . <> Fork Condition: If Variable [37] == 2 then ...
. . . . . <> Play Sound Effect: strike10, Volume 100%, Speed 100%, Pan Center
. . . . . <> Flash Event: Event #2, (R31, G14, B0, S31), 1.0 sec.
. . . . . <> Change Switch: [22] = ON
. . . . . <>
. . . . : Else ...
. . . . . <> Fork Condition: If Variable [37] == 3 then ...
. . . . . . <> Play Sound Effect: strike10, Volume 100%, Speed 100%, Pan Center
. . . . . . <> Flash Event: Event #3, (R31, G14, B0, S31), 1.0 sec.
. . . . . . <> Change Switch: [23] = ON
. . . . . . <>
. . . . . : Else ...
. . . . . . <> Play Sound Effect: schwung1, Volume 100%, Speed 80%, Pan Center
. . . . . . <>
. . . . . : End of fork
. . . . . <>
. . . . : End of fork
. . . . <>
. . . : End of fork
. . . <> Change Variable: [35] += 2
. . . <> Get Event ID: (V[35], V[36]), Store in var. [37]
. . . <> Fork Condition: If Variable [37] == 1 then ...
. . . . <> Play Sound Effect: strike10, Volume 100%, Speed 100%, Pan Center
. . . . <> Flash Event: Event #1, (R31, G14, B0, S31), 1.0 sec.
. . . . <> Change Switch: [21] = ON
. . . . <>
. . . : Else ...
. . . . <> Fork Condition: If Variable [37] == 2 then ...
. . . . . <> Play Sound Effect: strike10, Volume 100%, Speed 100%, Pan Center
. . . . . <> Flash Event: Event #2, (R31, G14, B0, S31), 1.0 sec.
. . . . . <> Change Switch: [22] = ON
. . . . . <>
. . . . : Else ...
. . . . . <> Fork Condition: If Variable [37] == 3 then ...
. . . . . . <> Play Sound Effect: strike10, Volume 100%, Speed 100%, Pan Center
. . . . . . <> Flash Event: Event #3, (R31, G14, B0, S31), 1.0 sec.
. . . . . . <> Change Switch: [23] = ON
. . . . . . <>
. . . . . : Else ...
. . . . . . <> Play Sound Effect: schwung1, Volume 100%, Speed 80%, Pan Center
. . . . . . <>
. . . . . : End of fork
. . . . . <>
. . . . : End of fork
. . . . <>
. . . : End of fork
. . . <>
. . : Else ...
. . . <> Fork Condition: If Hero is facing left then ...
. . . . <> Change Variable: [35] -= 1
. . . . <> Get Event ID: (V[35], V[36]), Store in var. [37]
. . . . <> Fork Condition: If Variable [37] == 1 then ...
. . . . . <> Play Sound Effect: strike10, Volume 100%, Speed 100%, Pan Center
. . . . . <> Flash Event: Event #1, (R31, G14, B0, S31), 1.0 sec.
. . . . . <> Change Switch: [21] = ON
. . . . . <>
. . . . : Else ...
. . . . . <> Fork Condition: If Variable [37] == 2 then ...
. . . . . . <> Play Sound Effect: strike10, Volume 100%, Speed 100%, Pan Center
. . . . . . <> Flash Event: Event #2, (R31, G14, B0, S31), 1.0 sec.
. . . . . . <> Change Switch: [22] = ON
. . . . . . <>
. . . . . : Else ...
. . . . . . <> Fork Condition: If Variable [37] == 3 then ...
. . . . . . . <> Play Sound Effect: strike10, Volume 100%, Speed 100%, Pan Center
. . . . . . . <> Flash Event: Event #3, (R31, G14, B0, S31), 1.0 sec.
. . . . . . . <> Change Switch: [23] = ON
. . . . . . . <>
. . . . . . : Else ...
. . . . . . . <> Play Sound Effect: schwung1, Volume 100%, Speed 80%, Pan Center
. . . . . . . <>
. . . . . . : End of fork
. . . . . . <>
. . . . . : End of fork
. . . . . <>
. . . . : End of fork
. . . . <> Change Variable: [36] -= 1
. . . . <> Get Event ID: (V[35], V[36]), Store in var. [37]
. . . . <> Fork Condition: If Variable [37] == 1 then ...
. . . . . <> Play Sound Effect: strike10, Volume 100%, Speed 100%, Pan Center
. . . . . <> Flash Event: Event #1, (R31, G14, B0, S31), 1.0 sec.
. . . . . <> Change Switch: [21] = ON
. . . . . <>
. . . . : Else ...
. . . . . <> Fork Condition: If Variable [37] == 2 then ...
. . . . . . <> Play Sound Effect: strike10, Volume 100%, Speed 100%, Pan Center
. . . . . . <> Flash Event: Event #2, (R31, G14, B0, S31), 1.0 sec.
. . . . . . <> Change Switch: [22] = ON
. . . . . . <>
. . . . . : Else ...
. . . . . . <> Fork Condition: If Variable [37] == 3 then ...
. . . . . . . <> Play Sound Effect: strike10, Volume 100%, Speed 100%, Pan Center
. . . . . . . <> Flash Event: Event #3, (R31, G14, B0, S31), 1.0 sec.
. . . . . . . <> Change Switch: [23] = ON
. . . . . . . <>
. . . . . . : Else ...
. . . . . . . <> Play Sound Effect: schwung1, Volume 100%, Speed 80%, Pan Center
. . . . . . . <>
. . . . . . : End of fork
. . . . . . <>
. . . . . : End of fork
. . . . . <>
. . . . : End of fork
. . . . <> Change Variable: [36] += 2
. . . . <> Get Event ID: (V[35], V[36]), Store in var. [37]
. . . . <> Fork Condition: If Variable [37] == 1 then ...
. . . . . <> Play Sound Effect: strike10, Volume 100%, Speed 100%, Pan Center
. . . . . <> Flash Event: Event #1, (R31, G14, B0, S31), 1.0 sec.
. . . . . <> Change Switch: [21] = ON
. . . . . <>
. . . . : Else ...
. . . . . <> Fork Condition: If Variable [37] == 2 then ...
. . . . . . <> Play Sound Effect: strike10, Volume 100%, Speed 100%, Pan Center
. . . . . . <> Flash Event: Event #2, (R31, G14, B0, S31), 1.0 sec.
. . . . . . <> Change Switch: [22] = ON
. . . . . . <>
. . . . . : Else ...
. . . . . . <> Fork Condition: If Variable [37] == 3 then ...
. . . . . . . <> Play Sound Effect: strike10, Volume 100%, Speed 100%, Pan Center
. . . . . . . <> Flash Event: Event #3, (R31, G14, B0, S31), 1.0 sec.
. . . . . . . <> Change Switch: [23] = ON
. . . . . . . <>
. . . . . . : Else ...
. . . . . . . <> Play Sound Effect: schwung1, Volume 100%, Speed 80%, Pan Center
. . . . . . . <>
. . . . . . : End of fork
. . . . . . <>
. . . . . : End of fork
. . . . . <>
. . . . : End of fork
. . . . <>
. . . : Else ...
. . . . <>
. . . : End of fork
. . . <>
. . : End of fork
. . <>
. : End of fork
. <>
: End of fork
<> Change Switch: [3] = OFF