|
1
|
function scr_caterpillar_interpolatescr_caterpillar_interpolate
function scr_caterpillar_interpolate()
{
_newfacing = scr_facing_letter_to_number(scr_get_cardinal_direction(point_direction(x, y, obj_mainchara.x, obj_mainchara.y)));
remx[0] = obj_mainchara.x;
remy[0] = obj_mainchara.y;
facing[0] = _newfacing;
for (_iaia = target; _iaia > 0; _iaia -= 1)
{
remx[_iaia] = lerp(obj_mainchara.x, x, _iaia / target);
if (global.darkzone == 1)
remy[_iaia] = lerp(obj_mainchara.y, y + 16, _iaia / target);
else
remy[_iaia] = lerp(obj_mainchara.y, y + 6, _iaia / target);
facing[_iaia] = _newfacing;
}
} ()
|
|
2
|
{
|
|
3
|
_newfacing = scr_facing_letter_to_numberscr_facing_letter_to_number
function scr_facing_letter_to_number(arg0)
{
if (arg0 == "d")
return 0;
if (arg0 == "r")
return 1;
if (arg0 == "l")
return 3;
if (arg0 == "u")
return 2;
} (scr_get_cardinal_directionscr_get_cardinal_direction
function scr_get_cardinal_direction(arg0)
{
_mycardinal = "n";
_mydegree = arg0;
while (_mydegree > 360 || _mydegree < 0)
{
if (_mydegree > 360)
_mydegree -= 360;
if (_mydegree < 0)
_mydegree += 360;
}
if (_mydegree >= 315 || _mydegree <= 45)
_mycardinal = "r";
if (_mydegree >= 45 && _mydegree <= 135)
_mycardinal = "u";
if (_mydegree >= 135 && _mydegree <= 225)
_mycardinal = "l";
if (_mydegree >= 225 && _mydegree <= 315)
_mycardinal = "d";
return _mycardinal;
} (point_direction(x, y, obj_mainchara.x, obj_mainchara.y)));
|
|
4
|
remx[0] = obj_mainchara.x;
|
|
5
|
remy[0] = obj_mainchara.y;
|
|
6
|
facing[0] = _newfacing;
|
|
7
|
for (_iaia = target; _iaia > 0; _iaia -= 1)
|
|
8
|
{
|
|
9
|
remx[_iaia] = lerp(obj_mainchara.x, x, _iaia / target);
|
|
10
|
if (global.darkzone == 1)
|
|
11
|
remy[_iaia] = lerp(obj_mainchara.y, y + 16, _iaia / target);
|
|
12
|
else
|
|
13
|
remy[_iaia] = lerp(obj_mainchara.y, y + 6, _iaia / target);
|
|
14
|
facing[_iaia] = _newfacing;
|
|
15
|
}
|
|
16
|
}
|