friction gml
if (right)
{
if (hspd < spd) hspd += fric;
if (hspd >= spd) hspd = spd;
}
if (left)
{
if (hspd > -spd) hspd -= fric;
if (hspd <= -spd) hspd = -spd;
}
if (!right && !left) || (right && left)
{
if (hspd >= fric) hspd -= fric;
if (hspd <= -fric) hspd += fric;
if (hspd > -fric) && (hspd < fric) hspd = 0;
}