Advertisement
Guest User

Untitled

a guest
Dec 18th, 2017
69
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 2.25 KB | None | 0 0
  1. Coords:= ["#40.79347367020725,-77.86847591400148", "#40.796836289420895,-77.86819696426393", "#40.79639769657359,-77.86427021026613", "#40.79641394080479,-77.86045074462892", "#40.79938656819395,-77.8604292869568", "#40.80107587088608,-77.86540746688844", "#40.79946778565333,-77.85575151443481", "#40.80360974431232,-77.86036491394044", "#40.805323302599206,-77.86696314811708", "#40.802862586563826,-77.86452770233156", "#40.808189962325,-77.85776853561403", "#40.80482791825698,-77.85233974456789", "#40.81257498122005,-77.85562276840211", "#40.811178302949216,-77.8655791282654", "#40.80896954241912,-77.85173892974855", "#40.79626774258087,-77.84109592437744", "#40.789152373245614,-77.87336826324464", "#40.80458428525679,-77.87628650665285", "#40.800945926051526,-77.89396762847902", "#40.77972902126812,-77.79594898223878", "#40.79241774014784,-77.86160945892335", "#40.796186521206266,-77.8544318675995", "#40.79971143743523,-77.85040855407716", "#40.788762467958364,-77.861008644104", "#40.810983415271714,-77.91214227676393", "#40.81158431710551,-77.9243302345276", "#40.808961421840344,-77.9072391986847", "#40.810821008436534,-77.91825771331789", "#40.808449823373984,-77.90023326873781", "#40.81039874880466,-77.89546966552736", "#40.80650084070198,-77.89276599884033", "#40.81338698995496,-77.83500194549562", "#40.821246720796125,-77.82886505126953", "#40.79193850481131,-77.87804603576662"]
  2. Win1 := ComObjCreate("InternetExplorer.Application")
  3. Win1.visible:=true
  4. Win2 := ComObjCreate("InternetExplorer.Application")
  5. Win2.visible:=true
  6.  
  7. LoadWait(Win1, Win2){
  8. while Win1.busy || (Win1.document && Win1.document.readyState != "complete") || Win1.readyState!=4 || Win2.busy || (Win2.document && Win2.document.readyState != "complete") || Win2.readyState!=4
  9. Sleep 100
  10. }
  11.  
  12. Nav(i, Coords, Win1, Win2){
  13. x:= Coords[i]
  14. Win1.navigate("https://google.com" . x)
  15. Win2.navigate("https://google.com" . x)
  16. LoadWait(Win1, Win2)
  17. Win1.navigate("https://pokehuntr.com" . x)
  18. Win2.navigate("https://gymhuntr.com" . x)
  19. LoadWait(Win1, Win2)
  20. return nil
  21. }
  22. Nav(2, Coords, Win1, Win2)
  23. Pause
  24.  
  25. Loop{
  26. for i, link in Coords{
  27. Nav(i, Coords, Win1, Win2)
  28. Win1.document.getElementById("scan").Click()
  29. Win2.document.getElementById("scan").Click()
  30. Sleep 5000
  31. }
  32. }
  33. F8::Pause
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement