SPROT()の返り値は360度で返ってきますね。 ラジアンを整数型に代入してるとかな。 R%=RAD(SPROT()) みたいなことしてないですか。