Недавно шутир писал! У меня вот такая функция получилась:
Function AngleCameraView( Bnumb#, Nnumb#, Mnumb#)
If ( Nnumb# > 0 )Or( Nnumb# = 0 )
MNnumb# = Mnumb# - Nnumb#
If Bnumb# > 0
If Bnumb# < MNnumb# Return Bnumb#
If Bnumb# > MNnumb# Return MNnumb#
EndIf
If Bnumb# < 0 Return Bnumb#
EndIf
If Nnumb# < 0
MNnumb# = -Mnumb# + Nnumb#*-1
If Bnumb# < 0
If Bnumb# > MNnumb# Return Bnumb#
If Bnumb# < MNnumb# Return MNnumb#
EndIf
If Bnumb# > 0 Return Bnumb#
EndIf
End Function
|
Использовать так:
|
перм.Pitch# = перм.Pitch#+AngleCameraView(MouseYSpeed(),дейст.уг л(перм.Pitch#),верт.макс.угол)
|
P.S : только для Pitch!!!