:mcl=(:mcl+:mcs)*(:mcl>=0)-:mcl>360 goto1