CODE
Code:
Function FKDR(ByVal Kills As String, ByVal Deaths As String, ByVal KDR As String)
Dim Result As Double
If KDR = 0 Then
Result = Kills / Deaths
Else
Result = KDR * Kills - Deaths
End If
If KDR < 1 Then
Return Format(Result, "0.00")
Else
Return Format(Result, "0")
End If
End Function
How to use..
To find your KDR From Kills, and Deaths...
Code:
FKDR(Kills, Deaths, 0)
To Calculate the amount of Kills to your desired KDR.
Code:
FKDR(Kills, Deaths, Desired KDR)
Credits
WarPathSin - Idea
Coder Never - Converting