Parameter Function With Input Validation

[ptrex]

In this function I have created some input validations.

MsgBox(262144,'Debug_Loan_Amortisation',_Loan_Amortisation(10000,3,24));### Debug MSGBOX
 
Func _Loan_Amortisation($A,$B,$C)
    Local $D, $E
    If BitAND(IsNumber($A),$A>0) And BitAND(IsNumber($B),$B>0,$B<=100) And BitAND(IsInt($C),$C>0) Then
        $E=$B/100;
        $D=$A*($E/12)/(1-1/(EXP($C*LOG(1+$E/12))))
            SetError(0)
            Return $D
    Else
        SetError(1)
        Return 0
    EndIf
EndFunc;==>_Loan_Amortisation

As you can see the If BtAND( ... does the validation to check if it's a number, integer and some values must be <=100,etc.

I am wondering if this is the only way to do it ?

I would like to see some alternatives if possible.

Thanks

[Valuater]

overall, it looks good... however

'Amortisation'

is "Amortization"

and i dont understand the "1-1/"

"0 /" anynumber would be incorrect to me ( AFAIK )

8)

[ptrex]

@Valuater

Thanks for the feedback and noticing the typo !!

the " 1-1 " can also be presented as, this reads better but has more brackets to plough throught.

$D=$A*($E/12)/(1-(1/EXP($C*LOG(1+$E/12))))

Both giving the same result