|Input||Floating-point argument on the stack.|
|Output||Floating-point result on the stack.|
Returns the tangent of the floating-point number on the run-time stack. The stack pointer (RTA_SP) remains unchanged. The argument is assumed to be in radians.
Error 247 is returned if the argument is greater than 3141590.4292 or less than -3141590.4292.
The following subroutine will return the tangent of 3*PI/4
(2.35619449019 radians) in FN_RESULT.
LDD RTA_SP: SUBD #8 ;make room for argument on stack STD RTA_SP: ;D now has destination for UT$CPYB LDX #8 ;length for copying argument STX UTW_S0: LDX #FN_ARG ;source address for UT$CPYB OS UT$CPYB ;copy argument to stack OS FN$TAN LDX RTA_SP: ;source address for copying result LDD #8 STD UTW_S0: ;length for copying result ADDD RTA_SP: ;add 8 to stack pointer STD RTA_SP: ;restore stack pointer LDD #FN_RESULT ;destination for copy OS UT$CPYB RTS FN_ARG: DB 19h,90h,44h,19h,56h,23h,0,0 FN_RESULT: DS 8FN_RESULT will now contain the floating-point result -1.0.
|Errors||247 - bad argument in function call|