Jump to content

Joseph

Active Members
  • Posts

    34
  • Joined

  • Last visited

Joseph's Achievements

Seeker

Seeker (1/7)

0

Reputation

  1. i'm making this simple program to block the ad of a videogame that i play.. can someone tell me how to make the gui open in a certain place when its opened instead of right in the center of the screen? heres the program code here CODE#include <guiconstants.au3> $gui= GUICreate("Runescape Free Player Ad Busta" , 750,80,-1,-1,-1) $button1= GUICtrlCreateButton("AdBlockBusta 1.0", 0,0,375,50) $button2= GUICtrlCreateButton("AdBlockBusta Too", 375,0,375,50) $ExitId = GUICtrlCreateButton("Exit",0,50,30,25) GUICtrlCreateLabel("Place This Over Runescape Free Player Advertisement to Block Unwanted Advertising - Courtesy of RSCG 2009",125,50,750,25,0,0) GUISetState(@sw_show) winsetontop($GUI, "",1) while 1 $msg = GUIGetMsg() Select Case $msg= $ExitId GUIDelete() Exit case $msg= $button1 msgbox(0,"msgbox","generics") case $msg= $button2 button2cmd() EndSelect WEnd Func button2cmd() msgbox(0,"=)","yeeaa ^.^") endfunc
  2. hey ghost this one is realy important........ to make it the best for me its gotta have a ability to where it can monitor text on a screen , hence.... if i have email open and logged in, and im away from my keyboard away from home, that i can use my cellphone to sms and send a email txt to my email...... after my email updates from the txt from my phone.. the remote program of yours would see the txt change and macro or script what i need from my cellphone to computer... i'm working on this but if u could put it in your remote then it'd be real good , if u could somehow work that into it it'd be great
  3. im trying to make something that will poll the desktop like for every 10 minutes to see if there is a change in the text or to search for certain text and if it is there then to do certain commands, can anyone tell me what i should read about or what functions to use, im having trouble with my helpfile so im not sure, could it be get text or something like that? if someone could write a script real quick that would simply open up internet explorer if there is "asdf" in notepad , and open firefox if there is "jkl;" instead then that would be real helpful.. thanks im trying to make a cellphone to email remote type thing
  4. can someone tell me where i can view and monitor my posts on the forum
  5. lookup pixelsearch too, i used it to do functions when there is a update on the screen and the colors change also u can search the forums for info
  6. i made this so that it searchs for a pixel in a certain spot and if its there it clicks it (thats the first adlib), then when it opens new windows from that button there is another adlib supposed to check if there is ever a window with the title "myspace.com - mozilla firefox" and if there is then controlsend alt f4 to close the window, if both the adlibs were setup right it would work but only the first one works, could someone see if there are any obvious solutions #include <guiconstants.au3> #include <_adlibs.au3> $GUI = GUICreate("Friend Storm Adder", 200,60,-1,-1,-1) $Exit = GUICtrlCreateButton("Exit",0,0,30,20) $Start = GUICtrlCreateButton("Start",30,0,170,20) GUICtrlCreateLabel("Press 'Pause' to stop/resume after starting", 0,20,200,20) guictrlcreatelabel("Press 'Esc' to exit out of program",0,40,200,20) GUISetState(@SW_SHOW) WinSetOnTop($GUI, "", 1) AdlibEnable("_adlibs", 1000) Global $Paused HotKeySet("{PAUSE}", "TogglePause") HotKeySet("{ESC}", "Terminate") Func TogglePause() $Paused = NOT $Paused While $Paused sleep(100) ToolTip('Script is "Paused"',0,0) WEnd ToolTip("") EndFunc Func Terminate() Exit 0 EndFunc While 1 $msg = GUIGetMsg() Select Case $msg= $Exit GUIDelete() Exit Case $msg= $Start _AdlibEnable("_ad1") _AdlibEnable("_ad2") EndSelect WEnd Func _ad1() $search1=PixelSearch(32,443,273,600,0xAC4400,0) if IsArray($search1) then MouseMove($search1[0],$search1[1]) MouseClick("left",$search1[0],$search1[1], 1, 10) EndIf EndFunc Func _ad2() If WinExists("MySpace.com - Mozilla Firefox") Then WinActive("MySpace.com - Mozilla Firefox") controlSend("MySpace.com - Mozilla Firefox","","","^{F4}") EndIf EndFunc
  7. ok if i use shell execute how do i make it run the file from the path entered in the text input
  8. ok i tryed Case $msg= $PlayMp3 Run(GUICtrlRead($mp3)) but that doesn't work is that anywhere near close?
  9. hey valuator ur clicktask.com site isn't working
  10. i'm trying to make the play button on this script run the file that is from the $mp3 input, i have the play button (which is $PlayMp3) as part of a selection in the while list, can someone tell me how to run the information from the input text? here is the script #include <guiconstants.au3> $GUI= GUICreate("Rune Tools", 200, 100, -1, -1, -1) $ExitId = GUICtrlCreateButton("Exit",0,0,50,20) $Cliku = GUICtrlCreateButton("Cliku",50,0,50,20) $ArrowStart = GUICtrlCreateButton("Idler",100,0,50,20) $RuneHq = GuiCtrlCreateButton("RuneHq" ,150,0,50,20) $mp3 = GUICtrlCreateInput("C:\mp3", 0,20,100,20) $PlayMp3 = GuiCtrlCreateButton("Play",100,20,50,20) GUISetState(@SW_SHOW) WinSetOnTop($GUI, "", 1) Global $Paused HotKeySet("{PAUSE}", "TogglePause") HotKeySet("{ESC}", "Terminate") While 1 $msg = GUIGetMsg() Select Case $msg = $GUI_EVENT_CLOSE exit Case $msg= $ExitId GUIDelete() Exit Case $msg= $Cliku MsgBox(0,"Cliku!", "yee") Case $msg= $ArrowStart AdlibEnable("_Send", 10000) Case $msg= $RuneHq OpenRqFF() Case $msg= $PlayMp3 Run($mp3) EndSelect Wend Func OpenRqFF() Run("C:\Program Files\Mozilla Firefox\firefox.exe") Sleep(2000) Send("^{l}") Send("http://www.runehq.com/") Send("{enter}") EndFunc Func TogglePause() $Paused = NOT $Paused While $Paused sleep(100) ToolTip('Script is "Paused"',0,0) WEnd ToolTip("") EndFunc Func Terminate() Exit 0 EndFunc Func _Send() Send("{right}") EndFunc
  11. no i think that will scan the title of the window and search for the text too
  12. you might be able to try to use WinWaitActive or WinExists with the word NOW something like if the word NOW is there then it clicks that spot and if its not then keep going WinWaitActive("Title of Webpage - Browser", "NOW", 1000) or If WinExists("Title of Webpage - Browser", "NOW") Then MouseClick("left", xcoord,ycoord,1,10) EndIf
×
×
  • Create New...