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
|
// 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:
// @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.
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);
}
// Put the delay in ms
@delay *= 1000;
// We now have @val1 (new effect), @delay (new delay)
// But do we have .@v and .@d (old effect and delay)?
.@v=getstatus(getarg(0), 1);
.@d=getstatus(getarg(0), 4) * 1000;
// If there WAS an effect previously, get ponderate average
if (.@v > 0)
@val1=ponderate_avg(@val1, @delay, .@v, .@d);
// Decide the healing bonus type. We have four types: S, L, G and M
// By default, we use 'S'
.@skill = SC_S_LIFEPOTION;
// Apply the effect and finish
sc_end .@skill;
sc_start2 .@skill, @delay, @val1, 1;
}
end;
}
|
