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
|
// TMW2 scripts.
// Authors:
// Jesusalva
// Description:
// Mount Renting (var MOUBOO_RENTTIME - TODO: Discount when mouboo friend )
// MoubooRent( NPC Name )
function script MoubooRent {
.@n$=getarg(0, strnpcinfo(0));
if (MOUBOO_RENTTIME > gettimetick(2)) {
mesn .@n$;
mesq l("Moo!");
return;
}
mesn .@n$;
mesq l("Moo!");
next;
mesn .@n$;
mesq l("Do you want to rent a Mouboo? It allows quick traveling!");
next;
menuint
rif(Zeny > 100, l("Rent 1 day for 100 GP")), 100,
rif(Zeny > 270, l("Rent 3 days for 270 GP")), 270,
rif(Zeny > 600, l("Rent 7 days for 600 GP")), 600,
rif(Zeny > 1200, l("Rent 15 days for 1200 GP")), 1200,
rif(Zeny > 2000, l("Rent 30 days for 2000 GP")), 2000,
l("Don't rent a mouboo."), 0;
mes "";
switch (@menuret) {
case 0:
return;
case 100:
.@time=86400; break;
case 270:
.@time=259200; break;
case 600:
.@time=604800; break;
case 1200:
.@time=1296000; break;
case 2000:
.@time=2592000; break;
default:
Exception("Invalid price: "+@menuret, RB_DEFAULT|RB_SPEECH|RB_ISFATAL);
break;
}
inventoryplace RidingMouboo, 1;
MOUBOO_RENTTIME=gettimetick(2)+.@time;
Zeny-=@menuret;
rentitem RidingMouboo, .@time;
return;
}
// TortugaRent( NPC Name )
function script TortugaRent {
.@n$=getarg(0, strnpcinfo(0));
if (MOUBOO_RENTTIME > gettimetick(2)) {
mesn .@n$;
mesq l("Boo!");
return;
}
mesn .@n$;
mesq l("Boo!");
next;
mesn .@n$;
mesq l("Do you want to rent a Tortuga? It allows quick traveling!");
next;
menuint
rif(Zeny > 50, l("Rent 1 day for 50 GP")), 50,
rif(Zeny > 135, l("Rent 3 days for 135 GP")), 135,
rif(Zeny > 300, l("Rent 7 days for 300 GP")), 300,
rif(Zeny > 600, l("Rent 15 days for 600 GP")), 600,
rif(Zeny > 1000, l("Rent 30 days for 1000 GP")), 1000,
l("Don't rent a tortuga."), 0;
mes "";
switch (@menuret) {
case 0:
return;
case 50:
.@time=86400; break;
case 135:
.@time=259200; break;
case 300:
.@time=604800; break;
case 600:
.@time=1296000; break;
case 1000:
.@time=2592000; break;
default:
Exception("Invalid price: "+@menuret, RB_DEFAULT|RB_SPEECH|RB_ISFATAL);
break;
}
inventoryplace RidingTortuga, 1;
MOUBOO_RENTTIME=gettimetick(2)+.@time;
Zeny-=@menuret;
rentitem RidingTortuga, .@time;
return;
}
|
