|
You last visited: Today at 17:50
Advertisement
[AutoIT] Fischöffner ini
Discussion on [AutoIT] Fischöffner ini within the AutoIt forum part of the Coders Den category.
04/09/2009, 16:25
|
#1
|
elite*gold: 0 
Join Date: Mar 2009
Posts: 502
Received Thanks: 111
|
[AutoIT] Fischöffner ini
moing leute ich hab mir ma nen fischöffner gemacht und wollt mir sowas mit ner ini machen die dann anzeigt wieviel zander usw er aufgemacht hat nuri-wie funzt des mit der ini noch net so ganz
Code:
#RequireAdmin
HotKeySet("{F5}", "Start")
HotKeySet("{F6}", "Ende")
Opt("PixelCoordMode", 2)
Opt("MouseCoordMode", 2)
While (1)
Sleep(1000)
WEnd
Func START()
While (1)
$ZANDER = PixelSearch(854,408,1015,698,0xCECB94)
If Not @error Then
MouseClick("right", $ZANDER[0], $ZANDER[1])
sleep (500)
$Zanderus= $Zander+1
IniWrite(@ScriptDir &"\Fische.ini","Fische","Zander",$Zanderus)
EndIf
$MANDERINENFISCH = PixelSearch(855, 411, 1018, 700, 0x847531)
If Not @error Then
MouseClick("right", $MANDERINENFISCH[0], $MANDERINENFISCH[1])
sleep (500)
$mandus =$Manderinenfisch+1
IniWrite(@ScriptDir &"\Fische.ini","Fische","Zander",$mandus)
EndIf
$GRASKARPFEN = PixelSearch(855, 411, 1018, 700,0xBDAA84)
If Not @error Then
MouseClick("right", $GRASKARPFEN[0], $GRASKARPFEN[1])
$grassi =$Graskarpfen+1
IniWrite(@ScriptDir &"\Fische.ini","Fische","Zander",$grassi)
EndIf
$BACHFORELLE = PixelSearch(855, 411, 1018, 700, 8750458)
If Not @error Then
MouseClick("right", $BACHFORELLE[0], $BACHFORELLE[1])
$Bachi=$Bachforelle+1
IniWrite(@ScriptDir &"\Fische.ini","Fische","Zander",$Bachi)
EndIf
$LACHS = PixelSearch(855, 411, 1018, 700, 4739613)
If Not @error Then
MouseClick("right", $LACHS[0], $LACHS[1])
$lachsi=$Lachs+1
IniWrite(@ScriptDir &"\Fische.ini","Fische","Zander",$lachsi)
EndIf
$ROTFEDER = PixelSearch(855, 411, 1018, 700, 15849652)
If Not @error Then
MouseClick("right", $ROTFEDER[0], $ROTFEDER[1])
$Feder=$RotFeder+1
IniWrite(@ScriptDir &"\Fische.ini","Fische","Zander",$RotFeder)
EndIf
$REGENBOGENFORELLE = PixelSearch(855, 411, 1018, 700, 11775653)
If Not @error Then
MouseClick("right", $REGENBOGENFORELLE[0], $REGENBOGENFORELLE[1])
$regen= $Regenbogenforelle+1
IniWrite(@ScriptDir &"\Fische.ini","Fische","Zander",$regen)
EndIf
$BARSCH = PixelSearch(855, 411, 1018, 700, 3751230)
If Not @error Then
MouseClick("right", $BARSCH[0], $BARSCH[1])
$Arsch= $Barsch+1
IniWrite(@ScriptDir &"\Fische.ini","Fische","Zander",$Arsch)
EndIf
$KARPFEN = PixelSearch(855, 411, 1018, 700, 0xAD7573)
If Not @error Then
MouseClick("right", $KARPFEN[0], $KARPFEN[1])
$Krapfen=$Karpfen+1
IniWrite(@ScriptDir &"\Fische.ini","Fische","Zander",$Krapfen)
EndIf
$GROSSERZANDER = PixelSearch(855, 411, 1018, 700, 8818150)
If Not @error Then
MouseClick("right", $GROSSERZANDER[0], $GROSSERZANDER[1])
$fetterzander= $Grosserzander+1
IniWrite(@ScriptDir &"\Fische.ini","Fische","Zander",$fetterzander)
EndIf
$TENCHI = PixelSearch(855, 411, 1018, 700, 13487970)
If Not @error Then
MouseClick("right", $TENCHI[0], $TENCHI[1])
$Thi=$Tenchi+1
IniWrite(@ScriptDir &"\Fische.ini","Fische","Zander",$Thi)
EndIf
Sleep(1000)
IniWrite(@ScriptDir &"\Fische.ini","Fische",$Zander,"0")
IniWrite(@ScriptDir &"\Fische.ini","Fische",$Manderinenfisch,"0")
IniWrite(@ScriptDir &"\Fische.ini","Fische",$Graskarpfen,"0")
IniWrite(@ScriptDir &"\Fische.ini","Fische",$Bachforelle,"0")
IniWrite(@ScriptDir &"\Fische.ini","Fische",$Lachs,"0")
IniWrite(@ScriptDir &"\Fische.ini","Fische",$RotFeder,"0")
IniWrite(@ScriptDir &"\Fische.ini","Fische",$Regenbogenforelle,"0")
IniWrite(@ScriptDir &"\Fische.ini","Fische",$Barsch,"0")
IniWrite(@ScriptDir &"\Fische.ini","Fische",$Karpfen,"0")
IniWrite(@ScriptDir &"\Fische.ini","Fische",$Grosserzander,"0")
IniWrite(@ScriptDir &"\Fische.ini","Fische",$Tenchi,"0")
WEnd
EndFunc
Func ENDE()
Exit
EndFunc
|
|
|
|
04/09/2009, 20:43
|
#2
|
elite*gold: 0
Join Date: Aug 2008
Posts: 820
Received Thanks: 909
|
$Zanderus= $Zander+1
warum das?
$zanderus soll die zahl sein, die angibt, wie viele schon geangelt wurde, $zander ist aber eine ausgabe von pixelsearch -.-
IniWrite(@ScriptDir &"\Fische.ini","Fische",$Zander,"0")
IniWrite(@ScriptDir &"\Fische.ini","Fische",$Manderinenfisch,"0")
IniWrite(@ScriptDir &"\Fische.ini","Fische",$Graskarpfen,"0")
IniWrite(@ScriptDir &"\Fische.ini","Fische",$Bachforelle,"0")
IniWrite(@ScriptDir &"\Fische.ini","Fische",$Lachs,"0")
IniWrite(@ScriptDir &"\Fische.ini","Fische",$RotFeder,"0")
IniWrite(@ScriptDir &"\Fische.ini","Fische",$Regenbogenforelle,"0")
IniWrite(@ScriptDir &"\Fische.ini","Fische",$Barsch,"0")
IniWrite(@ScriptDir &"\Fische.ini","Fische",$Karpfen,"0")
IniWrite(@ScriptDir &"\Fische.ini","Fische",$Grosserzander,"0")
IniWrite(@ScriptDir &"\Fische.ini","Fische",$Tenchi,"0")
und was bringt das?
ich glaube, du hast das ganze prinzip noch nicht so recht verstanden
|
|
|
|
|
04/09/2009, 22:30
|
#3
|
elite*gold: 0
Join Date: Mar 2009
Posts: 502
Received Thanks: 111
|
Quote:
IniWrite(@ScriptDir &"\Fische.ini","Fische",$Zander,"0")
IniWrite(@ScriptDir &"\Fische.ini","Fische",$Manderinenfisch,"0")
IniWrite(@ScriptDir &"\Fische.ini","Fische",$Graskarpfen,"0")
IniWrite(@ScriptDir &"\Fische.ini","Fische",$Bachforelle,"0")
IniWrite(@ScriptDir &"\Fische.ini","Fische",$Lachs,"0")
IniWrite(@ScriptDir &"\Fische.ini","Fische",$RotFeder,"0")
IniWrite(@ScriptDir &"\Fische.ini","Fische",$Regenbogenforelle,"0")
IniWrite(@ScriptDir &"\Fische.ini","Fische",$Barsch,"0")
IniWrite(@ScriptDir &"\Fische.ini","Fische",$Karpfen,"0")
IniWrite(@ScriptDir &"\Fische.ini","Fische",$Grosserzander,"0")
IniWrite(@ScriptDir &"\Fische.ini","Fische",$Tenchi,"0")
|
das ist dazu da das er erstma die gesamt ini erstellt.
Quote:
$Zanderus soll dann der neue ausgabe wert sein der dann eingegeben wird.Und mit $Zander +1 ist gemeint das er den aktuel wert der ini +1 in dem beispiel also den zander setzten soll
|
|
|
|
|
04/10/2009, 10:29
|
#4
|
elite*gold: 0
Join Date: Jul 2008
Posts: 188
Received Thanks: 362
|
Probier das ganze mal so:
PHP Code:
#RequireAdmin
HotKeySet("{F5}", "Start")
HotKeySet("{F6}", "Ende")
Opt("PixelCoordMode", 2)
Opt("MouseCoordMode", 2)
While (1)
Sleep(1000)
WEnd
Func START()
While (1)
$ZANDER = PixelSearch(854,408,1015,698,0xCECB94)
If Not @error Then
MouseClick("right", $ZANDER[0], $ZANDER[1])
sleep (500)
$Zanderus= $Zanderus+1
IniWrite(@ScriptDir &"\Fische.ini","Fische","Zander",$Zanderus)
EndIf
$MANDERINENFISCH = PixelSearch(855, 411, 1018, 700, 0x847531)
If Not @error Then
MouseClick("right", $MANDERINENFISCH[0], $MANDERINENFISCH[1])
sleep (500)
$mandus =$mandus+1
IniWrite(@ScriptDir &"\Fische.ini","Fische","Mandarinenfisch",$mandus)
EndIf
$GRASKARPFEN = PixelSearch(855, 411, 1018, 700,0xBDAA84)
If Not @error Then
MouseClick("right", $GRASKARPFEN[0], $GRASKARPFEN[1])
$grassi =$grassi+1
IniWrite(@ScriptDir &"\Fische.ini","Fische","Graskarpfen",$grassi)
EndIf
$BACHFORELLE = PixelSearch(855, 411, 1018, 700, 8750458)
If Not @error Then
MouseClick("right", $BACHFORELLE[0], $BACHFORELLE[1])
$Bachi=$Bachi+1
IniWrite(@ScriptDir &"\Fische.ini","Fische","Bachforelle",$Bachi)
EndIf
$LACHS = PixelSearch(855, 411, 1018, 700, 4739613)
If Not @error Then
MouseClick("right", $LACHS[0], $LACHS[1])
$lachsi=$Lachs+1
IniWrite(@ScriptDir &"\Fische.ini","Fische","Zander",$lachsi)
EndIf
$ROTFEDER = PixelSearch(855, 411, 1018, 700, 15849652)
If Not @error Then
MouseClick("right", $ROTFEDER[0], $ROTFEDER[1])
$Feder=$Feder+1
IniWrite(@ScriptDir &"\Fische.ini","Fische","Rotfeder",$Feder)
EndIf
$REGENBOGENFORELLE = PixelSearch(855, 411, 1018, 700, 11775653)
If Not @error Then
MouseClick("right", $REGENBOGENFORELLE[0], $REGENBOGENFORELLE[1])
$regen= $regen+1
IniWrite(@ScriptDir &"\Fische.ini","Fische","Regenbogenforelle",$regen)
EndIf
$BARSCH = PixelSearch(855, 411, 1018, 700, 3751230)
If Not @error Then
MouseClick("right", $BARSCH[0], $BARSCH[1])
$Barrsch= $Barrsch+1
IniWrite(@ScriptDir &"\Fische.ini","Fische","Barsch",$Barrsch)
EndIf
$KARPFEN = PixelSearch(855, 411, 1018, 700, 0xAD7573)
If Not @error Then
MouseClick("right", $KARPFEN[0], $KARPFEN[1])
$Krapfen=$Krapfen+1
IniWrite(@ScriptDir &"\Fische.ini","Fische","Karpfen",$Krapfen)
EndIf
$GROSSERZANDER = PixelSearch(855, 411, 1018, 700, 8818150)
If Not @error Then
MouseClick("right", $GROSSERZANDER[0], $GROSSERZANDER[1])
$fetterzander= $fetterzander+1
IniWrite(@ScriptDir &"\Fische.ini","Fische","GrosserZander",$fetterzander)
EndIf
$TENCHI = PixelSearch(855, 411, 1018, 700, 13487970)
If Not @error Then
MouseClick("right", $TENCHI[0], $TENCHI[1])
$Thi=$Thi+1
IniWrite(@ScriptDir &"\Fische.ini","Fische","Tenchi",$Thi)
EndIf
Sleep(1000)
WEnd
EndFunc
Func ENDE()
Exit
EndFunc
|
|
|
|
Similar Threads
|
Fischöffner
08/15/2010 - Metin2 - 6 Replies
Ich habe mal einen ganz simplen fisch und Muschelöffner
gebastelt...
Ich sage ganz Simpel weil er nicht einstellbar ist was er öffner
er klickt auf jedes Feld im Inventar auf Seite 1 manchmal auch 2...
Er Funktioniert im Fenstermodus
Hier der Link:
Ich wünsch euch viel Spaß damit
|
autoit fischöffner
01/10/2010 - Metin2 - 0 Replies
könnt ihr mir mal vllt sagen wie ich ne funktion einbauen kann, dass der bot erkennt, ob er nun gerade wirklich den zander geöffnet hat oder so ?
|
Fischöffner?
12/28/2008 - Metin2 Private Server - 2 Replies
Hallo lieben User.
Da ich leider nicht Fähig bin ein Fischöffner für den P server zu machen (kenne mich net mit dem scripten aus) wollte ich hier fragen ob einer einen machen könnte.
|
All times are GMT +1. The time now is 17:51.
|
|
![[AutoIT] Fischöffner ini](https://www.elitepvpers.com/forum/iconimages/autoit/autoit-fisch-ffner-ini_ltr.gif){kind=small}
