19 lines
350 B
Plaintext
19 lines
350 B
Plaintext
|
|
||
|
|
function dir2hv(dir_=direction, spd_=speed) {
|
||
|
|
//gml_pragma("forceinline")
|
||
|
|
//if dir && spd {
|
||
|
|
hspd = (dsin(dir_+90)%360)*spd_;
|
||
|
|
vspd = (dcos(dir_+90)%360)*spd_;
|
||
|
|
dir = 0;
|
||
|
|
spd = 0;
|
||
|
|
direction = 0;
|
||
|
|
speed = 0;
|
||
|
|
//}
|
||
|
|
|
||
|
|
}
|
||
|
|
function hv2dir(hspd, vspd) {
|
||
|
|
spd = (abs(hspd)+abs(vspd))/2;
|
||
|
|
dir = darctan2(hspd, vspd);
|
||
|
|
speed = spd;
|
||
|
|
direction = dir;
|
||
|
|
}
|