summaryrefslogtreecommitdiff
path: root/npc/018-5/soul_menhir.txt
blob: 201a85c75a11ab2028091b7dab44fe68c8443d68 (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
// TMW2 scripts.
// Author:
//    Jesusalva
// Description:
//    Soul Menhir

018-5,111,52,0	script	Soul Menhir#lil	NPC_SOUL_MOSS,{
    mesc l("This is a Soul Menhir, but seems more magical than the others.");
    select
        l("Look closer."),
        l("I wanna return home...");
    mes "";
    if (@menu == 2) {
        closeclientdialog;
        warp "Save", 0, 0;
        close;
    }
    @map$ = "018-5";
    setarray @Xs, 110, 111, 112;
    setarray @Ys,  53,  53,  53;
    @x = 0;
    @y = 0;
    callfunc "SoulMenhir";
    @map$ = "";
    cleararray @Xs[0], 0, getarraysize(@Xs);
    cleararray @Ys[0], 0, getarraysize(@Ys);
    @x = 0;
    @y = 0;
    close;
}