nOne

sorry forgot to copy it into the zip file, new zip file in the first post

Inspired by Insolence's D2 OCR, i made this one for World of Warcraft just download the zip file unpack zip file anywhere open up: text.gif in MS Paint Run wow_ocr.au3 with the latest BETA it is much faster then the stable version see the result in a msgbox if you want to use it inside of world of warcraft be sure you have set up your game like this: ; WoW Size: 1024*768 ; NO!! Interface costumizations (best is to delete or rename your Interace, WDB, WTF folder) ; Black Background on the Area wo seek ; Only works with white text To do: make the searching faster multi line reading edit: added char_def and char_def_maker wow_ocr.zip

take a search for "keylogger" im sure you will find something here is one from the search: Keylogger

ah great thx

cant find the file on fileman .. "404: The page/file you requested could not be found." ?! or has it moved to some other place? http://www.autoitscript.com/fileman/users/public/CyberSlug/

RegWrite ( "keyname" [,"valuename", "type", value] ) check the helpfile fpr more infos

hehe no problem this should work ^^ Run(@comSpec & " /c " & @scriptdir &"\Insolite.pps","","")

this will run a .pps file Run(@comSpec & " /c D:\some.pps","","")

this should work ; AutoIt 3.0.103 example ; 17 Jan 2005 - CyberSlug ; This script shows manual positioning of all controls; ; there are much better methods of positioning... #include <GuiConstants.au3> ; GUI GuiCreate(@SystemDir & "Orditec Services", 400, 400) GuiSetIcon(@SystemDir & "\mspaint.exe", 0) ; MENU ;GuiCtrlCreateMenu("") ; CONTEXT MENU $contextMenu = GuiCtrlCreateContextMenu() GuiCtrlCreateMenuItem("Context Menu", $contextMenu) GuiCtrlCreateMenuItem("", $contextMenu);separator GuiCtrlCreateMenuItem("&Properties", $contextMenu) ; PIC GuiCtrlCreatePic("nav_r1_c1.gif",0,0, 400,50) ; LIST ;GuiCtrlCreateList("", 50, 240, 300, 90) ;GuiCtrlSetData(-1, "1.Présentaition général 1|2.Infragérance|3.Pole ingénieurie") ; ICON GuiCtrlCreateIcon("C:\Program Files\Microsoft Office\OFFICE11\PPTVIEW.EXE", 0, 180, 85) GuiCtrlCreateIcon("C:\Program Files\Microsoft Office\OFFICE11\PPTVIEW.EXE", 0, 180, 170) GuiCtrlCreateIcon("C:\Program Files\Microsoft Office\OFFICE11\PPTVIEW.EXE", 0, 180, 255) ; BUTTON $gen = GUICtrlCreateButton("présentation générale", 140, 120, 120, 20) $inf = GUICtrlCreateButton("présentation infragérence", 130, 205, 140, 20) $boh = GUICtrlCreateButton("présentation général", 140, 290, 120, 20) GuiSetState() While 1 $msg = GUIGetMsg() Select Case $msg= $gen Run("C:\Program Files\Microsoft Office\OFFICE11\PPTVIEW.EXE") Case $msg= $inf MsgBox(0,"You clicked on", "No") Case $msg= $boh MsgBox(0,"You clicked on", "Exit") ; Case $msg= $GUI_EVENT_CLOSE ; MsgBox(0,"You clicked on", "Close") EndSelect WEnd ; GUI MESSAGE LOOP if you click the first button it will execute this : Run("C:\Program Files\Microsoft Office\OFFICE11\PPTVIEW.EXE")

your while needs some parameters from the helpfile: loops 11 times: $i = 0 While $i <= 10 MsgBox(0, "Value of $i is:", $i) $i = $i + 1 WEnd endless loop: While 1 MsgBox(0, "asd", "asd") sleep(10) WEnd

because the file has a lot more lines then servers .. no need to make a dim $array[2000] if a dim $array[300] is enough but there are still posibilities to make the array lager each loop with redim, but i was too lazy for this or is there a way to strip empty array plazes ? if not would be a thought for an udf

here is the code to get it if you start it you will see 7 msg boxes with always the first 10 entrys of a categorie hf $textfile = "soldat.txt" InetGet("http://lobby.soldat.pl:13073/index.php", $textfile, 1) $file = FileOpen($textfile, 0) $lines = 300 Dim $serverarray[$lines][8] $num = 1 $pass = 0 for $count = 1 to $lines $line = FileReadLine($file, $count+24) If ( StringLeft($line, 38) == ' <td width="24%"><a href="soldat://' ) Then $currentline = StringTrimLeft($line, 38) $ippos = StringInStr( $currentline ,'/"><font color="#79E958">') $ip = StringLeft($currentline, $ippos-1) $server = StringTrimLeft($currentline, $ippos+24) $server = StringTrimRight($server,16) If ( StringInStr($server, '<i>') ) Then $server = StringTrimRight(StringTrimLeft($server, 6),8) ElseIf ( StringInStr($server, '<b>') ) Then $server = StringTrimRight(StringTrimLeft($server, 3),4) EndIf $serverarray[$num][1] = $ip $serverarray[$num][2] = $server ElseIf ( StringLeft($line, 20) == ' <td width="37%">' ) Then $info = StringTrimRight(StringTrimLeft($line, 20), 5) $serverarray[$num][3] = $info ElseIf ( (StringLeft($line, 19) == ' <td width="8%">' ) AND ($pass == 0)) Then $mode = StringTrimRight(StringTrimLeft($line, 19), 5) $serverarray[$num][4] = $mode ElseIf ( StringLeft($line, 20) == ' <td width="14%">' ) Then $map = StringTrimRight(StringTrimLeft($line, 20), 5) $serverarray[$num][5] = $map ElseIf ( StringLeft($line, 20) == ' <td width="12%">' ) Then $players = StringTrimLeft($line, 20) $serverarray[$num][6] = $players ElseIf ( StringLeft($line, 5) == '</td>' ) Then $pass = 1 ElseIf ( (StringLeft($line, 19) == ' <td width="8%">' ) AND ($pass == 1)) Then $version = StringTrimRight(StringTrimLeft($line, 19), 5) $serverarray[$num][7] = $version $pass = 0 $num = $num+1 EndIf next ; $serverarray[$count][1] = IP ; $serverarray[$count][2] = Server Name ; $serverarray[$count][3] = Info ; $serverarray[$count][4] = Mode ; $serverarray[$count][5] = Map ; $serverarray[$count][6] = Players ; $serverarray[$count][7] = Version for $counta = 1 to 7 $text = "" for $count = 1 to 10 $msg = $serverarray[$count][$counta] & @CRLF & @CRLF $text = $text & $msg next MsgBox(0, $counta , $text) next FileClose($file) FileDelete($textfile) edit: server names are now displayed

Here is a "short" example of how you can read text from a mysql database with autoit and php hmm where should i start to explain this im looking each time if there is a new entry in the database with: InetGet( $url & "getid.php?user_id=" & $php_id, $textfile, 1, 0 ) if there is a new request, in the file downloaded will be the mysql database id else if there is no new request the file will be blank and the loop goes on id found: with InetGet( $url & "unset.php?user_id=" & $php_id & "&id=" & $id & "&prozess=1&stat=read", $textfile, 1, 0 ) i get the text out of the database and flag it to be in progress it does the suff you want and the sets the prozess to finished InetGet( $url & "unset.php?user_id=" & $php_id & "&id=" & $id & "&prozess=2", $textfile, 1, 0 ) example.au3 Opt("TrayIconHide", 0) Global $url = "http://www.mypage.at/example/" Global $Windowname = "AutoIt with Php Mysql Example" Global $textfile = "example_temp.txt" Global $php_id = "a56076518" While 1 InetGet( $url & "getid.php?user_id=" & $php_id, $textfile, 1, 0 ) ;gets the next request id from the mysql database $file = FileOpen($textfile, 0) $id = FileReadLine($file, 1) FileClose($file) FileDelete($textfile) If ( StringIsInt($id) ) Then InetGet( $url & "unset.php?user_id=" & $php_id & "&id=" & $id & "&prozess=1&stat=read", $textfile, 1, 0 );reads the request from the database at id above taken and sets status to 1 = starting $file = FileOpen($textfile, 0);reads request $au3 = FileReadLine($file, 1);request.au3 FileClose($file) FileDelete($textfile) If ( $au3 == "somefuncname") Then MsgBox ( 0, $Windowname, "put a function here", 5 ) Else MsgBox ( 0, $Windowname, "text from db: " & $au3, 5 ) EndIf Sleep(3000) InetGet( $url & "unset.php?user_id=" & $php_id & "&id=" & $id & "&prozess=2", $textfile, 1, 0 ) ;sets the status of the commands to 2 = finished FileDelete($textfile) Else Sleep(5000) EndIf WEnd getid.php <? if ( $_REQUEST["user_id"] == "a56076518" ) { $sql = "SELECT id FROM ".PREFIX."prozess WHERE prozessed = 0 ORDER BY time"; $result = $db->query($sql); $rows = mysql_num_rows($result); if ( $rows == 0 ) { echo ""; } else { $rows = mysql_fetch_row($result); echo $rows[0]; } } ?> unset.php <? if ( $_REQUEST["user_id"] == "a56076518" ) { $stat = $_REQUEST["prozess"]; $id = $_REQUEST["id"]; $sql = "UPDATE ".PREFIX."prozess SET prozessed = '$stat' WHERE id = $id"; $result = $db->query($sql); if ( $_REQUEST["stat"] == "read" ) { $sql = "SELECT au3 FROM ".PREFIX."prozess WHERE id = $id"; $explode = mysql_fetch_row($db->query($sql)); echo $explode[0]; } } ?> i made a example web page .. just upload it somewhere php and mysql works edit the settings.inc.php in the includes folder just change at the mysql section $server = "localhost"; $user = "user"; $password = "pass"; $database = "db"; that the script has access change the Global $url = "http://www.mypage.at/example/" in the example.au3 then run it start the webpage index.php write some text in click send an it will be shown in a msgbox have fun example.zip

I´ve made a script that gets text from a mysql database via php (InetGet) and then prozesses the commands it gets back the pc running the bot then just needs a connection to the internet and can be controlled from anywhere but you need some php/mysql knowledge to get it to work, cant explain it more at the moment

something like this ? $pixelcolor = 16777251 $i = 0 $xpos = 400 $ypos = 200 while $i = 0 if ($pixelcolor == PixelGetColor($xpos,$ypos) ;do something $i = 1 endif wend