Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- #include <ButtonConstants.au3>
- #include <GUIConstantsEx.au3>
- #include <StaticConstants.au3>
- #include <WindowsConstants.au3>
- #NoTrayIcon
- #Region ### START Koda GUI section ### Form=C:\Users\pinki\Desktop\Projekte\CheatMe\Form1.kxf
- $HP = 100
- $HP_Protect = 0
- $HP_Protect2 = 3000
- $HP_Protect3 = 37362
- $HP_Protect4 = 1283.83
- $HP_Protect5 = 0
- $Form1 = GUICreate("CheatMe", 288, 93, 192, 124)
- $Label1 = GUICtrlCreateLabel("CheatMe", 8, 8, 65, 20)
- GUICtrlSetFont(-1, 10, 800, 0, "Microsoft Sans Serif")
- $Label2 = GUICtrlCreateLabel("HP:", 8, 40, 22, 17)
- $Label3 = GUICtrlCreateLabel($HP, 32, 40, 30, 17)
- $Button1 = GUICtrlCreateButton("Hit", 8, 64, 75, 25, $WS_GROUP)
- $Label4 = GUICtrlCreateLabel("Protected with PinkProtectA", 136, 72, 151, 19)
- GUICtrlSetFont(-1, 8, 400, 0, "Lucida Sans Unicode")
- GUICtrlSetColor(-1, 0xC0C0C0)
- GUISetState(@SW_SHOW)
- #EndRegion ### END Koda GUI section ###
- ShellExecute("PinkProtectA.exe")
- if not ProcessExists("PinkProtectA.exe") Then
- Exit 0
- EndIf
- While 1
- if not ProcessExists("PinkProtectA.exe") Then
- Exit 0
- EndIf
- $nMsg = GUIGetMsg()
- Switch $nMsg
- Case $GUI_EVENT_CLOSE
- Exit
- Case $Button1
- $HP_Protect5 = $HP_Protect5 + 74.32
- $HP_Protect4 = $HP_Protect4 - 12.8383
- $HP_Protect3 = $HP_Protect3 - 373.63
- $HP_Protect2 = $HP_Protect2 - 30
- $HP_Protect = $HP_Protect + 1
- $HP = $HP - 1
- if $HP <> (100 - $HP_Protect) Then
- $HP = 100 - $HP_Protect
- EndIf
- if ($HP_Protect2 * 100 / 3000) <> (100 - $HP_Protect) Then
- $HP = $HP_Protect2 * 100 / 3000
- EndIf
- ;Runden!
- if Round(($HP_Protect3 * 100 / 37362), 1) <> ($HP_Protect2 * 100 / 3000) Then
- $HP = Round(($HP_Protect3 * 100 / 37362), 1)
- EndIf
- if ($HP_Protect4 * 100 / 1283.83) <> ($HP_Protect3 * 100 / 37362) Then
- $HP = $HP_Protect4 * 100 / 1283.83
- EndIf
- if (100 - ($HP_Protect5 * 100 / 7432)) <> ($HP_Protect4 * 100 / 1283.83) Then
- $HP = (100 - ($HP_Protect5 * 100 / 7432))
- EndIf
- if $HP < 0 Then
- MsgBox(0, ":(", "Du bist tot!")
- $HP = 100
- $HP_Protect = 0
- $HP_Protect2 = 3000
- $HP_Protect3 = 37362
- $HP_Protect4 = 1283.83
- $HP_Protect5 = 0
- EndIf
- GUICtrlSetData($Label3, $HP)
- EndSwitch
- WEnd
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement