Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- #include "zcommon.acs"
- int map0[300] = {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0};
- int map1[300] = {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0};
- int map2 = 1;
- int map3 = 0;
- int map4 = 0;
- int map5 = 0;
- int map6 = 0;
- int map7[300] = {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0};
- int map8 = 0;
- int map9 = 9;
- int map10 = 0;
- int map11 = 29;
- int map12 = 0;
- int map13 = 0;
- int map14 = 0;
- script 1 OPEN // addr = 8, flags=0000
- {
- int local0, local1, local2, local3, local4, local5, local6, local7;
- int goto_block;
- switch (goto_block) {
- case 0:
- ChangeCamera(1, 0, 0);
- local0 = 38;
- goto_block = 2; restart;
- case 2:
- if ((local0 <= 60)) {
- HudMessage(s:"#"; 0, 0, 10, (local0 * 655), 58982, 9830);
- local0 += 2;
- goto_block = 2; restart;
- } else {
- local0 = 38;
- goto_block = 3; restart;
- }
- case 3:
- if ((local0 <= 60)) {
- HudMessage(s:"#"; 0, 0, 10, (local0 * 655), 19660, 9830);
- local0 += 2;
- goto_block = 3; restart;
- } else {
- local0 = 30;
- goto_block = 4; restart;
- }
- case 4:
- if ((local0 <= 90)) {
- HudMessage(s:"#"; 0, 0, 10, 24903, (local0 * 655), 9830);
- local0 += 2;
- goto_block = 4; restart;
- } else {
- local0 = 30;
- goto_block = 5; restart;
- }
- case 5:
- if ((local0 <= 90)) {
- HudMessage(s:"#"; 0, 0, 10, 39321, (local0 * 655), 9830);
- local0 += 2;
- goto_block = 5; restart;
- } else {
- map3 = 0;
- if ((map2 == 1)) {
- local1 = 0;
- goto_block = 6; restart;
- } else {
- goto_block = 8; restart;
- }
- }
- case 6:
- if ((local1 < 10)) {
- local2 = 0;
- goto_block = 7; restart;
- } else {
- map2 = 0;
- goto_block = 8; restart;
- }
- case 7:
- if ((local2 < 30)) {
- map1[0] = ((local1 * 30) + local2);
- local2++;
- goto_block = 7; restart;
- } else {
- local1++;
- goto_block = 6; restart;
- }
- case 8:
- local3 = 0;
- local1 = 0;
- goto_block = 9; restart;
- case 9:
- if ((local1 < 10)) {
- local2 = 0;
- goto_block = 10; restart;
- } else {
- local1 = 0;
- goto_block = 11; restart;
- }
- case 10:
- if ((local2 < 30)) {
- if (((map1[((local1 * 30) + local2)] != 0) && ((map0[((local1 * 30) + (local2 + 1))] != 0) || (local2 == 29)))) {
- map4 = 1;
- }
- if (((map0[((local1 * 30) + local2)] != 0) && (local2 == 0))) {
- Teleport_NewMap(1, 0);
- }
- local2++;
- goto_block = 10; restart;
- } else {
- local1++;
- goto_block = 9; restart;
- }
- case 11:
- if ((local1 < 10)) {
- local2 = 29;
- goto_block = 12; restart;
- } else {
- map4 = 0;
- local1 = 0;
- goto_block = 13; restart;
- }
- case 12:
- if ((local2 >= 0)) {
- if (((map4 == 1) && (map1[((local1 * 30) + local2)] != 0))) {
- map0[map1[((local1 * 30) + local2)]] = ((local1 * 30) + local2);
- map1[0] = ((local1 * 30) + local2);
- }
- if ((((map0[((local1 * 30) + (local2 + 1))] == 0) && (map1[((local1 * 30) + local2)] != 0)) && (local2 < 29))) {
- map1[map1[((local1 * 30) + local2)]] = ((local1 * 30) + (local2 + 1));
- map1[0] = ((local1 * 30) + local2);
- }
- local2--;
- goto_block = 12; restart;
- } else {
- local1++;
- goto_block = 11; restart;
- }
- case 13:
- if ((local1 < 10)) {
- local2 = 0;
- goto_block = 14; restart;
- } else {
- if ((map3 == 0)) {
- map2 = 1;
- }
- local2 = 29;
- goto_block = 15; restart;
- }
- case 14:
- if ((local2 < 30)) {
- HudMessage(s:""; 0, ((local1 * 100) + local2), map0[((local1 * 30) + local2)], (26214 + (local1 * 1310)), (19660 + (local2 * 1310)), 9830);
- if ((map0[((local1 * 30) + local2)] != 0)) {
- HudMessage(s:"#"; 0, ((local1 * 100) + local2), map0[((local1 * 30) + local2)], (26214 + (local1 * 1310)), (19660 + (local2 * 1310)), 9830);
- }
- if ((map1[((local1 * 30) + local2)] != 0)) {
- HudMessage(s:"#"; 0, ((local1 * 100) + local2), map1[((local1 * 30) + local2)], (26214 + (local1 * 1310)), (19660 + (local2 * 1310)), 9830);
- }
- if ((map1[((local1 * 30) + local2)] != 0)) {
- map3++;
- }
- local2++;
- goto_block = 14; restart;
- } else {
- local1++;
- goto_block = 13; restart;
- }
- case 15:
- if ((local2 >= 0)) {
- if ((((((((((((map0[((0 * 30) + local2)] != 0) && (map0[((1 * 30) + local2)] != 0)) && (map0[((2 * 30) + local2)] != 0)) && (map0[((3 * 30) + local2)] != 0)) && (map0[((4 * 30) + local2)] != 0)) && (map0[((5 * 30) + local2)] != 0)) && (map0[((6 * 30) + local2)] != 0)) && (map0[((7 * 30) + local2)] != 0)) && (map0[((8 * 30) + local2)] != 0)) && (map0[((9 * 30) + local2)] != 0)) && (map2 == 1))) {
- local4 = 0;
- goto_block = 16; restart;
- } else {
- goto_block = 17; restart;
- }
- } else {
- local5 = 0;
- goto_block = 18; restart;
- }
- case 16:
- if ((local4 < 10)) {
- map0[0] = ((local4 * 30) + local2);
- local4++;
- goto_block = 16; restart;
- } else {
- goto_block = 17; restart;
- }
- case 17:
- local2--;
- goto_block = 15; restart;
- case 18:
- if (!(local5 < 4)) {
- Delay(5);
- goto_block = 0; restart;
- }
- local2 = 29;
- goto_block = 19; restart;
- case 19:
- if ((local2 > 0)) {
- if ((((((((((((map0[((0 * 30) + local2)] == 0) && (map0[((1 * 30) + local2)] == 0)) && (map0[((2 * 30) + local2)] == 0)) && (map0[((3 * 30) + local2)] == 0)) && (map0[((4 * 30) + local2)] == 0)) && (map0[((5 * 30) + local2)] == 0)) && (map0[((6 * 30) + local2)] == 0)) && (map0[((7 * 30) + local2)] == 0)) && (map0[((8 * 30) + local2)] == 0)) && (map0[((9 * 30) + local2)] == 0)) && (map2 == 1))) {
- local6 = 0;
- goto_block = 20; restart;
- } else {
- goto_block = 22; restart;
- }
- } else {
- local5++;
- goto_block = 18; restart;
- }
- case 20:
- if ((local6 < 10)) {
- local7 = local2;
- goto_block = 21; restart;
- } else {
- goto_block = 22; restart;
- }
- case 21:
- if ((local7 > 0)) {
- map0[map0[((local6 * 30) + (local7 - 1))]] = ((local6 * 30) + local7);
- local7--;
- goto_block = 21; restart;
- } else {
- local6++;
- goto_block = 20; restart;
- }
- case 22:
- local2--;
- goto_block = 19; restart;
- }
- }
- script 2 (void) // addr = 1507, flags=0000
- {
- int local0, local1;
- int goto_block;
- switch (goto_block) {
- case 0:
- map5 = 0;
- local0 = 0;
- goto_block = 2; restart;
- case 2:
- if ((local0 < 30)) {
- local1 = 0;
- goto_block = 3; restart;
- } else {
- local0 = 0;
- goto_block = 4; restart;
- }
- case 3:
- if ((local1 < 10)) {
- if (((map1[((local1 * 30) + local0)] != 0) && (((map0[(((local1 - 1) * 30) + local0)] != 0) || (local1 == 0)) || (map0[(((local1 - 1) * 30) + local0)] != 0)))) {
- map5 = 1;
- }
- local1++;
- goto_block = 3; restart;
- } else {
- local0++;
- goto_block = 2; restart;
- }
- case 4:
- if (!(local0 < 30)) {
- Terminate;
- }
- local1 = 0;
- goto_block = 5; restart;
- case 5:
- if ((local1 < 10)) {
- if (((map5 == 0) && (map1[((local1 * 30) + local0)] != 0))) {
- map1[map1[((local1 * 30) + local0)]] = (((local1 - 1) * 30) + local0);
- map1[0] = ((local1 * 30) + local0);
- }
- local1++;
- goto_block = 5; restart;
- } else {
- local0++;
- goto_block = 4; restart;
- }
- }
- }
- script 3 (void) // addr = 1757, flags=0000
- {
- int local0, local1;
- int goto_block;
- switch (goto_block) {
- case 0:
- map5 = 0;
- local0 = 0;
- goto_block = 2; restart;
- case 2:
- if ((local0 < 30)) {
- local1 = 9;
- goto_block = 3; restart;
- } else {
- local0 = 0;
- goto_block = 4; restart;
- }
- case 3:
- if ((local1 >= 0)) {
- if (((map1[((local1 * 30) + local0)] != 0) && (((map0[(((local1 + 1) * 30) + local0)] != 0) || (local1 == 9)) || (map0[(((local1 + 1) * 30) + local0)] != 0)))) {
- map5 = 1;
- }
- local1--;
- goto_block = 3; restart;
- } else {
- local0++;
- goto_block = 2; restart;
- }
- case 4:
- if (!(local0 < 30)) {
- Terminate;
- }
- local1 = 9;
- goto_block = 5; restart;
- case 5:
- if ((local1 >= 0)) {
- if (((map5 == 0) && (map1[((local1 * 30) + local0)] != 0))) {
- map1[map1[((local1 * 30) + local0)]] = (((local1 + 1) * 30) + local0);
- map1[0] = ((local1 * 30) + local0);
- }
- local1--;
- goto_block = 5; restart;
- } else {
- local0++;
- goto_block = 4; restart;
- }
- }
- }
- script 4 (void) // addr = 2007, flags=0000
- {
- int local0, local1;
- int goto_block;
- switch (goto_block) {
- case 0:
- local0 = 29;
- goto_block = 2; restart;
- case 2:
- if ((local0 >= 0)) {
- local1 = 9;
- goto_block = 3; restart;
- } else {
- local0 = 0;
- goto_block = 4; restart;
- }
- case 3:
- if ((local1 >= 0)) {
- if ((map1[((local1 * 30) + local0)] != 0)) {
- if ((local1 < map9)) {
- map9 = local1;
- }
- if ((local0 < map11)) {
- map11 = local0;
- }
- }
- local1--;
- goto_block = 3; restart;
- } else {
- local0--;
- goto_block = 2; restart;
- }
- case 4:
- if ((local0 < 30)) {
- local1 = 0;
- goto_block = 5; restart;
- } else {
- map13 = ((map10 - map9) + 1);
- map14 = ((map12 - map11) + 1);
- local1 = map9;
- goto_block = 6; restart;
- }
- case 5:
- if ((local1 < 10)) {
- if ((map1[((local1 * 30) + local0)] != 0)) {
- if ((local1 > map10)) {
- map10 = local1;
- }
- if ((local0 > map12)) {
- map12 = local0;
- }
- }
- local1++;
- goto_block = 5; restart;
- } else {
- local0++;
- goto_block = 4; restart;
- }
- case 6:
- if ((local1 < (map9 + map13))) {
- local0 = map11;
- goto_block = 7; restart;
- } else {
- if ((map8 == 0)) {
- local0 = 29;
- goto_block = 8; restart;
- } else {
- goto_block = 10; restart;
- }
- }
- case 7:
- if ((local0 < (map11 + map14))) {
- if (((((((local0 + map9) - map11) > 9) || (((-local1 + map9) + map11) > 29)) || (((-local1 + map9) + map11) < 0)) || (((local0 + map9) - map11) < 0))) {
- map8 = 1;
- } else {
- map7[map1[((local1 * 30) + local0)]] = ((((local0 + map9) - map11) * 30) + (((-local1 + map9) + map11) + 1));
- }
- local0++;
- goto_block = 7; restart;
- } else {
- local1++;
- goto_block = 6; restart;
- }
- case 8:
- if ((local0 >= 0)) {
- local1 = 9;
- goto_block = 9; restart;
- } else {
- goto_block = 10; restart;
- }
- case 9:
- if ((local1 >= 0)) {
- if (((map7[((local1 * 30) + local0)] != 0) && (map0[((local1 * 30) + local0)] != 0))) {
- map8 = 1;
- }
- local1--;
- goto_block = 9; restart;
- } else {
- local0--;
- goto_block = 8; restart;
- }
- case 10:
- local0 = 29;
- goto_block = 11; restart;
- case 11:
- if (!(local0 >= 0)) {
- map9 = 9;
- map10 = 0;
- map11 = 29;
- map12 = 0;
- map13 = 0;
- map14 = 0;
- map8 = 0;
- Terminate;
- }
- local1 = 9;
- goto_block = 12; restart;
- case 12:
- if ((local1 >= 0)) {
- if ((map8 == 0)) {
- map1[map7[((local1 * 30) + local0)]] = ((local1 * 30) + local0);
- }
- map7[0] = ((local1 * 30) + local0);
- local1--;
- goto_block = 12; restart;
- } else {
- local0--;
- goto_block = 11; restart;
- }
- }
- }
- function void func0 (int local0) // addr = 2651
- {
- int local1;
- int goto_block;
- while (1) {
- switch (goto_block) {
- case 0:
- local1 = Random(1, 7);
- switch (local1) {
- case 7:
- map1[7] = ((4 * 30) + 1);
- map1[7] = ((5 * 30) + 1);
- map1[7] = ((6 * 30) + 1);
- map1[7] = ((6 * 30) + 0);
- goto_block = 2; continue;
- case 6:
- map1[6] = ((4 * 30) + 0);
- map1[6] = ((5 * 30) + 0);
- map1[6] = ((6 * 30) + 1);
- map1[6] = ((6 * 30) + 0);
- goto_block = 2; continue;
- case 5:
- map1[5] = ((4 * 30) + 0);
- map1[5] = ((5 * 30) + 1);
- map1[5] = ((5 * 30) + 0);
- map1[5] = ((4 * 30) + 1);
- goto_block = 2; continue;
- case 4:
- map1[4] = ((4 * 30) + 1);
- map1[4] = ((5 * 30) + 1);
- map1[4] = ((5 * 30) + 0);
- map1[4] = ((6 * 30) + 0);
- goto_block = 2; continue;
- case 3:
- map1[3] = ((4 * 30) + 0);
- map1[3] = ((5 * 30) + 0);
- map1[3] = ((5 * 30) + 1);
- map1[3] = ((6 * 30) + 1);
- goto_block = 2; continue;
- case 2:
- map1[2] = ((4 * 30) + 0);
- map1[2] = ((5 * 30) + 0);
- map1[2] = ((5 * 30) + 1);
- map1[2] = ((6 * 30) + 0);
- goto_block = 2; continue;
- case 1:
- map1[1] = ((3 * 30) + 0);
- map1[1] = ((4 * 30) + 0);
- map1[1] = ((5 * 30) + 0);
- map1[1] = ((6 * 30) + 0);
- goto_block = 2; continue;
- }
- goto_block = 2; continue;
- case 2:
- return;
- }
- }
- }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement