#define sc_wobble
// Use like this in step or draw event:
// - x = sc_wobble(x, target_x, slowness, wobble, array_index)
// - wobble should be set to between 1.05 and 2.
// - slowness is good at between 16 and 100.

// This script uses an array to store information:
// - spd[x] = 0

// Written by Mordi (2006)

var dis, xx, tar, fric;
xx=argument0;
tar=argument1;
fric=argument2;
sp=argument3;

dis=point_distance(xx,xx,tar,tar)/2;

if xx<tar { spd[argument4]+=dis/fric; }
if xx>tar { spd[argument4]-=dis/fric; }

spd[argument4]=spd[argument4]/sp;
xx+=spd[argument4];

return xx;