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
|
// Evol scripts.
// Authors:
// Reid
// Description:
// Dye seller, she sells and explain how works dye cards.
// Variables:
// ArtisQuests_Fexil
// Quest states:
// 0 -- not started
// 1 -- Lloyd warned about the quest
// 2 -- Fexil explain what he needs
// 3 -- Fexil buy every fur that the pc bring to him
001-1,47,126,0 script Calypsan#001-1 NPC_CALYPSAN,{
function explain_dyes {
speech 5,
l("There are two different kinds of card, the first changes the style of your clothes, the second changes their stats."),
l("");
// Need tritan's dialogue (so the first line need to be changed too)
// Need to explain style cards, and to redirect to Don the blacksmith for stat cards.
// Style cards change the color or the visual aspect of an item. There are multiple cards that can work on multiple equipment.
// Each piece of equipment hold a certain amount of possible cards that can be inserted.
// Ex: Tank Top + Red dye = Red Tank Top
// Another example, Resa from the light armor shop offer a Brimmed Hat, you can upgrade it with a feather and obtain a feather brimmed hat.
}
speech 4,
l("Yoiis is jealous of rainbow sky? It is possible to yeye your cloth with my dyes."),
l("What does yoiis want today?");
.@fexil = getq(ArtisQuests_Fexil);
do
{
menuint
rif(.@fexil == 1, l("Have you seen Fexil?")), 0,
l("Let's trade."), 1,
l("How does these dyes works?"), 2,
l("I want to make my own dyes."), 3,
l("Bye."), 4;
switch (@menuret)
{
case 0:
setcamnpc "Fexil#001-1";
speech 5,
l("Oh yeye did, his store is just aside me!"),
l("Yoiis should look there.");
restorecam;
break;
case 1:
closedialog;
shop "Store#Calypsan001-1";
close;
case 2:
explain_dyes;
break;
case 3:
speech 5,
l("Yoiis is not yet ready to make his own dyes."),
l("But in the future I might help you to create your own ones.");
break;
case 4:
break;
}
} while (@menuret != 4);
closedialog;
goodbye;
close;
OnInit:
.sex = G_FEMALE;
.distance = 3;
end;
}
|