summaryrefslogtreecommitdiff
path: root/npc/001-10/scripts.txt
blob: da1afcd6e8d956ed869d78a1fb2e90d033c08544 (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
// TMW2 scripts.
// Authors:
//    Jesusalva
//    Dusty in a Bottle (aka. Dustynator, Dustman, mr. willbelz)
// Description:
//    Scripts for 001-10: Snipers, Bottles and Warps

001-10,89,43,0	script	#COD_BossRoomCheck	NPC_NO_SPRITE,0,0,{
    end;
OnTouch:
    if (!@COD_CHECKPOINT) {
        dispbottom l("Magic Barrier is active. You must give a whole circle on the desert to break it.");
    } else {
        // warp
        dispbottom l("A dangerous boss room, keep your guard up!");
    }
    end;
}

001-10,132,106,0	script	#COD_Checkpoint106	NPC_NO_SPRITE,0,0,{
    end;
OnTouch:
    @COD_CHECKPOINT=1;
    getmapxy(.@m$, .@x, .@y, 0);
    slide .@x+2, .@y;
    dispbottom l("Checkpoint! Magic Barrier went down!");
    end;
}

001-10,132,107,0	duplicate(#COD_Checkpoint106)	#COD_Checkpoint107	NPC_NO_SPRITE
001-10,132,108,0	duplicate(#COD_Checkpoint106)	#COD_Checkpoint108	NPC_NO_SPRITE
001-10,132,109,0	duplicate(#COD_Checkpoint106)	#COD_Checkpoint109	NPC_NO_SPRITE
001-10,132,110,0	duplicate(#COD_Checkpoint106)	#COD_Checkpoint110	NPC_NO_SPRITE
001-10,132,111,0	duplicate(#COD_Checkpoint106)	#COD_Checkpoint111	NPC_NO_SPRITE
001-10,132,112,0	duplicate(#COD_Checkpoint106)	#COD_Checkpoint112	NPC_NO_SPRITE
001-10,132,113,0	duplicate(#COD_Checkpoint106)	#COD_Checkpoint113	NPC_NO_SPRITE

001-10,0,0,0	script	#CODMASTER	NPC_NO_SPRITE,{
    end;
    function spawner { // (Event, x1, y1, x2, y2, Amount, modifier)
        .@ev=getarg(0, "#CONDMASTER::OnDeath");
        .@x1=getarg(1,0);
        .@y1=getarg(2,0);
        .@x2=getarg(3,200);
        .@y2=getarg(4,150);
        .@am=getarg(5,1);
        freeloop(true);
	    for (.@i = 0; .@i < .@am; ++.@i) {
            if (!getarg(6,0))
                .@monsterId=any(DustRifle, DustGatling, DustRevolver);
            else
                .@monsterId=any(AngryBat, Snake, AngryBat, DesertBandit, AngryBat, Sarracenus);
            areamonster("001-10", .@x1, .@y1, .@x2, .@y2, strmobinfo(1, .@monsterId), .@monsterId, 1, .@ev);

        }
    }

// Death handlers
OnWLDeath:
    if (rand(0,1000) <= 20)
        getitem BottledDust, 1;
    spawner("#CODMASTER::OnWLDeath", 0, 0, 200, 150, 1, 1);
    end;

OnNDeath:
    if (rand(0,1000) <= 40)
        getitem BottledDust, 1;
    spawner("#CODMASTER::OnNDeath", 0, 10, 200, 25);
    end;

OnSDeath:
    if (rand(0,1000) <= 40)
        getitem BottledDust, 1;
    spawner("#CODMASTER::OnSDeath", 0, 129, 200, 150);
    end;

OnCDeath:
    if (rand(0,1000) <= 40)
        getitem BottledDust, 1;
    spawner("#CODMASTER::OnCDeath", 73, 45, 132, 86);
    end;

OnWDeath:
    if (rand(0,1000) <= 40)
        getitem BottledDust, 1;
    spawner("#CODMASTER::OnWDeath", 10, 25, 72, 122);
    end;

OnEDeath:
    if (rand(0,1000) <= 40)
        getitem BottledDust, 1;
    spawner("#CODMASTER::OnEDeath", 160, 45, 190, 130);
    end;

OnDeath:
    if (rand(0,1000) <= 40)
        getitem BottledDust, 1;
    spawner("#CODMASTER::OnDeath");
    end;

/////////////////////////////////////////////////////////////////////////////////
///              on init block                 ////    on init block      //////
/////////////////////////////////////////////////////////////////////////////////
OnInit:
    // Spawn Wildlife
    spawner("#CODMASTER::OnWLDeath", 0, 0, 200, 150, 12, 1);

    // Spawn other monsters
    spawner("#CODMASTER::OnDeath", 0, 0, 200, 150, 3);
    spawner("#CODMASTER::OnNDeath", 0, 10, 200, 25, 5);
    spawner("#CODMASTER::OnSDeath", 0, 129, 200, 150, 3);
    spawner("#CODMASTER::OnCDeath", 73, 45, 132, 86, 4);
    spawner("#CODMASTER::OnWDeath", 10, 25, 72, 122, 5);
    spawner("#CODMASTER::OnEDeath", 160, 45, 190, 130, 4);

    end;
}