Jump to content

StatQuo

Members
  • Posts

    12
  • Joined

  • Last visited

Recent Profile Visitors

The recent visitors block is disabled and is not being shown to other users.

StatQuo's Achievements

Seeker

Seeker (1/7)

0

Reputation

  1. Any way to hide _Metro_CreateProgress bar ? GUICtrlSetState($ProgressID, $GUI_HIDE) dosen't work :/
  2. Many thanks for this awesome udf i have a q, how i can add custom function on click event ?
  3. Hi! I got form code like this: <form method="post" action="/index.php?id=zaloguj" id="loginForm"> <table> <tr> <!-- td> <img src="img/ikony/user.png" /> </td --> <td> Login: </td> <td> &nbsp; </td> <td> <input type="text" name="xlogin" class="form width100" /> </td> </tr> <tr> <!--td> <img src="img/ikony/key.png" /> </td --> <td> Hasło: </td> <td> &nbsp; </td> <td> <input type="password" name="xhaslo" class="form width100" /> </td> </tr> <tr> <td> </td> <td> &nbsp; </td> <td> <input type="submit" value="Zaloguj" class="form" /> </td> </tr> </table> </form> And here is my code: #include <IE.au3> Global $login="mylogin" Global $password="mypassword" $oIE = _IECreate("http://smoki.nightwood.net/",0,1,1) $oForm = _IEFormGetObjByName ($oIE, "loginForm") $oText = _IEFormElementGetObjByName ($oForm, "xlogin") _IEFormElementSetValue ($oText, $login) $oText = _IEFormElementGetObjByName ($oForm, "xhaslo") _IEFormElementSetValue ($oText, $password) _IEFormSubmit($oForm,0) Script working almost correctly, fill form fields, but dosen't send this form.... Pls. help.
  4. hi, i need help in script - it must write to notepad Inc. all ascii charactersHelp
  5. Thankx, but now i got another problem - with _FileReadToArray with 2d array :/
  6. Hi i got problem with _FileWriteFromArray my simple code: #include <Array.au3> #include <file.au3> Global $array[2][2] $array[0][0]="Nick1" $array[0][1]="no" $array[1][0]="Nick2" $array[1][1]="no" _ArrayDisplay($array) $aFile = FileOpen("array.txt", 1) _FileWriteFromArray($aFile, $array) FileClose($aFile) Exit i got error: C:\Program Files\AutoIt3\Include\file.au3 (256) : ==> Array variable has incorrect number of subscripts or subscript dimension range exceeded.: If FileWrite($hFile, $a_Array[$x] & @CRLF) = 0 Then If FileWrite($hFile, ^ ERROR what im doing wrong ??
  7. I try write simple pixelsearch bot to Metin2, but i cannot send Conntrolclick (left) to inactive window here is the script; Opt ('WinTitleMatchMode','2') Opt("WinWaitDelay", 100) Opt("WinTitleMatchMode", 4) Opt("WinDetectHiddenText", 1) Opt("PixelCoordMode", 2) Opt("MouseCoordMode", 2) Global $HWnD, $Full, $Title, $iButton $Title = 'METIN2' $Full = WinGetTitle ($Title) $HWnD = WinGetHandle ($Full) $metin = "METIN2" $Pickup = 0 $left = 'left' While $Pickup = 0 $cross = Pixelgetcolor( 575, 53, $metin) IF $cross <> 0xfffbff Then mobsearch() Endif IF $cross = 0xfffbff Then Sleep(3000) Endif WEnd Func mobsearch() $coord = PixelSearch(100, 150, 650, 540, 0xEB1609, 50, 10) If Not @error Then ControlClick ($HWnD, '','', $left, 1, $coord[0],$coord[1]) Sleep(500) ;Call ("fight") EndIf EndFunc Func fight() ;advanced options goes here Endfunc Any ideas to solve this problem ? Sorry 4 my english..
  8. Hi i made this example script: #include <Misc.au3> $pos = MouseGetPos() $log = FileOpen("click.log", 2) while 1 select Case _IsPressed(01) $pos = MouseGetPos() FileWriteLine($log, "Mouse x,y:" & $pos[0] & "," & $pos[1]) EndSelect wend I want use this to target some window positions on full-screen game, but when i run this script my CPU reaches 100% - dunno why Any suggestions plz ?
  9. Hmm, i modified this script- now i use FileSelectFolder, and all work :yes:
  10. Hi, No, i want copy "C:\Program Files\CABAL Online\Data\UI\Theme1" to Skin\Orginal in script folder i use RegRead to read install folder (because i probably change install location in future) and add "\Data\UI\Theme1" to install path (because i dont want copy whole game) This should be a fast skin changer, but dosen't work :/
  11. Hi i make script that make directory backup: DirCreate ( "Skins" ) DirCreate("Skins\Orginal") $InstallPath = RegRead ( "HKEY_CURRENT_USER\Software\Games-Masters.com\CabalOnline", "ENGInstallPath" ) Iniwrite("config.ini", "Settings","Skinpath",$InstallPath & "\Data\UI\Theme1") $SkinPath = IniRead("config.ini","Settings","skinpath", "Not Found") Dircopy ($SkinPath, "Skins\Orginal") Exit Ok, defalut install path is "C:\Program Files\CABAL Online", so defalut skinpath is "C:\Program Files\CABAL Online\Data\UI\Theme1" My script should work, but don't Any ideas ? Sorry 4 my english
×
×
  • Create New...