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
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
|
// The Mana World scripts.
// Author:
// Jesusalva
// Description:
// Tiki is the sandwich maker of Candor
012-1,116,118,0 script Tiki NPC_TIKI,{
function tikiSubmit;
function tikiMenu;
function tikiShop;
mesn;
mesq l("Hey there, shady fella. Whaddaya want in Candor shores?");
next;
if (getq(General_Cooking) == 7)
tikiMenu();
if (getq(General_Cooking) == 8)
tikiSubmit();
tikiShop();
end;
function tikiShop {
closeclientdialog;
shop .name$;
return;
}
function tikiMenu {
.@q2=getq2(General_Cooking);
select
l("Just wanted to purchase ingredients for cooking."),
l("Actually, I would like to learn some recipes."),
l("Actually I'm lost. Sorry.");
mes "";
// Explode script as requested
if (@menu == 3)
close;
// Return so shop can take over
if (@menu == 1)
return;
// @menu == 2, "I would like to learn some recipes"
mesn strcharinfo(0);
mesc l("You quickly explain the situation and request the %s sandwich.", getitemlink(.@q2 == VEGAN ? MananaSandwich : PioulegSandwich));
next;
mesn;
mesq l("Ahh, I see! Very shady indeed, almost as shady as you are!");
next;
mesn;
mesq l("I would like to help, but I can't. I'm busy, you see! Candor's Sandwich Making Contest is coming up, and I never lost a single instance of it!");
next;
select
l("Ah, too bad, I'll ask Yannika for more ideas, bye."),
l("How come you never lost before?"),
l("Perhaps I can help?");
mes "";
if (@menu == 1)
close;
if (@menu == 2) {
mesn;
mesq l("Because I'm so great! I am so good, that the other challengers doesn't even show up in fear of losing to me!");
next;
mesn;
mesq l("Anyway, perhaps you could help me, and I'll help you in exchange. Whaddaya think?");
next;
}
mesn;
mesq l("It is really easy - I need an idea. Bring me something NEW, revolutionary, to make a sandwich out of it. And I'll teach you the recipe!");
next;
setq1 General_Cooking, 8;
return;
}
function tikiSubmit {
mesc "[" + .name$ + "]";
mesc l("\"Bring me something NEW, revolutionary, to make a sandwich out of it.\"");
mes "##B" + l("Drag and drop an item from your inventory.") + "##b";
.@id = requestitem();
// If ID is invalid
if (.@id < 1)
close;
// If there's not enough items, it is bound, it cannot be traded/dropped/sold, etc.
// TODO: Prevent plates/bowls from being destroyed this way!!
if (countitem(.@id) < 1 || checkbound(.@id) || getiteminfo(.@id, ITEMINFO_TYPE) != IT_HEALING) {
mesc l("This item cannot be given.");
close;
}
mesc l("Are you sure you want to give %s to %s? Item will be lost!",
getitemlink(.@id), .name$), 1;
if (askyesno() == ASK_NO)
close;
mesn;
mesq l("%s puts %s on between two bread slices and try it.", .name$, getitemname(.@id));
next;
delitem .@id, 1;
if (.@id != MoubooSteak) {
mesn;
mesc l("%s starts shouting insults at you!", .name$);
next;
mesn;
mesq l("This is the worst. sandwich. ever! How do you dare to give me such thing?!");
next;
mesn;
mesq l("Go get me something else, go do it NOW!!");
mesc l("...Maybe if he put the cheese and lettuce as you usually do, it would have tasted great... *sigh*");
close;
}
setq1 General_Cooking, 9;
setq1 General_SmearedHands, 3;
RECIPES[(.@q2 == VEGAN ? CraftMananaSandwich : CraftPioulegSandwich)]=true;
mesn;
mesq l("Uh - Oh. This is... Actually good!");
next;
mesn;
mesq l("I'm sure I'll win this year's contest as well! Hah, just wait and see!");
next;
mesn;
mesq l("What? Still want that shady recipe? Meh, just cut a bread, throw in three lettuce leaves, two cheese, and put the special ingredient - A %s!", getitemname(.@q2 == VEGAN ? Manana : PiouLegs));
next;
mesq l("And vói-la, you have your sandwich done. Now go, I have a contest to win! Hahaha!");
close;
}
OnInit:
.sex = GENDER_MALE;
.distance = 4;
tradertype(NST_MARKET);
sellitem Bread, -1, 35;
sellitem PiouLegs, -1, 25;
sellitem Manana, -1, 20;
sellitem Cheese, -1, 12;
sellitem LettuceLeaf, -1, 10;
sellitem CommonCarp, -1, 8;
sellitem GrassCarp, -1, 7;
end;
OnClock0001:
restoreshopitem Bread, 35;
restoreshopitem PiouLegs, 25;
restoreshopitem Manana, 20;
restoreshopitem Cheese, 12;
restoreshopitem LettuceLeaf, 10;
restoreshopitem CommonCarp, 8;
restoreshopitem GrassCarp, 7;
end;
}
|
