summaryrefslogtreecommitdiff
path: root/npc/014-2-2/gemini.txt
blob: bd6d125542455770859d7c7b52f877a0d4ac94af (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
120
121
122
123
// TMW2 scripts.
// Authors:
//    Jesusalva
// Description:
//    Gemini Sisters Quest - Central Core

034-1,0,0,0	script	#Gemini	NPC_HIDDEN,{
    end;

OnCoreInit:
    debugmes "CORE INIT, Inst = %d", instance_id();
    .@p = getcharid(1);
    instance_attach($@VALIA_INST[.@p]);
    @mystatus = 0;
    sleep2(200);
    if (!$@VALIA_STATUS[.@p])
        $@VALIA_STATUS[.@p] = 1;
    // FALLTHROUGH
OnCore:
    if (!compare(getmap(), "val")) end;
    .@p = getcharid(1);
    instance_attach($@VALIA_INST[.@p]);
    // Always true on first interaction
    // This handles new stages for person
    if (@mystatus < $@VALIA_STATUS[.@p]) {
        // No retroaction!
        @mystatus = $@VALIA_STATUS[.@p];
        switch ($@VALIA_STATUS[.@p]) {
        case 1: // Quest initiated
            // Spawn monsters
            areamonster("val1@"+.@p, 20, 20, 60, 60, strmobinfo(1, GreenSlime), GreenSlime, (BaseLevel/15), "Valia::OnGSlime");
            areamonster("val1@"+.@p, 20, 20, 70, 60, strmobinfo(1, LogHead), LogHead, (BaseLevel/15), "Valia::OnLHead");
            areamonster("val1@"+.@p, 20, 20, 70, 60, strmobinfo(1, ForestMushroom), ForestMushroom, (BaseLevel/12), "Valia::OnFShroom");
            areamonster("val1@"+.@p, 20, 20, 70, 60, strmobinfo(1, RedMushroom), RedMushroom, 1+(BaseLevel/30), "Valia::OnRShroom");
            break;
        case 2: // Looking for a runestone
            getexp 4000, 100;
            break;
        case 3: // Runestone was found
            getexp 8000, 200;
            break;
        case 4: // Desert unlocked, but no clue on what to do
            dispbottom l("You hear a noise from distance.");
            // Spawn monsters
            areamonster("val1@"+.@p, 100, 20, 170, 60, strmobinfo(1, CaveSnake), CaveSnake, 3, "Valia::OnCSnake");
            areamonster(getmap(), 100, 20, 170, 60, strmobinfo(1, MagicGoblin), MagicGoblin, 1, "Valia::OnMGoblin");
            // These refuse to respawn but are numerous
            // Thus far, the quest is still easy. But soon it won't be.
            areamonster(getmap(), 100, 20, 170, 60, strmobinfo(1, MountainSnake), MountainSnake, 1+(BaseLevel/24));
            areamonster(getmap(), 100, 20, 170, 60, strmobinfo(1, DarkLizard), DarkLizard, 1+(BaseLevel/20));
            areamonster(getmap(), 100, 20, 170, 60, strmobinfo(1, WickedMushroom), WickedMushroom, 1+(BaseLevel/32));
            areamonster(getmap(), 100, 20, 170, 60, strmobinfo(1, EliteDuck), EliteDuck, 1);
            break;
        case 5: // JackO shows up
            getexp 16000, 400;
            break;
        case 6: // Passage Open
            if (countitem(SealedSoul))
                delitem SealedSoul, countitem(SealedSoul);
            dispbottom l("You hear waterfall opening in distance.");
            getexp 32000, 800;
            break;
        case 7: // Ambushed & Captured
            if (!is_gm())
                nude();
            @lockpicks=false;
            // Prision Area
            .@m=any(Bandit, RobinBandit, SleepingBandit);
            areamonster("val2@"+.@p, 52, 93, 70, 98, strmobinfo(1, .@m), .@m, 1);
            .@m=any(Bandit, RobinBandit, SleepingBandit);
            areamonster("val2@"+.@p, 52, 93, 70, 98, strmobinfo(1, .@m), .@m, 1);
            // Ante-chamber
            areamonster("val2@"+.@p, 69, 96, 85, 107, strmobinfo(1, Bandit), Bandit, 1);
            .@m=any(Bandit, RobinBandit, SleepingBandit, RobinBandit);
            areamonster("val2@"+.@p, 69, 96, 85, 107, strmobinfo(1, .@m), .@m, 1);
            // Reception & Lord Desk
            areamonster("val2@"+.@p, 50, 30, 80, 75, strmobinfo(1, Bandit), Bandit, (BaseLevel/15));
            areamonster("val2@"+.@p, 50, 30, 80, 75, strmobinfo(1, RobinBandit), RobinBandit, (BaseLevel/25));
            // Whole Map
            areamonster("val2@"+.@p, 20, 24, 78, 72, strmobinfo(1, Archant), Archant, (BaseLevel/8));
            // Great Hall
            areamonster("val2@"+.@p, 25, 24, 50, 45, strmobinfo(1, RobinBandit), RobinBandit, (BaseLevel/22));
            areamonster("val2@"+.@p, 25, 24, 50, 45, strmobinfo(1, Assassin), Assassin, (BaseLevel/20));
            areamonster("val2@"+.@p, 25, 24, 50, 45, strmobinfo(1, Bandit), Bandit, (BaseLevel/18));
            areamonster("val2@"+.@p, 25, 24, 50, 45, strmobinfo(1, HoodedNinja), HoodedNinja, 1);
            break;
        case 8: // Bandit Key retrieved
            getexp 64000, 1600;
            break;
        case 9: // Door seal broken
            getexp 128000, 3200;
            // Limit exports of Lazurite outside the area
            if (countitem(LazuriteShard) > 2)
                delitem LazuriteShard, countitem(LazuriteShard)/2;
            // These two remain for internal quests
            if (countitem(LazuriteCrystal))
                delitem LazuriteCrystal, countitem(LazuriteCrystal);
            if (countitem(LazuriteHeart))
                delitem LazuriteHeart, countitem(LazuriteHeart);
            break;
        case 10: // Luvia first cutscene
            break;
        case 11: // Survived cutscene
            getexp 256000, 6400;
            break;
        case 12: // Storage cutscene
            break;
        case 13: // Survived storage
            getexp 384000, 9600;
            break;
        case 14: // Luvia Showdown cutscene
            break;
        case 15: // Defeated Luvia and now on pursuit!
            getexp 512000, 12800;
            break;
        }
    }
    addtimer(5000, "#Gemini::OnCore");
    end;
}

// Max experience gain: 1,404,000 XP and 35,100 JXP