Notice: Undefined offset: 2 in /home2/icentarb/public_html/icentar/classes/class.permissions.php on line 735
Function RacunK(X_t1 As Double, X_t2 As Double, Y_t1 As Double, Y_t2 As Double) Dim DeltaX As Double Dim DeltaY As Double DeltaX = X_t1 - X_t2 DeltaY = Y_t1 - Y_t2 If DeltaX > 0 Then If DeltaY > 0 Then