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
|
/*-- Großer Stein --*/
#strict
protected func Initialize()
{
Roll();
//if (!Random(3))
if(GetCon()==100) DoCon(-80);
return(1);
}
protected func Roll()
{
var rnd = Random(3);
if (rnd == 0) SetAction("Rolling1");
if (rnd == 1) SetAction("Rolling2");
if (rnd == 2) SetAction("Rolling3");
return(1);
}
protected func ContactTop()
{
SetXDir(5 - Random(11));
if (!Random(3)) Destruct();
Crash(-4,-14);
Crash(0,-16);
Crash(4,-14);
ShakeViewPort(GetCon() / 5, this());
Roll();
return(1);
}
protected func ContactBottom()
{
SetXDir(50 - Random(101));
SetYDir(-45 - Random(10));
Crash(-4,14);
Crash(0,16);
Crash(4,14);
Roll();
ShakeViewPort(GetCon() / 5, this());
if (!Random(10)) CrashFree();
if (!Random(8)) Destruct();
return(1);
}
protected func ContactLeft()
{
SetXDir(10 + Random(10));
SetYDir(-40 - Random(10));
Crash(-14,-4);
Crash(-16,0);
Crash(-14,4);
Roll();
ShakeViewPort(GetCon() / 5, this());
if (!Random(5)) Destruct();
return(1);
}
protected func ContactRight()
{
SetXDir(-10 - Random(10));
SetYDir(-40 - Random(10));
Crash(14,-4);
Crash(16,0);
Crash(14,4);
Roll();
ShakeViewPort(GetCon() / 5, this());
if (!Random(5)) Destruct();
return(1);
}
protected func Crash(x, y)
{
Sound("RockHit*");
if (GetCon() < 25) return(0);
if (!Random(4)) BlastObjects(GetX() + x, GetY() + y, 3, Contained());
if (!Random(4)) BlastObjects(GetX() + x, GetY() + y, 2, Contained());
if (!Random(75)) Explode(Random(2) + 3, CreateObject(ROCK, x, y, -1));
return(1);
}
protected func Destruct()
{
var i;
if(GetCon()>25) while (++i < 4) CastSplitRock();
Sound("RockBreak*");
Smoke(Random(11) - 5, Random(11) - 5, Random(25));
Smoke(Random(11) - 5, Random(11) - 5, Random(25));
Smoke(Random(11) - 5, Random(11) - 5, Random(25));
Smoke(Random(11) - 5, Random(11) - 5, Random(25));
RemoveObject();
return(1);
}
protected func DoSink()
{
if(GetYDir()<0) SetYDir(0);
}
protected func CastSplitRock()
{
return(1);
var pRock = CreateObject(BIRK, 0, 0, -1);
SetXDir(-50 + Random(101), pRock);
SetYDir(-60 + Random(80), pRock);
SetCon(GetCon() - 5, pRock);
// AddEffect("IntArrowVanish",pRock,1,3,0,MGBW);
return(1);
}
protected func CrashFree()
{
ShakeFree(GetX() - 50 + Random(100), GetY() + Random(120), GetCon()/5);
ShakeFree(GetX() - 50 + Random(100), GetY() + Random(120), GetCon()/5);
ShakeFree(GetX() - 50 + Random(100), GetY() + Random(120), GetCon()/5);
if (!Random(3)) Sound("Earthquake");
return(1);
}
|
