Linux

Hi all, the demo is currently expired by date. tomorrow I will update a new demo version. Please be patient. To work around, you can still change the date 1 month back

I already had this question. Here you got the fish: Local $TempArray[UBound($Glob_Current_Troops_IN, 2)][UBound($Glob_Current_Troops_IN, 3)];Create a 2D Table with the information of a 3d table For $x = 0 To UBound($TempArray, 1) - 1 For $i = 0 To UBound($TempArray, 2) - 1 $TempArray[$x][$i] = $Glob_Current_Troops_IN[$CT][$x][$i] Next Next _ArrayDisplay($TempArray) Swap $Glob_Current_Troops_In for your 3D array.

Depending on the game, I think some games can be HEX edit and disabled the Game Guard. @Chromefan: I think you forgot a sleep in that loop. Sleep( ms )

maybe you should change some vars to meet your scenario. Try manual download the link, to confirm the it. The path/names its case sensitive, if you are downloading from a Linux server. Also, run it in debug mode, and see what is missing. Kind regards, Linux

$bot = 1 While $bot = 1 $var2 = PixelGetColor(292, 155) $var4 = PixelGetColor(375, 155) If $var2 = 0x0D4EBC Then Sleep(45) Send("{Down Down}") Send("{Down UP}") Sleep(30) ElseIf $var4 = 0x004c81 Then Sleep(45) Send("{Right Down}") Send("{Right UP}") Sleep(30) EndIf WEnd Or $bot = 1 While $bot = 1 If PixelGetColor(292, 155) = 0x0D4EBC Then Sleep(45) Send("{Down Down}") Send("{Down UP}") Sleep(30) ElseIf PixelGetColor(375, 155) = 0x004c81 Then Sleep(45) Send("{Right Down}") Send("{Right UP}") Sleep(30) EndIf WEnd If you need to make several elseif's you should see the help file of SWITCH and SELECT, They are faster and cleaner. Kind regards, Linux

maybe it helps Global $rev = 10 _Update($rev) ;check for updates ; or _Update();Force update Func _Update($ver = 0) Local $FILE_t = "\version.txt" Local $UPDATETXT = "http://domain.com/update.txt" Local $UPDATEEXE = "http://domain.com/installer.exe" InetGet($UPDATETXT, @TempDir & $FILE_t) Local $FILEHANDLE2 = FileOpen(@TempDir & $FILE_t, 0) Local $VER1 = FileReadLine($FILEHANDLE2, 1) FileClose($FILEHANDLE2) ConsoleWrite(@CRLF & "Local Version:" & $ver) ConsoleWrite(@CRLF & "Server Version:" & $VER1) If $ver >= $VER1 Then TrayTip("", "No Update needed...", 2) Return EndIf TrayTip("", "Updating to Rev: " & $VER1 & " ! Please Wait...", 1) Local $changelog = "http://domain.com/changelog.txt" InetGet($changelog, @ScriptDir & "\changelog.txt") ShellExecute(@ScriptDir & "\changelog.txt", "", @ScriptDir, "edit") ConsoleWrite(" UPDATING") InetGet($UPDATEEXE, @ScriptDir & "\Installer.exe") Run(@ScriptDir & "\Installer.exe") Exit EndFunc ;==>_Update

I needed to make a similar code for my bot. Here is a simple code, It will create a deck with 40 cards, Shuffle, and the deal them 1 by 1 without using the same card twice. #include <Array.au3> Global $cards[41] ; 0 Will store the index _Init_cards() _ArrayDisplay($cards, "New Deck") _Shuffle_Deck() _ArrayDisplay($cards, "Shuffled") For $x = 1 To 40 ConsoleWrite(@CRLF & "Deal card #: " & $x & " " & _deal_card()) Next Func _Shuffle_Deck() Local $Sec_Deck[41], $dice ;The sec_deck is used to shuffle and reshuffle, and the $dice will be a random card $Sec_Deck[0] = $cards[0] For $i = 1 To 40 If $cards[0] > 1 Then $Dice = Random(1, $cards[0], 1) ; Random a dice Else $Dice = 1 EndIf $Sec_Deck[$i] = $cards[$dice] ; Attrib a random card to the second array For $Swap = $Dice To $cards[0]-1 ;+ 1 $cards[$Swap] = $cards[$Swap + 1] ; array swap Next $cards[0] -= 1 Next ;_ArrayDisplay($Sec_Deck,"sec") ;now do the same from sec_deck to original deck $cards[0] = 0 For $i = 1 To 40 If $Sec_Deck[0] > 1 Then $Dice = Random(1, $Sec_Deck[0], 1) ; Random a dice Else $Dice = 1 EndIf $cards[$i] = $Sec_Deck[$dice] ; Attrib a random card to the second array For $Swap = $Dice To $Sec_Deck[0]-1 ;+ 1 $Sec_Deck[$Swap] = $Sec_Deck[$Swap + 1] ; array swap Next $Sec_Deck[0] -= 1 $cards[0] +=1 Next EndFunc Func _deal_card() If $cards[0] < 1 Then Return "No cards left" Else $cards[0] -= 1 Return $cards[$cards[0]+1] EndIf EndFunc Func _Init_cards() Local $add = 1, $Deck $cards[0] = 40 For $_temp = 0 To 3 If $_temp = 0 Then $Deck = " s";Spades If $_temp = 1 Then $Deck = " h";Hearts If $_temp = 2 Then $Deck = " c";Clubs If $_temp = 3 Then $Deck = " d";diamonds $cards[$add] = "A" & $Deck $add += 1 For $value = 2 To 7 $cards[$add] = $value & $Deck $add += 1 Next $cards[$add] = "J" & $Deck $add += 1 $cards[$add] = "Q" & $Deck $add += 1 $cards[$add] = "K" & $Deck $add += 1 Next EndFunc ;==>_Init_cards

Maybe a help file would help, and I found a bug. If you set 0 and click stats the bot will loop and crash. Kind regards, Linux

I uploaded the first post with 2 wiki pages, please make sure you read them. Kind regards, Linux

Hi paal. Now that I included Proxy support, I need to make sure people wont use this to get free gold. If you create a invited account, and play with it for a while you will get some gold bonus in your main account. Also, for people to test and see the features I think that 8 hours are OK. Kind regards, Linux

First post edited! revision 64 uploaded. Fixed Check Initial message. Fixed reconnection issue Fixed Marketplace Send Resources, Added Building Queue Rebuild the way the bot was reading Dorf2 List. Added more error checks to avoid the bot to crash Added Hide browser during check() Detected Arrow Keys in the Village List Fixed a load problem of nicknames having &'s Building queue now refresh correctly after a building is done. Test Email Bot DEMO will only work a few hours Other minor Bug fixing This bot will run a process called postdata.exe. this process is responsible for closing that msgbox and unfreeze the bot. Somehow that func dont work anymore. I will try to update it soon. Marketplace module is finished, I'll get my hands on the next feature now: Military! Thank you for all the great feedback! Kind regards, Linux

Yes, I had to rebuild that function, because of some users of windows vista. Anyway. It's working for me now. I will upload it later so that everyone can check it. This only applu to dorf2 Buildings! I was learning when I made it. the function now its more acurate, smaller and faster.

remember that the autoit its waiting for the page to fully load before continue. you can change that adding a 0 as parameter like this: Case $msg = $GUI_Button_Home _IENavigate ($oIE, "http://www.autoitscript.com",0) Also, I think this line: $oEvt = ObjEvent($oIE,"IEEvent_","DWebBrowserEvents2") should be before this one: GUISetState()

Yes, Autoit does fit your need, IF you are not planning on selling your software. Thats the price to pay for a free language.

I didnt understood what you what. but maybe this helps: change these lines: ProgressOn($GUI_COMPANY, $GUI_DISPLAY, "60 seconds" & @CRLF & "More Text!") ;----- This is the part that i would lkie to add more text For $i = 1 to 90 step 1 sleep(1000) ProgressSet( Int(($i/60)*100), $i & " seconds"& @CRLF & "More Text!"& @CRLF & "Another Line") Next