forum.boolean.name - Показать сообщение отдельно

impersonalis · 21.09.2010, 18:15

Function correctAngle#(a#)
    While a<0
        a=a+360
    Wend
    Return a Mod 360
End Function

Function ConvertAng2#(ang#)
	ang# = ang# Mod 360
	If ang# < 0 Then ang# = ang# + 360
	Return ang#
End Function

21.09.2010, 18:15	#44
impersonalis Зануда с интернетом Регистрация: 04.09.2005 Сообщений: 14,014 Написано 6,798 полезных сообщений (для 20,935 пользователей)	Ответ: The elder Scrolls III: Morrowind Function correctAngle#(a#) While a<0 a=a+360 Wend Return a Mod 360 End Function негодуэ: http://forum.boolean.name/showpost.p...19&postcount=2 Function ConvertAng2#(ang#) ang# = ang# Mod 360 If ang# < 0 Then ang# = ang# + 360 Return ang# End Function __________________ http://nabatchikov.com Мир нужно делать лучше и чище. Иначе, зачем мы живем? tormoz А я растила сына на преданьях о принцах, троллях, потайных свиданьях, погонях, похищениях невест. Да кто же знал, что сказка душу съест?
(Offline)