thexshadow

Yes,but it doesnt work XD

I'm trying to send a key to my browser so I can control my music when I'm playing games. So I use chrome for my browser, and I use soundcloud to play my music, and this si what I have. I dont know if I have it correct or not. HotKeySet("{f2}", "TogglePause") While 1 Sleep(100) WEnd Func TogglePause() ControlSend('[CLASS:Chrome_WidgetWin_1]','','171139584','{Space}') EndFunc

Oh cool, I didnt know you could do it like that. Thanks!

Thanks for that, One question though, If I want to combine these together. $StrReplace1 = StringRegExpReplace(GUICtrlRead($Output), '.*?[\r\n]+', '', 8) GUICtrlSetData($Output, $StrReplace1) $StrReplace2 = StringRegExpReplace(GUICtrlRead($Output), '[\r\n]*- \d* files found in \d* seconds[\r\n]*' & '\s*coverage file \d*\s*\d*%\s*\d*\s*\d*\s*[\r\n]*', '') GUICtrlSetData($Output, $StrReplace2) Would I have to go like this, because this only reads the bottom strreplace and not the top one. $StrReplace = StringRegExpReplace(GUICtrlRead($Output), '.*?[\r\n]+', '', 8) $StrReplace = StringRegExpReplace(GUICtrlRead($Output), '[\r\n]*- \d* files found in \d* seconds[\r\n]*' & '\s*coverage file \d*\s*\d*%\s*\d*\s*\d*\s*[\r\n]*', '') GUICtrlSetData($Output, $StrReplace) Or something like this? $StrReplace = StringRegExpReplace(GUICtrlRead($Output), '[\r\n]*- \d* files found in \d* seconds[\r\n]*' & '\s*coverage file \d*\s*\d*%\s*\d*\s*\d*\s*[\r\n]*' & '.*?[\r\n]+', '', 8) GUICtrlSetData($Output, $StrReplace)

Thanks for that, but is there a way to combine this: 00e69000 8567 scripts\utils\aidebu gutils.lua So it looks like: 00e69000 8567 scripts\utils\aidebugutils.lua But its never going to be the same, so next time it could be: 037a9000 816 char\text\i nvertstripes.dds Then i would want it to turn to: 037a9000 816 char\text\invertstripes.dds And, I dont know, but is there a way to combine multiple StringRegExpReplace's?

bump?

I know there is a way to do this, I did it a long time ago, i just cant remember how to do it. When any one of my checkboxes are checked it will popup with a go message and when none are checked it comes up with an error. If GuiCtrlRead($Chk1) = $GUI_UNCHECKED Then MsgBox(0, "Error", "Please Check Something!") Else MsgBox(0, "Completed", "Completed!") EndIf So on the first line it should be something like this, but I know that wont work. I cant remember but maybe I used a "BIT" like "BITOR" or something like that. If GuiCtrlRead($Chk1 or $Chk2) = $GUI_UNCHECKED Then Any ideas?

Thanks, I got it working now.

I tried editing mine and so far, nothing has worked. This is my script so far. It's a little different then the above's. Run('"' & @ComSpec & '" /c "' & @TempDir & '\sod\bm.exe -o ' & @TempDir & '\sodt\zi2.bms ' & GuiCtrlRead($File) & ' ' & @DesktopDir & '"\P Ion"', @DesktopDir, @SW_HIDE,)

Ok I got that workign good, is there a better way to do this? This way it scrolls all the way back to the top, which is very inconvienent. Case $msg = $Exr $exrun = Run('"' & @ComSpec & '" /c "' removed, @DesktopDir, @SW_HIDE) While 1 $out = StdoutRead($exrun) If @error then exitloop GUICtrlSetData($BM,$out,1) WEnd $Read = GUICtrlRead($BM) $StrReplace = StringRegExpReplace($Read, '.*?[\r\n]+', '', 6) GUICtrlSetData($BM, $StrReplace) Also, is there a way to remove "- 1272 files found in 0 seconds coverage file 0 75% 11547573 15236051" and then add "gutils.lua" back to "00e69000 8567 scriptsutilsaidebu". I dont know if this is possable. 00e57000 453547 scripts\network\wrld.xml 00e69000 8567 scripts\utils\aidebu - 1272 files found in 0 seconds coverage file 0 75% 11547573 15236051 gutils.lua 00e6a000 8778 scripts\utils\containers.lua

Woops, one problem, GuiCtrlRead($File) works fine, but when there are spaces in the directory, it breaks. Run('"' & @ComSpec & '" /c "' & @TempDir & '\sod\bm.exe -o -d ' & @TempDir & '\sod\zi2.bms ' & GuiCtrlRead($File), '', @SW_HIDE)

I have an GUICtrlCreateEdit which is full of text, I want to remove the first 5 lines at the top of it. Is there a way to do that?

Thanks, that made sense, got it to work.

I found that after I looked through the code. Now, I added a file open dialog, the var does not want to work. It outputs a number. The file is tree.pak, when I open it, the output is "C:UsersmeDesktop4" instead of "C:UsersmeDesktoptree.pak" Local $GUI = GUICreate("SoD", 800, 330) Local $BMSOutput = GUICtrlCreateEdit("", 10,40,780,280, $ES_AUTOVSCROLL + $WS_VSCROLL + $es_readonly) Local $File = GUICtrlCreateInput("",10,10,500,20) Local $OpenDialog = GUICtrlCreateButton("Open Pak",515,10,70,22) Local $Extract = GUICtrlCreateButton("Extract",600,10,55,22) GUISetState(@SW_SHOW) SoD() Func SoD() Local $mne,$out While 1 $msg = GUIGetMsg() Select Case $msg = $GUI_EVENT_CLOSE ExitLoop Case $msg = $OpenDialog $Fileopen = FileOpenDialog("File open", @DesktopDir,"Pak Files (*.pak)") GUICtrlSetData($File,$Fileopen) Case $msg = $Extract $mne = Run('"' & @ComSpec & '" /c "' & @TempDir & '\sod\bm.exe -o -d -v ' & @TempDir & '\sod\zi2.bms ' & $File, '', @SW_HIDE) While 1 $out = StdoutRead($mne) If @error then exitloop GUICtrlSetData($BMSOutput,$out & @lf,1) WEnd EndSelect WEnd EndFunc

Yeah, I'm need to get use to the single and double quotes. Also, Says error in expression when I use what you posted.

I'm trying to get a few vars to work in my run command. I removed everything that isnt needed in the script. Run(@ComSpec & " /c bm.exe -d -o zi2.bms ters.pak ", "",@SW_HIDE) Now, bm and zi2 are in a folder called stg in the temp directory and ters in on the desktop. When I try and grab the files from these places it errors out. Local $tmp = "@TempDir\stg" Local $dtop = "@DesktopDir" Run(@ComSpec & " /c " $tmp & "bm.exe -d -o" & $tmp & "zi2.bms" & $dtop & "ters.pak ", "",@SW_HIDE) Any ideas?

Here is the code without the images that are needed. Like I said before, I can't really think of a way to get the user to popup when I click the Grab button. Any ideas? #include <GUIConstantsEx.au3> #include <WindowsConstants.au3> #include <StaticConstants.au3> #include <ComboConstants.au3> #include <INet.au3> #include <String.au3> Opt("TrayIconHide", 1) Global $User GUICreate("Grabber", 200, 200, -1, -1) GUISetBkColor(0x494E49) Local $Grab = GUICtrlCreateButton('Grab!', 30, 150, 140, 20) GUICtrlSetFont(-1, 8, 800, 0, 'Tahoma') GUICtrlCreateLabel('Username:', 20, 60, 100, 20, BitOR($SS_RIGHT,$SS_CENTERIMAGE)) GUICtrlSetColor(-1, 0xE6ECE0) GUICtrlCreateInput($User, 50, 80, 100, 20, 0x0001) GUISetState(@SW_SHOW) While 1 Local $eMSG = GUIGetMsg() Switch $eMSG Case $GUI_EVENT_CLOSE Exit Case $grab $User = _StringBetween(_INetGetSource("http://test.com/"), "Username:", "<br />") EndSwitch WEnd

Sorry, you may need the bmp's from this thread. http://www.autoitscript.com/forum/index.php?showtopic=95043&view=findpost&p=682968

I'm trying to grab a string off of a test site's member's list. I am trying to make it so when I click the Grab button, the user goes into the input box. This is what I have so far, any ideas? #include <GUIConstantsEx.au3> #include <WindowsConstants.au3> #include <StaticConstants.au3> #include <ComboConstants.au3> #include <INet.au3> #include <String.au3> Opt("TrayIconHide", 1) Global $User __steam_window('Grabber', 200, 200) Func __steam_window($sWINDOW_TITLE, $iWINDOW_WIDTH, $iWINDOW_HEIGHT) Local $oWINDOW = GUICreate($sWINDOW_TITLE, $iWINDOW_WIDTH, $iWINDOW_HEIGHT, -1, -1, BitOR($WS_POPUP, $WS_SYSMENU, $WS_MINIMIZEBOX), $WS_EX_LAYERED) GUISetFont(8, 400, 0, 'Tahoma') GUISetBkColor(0x494E49) GUICtrlCreatePic('hdr.bmp', 0, 0, $iWINDOW_WIDTH - 16, 20, $SS_NOTIFY, $GUI_WS_EX_PARENTDRAG) GUICtrlCreatePic('hdr.bmp', $iWINDOW_WIDTH - 16, 0, 11, 5, $SS_NOTIFY, $GUI_WS_EX_PARENTDRAG) GUICtrlCreatePic('hdr.bmp', $iWINDOW_WIDTH - 16, 16, 11, 4, $SS_NOTIFY, $GUI_WS_EX_PARENTDRAG) GUICtrlCreatePic('hdr.bmp', $iWINDOW_WIDTH - 5, 0, 5, 20, $SS_NOTIFY, $GUI_WS_EX_PARENTDRAG) GUICtrlCreateGraphic(0, 20, 1, $iWINDOW_HEIGHT) GUICtrlSetColor(-1, 0x686A65) GUICtrlCreateGraphic($iWINDOW_WIDTH - 1, 20, 1, $iWINDOW_HEIGHT) GUICtrlSetColor(-1, 0x686A65) GUICtrlCreateGraphic(0, $iWINDOW_HEIGHT - 1, $iWINDOW_WIDTH, 1) GUICtrlSetColor(-1, 0x686A65) Local $oCLOSE = GUICtrlCreatePic('cls.bmp', $iWINDOW_WIDTH - 16, 5, 11, 11, $SS_NOTIFY, $GUI_WS_EX_PARENTDRAG) Local $oLABELHEADER = GUICtrlCreateLabel($sWINDOW_TITLE, 6, 0, $iWINDOW_WIDTH - 22, 20, $SS_CENTERIMAGE) GUICtrlSetColor(-1, 0xD8DED3) GUICtrlSetBkColor(-1, 0x5A6A50) Local $Grab = GUICtrlCreateButton('Grab!', 30, 150, 140, 20) GUICtrlSetFont(-1, 8, 800, 0, 'Tahoma') GUICtrlCreateGraphic(10, 51, 180, 1) GUICtrlSetColor(-1, 0x636763) GUICtrlCreateLabel('Username:', 20, 60, 100, 20, BitOR($SS_RIGHT,$SS_CENTERIMAGE)) GUICtrlSetColor(-1, 0xE6ECE0) GUICtrlCreateInput($User, 50, 80, 100, 20, 0x0001) GUICtrlCreateGraphic(10, 30, 180, $iWINDOW_HEIGHT - 40) GUICtrlSetColor(-1, 0x686A65) GUICtrlCreatePic('cnr.bmp', 0, 0, 1, 1, $SS_NOTIFY, $GUI_WS_EX_PARENTDRAG) GUICtrlCreatePic('cnr.bmp', $iWINDOW_WIDTH - 1, 0, 1, 1, $SS_NOTIFY, $GUI_WS_EX_PARENTDRAG) GUICtrlCreatePic('cnr.bmp', 0, $iWINDOW_HEIGHT - 1, 1, 1, $SS_NOTIFY, $GUI_WS_EX_PARENTDRAG) GUICtrlCreatePic('cnr.bmp', $iWINDOW_WIDTH - 1, $iWINDOW_HEIGHT - 1, 1, 1, $SS_NOTIFY, $GUI_WS_EX_PARENTDRAG) GUISetState(@SW_SHOW) While 1 Local $eMSG = GUIGetMsg() Switch $eMSG Case $GUI_EVENT_CLOSE Local $iWINDOW_TRANS For $iWINDOW_TRANS = 255 To 0 Step -3 If $iWINDOW_TRANS > 0 Then WinSetTrans($oWINDOW,'',$iWINDOW_TRANS) Sleep(10) Next Exit Case $oCLOSE Local $iWINDOW_TRANS For $iWINDOW_TRANS = 255 To 0 Step -3 If $iWINDOW_TRANS > 0 Then WinSetTrans($oWINDOW,'',$iWINDOW_TRANS) Sleep(10) Next Exit Case $grab $User = _StringBetween(_INetGetSource("http://test.com/"), "Username:", "<br />") EndSwitch WEnd EndFunc

I added Global $aRet to the top in the first place, but forgot to run it in x86 mode again... Thank you again Geo, you are god.

Ahhh, no one?

Bump.

No one?

Bah, stupid. I'm stupid, I was running it in x64 mode, tried in x86 and bam, works. Thank's everyone. One last error. I have tried removing Local and adding in Global, but that dos not work. I cant really think of anything else, any ideas? Func _Archive($hWnd, $Msg, $nState, $ExInfo) Local $iFileSize, $iWriteSize, $iPercent = 0 If $nState = 0 Then Local $EXTRACTINGINFO = DllStructCreate($tagEXTRACTINGINFO, $ExInfo) <----------------------------- GUICtrlSetData($BE, DllStructGetData($EXTRACTINGINFO, "szSourceFileName") & @CRLF, 1) $iFileSize = DllStructGetData($EXTRACTINGINFO, "dwFileSize") $iWriteSize = DllStructGetData($EXTRACTINGINFO, "dwWriteSize") $iPercent = Int($iWriteSize / $iFileSize * 100) GUICtrlSetData($Progress, $iPercent) Return 1 EndIf If $nState = 2 Then GUICtrlSetData($Progress, 100) Return 1 EndFunc