summaryrefslogtreecommitdiff
path: root/world/map/npc/annuals/fathertime.txt
blob: 0670c3c96c8268f6865f5a929b041a70f0f07c55 (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
119
// Annual Timer
// One timer to check to enable all holiday events
-|script|#HolidayConfig|32767
{
    end;

OnInit:
    if (debug >= 2) end;
    donpcevent strnpcinfo(0) + "::OnTimer20000";
    end;

OnTimer20000:
    donpcevent "#XmasConfig::OnCommandRestartQuest";
    donpcevent "#HalloweenConfig::OnCommandRestartQuest";
    donpcevent "Easter Eggs::OnCheckEaster";
    initnpctimer;
    end;

OnClock0013:
    goto L_Clock;
OnClock0113:
    goto L_Clock;
OnClock0213:
    goto L_Clock;
OnClock0313:
    goto L_Clock;
OnClock0413:
    goto L_Clock;
OnClock0513:
    goto L_Clock;
OnClock0613:
    goto L_Clock;
OnClock0713:
    goto L_Clock;
OnClock0813:
    goto L_Clock;
OnClock0913:
    goto L_Clock;
OnClock1013:
    goto L_Clock;
OnClock1113:
    goto L_Clock;
OnClock1213:
    goto L_Clock;
OnClock1313:
    goto L_Clock;
OnClock1413:
    goto L_Clock;
OnClock1513:
    goto L_Clock;
OnClock1613:
    goto L_Clock;
OnClock1713:
    goto L_Clock;
OnClock1813:
    goto L_Clock;
OnClock1913:
    goto L_Clock;
OnClock2013:
    goto L_Clock;
OnClock2113:
    goto L_Clock;
OnClock2213:
    goto L_Clock;
OnClock2313:
    goto L_Clock;

L_Clock:
    if (gettime(4) == 5)
        goto L_Friday;
    if (gettime(4) == 6)
        goto L_Pirate;
    goto L_Die;

L_Friday:
    if (gettime(5) != 13)
        goto L_Die;
    areamonster "009-1", 20, 20, 115, 70, "Friday", 1163, 2, "#HolidayConfig::OnFriday";
    areamonster "020-1", 20, 20, 120, 140, "Friday", 1163, 2, "#HolidayConfig::OnFriday";
    areamonster "001-1", 20, 20, 120, 120, "Friday", 1163, 1, "#HolidayConfig::OnFriday";
    end;

L_Pirate:
    set $@BLANC, (getusers(1) / 5) + 1;
    areamonster "001-1", 20, 20, 120, 120, "Blanc's Minion", 1121, $@BLANC, "#HolidayConfig::OnLameShield";
    areamonster "002-1", 20, 20, 120, 120, "Blanc's Minion", 1119, $@BLANC, "#HolidayConfig::OnLameShield";
    areamonster "003-4", 20, 20, 170, 120, "Blanc's Minion", 1122, 1, "#HolidayConfig::OnLameHat";
    areamonster "004-1", 20, 20, 100, 110, "Blanc's Minion", 1120, $@BLANC, "#HolidayConfig::OnLameShield";
    areamonster "007-1", 20, 20, 120, 100, "Blanc's Minion", 1120, $@BLANC, "#HolidayConfig::OnLameShield";
    areamonster "011-6", 20, 140, 180, 280, "Blanc's Minion", 1121, $@BLANC, "#HolidayConfig::OnLameShield";
    areamonster "018-1", 20, 20, 180, 100, "Blanc's Minion", 1122, 1, "#HolidayConfig::OnLameHat";
    areamonster "041-1", 20, 20, 75, 100, "Blanc's Minion", 1119, $@BLANC, "#HolidayConfig::OnLameShield";
    areamonster "042-1", 20, 20, 140, 120, "Blanc's Minion", 1120, $@BLANC, "#HolidayConfig::OnLameShield";
    areamonster "043-1", 20, 20, 100, 130, "Blanc's Minion", 1121, $@BLANC, "#HolidayConfig::OnLameShield";
    areamonster "057-1", 20, 60, 150, 100, "Blanc's Minion", 1122, 1, "#HolidayConfig::OnLameHat";
    end;

OnFriday:
    areamonster getmap(), getx()-3, gety()-3, getx()+3, gety()+3, "JackO", 1022, 1, "#HolidayConfig::OnLameShield";
    end;

OnLameShield:
    // Chance: 0.1% - 0.01%
    // TODO: Once MLP brings the Dragon Shield, replace with HMC Hat.
    if (rand(10000) > 9)
        goto L_Die;
    getitem "DragonShield", 1;
    end;

OnLameHat:
    // Chance: 0.1%
    if (rand(1000) > 1)
        goto OnLameShield;
    getitem "HMCPirateHat", 1;
    end;

L_Die:
    end;
}