You last visited: Today at 07:36
Advertisement
AdlibEnable Proplem
Discussion on AdlibEnable Proplem within the AutoIt forum part of the Coders Den category.
05/15/2010, 12:06
#1
elite*gold: 0
Join Date: Jan 2009
Posts: 393
Received Thanks: 46
AdlibEnable Proplem
Hallu
es geht um den teil des scriptes wenn ich beim ganzen ausführen drücke kommt dieses:
C:\Users\user\Desktop\Alles\Farmbot\Farmbott.au3(1 94,28) : ERROR: AdlibEnable(): undefined function.
AdlibEnable( "_aura", 60000)
~~~~~~~~~~~~~~~~~~~~~~~~~~~^
C:\Users\user\Desktop\Alles\Farmbot\Farmbott.au3(2 24,14) : ERROR: AdlibDisable(): undefined function.
AdlibDisable()
Code:
Func _Start3()
$start3 = 1
AdlibEnable( "_aura", 60000)
EndFunc
func _aura()
Send ("^h")
Sleep(100)
Send ("1")
Sleep(100)
Send ("^h")
sleep(1000)
Send ("1h")
Sleep(100)
Send ("1")
Sleep(100)
Send ("^h")
EndFunc
und zum unteren um diesen teil:
Code:
Func _pause()
Sleep(1)
$start = 0
$start2 = 0
$start3 = 0
AdlibDisable()
meine frage was ist da falsch ? hier das komplette [fast xD]
Code:
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <Security.au3>
#include <UDFGlobalID.au3>
#include <GuiSlider.au3>
#include <IE.au3>
#Region ### START Koda GUI section ### Form=
$gui = GUICreate("Farmbot © by repins94 ", 163, 421, 192, 124)
GUISetIcon("C:\Users\user\Desktop\Alles\Bilder\Aut oIT icon\logo16x16.ico")
GUISetFont(10, 400, 0, "Comic Sans MS")
GUISetBkColor(0xA0A0A0)
$Button1 = GUICtrlCreateButton("Start|Go", 8, 8, 145, 41, $WS_GROUP)
GUICtrlSetColor(-1, 0x800000)
$Button2 = GUICtrlCreateButton("Pause|Break", 8, 56, 145, 41, $WS_GROUP)
GUICtrlSetColor(-1, 0x800000)
$Button3 = GUICtrlCreateButton("Ende|Finish", 8, 104, 145, 41, $WS_GROUP)
GUICtrlSetColor(-1, 0x800000)
$Button4 = GUICtrlCreateButton("Potten", 8, 152, 145, 41, $WS_GROUP)
GUICtrlSetColor(-1, 0x800000)
$Button5 = GUICtrlCreateButton("Sk | Aura", 8, 200, 145, 41, $WS_GROUP)
GUICtrlSetColor(-1, 0x800000)
$Pic1 = GUICtrlCreatePic("C:\Users\user\Desktop\Farmbot\av atar1105624_2.gif.jpg", 8, 256, 145, 97, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS))
$Button6 = GUICtrlCreateButton("Instrucion", 0, 376, 73, 25, $WS_GROUP)
GUICtrlSetColor(-1, 0x800000)
$Button7 = GUICtrlCreateButton("Copyright", 88, 376, 73, 25, $WS_GROUP)
GUICtrlSetColor(-1, 0x800000)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
Global $start = 0
Global $start2 = 0
Global $start3 = 0
Global $pause = 0
While True
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button6
MsgBox(1, "Anleitung", "Drückt Start um zu Schlagen,Picupen und Aura/Sk anzumach und Potten um Blaue|Rote pots zu schlucken.Dazu müssen Aura F1 und Blaue|Rote pots 1und 2 sein", 1000)
Case $Button7
MsgBox(1,"Credits","© repins94 - Alle Rechte vorbehalten, insbesondere das Recht auf Vervielfältigung und Verbreitung. Kein Teil dieses Source-Codes darf in irgendeiner Form ohne ausdrückliche Genehmigung von repins94 (mit Screenshot) für öffentliche Zwecke verändert, vervielfältigt oder verbreitet werden.Das gewerbliche verbreiten des Bots oder des Source-Codes ist strikt zu unterlassen, solange der Urheber (repins94) es nicht ausdrücklich nach der Annahme des möglicherweise veränderten Scriptes eingewilligt hat(mit Screenshot).Für mögliche Hardwareprobleme, Softwareprobleme oder gar Hardware- und/oder Softwareschäden wird nicht gehaftet.Die Programmbenutzung und die damit verbundenen möglichen Konsequenzen (z.B. Accountban, Itemverlust) werden mit dem Download einer der angehängten Dateien in Rücksicht genommen und gehaftet.Jegliche Regeländerungen sind ab dem Zeitpunkt des Edits zu beachten und ggbf. zu befolgen.",1000)
Case $Button1
GUICtrlSetBkColor($Button1, 0x00FF00)
GUICtrlSetBkColor($Button2, Default)
GUICtrlSetBkColor($Button3, Default)
GUICtrlSetBkColor($Button4, Default)
GUICtrlSetBkColor($Button5, Default)
GUICtrlSetStyle($Button2, $GUI_SS_DEFAULT_BUTTON)
GUICtrlSetStyle($Button3, $GUI_SS_DEFAULT_BUTTON)
GUICtrlSetStyle($Button4, $GUI_SS_DEFAULT_BUTTON)
GUICtrlSetStyle($Button5, $GUI_SS_DEFAULT_BUTTON)
_Start()
Case $Button2
GUICtrlSetBkColor($Button2, Default)
GUICtrlSetBkColor($Button3, 0xFFFF00)
GUICtrlSetBkColor($Button4, Default)
GUICtrlSetBkColor($Button5, Default)
GUICtrlSetBkColor($Button6, Default)
GUICtrlSetStyle($Button2, $GUI_SS_DEFAULT_BUTTON)
GUICtrlSetStyle($Button4, $GUI_SS_DEFAULT_BUTTON)
GUICtrlSetStyle($Button5, $GUI_SS_DEFAULT_BUTTON)
GUICtrlSetStyle($Button6, $GUI_SS_DEFAULT_BUTTON)
_pause()
Case $Button3
GUICtrlSetBkColor($Button1, Default)
GUICtrlSetBkColor($Button2, Default)
GUICtrlSetBkColor($Button3, 0xFF0000)
GUICtrlSetBkColor($Button4, Default)
GUICtrlSetBkColor($Button5, Default)
GUICtrlSetStyle($Button1, $GUI_SS_DEFAULT_BUTTON)
GUICtrlSetStyle($Button2, $GUI_SS_DEFAULT_BUTTON)
GUICtrlSetStyle($Button4, $GUI_SS_DEFAULT_BUTTON)
GUICtrlSetStyle($Button5, $GUI_SS_DEFAULT_BUTTON)
_Ende()
Case $Button4
NeuesGUI()
GUICtrlSetBkColor($Button1, Default)
GUICtrlSetBkColor($Button2, Default)
GUICtrlSetBkColor($Button3, Default)
GUICtrlSetBkColor($Button4, 0x00FF00)
GUICtrlSetBkColor($Button5, Default)
GUICtrlSetStyle($Button2, $GUI_SS_DEFAULT_BUTTON)
GUICtrlSetStyle($Button3, $GUI_SS_DEFAULT_BUTTON)
GUICtrlSetStyle($Button4, $GUI_SS_DEFAULT_BUTTON)
GUICtrlSetStyle($Button5, $GUI_SS_DEFAULT_BUTTON)
_Start2()
Case $Button5
GUICtrlSetBkColor($Button1, Default)
GUICtrlSetBkColor($Button2, Default)
GUICtrlSetBkColor($Button3, Default)
GUICtrlSetBkColor($Button4, Default)
GUICtrlSetBkColor($Button5, 0x00FF00)
GUICtrlSetStyle($Button3, $GUI_SS_DEFAULT_BUTTON)
GUICtrlSetStyle($Button4, $GUI_SS_DEFAULT_BUTTON)
GUICtrlSetStyle($Button2, $GUI_SS_DEFAULT_BUTTON)
GUICtrlSetStyle($Button5, $GUI_SS_DEFAULT_BUTTON)
_Start3()
EndSwitch
If $start = 1 Then
Send(" ")
Send("y")
EndIf
If $start2 = 1 Then
Send("1")
Send("2")
EndIf
WEnd
*********
*********
*********
Func _Start()
$start = 1
EndFunc
Func _Start2()
$start2 = 1
EndFunc
Func _Start3()
$start3 = 1
AdlibEnable( "_aura", 60000)
EndFunc
func _aura()
Send ("^h")
Sleep(100)
Send ("1")
Sleep(100)
Send ("^h")
sleep(1000)
Send ("1h")
Sleep(100)
Send ("1")
Sleep(100)
Send ("^h")
EndFunc
Func _Ende()
MsgBox(0, "© by repins 94", "Scripted by repins94 and Bassbanane 4 E*pvpers", 10000)
Exit
EndFunc
Func _pause()
Sleep(1)
$start = 0
$start2 = 0
$start3 = 0
AdlibDisable()
EndFunc
Func Close()
Exit
EndFunc
05/15/2010, 12:19
#2
elite*gold: 1
Join Date: Oct 2008
Posts: 1,078
Received Thanks: 276
Probier anstelle von AdlibEnable mal AdLibRegister bzw. anstatt AdlibDisable AdlibUnregister
Wenn du es dir zutraust solltest du dein Script aber leiber so umbauen, dass du auf AdLibs verzichten kannst, da sie teilweise ziemlich nervig für das restliche Programm sein können...
05/15/2010, 12:22
#3
elite*gold: 0
Join Date: Jan 2009
Posts: 393
Received Thanks: 46
[quote=.nAno;5244949]Probier anstelle von AdlibEnable mal AdLibRegister bzw. anstatt AdlibDisable AdlibUnregister
geil xD das gibt en thx
Ohh gibt doch ein paar propleme
die knöpfe sind bisi verbuggt die flackern (denke das leigt am tasten egspamme) aber wenn ich ne neue gui öfne dann kann ich dir nur shcließen indem ich ein anderes fenster aus dem bot in dne vordergrund hohle und dnan so das hinetre schleiße und zu der _Aura func die soll strg+h dann f1 udn wieder strg+h drücken und das alle 60sec was aber jetz nichtmehr der fall ist :>
05/17/2010, 15:01
#4
elite*gold: 0
Join Date: Jul 2009
Posts: 880
Received Thanks: 2,455
Du kannst nicht nur AdlibDisable() machen sondern musst dann
AdlibDisable("_aura")
05/17/2010, 19:40
#5
elite*gold: 179
Join Date: Oct 2009
Posts: 7,853
Received Thanks: 8,558
Wenn schon AdlibUnregister...
AdlibDisable gibbet schon lange nicht mehr^^
05/18/2010, 16:46
#6
elite*gold: 20
Join Date: Feb 2007
Posts: 3,080
Received Thanks: 4,294
kommt drauf an welche autoit version man nutzt.
Similar Threads
a proplem in GW in 5165 +pic of proplem
08/04/2010 - CO2 Private Server - 1 Replies
i got this error when 2 guilds damge pole
http://img294.imageshack.us/img294/4554/201008040 04450.jpg
http://img830.imageshack.us/img830/4227/201008040 04604.jpg
can any one fix this error
i got this proplem when i get connect to my server+pic of proplem
06/19/2010 - CO2 Private Server - 4 Replies
when i got connect to my server on detacted host iget this error
http://img139.imageshack.us/img139/268/55208631.j pg
Proplem mit VPC
01/01/2010 - Metin2 Private Server - 11 Replies
Hallo Community ,
Habe nen Proplem mit meinem Virtual PC
bei vpc kommt bei mir immer
Welcome to FreeBSD !
Dann sind da halt ein paar sachen wie z.B
1.Boot FreeSBD
2.
3.
Frage zu AdlibEnable
10/17/2009 - GW Bots - 7 Replies
Hi, hab mal ne Frage zu AdlibEnable. Ich möchte eine Function nach einer gewissen Zeit starten also so, AdlibEnable("Beispiel",180000), dann soll halt ganz normal alles weiter gehen und wenn alles Koreckt durchgelaufen ist, möchte ich halt wieder AdlibDisable() (Die "Beispiel" Function) und wenn der halt Stuckt soll er nach 3min die "Beispiel" Function ausführen. Desweiteren habe ich das ganze noch in eine Schleifen gepackt. Also mein Problem liegt darin, dass der wenn er das erste Mal die...
AdlibEnable kann mann das auch ihrgendwie 3 fach laufen lassen
08/27/2009 - GW Bots - 5 Replies
wie gesgat würde gerne die AdlibEnable 3 mal hinetreinader starten geht aber ihrgendwie nicht gibts da was um das hinzubekommen ?
All times are GMT +2. The time now is 07:37 .