|
You last visited: Today at 01:03
Advertisement
bitte einmal helfen
Discussion on bitte einmal helfen within the GW Bots forum part of the Guild Wars category.
01/28/2009, 21:04
|
#1
|
elite*gold: 0 
Join Date: Jun 2008
Posts: 350
Received Thanks: 67
|
bitte einmal helfen
Halli Hallo,
habe das problem, dass ich einen button bei einem gui einer func anfügen will. Nur wenn ich den button drücke tut sich nix-.-
Quote:
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Bot", 341, 152, 193, 125)
$GO = GUICtrlCreateButton("GO", 184, 72, 153, 73, 0)
$Input1 = GUICtrlCreateInput("Hier-Rundenanzahl", 8, 16, 153, 21)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$msg=GuiGetMsg()
If $msg=-1 Then Exit
If $msg=$GO Then button1()
Wend
func button1()
Call("alles")
EndFunc
|
Bitte einmal helfen. Finde auch keine lösung bei nem anderen script. I-wie alles was ich davon nehme funkt net ...
danke schonmal im vorraus 
|
|
|
|
01/28/2009, 21:08
|
#2
|
elite*gold: 0
Join Date: Jul 2008
Posts: 614
Received Thanks: 164
|
PHP Code:
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Bot", 341, 152, 193, 125)
$GO = GUICtrlCreateButton("GO", 184, 72, 153, 73, 0)
$Input1 = GUICtrlCreateInput("Hier-Rundenanzahl", 8, 16, 153, 21)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Btn1
_Btn1()
EndSwitch
WEnd
Func _Btn1()
_alles()
EndFunc
Bitte niemals Call benutzen.. immer ganz normal aufrufen..Also
PHP Code:
_Func($flag1, $flag2, $bla)
|
|
|
|
|
01/29/2009, 21:56
|
#3
|
elite*gold: 0
Join Date: Jun 2008
Posts: 350
Received Thanks: 67
|
ok also das ganze sieht jetzt so aus aber tut sich trotzdem nix
Quote:
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Bot", 341, 152, 193, 125)
$GO = GUICtrlCreateButton("GO", 184, 72, 153, 73, 0)
$Input1 = GUICtrlCreateInput("Hier-Rundenanzahl", 8, 16, 153, 21)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $GO
_Btn1()
EndSwitch
WEnd
Func _Btn1()
alles()
EndFunc
|
|
|
|
|
|
01/30/2009, 18:59
|
#4
|
elite*gold: 0
Join Date: Jul 2008
Posts: 614
Received Thanks: 164
|
PHP Code:
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Bot", 341, 152, 193, 125)
$GO = GUICtrlCreateButton("GO", 184, 72, 153, 73, 0)
$Input1 = GUICtrlCreateInput("Hier-Rundenanzahl", 8, 16, 153, 21)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Go
_Go()
EndSwitch
WEnd
Func _Go()
MsgBox(0x40, "Test", "Hat geklappt, nu mach nochma THX-Button")
EndFunc
Das geht..
|
|
|
|
|
02/01/2009, 19:17
|
#5
|
elite*gold: 0
Join Date: Jun 2008
Posts: 350
Received Thanks: 67
|
ok danke also an dem gui kanns nicht mehr liegen nur er startet trotzdem nicht^^
|
|
|
|
|
02/01/2009, 19:19
|
#6
|
elite*gold: 20
Join Date: Feb 2007
Posts: 3,080
Received Thanks: 4,294
|
dann liegt es an deinem restlichen code, der aufruf ist richtig.
|
|
|
|
|
02/03/2009, 15:17
|
#7
|
elite*gold: 0
Join Date: Jun 2008
Posts: 350
Received Thanks: 67
|
PHP Code:
Opt("WinWaitDelay",100)
Opt("WinTitleMatchMode",4)
Opt("WinDetectHiddenText",1)
Opt("MouseCoordMode",0)
WinWait("Guild Wars","")
If Not WinActive("Guild Wars","") Then WinActivate("Guild Wars","")
WinWaitActive("Guild Wars","")
#cs ----------------------------------------------------------------------------
AutoIt Version: 3.3.0.0
Author: bunney
TT6 MoveTo by tonitusch666
Script Function:
Thermalquellen farmen (55hp/HM)
#ce ----------------------------------------------------------------------------
#include "tt6.au3"
#include "nomadmemory.au3"
while 1
alles()
WEnd
HotKeySet("{PAUSE}", "TogglePause")
HotKeySet("{End}", "_end") ;-Mit "Ende" Beendest du das Script
Func _end()
Exit
EndFunc ;==>_end
Global $Paused
Func TogglePause()
$Paused = NOT $Paused
While $Paused
sleep(100)
ToolTip('Script is "Paused"',0,0)
WEnd
ToolTip("Script is running")
If Not WinActivate("Guild Wars") Then
WinActivate("Guild Wars")
EndIf
Sleep(2000)
EndFunc
Global $check_map = IniRead("update.ini","SECTION D","CHECK_MAP","NotFound")
Func RS($min, $max)
$time = Random($min, $max)
Sleep($time)
EndFunc
Func randomw()
$wayout = Random(1,6,1)
If $wayout = 1 Then
wayout2()
ElseIf $wayout = 2 Then
wayout6()
ElseIf $wayout = 3 Then
wayout1()
ElseIf $wayout = 4 Then
wayout2()
ElseIf $wayout = 5 Then
wayout3()
Else
wayout4()
EndIf
EndFunc
Func wayout1()
PrepMoveTo()
MoveTo(1,18445+(Random(-4,4)),-16592+(Random(-4,4)))
MoveTo(1,17816+(Random(-4,4)),-16582+(Random(-4,4)))
MoveTo(1,17198+(Random(-4,4)),-16498+(Random(-4,4)))
MoveTo(1,16926+(Random(-4,4)),-16458+(Random(-4,4)))
MoveTo(1,16465+(Random(-4,4)),-16405+(Random(-4,4)))
MoveTo(1,16197+(Random(-4,4)),-16274+(Random(-4,4)))
MoveTo(1,16034+(Random(-4,4)),-16129+(Random(-4,4)))
MoveTo(1,15818+(Random(-4,4)),-15993+(Random(-4,4)))
MoveTo(1,15636+(Random(-4,4)),-15867+(Random(-4,4)))
MoveTo(1,15532+(Random(-4,4)),-15711+(Random(-4,4)))
MoveTo(1,15542+(Random(-4,4)),-15488+(Random(-4,4)))
MoveTo(1,15538+(Random(-4,4)),-15347+(Random(-4,4)))
KeepMoveTo()
While _memoryread($check_map,$hprocess,'int')<>1
RS(25,50)
WEnd
StopMoveTo()
EndFunc
Func wayout2()
PrepMoveTo()
MoveTo(1,18206+(Random(-4,4)),-16426+(Random(-4,4)))
MoveTo(1,17974+(Random(-4,4)),-16279+(Random(-4,4)))
MoveTo(1,17820+(Random(-4,4)),-16115+(Random(-4,4)))
MoveTo(1,17485+(Random(-4,4)),-15956+(Random(-4,4)))
MoveTo(1,17240+(Random(-4,4)),-15940+(Random(-4,4)))
MoveTo(1,17033+(Random(-4,4)),-15963+(Random(-4,4)))
MoveTo(1,16775+(Random(-4,4)),-15966+(Random(-4,4)))
MoveTo(1,16574+(Random(-4,4)),-15884+(Random(-4,4)))
MoveTo(1,16429+(Random(-4,4)),-15846+(Random(-4,4)))
MoveTo(1,16185+(Random(-4,4)),-15857+(Random(-4,4)))
MoveTo(1,15999+(Random(-4,4)),-15844+(Random(-4,4)))
MoveTo(1,15769+(Random(-4,4)),-15773+(Random(-4,4)))
MoveTo(1,15583+(Random(-4,4)),-15704+(Random(-4,4)))
MoveTo(1,15469+(Random(-4,4)),-15540+(Random(-4,4)))
MoveTo(1,15415+(Random(-4,4)),-15413+(Random(-4,4)))
MoveTo(1,15425+(Random(-4,4)),-15256+(Random(-4,4)))
MoveTo(1,15440+(Random(-4,4)),-15063+(Random(-4,4)))
KeepMoveTo()
While _memoryread($check_map,$hprocess,'int')<>1
RS(25,50)
WEnd
StopMoveTo()
EndFunc
Func wayout3()
PrepMoveTo()
MoveTo(1,18474+(Random(-4,4)),-16489+(Random(-4,4)))
MoveTo(1,18276+(Random(-4,4)),-16406+(Random(-4,4)))
MoveTo(1,18047+(Random(-4,4)),-16336+(Random(-4,4)))
MoveTo(1,17798+(Random(-4,4)),-16298+(Random(-4,4)))
MoveTo(1,17535+(Random(-4,4)),-16340+(Random(-4,4)))
MoveTo(1,17327+(Random(-4,4)),-16414+(Random(-4,4)))
MoveTo(1,17090+(Random(-4,4)),-16482+(Random(-4,4)))
MoveTo(1,16829+(Random(-4,4)),-16480+(Random(-4,4)))
MoveTo(1,16530+(Random(-4,4)),-16354+(Random(-4,4)))
MoveTo(1,16297+(Random(-4,4)),-16195+(Random(-4,4)))
MoveTo(1,16139+(Random(-4,4)),-15993+(Random(-4,4)))
MoveTo(1,15997+(Random(-4,4)),-15812+(Random(-4,4)))
MoveTo(1,15845+(Random(-4,4)),-15617+(Random(-4,4)))
MoveTo(1,15656+(Random(-4,4)),-15472+(Random(-4,4)))
MoveTo(1,15511+(Random(-4,4)),-15303+(Random(-4,4)))
MoveTo(1,15457+(Random(-4,4)),-15103+(Random(-4,4)))
KeepMoveTo()
While _memoryread($check_map,$hprocess,'int')<>1
RS(25,50)
WEnd
StopMoveTo()
EndFunc
Func wayout4()
PrepMoveTo()
MoveTo(1,18416+(Random(-4,4)),-16468+(Random(-4,4)))
MoveTo(1,18089+(Random(-4,4)),-16284+(Random(-4,4)))
MoveTo(1,17726+(Random(-4,4)),-16160+(Random(-4,4)))
MoveTo(1,17415+(Random(-4,4)),-16153+(Random(-4,4)))
MoveTo(1,17106+(Random(-4,4)),-16314+(Random(-4,4)))
MoveTo(1,16862+(Random(-4,4)),-16410+(Random(-4,4)))
MoveTo(1,16515+(Random(-4,4)),-16375+(Random(-4,4)))
MoveTo(1,16181+(Random(-4,4)),-16181+(Random(-4,4)))
MoveTo(1,15866+(Random(-4,4)),-15857+(Random(-4,4)))
MoveTo(1,15622+(Random(-4,4)),-15578+(Random(-4,4)))
MoveTo(1,15549+(Random(-4,4)),-15395+(Random(-4,4)))
MoveTo(1,15445+(Random(-4,4)),-15267+(Random(-4,4)))
MoveTo(1,15365+(Random(-4,4)),-15190+(Random(-4,4)))
MoveTo(1,15358+(Random(-4,4)),-15081+(Random(-4,4)))
KeepMoveTo()
While _memoryread($check_map,$hprocess,'int')<>1
RS(25,50)
WEnd
StopMoveTo()
EndFunc
Func wayout5()
PrepMoveTo()
MoveTo(1,18273+(Random(-4,4)),-16535+(Random(-4,4)))
MoveTo(1,18036+(Random(-4,4)),-16434+(Random(-4,4)))
MoveTo(1,17780+(Random(-4,4)),-16366+(Random(-4,4)))
MoveTo(1,17505+(Random(-4,4)),-16303+(Random(-4,4)))
MoveTo(1,17442+(Random(-4,4)),-16288+(Random(-4,4)))
MoveTo(1,17385+(Random(-4,4)),-16264+(Random(-4,4)))
MoveTo(1,17357+(Random(-4,4)),-16244+(Random(-4,4)))
MoveTo(1,17324+(Random(-4,4)),-16206+(Random(-4,4)))
MoveTo(1,17255+(Random(-4,4)),-16009+(Random(-4,4)))
MoveTo(1,17050+(Random(-4,4)),-15918+(Random(-4,4)))
MoveTo(1,16532+(Random(-4,4)),-15898+(Random(-4,4)))
MoveTo(1,16244+(Random(-4,4)),-15890+(Random(-4,4)))
MoveTo(1,16013+(Random(-4,4)),-15879+(Random(-4,4)))
MoveTo(1,15787+(Random(-4,4)),-15823+(Random(-4,4)))
MoveTo(1,15638+(Random(-4,4)),-15704+(Random(-4,4)))
MoveTo(1,15543+(Random(-4,4)),-15527+(Random(-4,4)))
MoveTo(1,15478+(Random(-4,4)),-15335+(Random(-4,4)))
MoveTo(1,15454+(Random(-4,4)),-15206+(Random(-4,4)))
MoveTo(1,15445+(Random(-4,4)),-15161+(Random(-4,4)))
MoveTo(1,15435+(Random(-4,4)),-15109+(Random(-4,4)))
MoveTo(1,15411+(Random(-4,4)),-14983+(Random(-4,4)))
KeepMoveTo()
While _memoryread($check_map,$hprocess,'int')<>1
RS(25,50)
WEnd
StopMoveTo()
EndFunc
Func wayout6()
PrepMoveTo()
MoveTo(1,18313+(Random(-4,4)),-16573+(Random(-4,4)))
MoveTo(1,18101+(Random(-4,4)),-16457+(Random(-4,4)))
MoveTo(1,17842+(Random(-4,4)),-16395+(Random(-4,4)))
MoveTo(1,17579+(Random(-4,4)),-16495+(Random(-4,4)))
MoveTo(1,17361+(Random(-4,4)),-16579+(Random(-4,4)))
MoveTo(1,17236+(Random(-4,4)),-16625+(Random(-4,4)))
MoveTo(1,17074+(Random(-4,4)),-16672+(Random(-4,4)))
MoveTo(1,16952+(Random(-4,4)),-16697+(Random(-4,4)))
MoveTo(1,16884+(Random(-4,4)),-16703+(Random(-4,4)))
MoveTo(1,16820+(Random(-4,4)),-16705+(Random(-4,4)))
MoveTo(1,16769+(Random(-4,4)),-16705+(Random(-4,4)))
MoveTo(1,16708+(Random(-4,4)),-16701+(Random(-4,4)))
MoveTo(1,16569+(Random(-4,4)),-16685+(Random(-4,4)))
MoveTo(1,16168+(Random(-4,4)),-16514+(Random(-4,4)))
MoveTo(1,15961+(Random(-4,4)),-16347+(Random(-4,4)))
MoveTo(1,15840+(Random(-4,4)),-16102+(Random(-4,4)))
MoveTo(1,15712+(Random(-4,4)),-15844+(Random(-4,4)))
MoveTo(1,15657+(Random(-4,4)),-15639+(Random(-4,4)))
MoveTo(1,15640+(Random(-4,4)),-15410+(Random(-4,4)))
MoveTo(1,15589+(Random(-4,4)),-15227+(Random(-4,4)))
MoveTo(1,15537+(Random(-4,4)),-15096+(Random(-4,4)))
MoveTo(1,15519+(Random(-4,4)),-15016+(Random(-4,4)))
KeepMoveTo()
While _memoryread($check_map,$hprocess,'int')<>1
RS(25,50)
WEnd
StopMoveTo()
EndFunc
Func _TQfigth()
RS(1000,1600)
Send("8")
RS(6500, 7000)
Send("7")
RS(6500, 7000)
Send("6")
RS(6500, 7000)
Send("5")
RS(3000, 3500)
Send("4")
RS(12000, 13000)
Send("1")
RS(700, 800)
Send("4")
RS(2500, 2510)
Send("{w down}")
RS(3000, 3010)
Send("{w up}")
RS(1000, 1010)
Send("{e down}")
RS(2000, 2010)
Send("{e up}")
RS(500, 510)
Send("1")
RS(700, 710)
Send("2")
RS(1200, 1300)
Send("{w down}")
RS(6700, 6750)
Send("{w up}")
RS(90, 100)
Send("2")
RS(1000, 1100)
Send("{q down}")
RS(2600, 2700)
Send("{q up}")
RS(100, 110)
Send("1")
RS(600, 700)
Send("{q down}")
RS(2600, 2700)
Send("{q up}")
RS(200, 400)
Send("2")
RS(1500, 1600)
Send("4")
RS(2000, 2010)
Send("1")
RS(2000, 2010)
Send("3")
RS(3000, 3100)
Send("2")
RS(3000, 3100)
Send("1")
RS(3000, 3100)
Send("2")
RS(3000, 3100)
Send("1")
RS(1500, 1600)
Send("4")
RS(3000, 3100)
Send("2")
RS(3000, 3100)
Send("1")
RS(3000, 3100)
EndFunc
Func _afterfight()
For $ii = 1 To 5
RS(1100, 1200)
Send("{o}")
RS(1100, 1200)
Send("{SPACE}")
RS(3200, 3300)
Next
Send("1")
RS(2000, 2010)
Send("2")
RS(1400, 1500)
Send("{NUMPAD8}")
RS(1100, 1200)
Send("{SPACE}")
RS(3500, 3800)
Send("{ENTER}")
RS(1150, 1200)
Send("/giveup", 1)
RS(1150, 1200)
Send("{ENTER}")
RS(3500, 3700)
MouseClick("left", 519+Random(-20,+20), 415+Random(-2,+2))
While _memoryread($check_map,$hprocess,'int')<>1
RS(25,50)
WEnd
RS(50,80)
EndFunc
Func kampf()
RS(3500,4500)
Randomw()
_TQfigth()
_afterfight()
EndFunc
.
.
.Hier wären noch vk funv und so
.
Func alles()
$runden = 12
$l=0
For $l = $runden+Random(-1,+4) to 1 step -1
RS(10,20)
kampf()
Next
VK()
EndFunc
so also den weg nach draußen macht er aber draußen angekommen beendet sich das script...was ist falsch???
|
|
|
|
|
02/03/2009, 15:49
|
#8
|
elite*gold: 38
Join Date: Dec 2008
Posts: 1,339
Received Thanks: 462
|
steht nicht wenn du es als script im script editor ausführst irgentwas da??
weil zu sehen ist bis jetzt nichts
|
|
|
|
|
02/03/2009, 16:12
|
#9
|
elite*gold: 0
Join Date: Jun 2008
Posts: 350
Received Thanks: 67
|
nein das ist ja mein problem
ich starte es
es läuft den wayout und dann beendet es sich/tut nix mehr...
|
|
|
|
|
02/11/2009, 17:08
|
#10
|
elite*gold: 0
Join Date: Jun 2008
Posts: 350
Received Thanks: 67
|
möp ok hab ihn jetzt zum laufen gebracht alo er macht 12 runs und dann soll er eig VKen aber er fängt die Vk funk net an slo pls help
PHP Code:
Func VK()
While _memoryread($check_map,$hprocess,'int')<>1
RS(25,50)
WEnd
randomstorage()
RS(200,800)
ablegen()
RS(200,800)
_gold()
RS(200,800)
ident()
RS(200,800)
randomVkWay()
RS(200,800)
VkHaendler()
RS(200,800)
EndFunc
$runs=0
while True
Select
case $runs < 12
kampf()
$runs = $runs +1
case Else
VK()
$runs = $runs -12
EndSelect
WEnd
|
|
|
|
|
02/11/2009, 18:01
|
#11
|
elite*gold: 45
Join Date: Nov 2008
Posts: 4,308
Received Thanks: 991
|
PHP Code:
Func MainFunc()
$i = 0
$maxrounds = 10 ;bsp.
While 1
If $i = $maxrounds Then
Sell()
EndIf
;Main Code +
$i = $i + 1
WEnd
EndFunc ;==> MainFunc
Func _Sell()
While $sell = True
$VK = 25 ;Itemplatzanzahl
;Sell Funktion Code
If $VK = 25 Then $sell = False And MainFunc()
WEnd
EndFunc ;==> _Sell
Müsste so funzen...
|
|
|
|
|
02/11/2009, 18:08
|
#12
|
elite*gold: 0
Join Date: Jun 2008
Posts: 350
Received Thanks: 67
|
PHP Code:
Func VkHaendler()
RS(50,300)
MouseClick("left",580+Random(-10,+10),55+Random(-2,+3))
RS(50,300)
MouseClick("left",780+Random(-10,+10),700+Random(-2,+3))
For $iii = 1 To 20
MouseClick("left",780+Random(-10,+10),700+Random(-2,+3))
RS(800,1200)
Next
RS(50,800)
Send("{ESC}")
EndFunc
Func VK()
randomstorage()
RS(200,800)
ablegen()
RS(200,800)
_gold()
RS(200,800)
ident()
RS(200,800)
randomVkWay()
RS(200,800)
VkHaendler()
RS(200,800)
EndFunc
$runs=0
while True
Select
case $runs < 12
kampf()
$runs = $runs +1
case $runs = 12
VK()
$runs = $runs -12
EndSelect
WEnd
also deins verstehe ich net ganz^^ bitte erklären^^.
also wenn max anzahl den sell()
und denn 25x VK??
|
|
|
|
|
02/11/2009, 18:25
|
#13
|
elite*gold: 45
Join Date: Nov 2008
Posts: 4,308
Received Thanks: 991
|
Ne, wie oft er überhaupt verkaufen will.
Du musst die Itemplatzanzahl angeben...
Das ist nur dafür da, dass er weiss wann die nächste Func anfängt..
|
|
|
|
|
02/11/2009, 18:30
|
#14
|
elite*gold: 0
Join Date: Jun 2008
Posts: 350
Received Thanks: 67
|
hat sich erledigt^^
|
|
|
|
Similar Threads
|
einmal hilfe bitte
09/01/2010 - Metin2 Private Server - 4 Replies
hey ihr
jo ich wieder sorry wenn ich nerve aber wir ver suchen uff netbook hamachi zu mach aber er will das nicht in netzwerk anzeigen
bitte keine spamms wie meistens
|
Bitte einmal Reinschauen.
04/05/2010 - Main - 5 Replies
Wäre es möglich , auf diese Seite als 3ter Zugriff zu bekommen?
Traumhochzeit
Wen der link verboten ist, Sagt bescheid dan nehme ich ihn Raus.
|
Einmal Captcha lösen bitte = ein THX
08/14/2009 - Metin2 Private Server - 0 Replies
Wer wäre so nett & würde mir folgendes Captcha lösen ?
http://img252.imageshack.us/img252/9643/authcodep hpt.png
Als Belohnung gibt ein THX. Vielen Dank im Voraus. :)
|
All times are GMT +1. The time now is 01:06.
|
|
