summaryrefslogtreecommitdiff
path: root/npc/functions/savepoint.txt
blob: 14d9149ef13a98f87b40b628af7329213bde37c7 (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
// Evol scripts.
// Authors:
//    Reid
// Description:
//    Add new save point localisation

function	script	SavePoint	{
    mesn "Narrator";
    mes col(l("There is a nice place to stay beside you."), 9);
    next;
    mes col(l("What do you wish to do?"), 9);
    next;

    menu
        l("Take a nap"), -,
        l("Nothing"), L_Return;

    if (PlayerInformations_SavePoint == 1)
        goto L_Shortversion;

    mesn "Narrator";
    mes col(l("You close your eyes some seconds..."), 9);
    next;
    mes col(l("..."), 9);
    next;
    mes col(l("..."), 9);
    next;
    mes col(l("..."), 9);
    next;
    mes col(l("Your position get saved."), 9);
    next;

    set PlayerInformations_SavePoint, 1;
        goto L_Save;

L_Shortversion:
    mesn "Narrator";
    mes col(l("Your position get saved."), 9);
    next;

L_Save:
    savepoint @map$, @x, @y;
        goto L_Return;

L_Return:
    return;
}