Ich wollte mal fragen wie man bei epvp die hwid benutzen kann zum thanks geben z.b. ... also jemand muss seine hwid in sein epvp eintragen und dann überprüft das script ob die hwid mir auf den und den post ein thanks gegeben hat ...
tut mir leid wenn ich autoit zu 80% behersche und (bisher) das unnötige hwid zeug nicht ...
Wenns so unnötig ist warum brauchst du es?
80%? Das stell ich in Frage.. auch wenn, das ist keine Kunst bei AutoIT.
Lern was anständiges.
Ach, und änder deinen Usertitel, Datei ist entweder beschädigt oder nicht auffindbar.
;Autor: Logtetsch
;Date: 12.01.2013
#include-once
#include <array.au3>
#include <string.au3>
Global $thanks_Status = 0
Func _epvp_thankscheck($HWID, $s_Site)
if $HWID == "" Then
Return SetError(4, "", 0)
EndIf
if $s_Site == "" Then
Return SetError(5, "", 0)
EndIf
Global Const $error_NoThanks = 2
Global Const $error_NoSiteInfo = 3
Global Const $error_NoUserData = 4
Global const $success_Thanks = true
Local $Data_User = _GetHWIDData($md5_HWID)
If not @error and IsArray($Data_User) and $Data_User[0] <> "" Then
Local $thanks_Site = BinaryToString(InetRead($s_Site))
if not @error Then
Local $thanks_table = _StringBetween($thanks_Site, '.html" rel="nofollow">', '</a> ')
Local $thanks_table_Premium = _StringBetween($thanks_Site, 'rel="nofollow"><span style="color:#0099ff">', '</span></a> ')
if IsArray($thanks_table) Then
Local $a_thanks_table = UBound($thanks_table)
For $i = 0 to $a_thanks_table-1
if $Data_User[1] == $thanks_table[$i] Then $thanks_Status = 1
if $thanks_Status == 1 then ExitLoop
Next
if $thanks_Status == 1 Then
MsgBox(64, "Info", $success_Thanks)
Return True
Elseif $thanks_Status == 0 Then
For $i = 0 to UBound($thanks_table_Premium)-1
if $Data_User[1] == $thanks_table_Premium[$i] then $thanks_Status = 1
if $thanks_Status == 1 Then ExitLoop
Next
if $thanks_Status == 0 Then
MsgBox(48, "Error", $error_NoThanks)
Return SetError(2)
ElseIf $thanks_Status == 1 Then
MsgBox(64, "Info", $success_Thanks)
Return True
EndIf
EndIf
Else
MsgBox(48, "Error", $error_NoSiteInfo)
Return SetError(3)
EndIf
Else
MsgBox(0,"",$error_NoSiteInfo)
Return SetError(3)
EndIf
Else
MsgBox(48, "Error", $error_NoUserData)
Return SetError(4)
EndIf
EndFunc
#RequireAdmin
#include "Thankschecker_GUI.au3"
#include "Thankschecker_Func.au3"
#include "GetHWID.au3"
Global $HWID = _GetHWID()
Global $Data = _GetHWIDData()
if IsArray($Data) Then
MsgBox(0,"",$Data[1])
EndIf
Global $s_Site = 'http://www.elitepvpers.com/forum/4story/2350716-devs-revo4s.html' ;Die Seite auf der die Thanks durchsucht werden sollen
$tc = _epvp_thankscheck($HWID, $s_Site)
if $tc <> True Then
_epvp_thankscheck_GUI($HWID, $s_Site)
ElseIf $tc == True Then
ShellExecute("http://google.de") ;Downloadlink eingeben
EndIf
AutoIt WoW Disconnect Abfrage 12/09/2011 - AutoIt - 22 Replies Hi,
ich habe einen kleinen WoW Bot, der ständig in einer While Schleife in 2 verschiedenen WoW Fenstern (das eine ist im Hintergrund) etwas ausführt.
Wie bekomme ich es nun hin, das wenn ein Account einen Disconnect bekommt, die While Schleife des Bots unterbrochen, neu eingeloggt und die While Schleife neu von vorne ausgeführt wird? Und das möglichst in beiden WoW Fenstern (mit unterschiedlichen Accounts).
Viele Grüße
Baum
HWID Funktion Abfrage 11/24/2011 - AutoIt - 10 Replies While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button1
ClipPut(GUICtrlRead($I_HWID))
ShellExecute("http://www.elitepvpers.com/ forum/profile.php?do=editprofile")
HWID Online Abfrage 03/03/2011 - General Coding - 3 Replies Guten Abend!
Ich Code gerade in Visual Basic 2010 eine Online HWID Abfrage.
Diese Abfrage ruft eine .TXT Datei auf einen FTP-Server ab.
(Ich weiß es ist sehr unsicher)
Das klappt auch alles soweit.
Nur ich möchte gerne das in der Textbox1 steht ob die HWID in der .TXT eingetragen ist.
(Die HWID von den "KUNDEN" sind untereinader aufgezählt in der .TXT)
![[Autoit] Epvp HWID abfrage ...](https://www.elitepvpers.com/forum/iconimages/autoit/autoit-epvp-hwid-abfrage_ltr.gif){kind=small}
.
