Ir a contenido

PURCHASE MEMBERSHIP AT A 25% DISCOUNT Apply here

GET 1 MONTH OF MEMBERSHIP BY CHOOSING THE NEW NAME OF OUR COMPANY! Apply here


Photo

HS4L- Thanks Checker EPVP Free


      
HS4L- Thanks Checker EPVP Free TvOTohoHS4L- Thanks Checker EPVP Free TvOToho
HS4L- Thanks Checker EPVP Free

alexmen10
#1

alexmen10
  • alexmen10
  • administrator
  • Status :
    HS4L Team
  • Mensajes :
    418
  • Reputación :
    257
  • Points :
    23
  • Registrado :
    2012-09-08
El nuevo code de thanks checked para autoit disfruten smid_1

Code:
$navegated = _IECreateEmbedded()
$Form1 = GUICreate("HS4L- Thanks Checker", 0x02AD, 0x017C, 0x02A0, 0x015E)
$Net = GUICtrlCreateObj($navegated, 0, 0, 0x0261, 0x0179)
_IENavigate($navegated, "http://www.elitepvpers.com/forum/s4-league-hacks-bots-cheats-exploits/3772767-xigncode-full-bypass-auto-update.html")
$Button = GUICtrlCreateButton("Continue", 0x0260, 0, 0x004B, 0x0179)
GUICtrlSetState($Button, 0x0080)
GUISetState(@SW_SHOW)
While 1
   $epvp = $navegated .document.url
   If $epvp = "http://www.elitepvpers.com/forum/s4-league-hacks-bots-cheats-exploits/3772767-xigncode-full-bypass-auto-update.html" Then
      GUICtrlSetState($Button, 0x0040)
      While 1
         $nMsg = GUIGetMsg()
         Switch $nMsg
            Case $GUI_EVENT_CLOSE
               Exit
            Case $Button
               $URL = readURL("http://www.elitepvpers.com/forum/s4-league-hacks-bots-cheats-exploits/3839853-release-darkspirit-d3d.html")
               If StringInStr($URL, 'onclick="return post_thanks_give(32757561, false);" style="display:none"') Then
                  MsgBox(0, "Info", "Thanks ;)")
                  GUISetState(@SW_HIDE, $Form1)
                  ToolTip("S4 League Wait...", 0, 0)
                  WinWait("error")
               Else
                  MsgBox(0, "Info", "Por favor, dar gracias a mí")
               EndIf
         EndSwitch
      WEnd
   EndIf
WEnd

Func readURL($url, $ArgOpt01 = True)
   Local $Local017F = InetRead($url, 1)
   Local $Local0070 = @error, $Local0071 = @extended
   If $ArgOpt01 = Default Or $ArgOpt01 Then $Local017F = BinaryToString($Local017F)
   Return SetError($Local0070, $Local0071, $Local017F)
EndFunc

Tutorial para detectar el  HTML Thanks
Code:
If StringInStr($URL, 'onclick="return post_thanks_give(32757561, false);" style="display:none"') Then
[You must be registered and logged in to see this image.]

T-Rex
#2

T-Rex
  • T-Rex
  • new member
  • Mensajes :
    8
  • Reputación :
    0
  • Points :
    0
  • Registrado :
    2015-10-12
No entendí nada :T_T:

Leo-
#3

Leo-
  • Leo-
  • new member
  • Mensajes :
    1
  • Reputación :
    0
  • Points :
    0
  • Registrado :
    2015-10-30
Cool Thanks Mr Boss smid_4

Seyer
#4

Seyer
  • Seyer
  • administrator
  • Status :
    HS4L Team
  • Mensajes :
    692
  • Reputación :
    64
  • Points :
    2
  • Registrado :
    2012-08-09
[You must be registered and logged in to see this link.]: inactividad del post.

Sponsored content
#5

Sponsored content

      

Create an account or log in to leave a reply

You need to be a member in order to leave a reply.

Create an account

Join our community by creating a new account. It's easy!


Create a new account

Log in

Already have an account? No problem, log in here.


Log in
You cannot reply to topics in this forum
Staff online
Sponsors
  •  TOTAL POSTS
  •  TOTAL MEMBERS
  •  NEWEST MEMBER