Page 4 of 4 FirstFirst ... 234
Results 46 to 54 of 54
  1. #1
    Grim's Avatar
    Join Date
    Jul 2009
    Gender
    male
    Posts
    5,362
    Reputation
    112
    Thanks
    3,781
    My Mood
    Cynical

    Advanced KDR Calculator

    I've been updating a few of my programs recently, and when i read bombs thread asking for ideas on a new useful tool to use with CA, a KDR Calculator was suggested. In mentioning that i still had my KDR Calculator script around for the math to create his own, i found it and realized that although the math for increasing KDR was perfect, however the math for decreasing KDR was way off. After quite some time of refreshing myself with the current math, i was able to correct the math for decreasing KDR and here it is.

    I kept the GUI simple, nothing fancy, just a dark grey/silver background..



    THE FOLLOWING CODE IS COPIED STRAIGHT FROM THE SOURCE OF THIS KDR CALCULATOR. THE CODE IS FOR AUTOIT v3, AND NO I WILL NOT TRANSLATE IT FOR YOU.. unless i know you AND consider you as a personal friend.
    Code:
    Func CurrentKDR()
    	$K1 = GUICtrlRead($Kills)
    	$D1 = GUICtrlRead($Deaths)
    	$C1 = $K1 / $D1
    	$F1 = StringLeft($C1, 4)
    	If $K1 = 0 Or $D1 = 0 Then
    		GUICtrlSetData($Current, "Try Again..")
    		GUICtrlSetState($Desired, $GUI_DISABLE)
    		GUICtrlSetState($Button2, $GUI_DISABLE)
    	Else
    		GUICtrlSetData($Current, $F1)
    		GUICtrlSetState($Desired, $GUI_ENABLE)
    		GUICtrlSetState($Button2, $GUI_ENABLE)
    	EndIf
    EndFunc
    Func DesiredKDR()
    	$K = GUICtrlRead($Kills)
    	$D = GUICtrlRead($Deaths)
    	$E = GUICtrlRead($Desired)
    	$y = $D * $E
    	$x = $K / $E
    	$v = $y - $K
    	$t = $x + $D
    	$m = $v + $K
    	$m2 = $t - $D
    	$stringM2 = StringSplit($m2, ".")
    	$stringM = StringSplit($m, ".")
    	$stringV = StringSplit($v, ".")
    	If GUICtrlRead($Desired) = 0 Then
    		GUICtrlSetData($KillsToGo, "What Do You Want Your KDR To Be?")
    	ElseIf GUICtrlRead($Desired) > 0 Then
    		If $v >= 0 Then
    			GUICtrlSetData($KillsToGo, $stringV[1] & " More Kills")
    			GUICtrlSetData($KillsAfter, $stringM[1])
    			GUICtrlSetData($DeathsAfter, $D)
    		ElseIf $v < 0 Then
    			GUICtrlSetData($KillsToGo, $stringM2[1] - $D & " More Deaths")
    			GUICtrlSetData($KillsAfter, $K)
    			GUICtrlSetData($DeathsAfter, $stringM2[1])
    		EndIf
    	ElseIf GUICtrlRead($Desired) < 0 Then
    		GUICtrlSetData($KillsToGo, "Silly Noob.. No Such Thing As Negative KDR")
    	EndIf
    EndFunc



    @bombs.. dont know if you actually wanted to do a KDR Calc.. however if you do i'd be glad to help you with the math of it.
    Last edited by Grim; 04-29-2010 at 10:56 PM.
    Want to see my programs?
    \/ CLICK IT BITCHES \/

  2. The Following 31 Users Say Thank You to Grim For This Useful Post:

    187pig (02-11-2011),Ali (04-29-2010),BossMan. (04-30-2010),breaksafe (04-29-2010),Cameronol (05-01-2010),CRUSTY (04-29-2010),deadskulz (07-18-2010),deathcookies (04-30-2010),dgatling (07-26-2012),DOEET (04-29-2010),draga01 (04-29-2010),GameHacks01 (10-22-2010),IHelper (04-29-2010),Julma Henri (04-29-2010),justin2010 (09-25-2010),kalner123 (01-23-2013),kalner1234 (01-23-2013),landowner (04-29-2010),Melix (07-24-2013),noob555 (04-29-2010),[DIN]Obama[DU] (04-29-2010),pepsi233 (04-29-2010),pkrownedu (07-09-2013),rpj (07-10-2010),shadow2345 (04-29-2010),Storm (07-14-2010),Synchromanica (04-29-2010),tambre (06-16-2010),tempta43 (04-29-2010),tiodanii (06-19-2010),WOLFPACK X69X (04-29-2010)

  3. #46
    NOOB's Avatar
    Join Date
    Apr 2010
    Gender
    male
    Posts
    3,863
    Reputation
    425
    Thanks
    8,598
    Quote Originally Posted by DeadLineHF View Post
    Hey do you mind if i convert this to vb.net for others?
    Code:
    Dim KD as String
    KD = Kills.Text / Deaths.Text
    Textbox1.Text = KD

  4. The Following User Says Thank You to NOOB For This Useful Post:

    Grim (04-29-2010)

  5. #47
    DeadLineHF's Avatar
    Join Date
    Apr 2010
    Gender
    male
    Posts
    6
    Reputation
    10
    Thanks
    0
    CurrentKDR
    Code:
    Function currentKDR()
            Dim k1 As String = kills.Text
            Dim D1 As String = deaths.Text
            Dim C1 As String = k1 / D1
            Dim F1 As String = C1.Remove(4, (C1.Length - 1))
            If k1 = 0 Then
                TextBox3.Text = "Try Again.."
                Button2.Enabled = False
            Else
                TextBox3.Text = F1
                Button2.Enabled = True
            End If
        End Function

  6. #48
    pepsi233's Avatar
    Join Date
    Dec 2008
    Gender
    male
    Location
    dasdas
    Posts
    2,357
    Reputation
    85
    Thanks
    132
    My Mood
    Psychedelic
    This is sick once again WPS u pwned all of us with ur beast skills nice job OFC?!






    I like Flengo <3.

    Mc565 isn't even good at ca men.

  7. #49
    coryster's Avatar
    Join Date
    Mar 2010
    Gender
    male
    Posts
    17
    Reputation
    10
    Thanks
    0
    yea im pretty sure its not so advanced or even works here is a screenie of the epic failure of a KDR calculator

    ___________________________________


    now here is the screenie yall

    ____________________________


    Quote Originally Posted by coryster View Post
    now here is the screenie yall

    ____________________________
    w

    wowo wtf srry about that here is the screenie

    _________________________

    wowo wtf srry about that here is the screenie

    _________________________
    [/quote]

    lol does this seem any where to the rite KDR nope

    wow its not lol
    Last edited by Grim; 04-29-2010 at 10:58 PM.

  8. #50
    Synchromanica's Avatar
    Join Date
    Mar 2010
    Gender
    male
    Location
    The internet.
    Posts
    5,120
    Reputation
    152
    Thanks
    615
    My Mood
    Mellow
    Wow this looks great!

  9. #51
    Grim's Avatar
    Join Date
    Jul 2009
    Gender
    male
    Posts
    5,362
    Reputation
    112
    Thanks
    3,781
    My Mood
    Cynical
    Quote Originally Posted by coryster View Post
    w

    wowo wtf srry about that here is the screenie

    _________________________
    try using an actual KDR.. instead of forcing a fraction so small the numbers carry over.. but thanks for pointing that out to me and its Fixed!

    go ahead, redownload...
    Last edited by Grim; 04-29-2010 at 10:59 PM.
    Want to see my programs?
    \/ CLICK IT BITCHES \/

  10. #52
    BossMan.'s Avatar
    Join Date
    Dec 2009
    Gender
    male
    Location
    BossWorld
    Posts
    3,314
    Reputation
    51
    Thanks
    419
    My Mood
    Relaxed
    Perfect size. Perfect GUI. Made from a perfect Minion. Maybe add a list of all the requirements specific servers need.



  11. #53
    041681's Avatar
    Join Date
    Feb 2010
    Gender
    male
    Location
    Hidden Leaf-fighting for Sakura Chan's heart
    Posts
    455
    Reputation
    10
    Thanks
    12
    My Mood
    Bored
    wow looks nice but the concept seems a bit simple xD !!! ~just the way i like it !!
    The Aussies are back xD!!
    and we all respect

    LIZ
    MATYPATTY
    Shocking ~In my pants xP~



    Plz help me level up my brute xD
    http://u-am-gay.mybrute.com
    If you do, just pm me on mpgh and i will thank you for ya efforts xD

    AND

    If i helped plz press thanks !!!

  12. #54
    AVGN's Avatar
    Join Date
    Sep 2009
    Gender
    male
    Location
    Making America Great Again.
    Posts
    15,451
    Reputation
    1549
    Thanks
    6,234
    i think this is the first ever WPS app that you dont have to press ctrl-alt-esc-F1 and all that stuff to close.. GJ



    ^Thanks to RJ^




Page 4 of 4 FirstFirst ... 234

Similar Threads

  1. [help] KDR Calculator
    By pushdis15 in forum Combat Arms Coding Help & Discussion
    Replies: 7
    Last Post: 01-22-2011, 06:03 PM
  2. Code for CBL Checker & KDR Calculator-
    By ultahackers in forum Combat Arms Spammers, Injectors and Multi Tools
    Replies: 6
    Last Post: 11-07-2010, 02:37 PM
  3. [Help] KDR Calculator?
    By xRenegade_x in forum WarRock Discussions
    Replies: 8
    Last Post: 10-19-2010, 07:23 AM
  4. Simple KDR Calculator
    By MvRouC12 in forum CrossFire Discussions
    Replies: 14
    Last Post: 05-07-2010, 07:59 AM
  5. [Release] KDR calculator
    By noob555 in forum Combat Arms Spammers, Injectors and Multi Tools
    Replies: 77
    Last Post: 03-26-2010, 08:30 PM