Jump to content

Cyberjunk

Members
  • Posts

    5
  • Joined

  • Last visited

Profile Information

  • Location
    Philippines
  • Interests
    Computers, Games, Streaming.

Cyberjunk's Achievements

Seeker

Seeker (1/7)

0

Reputation

  1. Ok so I think I finally got it. It must have been pretty complicated as no one responded to the actual coding question. But for future reference since the goto command was deprecated (just WOW) it seems now you have to do 3 times the work (Mostly research to find how to replace the GOTO), and create a custom function for every action in your code. Then you write the actual program code to call every function in the exact order you need them in. Then be careful because if your functions are in the wrong place you will create a loop in your program. I would have rather had the option to use GOTO because it was needed for this specific situation. That loop took me forever to find and fix. It just kept looping the last part of my code. For every time the else was found in either option, it made a loop of just the last part. But anyways here is how I fixed it.... Is it correct, Yep it runs! is it right Probably not, I am sure for those who look and are actually experienced, laughs will fill their rooms. but hey man, I did what i could to get it to work. HotKeySet("{ESC}", "Terminate") Func Terminate() Exit EndFunc ;==>Terminate Func CloseB1() MouseClick("left", 1338,6) ;close browser1 Sleep(500) MouseClick("left", 632,456) ;click in program Sleep(500) MouseClick("left", 527,456) ;click in program Sleep(15000) EndFunc ;==>CloseB1 Func Tab2() MouseClick("left", 354,14) ;switch tab Sleep(Random(5000,8000)) $aCoord = PixelSearch(873, 485, 900, 600, 0xDD0000, 10) ;search for color If Not @error Then Call("CloseB1") Else Call("Browser2") EndIf EndFunc ;==>Tab2 Func Browser2() Run( "C:\Programs\browser2.exe", "", @SW_SHOWMAXIMIZED ) Sleep(2000) MouseClick("left", 134,45) ;click on address bar Sleep(1000) Send("aspecificwebpage.com") ;input website Send("{enter}") ;hit enter Sleep(15000) MouseClick("left", 1338,6) ;close browser2 sleep(500) MouseClick("left", 1338,6) ;close browser1 Sleep(500) MouseClick("left", 625,454) ;click in program Sleep(500) MouseClick("left", 634,271) ;click in program Sleep(500) MouseClick("left", 917,245) ;close program Sleep(500) EndFunc ;==>CloseBrowser2 Run( "C:\Programs\myprogram.exe", "", @SW_SHOWDEFAULT ) Sleep(4000) MouseClick("left", 613,272) ;click in program Sleep(500) MouseClick("left", 632,456) ;click in program Sleep(500) MouseClick("left", 527,456) ;click in program Sleep(15000) Call(Browser1) Func Browser1() Run( "C:\Programs\browser1.exe", "", @SW_SHOWMAXIMIZED ) Sleep(Random(4000,6000)) MouseClick("left", 162,14) ;switch tab Sleep(Random(5000,8000)) MouseClick("left", 354,14) ;switch tab Sleep(Random(5000,8000)) $aCoord = PixelSearch(873, 485, 900, 600, 0xDD0000, 10) ;search for color If Not @error Then Call("CloseB1") Else Call("Tab2") EndIf EndFunc ;==>Browser1 Thoughts would be appreciated.
  2. I actually already have it installed. I just checked. I downloaded 2 things the other day Autoit-v3-setup.exe and SciTE4AutoIt3.exe. I wanted to make sure I had the compiler and Win info.
  3. Yes I dont have permissions to edit anything yet, (or I would delete that quote as well) most forums do not allow you to edit your posts or anything until you have met a certain level.
  4. I was not sure how to title it, I will do better in the future. I dont think i can edit the title so it will have to stay the way it si for now I guess. Actually it was just in the forum code editor, once the post was published it all matches my regular AutoIT Program. I am not worried about the colors actually. Just when I put the code in the editor here it was all so colorful and I assumed it was because of all my mistakes. Like if you put an ' in html some editors will change all text after that to the color blue or until another ' is found. notifying you some kind of argument is expected or missing. I just downloaded the AutoIT the other day so i think it should be all updated, unless that package is an extra package for AutoIT. Customizing the colors in my SciTE is not an issue I am fine with what is provided, but if there are other thngs I may not have in that package that may be of interest in the future. Thank you for your quick response.
  5. Hello, I am new to both Programming and this forum. I have done a few tiny projects that were successful and fell in love with Autoit. So now I am trying to learn new things as I go. I have read the Help docs on my following question, I have gone thru all of that. and I am sure as soon as you see my code you will be saying OMG why did he do that, or OMG how can you forget to add this.. But when your new you take the path of least resistance to get the outcome you want. SETUP: I am trying to make a code that will open a piece of software, then open a browser (which has a handful of tabs already open) go to a web page (one of the tabs) and search an area of the web page for a specific color, if that color is found I want it to close the browser and go back and start again. If that color is not found on that page I want it to switch tabs and search that page for the color. If the color is found on that page I want it to close the browser and start again. If the color is not found on either page, I want it to open another browser and go to website and do some things I will add once i get past this obstacle. I already have it almost there my code will open my software, open the browser, do the searches, find or not find the color, the part I am having trouble with is the if and else and what happens if and what it does if it does not. So the first code I have does everything I want except if it finds the color on the first run it closes the browser, but then when it starts the process again it doesnt check for the color. its like it skips the scanning part and goes straight to the opening of the second browser and finishes the code. Run( "C:\Programs\myprogram.exe", "", @SW_SHOWDEFAULT ) Sleep(4000) MouseClick("left", 613,272) ;click in program Sleep(500) Example() Func Example() MouseClick("left", 632,456) ;click in program Sleep(500) MouseClick("left", 527,456) ;click in program Sleep(15000) Run( "C:\Programs\browser1.exe", "", @SW_SHOWMAXIMIZED ) Sleep(Random(4000,6000)) EndFunc ;==>Example MouseClick("left", 162,14) ;switch tab Sleep(Random(5000,8000)) MouseClick("left", 354,14) ;switch tab Sleep(Random(5000,8000)) $aCoord = PixelSearch(873, 485, 900, 600, 0xDD0000, 10) ;search for color If Not @error Then MouseClick("left", 1338,6) ;close browser1 Sleep(1000) Call("Example") Else MouseClick("left", 162,14) ;switch tab Sleep(1000) EndIf MouseClick("left", 162,14) ;click tab again just to be sure its loaded Sleep(4000) $aCoord = PixelSearch(1052, 308, 1120, 431, 0xFF0000, 10) ;search for this color If Not @error Then MouseClick("left", 1338,6) ;close browser1 Sleep(1000) Call("Example") Else Run( "C:\Programs\browser2.exe", "", @SW_SHOWMAXIMIZED ) Sleep(2000) EndIf MouseClick("left", 134,45) ;click on address bar Sleep(1000) Send("aspecificwebpage.com") ;input website Send("{enter}") ;hit enter Sleep(15000) MouseClick("left", 1338,6) ;close browser2 Sleep(500) MouseClick("left", 1338,6) ;close browser1 Sleep(500) MouseClick("left", 625,454) ;click in program Sleep(500) MouseClick("left", 634,271) ;click in program Sleep(500) MouseClick("left", 917,245) ;close program Sleep(500) SO it makes the first scan and is successful, if the color is found it closes as I want, but then when nit starts the code again it does not scan anything the second time. and on the other side, if the color is not found naturally everything works as it is written. I want to guess by all the weird colors in the code sniplet I have a massive amount of errors. It is like a rainbow of text up there. different from what i see in AutoIT Any help would be appreciated.
×
×
  • Create New...