Register for your free account! | Forgot your password?

Go Back   elitepvpers > Coders Den > AutoIt
You last visited: Today at 23:51

  • Please register to post and access all features, it's quick, easy and FREE!

Advertisement



Schleife erstellen und schließen

Discussion on Schleife erstellen und schließen within the AutoIt forum part of the Coders Den category.

Reply
 
Old 11/30/2011, 15:42   #16
 
elite*gold: 0
Join Date: Aug 2008
Posts: 467
Received Thanks: 30
Ja Danke an euch

Werde es jetzt mit Logos versuchen ^^

Eine Frage habe ich da noch an Pow:

Kann ich dieses BannerDa einfach so stehen lassen oder muss ich das ersetzen?
armin555 is offline  
Old 12/01/2011, 12:05   #17


 
Whoknowsit's Avatar
 
elite*gold: 146
Join Date: May 2009
Posts: 3,764
Received Thanks: 6,973
Quote:
Originally Posted by _P0w_ View Post
@Whoknowsit
jetzt hast du ihm eigentlich schon alles vorgeschrieben xD
Naja, die 5 Minuten Aufwand haben mich jetzt auch nicht umgebracht

Quote:
Originally Posted by armin555 View Post
Ja Danke an euch

Werde es jetzt mit Logos versuchen ^^

Eine Frage habe ich da noch an Pow:

Kann ich dieses BannerDa einfach so stehen lassen oder muss ich das ersetzen?
Das Beispiel von Pow ist Pseudocode, also nur von Nutzen, wenn du daraus etwas entsprechendes umsetzt.

Wie wär's, wenn du das Script von mir einfach mal aufprobierst? Mein Beispiel öffnet beim Start den Internet Explorer (du musst dort natürlich eingeloggt sein) und durchsucht die Startseite nach dem Banner.

Das macht das Script so lang, bis der Banner 10x gefunden und die Seite aufgerufen wurde.

Die Bannerseite beginnt IMMER mit "http://www.******.net/de/game/found/banner/" und endet auf eine 32-stellige, zufällige Kombination.

Sinn und Zweck des Scripts ist es lediglich, diese Kombination auf der Seite zu finden und daraus dann den vollständigen Link zu bilden.

Rufst du das Ganze über SCITE auf, siehst du auch die gefundenen Banner in der Konsole.
Whoknowsit is offline  
Thanks
1 User
Old 12/05/2011, 18:03   #18
 
elite*gold: 0
Join Date: Aug 2008
Posts: 467
Received Thanks: 30
Okay.

Jetzt hab ich ein Problem.
Ich das bissel geändert,weil ich nicht alles abkopieren wollte und auch ein paar Probleme da waren.


So sieht das aus:
Code:
				Global $found1 = 0

$IE = _IECreate("http://www.******.net/de/user/profile")
_IELoadWait($IE)
Sleep (100)

While $found1 < 20
	$sHtmlcode = _IEDocReadHTML($IE)
	$aFilter1 = _StringBetween($sHtmlcode, "http://media.******.net/images/default/levels/logos/", "'")

	If IsArray($aFilter1) Then
		$found1 += 1
		_IEImgClick($IE, "logo-01.png")
		_IEImgClick($IE, "logo-02.png")
		_IEImgClick($IE, "logo-03.png")
		_IEImgClick($IE, "logo-04.png")
		_IEImgClick($IE, "logo-05.png")
		_IEImgClick($IE, "logo-06.png")
		_IEImgClick($IE, "logo-07.png")
		Sleep (7000)

		ConsoleWrite($found1 & ': ' &$aFilter1[0] & @CRLF)
		_IEQuit($IE)
		Sleep(4000)
		_IECreate ($IE, "http://www.******.net/de/user/profile")
		_IELoadWait($IE)
	Else
		_IEAction($IE, "refresh")
		Sleep (200)
	EndIf
WEnd
		EndSwitch
		WEnd
Mein Problem:
Nachdem er das Logo angeklickt hat,soll der Browser sich schließen und dann wieder öffnen und wieder auf die Seite /user/profile gelangen und wieder die Logos suchen.
Aber anstatt er wieder die Seite öffnet,öffnet sich ein URL irgendwie mit oder so. Woher kommen die Zahlen,was mach ich falsch?
armin555 is offline  
Old 12/06/2011, 23:21   #19


 
Whoknowsit's Avatar
 
elite*gold: 146
Join Date: May 2009
Posts: 3,764
Received Thanks: 6,973
Mal so nebenbei.... MUSS sich der Browser öffnen? Falls nicht, könnte man sich viele Zeilen sparen und das Ganze einfacher machen
Whoknowsit is offline  
Old 12/07/2011, 14:47   #20
 
elite*gold: 0
Join Date: Aug 2008
Posts: 467
Received Thanks: 30
Quote:
Originally Posted by Whoknowsit View Post
Mal so nebenbei.... MUSS sich der Browser öffnen? Falls nicht, könnte man sich viele Zeilen sparen und das Ganze einfacher machen
Ja,weil wenn man die selbe Seite wieder refreshed oder nochmal navigated,dann kommen die SELBEN Banner und Logos und wenn der nochmal draufklickt,werden die von ****** nicht gewertet.
armin555 is offline  
Old 12/08/2011, 03:53   #21


 
Whoknowsit's Avatar
 
elite*gold: 146
Join Date: May 2009
Posts: 3,764
Received Thanks: 6,973
Du könntest einfach das Caching verhindern
Whoknowsit is offline  
Old 12/08/2011, 16:10   #22
 
elite*gold: 0
Join Date: Aug 2008
Posts: 467
Received Thanks: 30
Hab es schon anders hingekriegt,aber ich habe noch eine Frage xD

Ich habe ja immer die Logos mit

Code:
$aFilter3 = _StringBetween($sHtmlcode, "http://media.******.net/images/themes/community/games/", "'")
gefunden,aber jetzt will ich einen Dshinzilla Bot machen.
Hier sind meine Codes:

Code:
#include <IE.au3>
#Include <String.au3>


While 1
	$IE1 = _IECreate("http://www.******.net/de/game/start_dshinzilla/start/new/level/easy")
	_IELoadWait($IE1)
	$sHtmlcode = _IEDocReadHTML($IE1)
	$aFilter2 = _StringBetween($sHtmlcode, "http://media.******.net/images/themes/community/games/", "'")
	$aFilter3 = _StringBetween($sHtmlcode, "http://media.******.net/images/themes/community/games/", "'")
	
	If IsArray($aFilter2) Then
		_IEImgClick($IE1, "******_card_back.png")
		Sleep (2000)
		_IELoadWait($IE1)
		_IEImgClick($IE1, "******_card_back.png")
		Sleep (2000)
		_IELoadWait($IE1)
		If IsArray ($aFilter4) Then
			_IENavigate($IE1, "www.******.net/de/game/start_dshinzilla/start/new/level/normal")
	Else
		If IsArray($aFilter3) Then
			_IEImgClick($IE1, "******_card_dshinzilla_fail.png")
			_IEQuit($IE1)
	EndIf
EndIf
EndIf
WEnd
Die Karten umdrehen kann er,aber wenn wenn er die Aufgabe gelöst hat,dann soll er zur nächsten Stufe hoch gehen und ich weiß nicht wie.
armin555 is offline  
Reply


Similar Threads Similar Threads
While Schleife
07/03/2011 - AutoIt - 9 Replies
Hallo Leute, Ich hoffe das dieser Thread nicht unnötigen Spam erzeugt. Ich bin ein absoluter Anfänger in Sachen AI. Ich würde gerne wissen wie ich eine While Schleife mit der Leertaste erstelle, das der Bot durchgehend die Leertaste drückt. Danke euch schon mal :) Mfg Daarmy
[Schleife]Problem
10/24/2010 - AutoIt - 19 Replies
Hi Leute, ich amch gerade nen Hack für Metin2. So ich hab folgendes Problem: Wenn ich den hack starten will, drücke ich auf $button1 dann schreibt er in den pointer mit
For-Schleife einer GUI untebrechen und mit Schließen einer andern GUI wiederaufnehmen
10/13/2010 - AutoIt - 7 Replies
Hi, ich hab folgendes AutoIT Problemchen und komm einfach nicht weiter. Zur Veranschauung des Problems hab ich mein eigentliches Programm mal auf einen Minimalcode reduziert. Das Programm macht so natürlich grad keinen großen Sinn, aber ich kann euch zeigen, wo's Hakt. Es geht darum: Ich hab ein Haupt-GUI von dem aus ich eine FOR-Schleife starte. Nun soll pro abgearbeiteten STEP der For-Schleife die Unter-GUI gestartet und aus der For-Schleife der Wert übergeben werden. Die...
while-schleife cast x | schleife ende cast y
07/26/2010 - Diablo 2 Programming - 6 Replies
ich kann nicht einschlafen und versuche gerade halbwach herauszufinden, wie ich den bot etwas casten lassen kann, um ihn anschließend nach 10-15 casts etwas anderes casten zu lassen. if(NTA_GetResistance(target, NTA_DAMAGE_PHYSICAL) >= 100) { if((target.name == "Pindleskin") && NTA_GetResistance(target, NTA_DAMAGE_PHYSICAL) >= 100) { var i =0; while(i<15) { return NTC_CastSkill(106, NTC_HAND_LEFT, target); i++;
For-Schleife
01/29/2007 - General Coding - 14 Replies
Also wir haben ( um uns an die For-Schleife zu gewöhnen) ne eigentlich relativ einfache Aufgabe bekommen. Ich hoffe ich kann mich richtig dran errinern wie sie hieß^^ Wir sollten mit der FOR-Schleife herrausfinden wie viele Zahlen zwischen zwei Zahlen die man eingeben kann vorhanden sind. So ODER so ähnlich. Is ja auch nich viel Schreibtext aber mir fehlt das entscheidene Zwischenteil : procedure TForm1.Button1Click&#40;Sender&#58; TObject&#41;; var zahl1,zahl2,a&#58;integer; begin



All times are GMT +2. The time now is 23:51.


Powered by vBulletin®
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
SEO by vBSEO ©2011, Crawlability, Inc.
This site is protected by reCAPTCHA and the Google Privacy Policy and Terms of Service apply.

Support | Contact Us | FAQ | Advertising | Privacy Policy | Terms of Service | Abuse
Copyright ©2024 elitepvpers All Rights Reserved.