Jump to content

CoderDunn

Active Members
  • Posts

    336
  • Joined

  • Last visited

Everything posted by CoderDunn

  1. Did you see my above post (Post # 2). None of us know exactly what you're trying to do ... When do you want the bottom code ran? After you click ok?
  2. I don't quite get what you're trying to do ... Delete the shortcuts or just close a window that pops up displaying the shortcuts. If thats the case ... WinWait() and WinClose() should work. Hallman
  3. You forgot a wEnd in the main while loop ... Also, put the code in a code box (The little A3 at the top of edit post window) Hallman EDIT: Cleaned it up a bit #include <GUIConstants.au3> $myGUI = GUICreate("Title", 320, 120) GUICtrlCreateLabel('Enter your MTGO username', 10, 12) $input1 = GUICtrlCreateInput("", 10, 30, 300, 20) GUICtrlCreateLabel('Enter your MTGO password', 10, 54) $input2 = GUICtrlCreateInput("", 10, 70, 300, 20, $ES_PASSWORD) $okbtn = GUICtrlCreateButton("Ok", 40, 95, 60, 20) $exitbtn = GUICtrlCreateButton("Exit", 120, 95, 60, 20) GUISetState() While 1 $msg = GUIGetMsg() Select Case $msg = $exitbtn Or $msg = $GUI_EVENT_CLOSE Exit Case $msg = $okbtn $x = GUICtrlRead($input1) $y = GUICtrlRead($input2) GUISetState(@SW_HIDE, $myGUI) MouseClick("left", 424, 356) Send($x) MouseClick("left", 434, 413) Send($y) MouseClick("left", 491, 444) ExitLoop EndSelect WEnd ; Wait until something changes in the region 0,0 to 50,50 ; Get initial checksum $checksum = PixelChecksum(0, 0, 50, 50) ; Wait for the region to change, the region is checked every 100ms to reduce CPU load While $checksum = PixelChecksum(0, 0, 50, 50) Sleep(100) WEnd MsgBox(0, "", "Something in the region has changed!")
  4. These will do what you want: StringTrimRight() or StringTrimLeft() Most likely you will want StringReplace($test,"String to Remove","") Hallman
  5. Do something like $Pic_Width = 300 $Pic_Height = 300 $Zoom_Mult = 2 GUICtrlCreatePic("C:\Test Pic.jpg",-1($Pic_Width / $Zoom_Mult),-1($Pic_Height/ $Zoom_Mult),$Pic_Width * $Zoom_Mult, $Pic_Height * $Zoom_Mult) Then have the GUI the same size as the pic ... And use GUICtrlSetPos() for panning. Or just double the size (2X zoom) of the pic control and the GUI holding it. Hallman
  6. Look at the example of PixelChecksum() in the AutoIt help.
  7. SendKeyDelay (Option) Or ClipPut("Hello World") ; Put text on clipboard Send("^v") ; press control + v to paste Hallman
  8. There is no built in AutoIt function. It's possible if someone could made a UDF for it ... Hallman
  9. This will read the "Error" field. $Read_Field = "Error" $Read_File = @ScriptDir & "\" & "Test.txt" $Open_File = FileOpen($Read_File,0) If $Open_File = -1 Then MsgBox(0, "Error", "Unable to open file.") Exit EndIf ; Find $Read_Field in file $Current_Read = "" While StringInStr($Current_Read,$Read_Field) = 0 $Current_Read &= FileRead($Open_File,1) If @error = -1 Then MsgBox(0,"error","Unable to find field.") Exit EndIf WEnd ; Find the colon after $Read_Field $Current_Read = "" While StringInStr($Current_Read,":") = 0 $Current_Read &= FileRead($Open_File,1) If @error = -1 Then MsgBox(0,"error","Unable to find field.") Exit EndIf WEnd ; Read the data until it reaches the pipe that signifies end of line $Current_Read = "" While StringInStr($Current_Read,"|") = 0 $Current_Read &= FileRead($Open_File,1) If @error = -1 Then MsgBox(0,"error","Unable to find field.") Exit EndIf WEnd ; Remove the pipe from end of string $Current_Read = StringTrimRight($Current_Read,1) ; Remove White spaces at start and end of data $Current_Read = StringStripWS($Current_Read,3) MsgBox(0,"","The field """ & $Read_Field & """ contains: """ & $Current_Read & '"') Hallman Woot 100 posts
  10. This should at least get you started ... #include <GUIConstants.au3> #Include <GuiList.au3> GUICreate("Caption", 430, 250) $_List =GUICtrlCreateList ("", 10,10,410,100,$WS_BORDER + $WS_VSCROLL) $s_text= "One and one are two" GUICtrlSetData($_List,$s_text,"NO_DEFUALT") $s_text= "Two and two are four" GUICtrlSetData($_List,$s_text,"NO_DEFUALT") $s_text= "Four and three are seven" GUICtrlSetData($_List,$s_text,"NO_DEFUALT") $BTN =GUICtrlCreateButton (" Copy to Clipboard ",10,100) GUISetState () Do $msg = GUIGetMsg() if $msg = $BTN then $h=GUICtrlRead($_List) ClipPut ($h) endif Until $msg = $GUI_EVENT_CLOSE Hallman
  11. this-is-me wants to get make a spectrascope of music playing on your computer (For example, in i-tunes) or "Audio Output".
  12. I think you should have a Dll Handel parameter for the functions so you don't have to modify the code if you have it in like, the TEMP dir. Great work though.
  13. Exactly what mine does. I don't care if you use the pictures I used in mine.
  14. Nice job. Needs some collision detection work though. 1. The light blue monster is about one of his lengths away from the top wall when he bounces. EG he doesn't hit it before bouncing. 2. The red one eventally got stuck at the bottom with a slope of like -0.01/1 So it basically bounced left and right at the bottom and after a while started going through the bottom wall (See screenshot) Hallman
  15. Alright. I don't always download the latest beta since i'm on dial up and it takes a long time (15 min. xD) Thanks
  16. Well you put the script in there but I don't have "Sound.au3". Could you add that in there too?
  17. Well my internet stopped working (modem broke) so I couldn't check the forums until I got a new modem. Which took about a week ... By then I forgot about my Jeopardy thing sry
  18. lol you think his script is a mess look at mine in my previous post.
  19. So ... Where's the script? It isn't in the zip as far as i can tell.
  20. I made a jeopardy maker a while back. Mines a little more advanced plus can have multiple teams. Maybe you can build off of mine. Hallman
  21. best i got was 0.29
  22. Something I made ... maybe you could use. http://www.autoitscript.com/forum/index.ph...c=27873&hl= I also started an editor a while back (attached) but never finished it. You can only create a new map with File -> New. Open a image on the left with the import button to draw it on the viewport.
  23. Sry that this isn't about a script. The text size in IE has suddenly got smaller. I haven't changed the screen resolution. But like when i go to the msn home page the text is almost to small (Some is) to be able to read it. The text in the AutoIt help file has also shrunk. This is a major issue since somtimes I cant read the text in IE or helpfiles. Any ideas how to make the displayed text a larger font? Any help is appreciated. Hallman
  24. More like (Not familiar with Dos commands): $WebsiteText = _RunDos("start " & StringReplace($msg,"WEBSITE:","")) You get the general idea though of how to get the string with the website using StringReplace($msg,"WEBSITE:","") Hallman
×
×
  • Create New...