Jump to content

Use Twitter to send Commands


JRSmile
 Share

Recommended Posts

i got the idea while watching hak5.org

#include "_XMLDomWrapper.au3"
#include <array.au3>
Dim $users[3]
$users[0] = 2
$users[1] = "JRSmile"
$users[2] = "Hak5Darren"


$cmd = get_command_for("LP-DE00-1046", "secret", $users)
ConsoleWrite($cmd & @CRLF)

$cmd = get_command_for("LP-DE00-1046", "secret", "JRSmile")
ConsoleWrite($cmd & @CRLF)
;ShellExecute($cmd)

Func get_command_for($name, $password, $username = "")
    _XMLFileOpen("http://search.twitter.com/search.atom?q=" & $name, 'xmlns:def="http://www.w3.org/2005/Atom"')
    $res = _XMLGetValue("/def:feed/def:entry/def:title/text()")
    For $i = 1 To $res[0]
        If $username <> "" Then
            $aName = _XMLGetValue("/def:feed/def:entry[" & $i & "]/def:author/def:name/text()")
            $aName = StringSplit($aName[1], " ", 1)
            If IsArray($username) Then
                For $a = 1 To $username[0]
                    If $username[$a] = $aName[1] Then
                        If StringInStr($res[$i], $password) Then
                            Return StringReplace(StringReplace($res[$i], $password & " ", ""), $name & " ", "")
                        EndIf
                    EndIf
                Next
            Else
                If $username <> $aName[1] Then ContinueLoop
            EndIf
        EndIf
        If StringInStr($res[$i], $password) Then
            Return StringReplace(StringReplace($res[$i], $password & " ", ""), $name & " ", "")
        EndIf
    Next
    Return False
EndFunc  ;==>get_command_for
Edited by JRSmile
$a=StringSplit("547275737420796F757220546563686E6F6C75737421","")
For $b=1 To UBound($a)+(-1*-1*-1)step(2^4/8);&$b+=1*2/40*µ&Asc(4)
Assign("c",Eval("c")&Chr(Dec($a[$b]&$a[$b+1])));''Chr("a")&"HI"
Next ;time_U&r34d,ths,U-may=get$the&c.l.u.e;b3st-regards,JRSmile;
MsgBox(0x000000,"",Eval("c"));PiEs:d0nt+*b3.s4d.4ft3r.1st-try:-)
Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...