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
|
// TMW-2 Script.
// Evol scripts.
// Author:
// Reid
// Jesusalva
// Description:
// Random heal every x seconds.
//
// Variables:
// @type
// 0 - Sweeties (lowest)
// 1 - Vegetables
// 2 - Proteins
// 3 - Proccessed
// 4 - Magical (highest)
// @delay
// Overrides the lasting time
// @rarity
// How rare the item is (how much should it effect)
// Ranges from 1 to 10.
//
// Formula:
// MinHeal %: @rarity * ((@type*1) + 1)
// MaxHeal %: @rarity * ((@type*2) + 1)
// Delay: 1 + (@type*2)
// Sweeties: 1s
// Vegetables: 3s
// Proteins: 5s
// Proccessed: 7s
// Magical: 9s
//
// *getequipoption(EQI_HEAD_TOP,1,168); → Heal Bonus (should be first bonus on Chef Hat)
- script rand_sc_heal -1,{
// Add remaning bonus if the last one hasn't finished
/*
function remaining_bonus
{
if (getstatus(getarg(0)))
{
.@old_val1 = getstatus(getarg(0), 1);
.@old_delay = getstatus(getarg(0), 4) * 1000;
// Penalty to healing item stack: -20% on previous item bonus
.@old_val1 = (.@old_val1*8/10);
// change the delay to prevent fast healing
if (.@old_delay > @delay)
{
@delay = .@old_delay;
@val1 += .@old_val1;
}
else
{
@val1 += (.@old_val1 * .@old_delay) / @delay;
}
}
else
{
@val1 = @val3;
}
return;
}
*/
OnUse:
if (@rarity <= 0) {
Exception("Invalid healing item, deleting without healing effect.");
end;
}
// Calculate healing value in %
@min=@rarity * ((@type*1) + 1);
@max=@rarity * ((@type*1) + 1);
// Vitality raises the minimum healing value in 1%, capped at maximum vlaue
@min = min(@max, @min+readparam(bVit));
// Make these abstract % in absolute values
@min=max(1, MaxHp*@min/100);
@max=max(3, MaxHp*@max/100);
// Calculate how much you'll heal
@val1 = rand(@min, @max);
// Calculate delay if it was not given
if (!@delay) {
@delay=1 + (@type*2);
}
// Decide the healing bonus type. We have four types: S, L, G and M
// By default, we use 'S'
.@skill = SC_S_LIFEPOTION;
// We now have @val1 (new effect), @delay (new delay)
// But do we have .@v and .@d (old effect and delay)?
//Meh, just override it
/*
if (getstatus(.@skill)) {
.@v=getstatus(.@skill, 1);
.@d=getstatus(.@skill, 4);
}
*/
debugmes "PDAVG: %d/%d", .@v, .@d;
debugmes "Pre PD: %d/%d", @val1, @delay;
// If there WAS an effect previously, get ponderate average
if (.@v > 0) {
@val1=ponderate_avg(@val1, @delay, .@v, .@d);
@delay=ponderate_avg(@delay, @val1, .@d, .@v);
}
debugmes "Post PD: %d/%d", @val1, @delay;
// Put the delay in ms
@delay *= 1000;
debugmes "Ready";
// Apply the effect and finish
sc_end .@skill;
sc_start2 .@skill, @delay, @val1, 1;
debugmes "Done";
@delay=0;
@type=0;
@rarity=0;
end;
}
|
