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
|
//===== Hercules Script ======================================
//= Cool Event Corp. Staff
//===== By: ==================================================
//= Gepard
//===== Current Version: =====================================
//= 2.0
//===== Description: =========================================
//= Cool Event Corp. Staff (Save, Storage & Pushcart Service)
//= in Arunafeltz Region.
//===== Additional Comments: =================================
//= 1.0 First version, iRO Sakray X.4 [Gepard]
//= 1.1 Optimized, fixed a conditional bug [Lupus]
//= 1.1a Redo back. It wasn't a bug [Lupus]
//= 1.2 Added Rachel Cool Event Corp. Staff [Playtester]
//= 1.3 Added cutins, closed Kafra Password exploit
//= until we got a client/packet based password support [Lupus]
//= 1.4 Added Veins Cool Event Corp. Staff. [L0ne_W0lf]
//= 1.5 Cool Event Corp staff is now more iRO like. [L0ne_W0lf]
//= 2.0 Moved duplicate code to a function. Better integrated
// the rest with functions_kafra.txt. [Haru]
//============================================================
//=== Main Function ========================================================
//= arg(0): Used to determine which menu to display.
//= arg(1): Used to determine the location displayed in the save message.
//==========================================================================
function script F_ZondaStaff {
cutin "zonda_01",2;
mes "[Cool Event Corp. Staff]";
mes "Welcome to Cool Event Corp.";
mes "Our staff is always working";
mes "to surpass your expactations";
mes "for quality service. So how";
mes "may I assist you today?";
next;
switch (getarg(0)) {
// Save, Storage, Pushcart, Storage Password (Hugel)
case 0: setarray @Z_Menu0$, "Save", "Use Storage", "Rent a Pushcart", "Storage Password Service", "Cancel"; break;
// Save, Storage, Pushcart, Storage Password (Veins, Rachel)
default:
case 1: setarray @Z_Menu0$, "Save", "Use Storage", "Teleport Service", "Rent a Pushcart", "Storage Password Service", "Cancel"; break;
}
.@menu$ = "";
for (.@i = 0; .@i < getarraysize(@Z_Menu0$); ++.@i)
.@menu$ += @Z_Menu0$[.@i] + ":";
.@j = select (.@menu$) - 1;
if (@Z_Menu0$[.@j] == "Save") {
mes "[Cool Event Corp. Staff]";
mes "Your Respawn Point";
mes "has been saved here";
mes getarg(1);
mes "Thank you for using the";
mes "Cool Event Corp. service~";
return;
} else if (@Z_Menu0$[.@j] == "Use Storage") {
callfunc "F_KafStor",0,40,6,"[Cool Event Corp. Staff]";
close2;
cutin "", 255;
end;
} else if (@Z_Menu0$[.@j] == "Teleport Service") {
callfunc "F_KafTele", 6, "[Cool Event Corp. Staff]";
close2;
cutin "", 255;
end;
} else if (@Z_Menu0$[.@j] == "Rent a Pushcart") {
callfunc "F_KafCart", 6, 800, "[Cool Event Corp. Staff]";
close2;
cutin "", 255;
end;
} else if (@Z_Menu0$[.@j] == "Storage Password Service") {
callfunc("F_SetKafCode","[Cool Event Corp. Staff]","Cool Event Corp.");
//the function closes msg and removes cutins
} else {
mes "[Cool Event Corp. Staff]";
mes "Cool Event Corp. is always";
mes "striving to provide the best";
mes "services for our customers.";
mes "Help us become the best by";
mes "providing us with your opinions";
mes "and honest feedback. Thank you.";
close2;
}
cutin "", 255;
end;
}
hugel,88,168,4 script Cool Event Corp. Staff::CoolEventCorpStaffHugel 4_M_ZONDAMAN,{
callfunc "F_KafSet";
callfunc "F_ZondaStaff", 0, "in the village of Hugel.";
savepoint "hugel",96,155;
close2;
cutin "", 255;
end;
}
rachel,109,138,5 script Cool Event Corp. Staff::CoolEventCorpStaffRachel 4_M_ZONDAMAN,{
callfunc "F_KafSet";
callfunc "F_ZondaStaff", 1, "in the town of Rachel.";
savepoint "rachel",113,137;
close2;
cutin "", 255;
end;
}
veins,208,128,5 script Cool Event Corp. Staff::CoolEventCorpStaffVeins 4_M_ZONDAMAN,{
callfunc "F_KafSet";
callfunc "F_ZondaStaff", 1, "in the town of Veins.";
savepoint "veins",204,103;
close2;
cutin "", 255;
end;
}
|
