Hi,
werde das Teil bei Gelegenheit nochmal überarbeiten.
Der Fehler ist tatsächlich ein Bug. Da hab ich wohl vergessen an einigen Positionen den Pfad der Logdatei anzugeben.
Ich schreibs mir auf die To-Do-Liste.
Beiträge von BugFix
-
-
Mensch Lenny, du hättest ja wenigstens die roten Kontaktlinsen rausnehmen können....

-
Da du so geizig mit deinen Angaben bist ( Frauen sind doch eigentlich sehr schwatzhaft
), muß ich mal raten:
Du wählst einen Ordner aus, in dem die zu installierenden Dateien liegen. Aber auch ($MS sei Dank
) der allgegenwärtige Ordner RECYCLER.
Na dann editiere die erstellte Installdatei und schmeiß einfach die Zeile mit dem Recycler raus, oder? -
Die Schleife meintest du aber so:
[autoit]For $i = 1 to $var1[0] Step 1
[/autoit]
MsgBox(0,"","Zeichen " & $i & " = "&$var1[$i])
Next
-
Ich kann dir auch sagen, was du gesehen hast
Schließlich enthalten alle Zahlen, die der Rechenvorschrift entsprechen, dasselbe Symbol
-
Hi,
hier mal eine Lösungsvariante:Spoiler anzeigen
[autoit]#include<Misc.au3>
[/autoit] [autoit][/autoit] [autoit]
#include<WindowsConstants.au3>
#include <GUIConstantsEx.au3>Opt("GUIOnEventMode", 1)
[/autoit] [autoit][/autoit] [autoit]
Global $i = -1, $gui = 0, $pic[5][3] = [ _
[@Systemdir & "\oobe\images\merlin.gif",150,180], _
[@SystemDir & "\oobe\images\mslogo.jpg",255,40], _
[@Systemdir & "\oobe\images\hand1.gif",105,121], _
[@Systemdir & "\oobe\images\monitor2.gif",345,232], _
[@Systemdir & "\oobe\images\prodkey.gif",205,35]]HotKeySet("!e", '_ende')
[/autoit] [autoit][/autoit] [autoit]While True
[/autoit] [autoit][/autoit] [autoit]
If _IsPressed('01') Then
$i += 1
_showPic($i)
EndIf
Sleep(100)
WEndFunc _ende()
[/autoit] [autoit][/autoit] [autoit]
Exit
EndFuncFunc _showPic($Indx)
[/autoit]
If $Indx < UBound($pic) Then
If $gui <> 0 Then GUIDelete($gui)
$gui = GUICreate('', $pic[$Indx][1], $pic[$Indx][2], -1, -1, $WS_POPUP, $WS_EX_TOPMOST)
GUICtrlCreatePic($pic[$Indx][0], 0, 0,$pic[$Indx][1], $pic[$Indx][2])
GUISetState()
Else
Exit
EndIf
EndFunc -
irgentwie kommt da ne fehlermeldung
Könntest du dir vorstellen, das die Fehlermeldung es uns erleichtert dein Problem zu finden?
-
-
nun verkomplizier die sache doch nicht wieder
Puh, ich selektiere mit 2 Zeilen Code alles Gewünschte.

Also wer verkompliziert hier....
-
Den Text von der Seite zu laden wirst du doch hinkriegen
[autoit]
Die Änderungen kannst du auch so selektieren:#include <array.au3>
[/autoit][autoit][/autoit][autoit]
$str = 'Monster Data received Player//Spawn Estimated Time required to spawn' & _
'Based on last spawn time Uruchi 667 min ago (*Spawned) 251 min Based on last spawn time TigerGirl 67 min ago 512 251 min '$ret_Zahlen = StringRegExp($str, '\d+', 3)
[/autoit]
$ret_Klammern = StringRegExp($str, '\(.+\)', 3)
_ArrayDisplay($ret_Zahlen)
_ArrayDisplay($ret_Klammern) -
So wie es jetzt ist, läuft die Schleife 10-mal.
Wenn sie endlos sein soll, einfach den Zähler ($i) ganz weglassen und "While 1" verwenden.
Das Sleep solltest du nach dem Send einfügen (z.B. Sleep(50) ).
Bei dem jetzigen Code mit nur 10 Durchläufen wär es nicht erforderlich, bei Endlosschleife aber zwingend, sonst hast du 100% Prozessorlast. -
Warum sollen wir lachen?
Du hast dich nun selbst mit der Materie beschäftigt und bist zu einer Lösung gekommen. (Das nennt man Lernprozeß
)
Mehr kann man nicht verlangen. Ich hoffe, dass du nun etwas angespornt bist und entsprechend weitermachst. -
Also mal als Pseudo-Code, versuch dann mal die passenden Befehle mit der Hilfe rauszusuchen:
Endlosschleife (Hilfe - Language Referenz - Loop Statements)
Sende Zeichen (Hilfe - Function Referenz - Keyboard Control)Damit solltest du es schaffen, und ja es sind nur 4 Zeilen Code (eig. 3, aber du mußt ein Sleep einbauen um die Prozessorlast runterzunehmen).
-
Also wenn du da nix gefunden hast, dann hast du nicht gut gesucht. Das Thema wurde sooft durchgekaut. Schau auch mal ins (geschlossene) Bot-Forum.
-
Habs zwar nicht ausprobiert, aber so sollte das 'g' gesendet werden. Außerdem habe ich aus deiner _stop eine Switch-Funktion gemacht, d.h. die Func _start alle 500ms ausführen wird im Wechsel aktiviert/deaktiviert mit F11.
Spoiler anzeigen
[autoit]#include <GUIConstants.au3>
[/autoit] [autoit][/autoit] [autoit]
Opt('TrayMenuMode', 1)
;Opt('TrayOnEventMode', 1)
Global $client1 = "SRO_Helper"
Global $switch = 1$12 = TrayCreateItem ('Beenden')
[/autoit] [autoit][/autoit] [autoit]
$13 = TrayCreateItem ('Beenden SRO')
$15 = TrayCreateItem ("Wiederherstellen")
$14 = TrayCreateItem ("Wiederherstellen SRO")
TrayCreateItem ("")
$16 = TrayCreateItem ("Info")
$17 = TrayCreateItem ("Hilfe")Hotkeyset ("{F11}", "_switch")
[/autoit] [autoit][/autoit] [autoit]#Region ### START Koda GUI section ### Form=
[/autoit] [autoit][/autoit] [autoit]
$Form1 = GUICreate("SRO_Helper", 424, 281, 193, 125)
GUISetBkColor(0x000000)
$Start = GUICtrlCreateButton("Start", 8, 8, 65, 25, 0)
GUICtrlSetFont(-1, 11, 400, 2, "Monotype Corsiva")
GUICtrlSetColor(-1, 0xFF0000)
$Stop = GUICtrlCreateButton("Stop", 88, 8, 65, 25, 0)
GUICtrlSetFont(-1, 12, 400, 2, "Monotype Corsiva")
GUICtrlSetColor(-1, 0xFF0000)
$exp_x = GUICtrlCreateInput("Exp pro Mob", 24, 64, 113, 26)
GUICtrlSetFont(-1, 12, 400, 2, "Monotype Corsiva")
GUICtrlSetColor(-1, 0xFF0000)
$exp_y = GUICtrlCreateInput("Vorhandene Exp", 24, 96, 113, 26)
GUICtrlSetFont(-1, 12, 400, 2, "Monotype Corsiva")
GUICtrlSetColor(-1, 0xFF0000)
$exp = GUICtrlCreateInput("Exp für Level up", 24, 128, 113, 26)
GUICtrlSetFont(-1, 12, 400, 2, "Monotype Corsiva")
GUICtrlSetColor(-1, 0xFF0000)
$re = GUICtrlCreateButton("rechnen", 24, 160, 49, 17, 0)
GUICtrlSetFont(-1, 12, 400, 2, "Monotype Corsiva")
GUICtrlSetColor(-1, 0xFF0000)
$Er1 = GUICtrlCreateEdit("", 160, 64, 81, 17)
GUICtrlSetData(-1, "Ergebniss 1")
$MobInfo = GUICtrlCreateList("", 24, 184, 257, 24)
GUICtrlSetData(-1, "...China Mobs...|lvl 01 Mangyang [54]|lvl 02 Small-Eye Ghost [55]|lvl 03 Big-Eye Ghost [85]|lvl 04 Old Weasel [83]|lvl 05 Weasel [119]|lvl 06 Water Ghost slave [114]|lvl 07 Water Ghost [156]|lvl 08 Broken Stone ghost [204]|lvl 08 Grave Stone spirit [204]|lvl 09 Grave Stone [194]|lvl 09 Stone Ghost [194]|lvl 10 Decayed Yeoha [249]|lvl 10 Yeoha [249]|lvl 11 Bandit Subordinates [310]|lvl 12 Bandit Archer [324]|lvl 13 Young Tiger [387]|lvl 14 Tiger [509]|lvl 15 Bandit Bowman [514]|lvl 16 Bandit [755]|lvl 17 Black Tiger [749]|lvl 18 White Tiger [809]|lvl 19 Chajki Worker [958]|lvl 20 Chajki [1031]|lvl 20 Tiger Girl [598.720] (unique)|lvl 21 Ghost Bug [1106]|lvl 22 Devil Bug [1184]|lvl 23 Hyungeon Ghost Soldier [1264]|lvl 24 Hyungeon Ghost [1347]|lvl 25 Demon Horse [1291]|lvl 26 Devil Horse [1184]|lvl 27 Earth Ghost [1451]|lvl 27 Meek Gun Powder [1535]|lvl 28 Gun Powder [1535]|lvl 28 Meek Earth Ghost [1535]|lvl 29 Hyeongcheon [1807]|lvl 30 Earth Magician [1513]|lvl 30 Earth Taoist [1513]|lvl 30 Hyeongcheon [1909]|lvl 31 Black Scorpion [2013]|lvl 32 Scorpion [2121]|lvl 33 Blood Devil Flower [1761]|lvl 33 Blood Ong [1997]|lvl 34 Blood Death Flower [1849]|lvl 34 Ong [2099]|lvl 35 Black Robber Follower [2204]|lvl 35 Black Yeowa [2467]|lvl 36 Black Robber Archer [2034]|lvl 36 Red Yeowa [2590]|lvl 37 Black Robber Bowman [2131]|lvl 38 Black Robber [2539]|lvl 39 Small Red Scorpion [2982]|lvl 40 Red Scorpion [3121]|lvl 40 Uruchi [1.779.528] (unique)|lvl 41 Red-eye Ghost [2907]|lvl 42 Dark-eye Ghost [3038]|lvl 43 Maong [3172]|lvl 44 Small Bunwang [3311]|lvl 45 Bunwang [3454]|lvl 46 Ultra Blood Devil [4052]|lvl 47 Golden Spider [3753]|lvl 48 White Spider [3909]|lvl 49 Mujigi [3557]|lvl 50 Ujigi [3701]|lvl 51 Ishade [3849]|lvl 52 Blue-face Spider [4584]|lvl 52 Hashade [4001]|lvl 53 White-face Spider [4766]|lvl 54 Penon Fighter [5586]|lvl 55 Penon Warrior [6084]|lvl 56 Plana [6317]|lvl 57 Big-blue Spider [5809]|lvl 57 Sonar [6557]|lvl 58 Big White-face Spider [6027]|lvl 59 Yeti [7059]|lvl 60 Devil Yeti [7634]|lvl 60 Isyutaru [4.324.612] (unique)|lvl 61 Shakram [7003]|lvl 61 Soil Ghost Bug [7913]|lvl 62 Strong Earth Ghost [8200]|lvl 63 Earth Ghost Bug [8495]|lvl 63 Edimmu [7515]|lvl 64 Power Earth Ghost [9139]|lvl 65 Dark Karra [7270]|lvl 65 Earth Ghost Warrior [9461]|lvl 66 Earth Ghost Solider [9792]|lvl 67 Blind Mole [8957]|lvl 67 Death Karra [10133]|lvl 68 Demon Eye [9265]|lvl 68 Mole [9265]|lvl 69 Devil Ghost Nachal [8321]|lvl 69 Gold-silver Yacha [10844]|lvl 70 Devil Eye [9909]|lvl 70 Devil Mask Nachal [8603]|lvl 70 Diamond Yacha [11214]|lvl 71 Bone Soldier [11596]|lvl 73 Niya Guard [12816]|lvl 74 Niya Sniper [10144]|lvl 76 Niya Hunter [10819]|lvl 77 Niya Mage [11170]|lvl 78 Niya Shaman [11532]|lvl 79 Niya Royal Guard [11903]|lvl 80 Lord Yarkan [9.353.045] (unique) |lvl 80 Niya General [14614]")
GUICtrlSetFont(-1, 12, 400, 2, "Monotype Corsiva")
GUICtrlSetColor(-1, 0xFF0000)
$Prozent = GUICtrlCreateLabel("Prozent pro Mob", 256, 64, 188, 22)
GUICtrlSetFont(-1, 12, 400, 2, "Monotype Corsiva")
GUICtrlSetColor(-1, 0xFF0000)
$Er2 = GUICtrlCreateEdit("", 160, 96, 81, 17)
GUICtrlSetData(-1, "Ergebniss 2")
$Mobzukillen = GUICtrlCreateLabel("Mob bis Lvl-Up zu killen", 248, 96, 188, 22)
GUICtrlSetFont(-1, 12, 400, 2, "Monotype Corsiva")
GUICtrlSetColor(-1, 0xFF0000)
$er3 = GUICtrlCreateEdit("", 160, 128, 81, 17)
GUICtrlSetData(-1, "Ergebniss 3")
$vonnullaufup = GUICtrlCreateLabel("von 0% bis 100%", 248, 128, 188, 22)
GUICtrlSetFont(-1, 12, 400, 2, "Monotype Corsiva")
GUICtrlSetColor(-1, 0xFF0000)
$clear = GUICtrlCreateButton("clear",288, 184, 113, 25, 0)
GUICtrlSetFont(-1, 12, 400, 2, "Monotype Corsiva")
GUICtrlSetColor(-1, 0xFF0000)
$Hide = GUICtrlCreateButton("Hide", 168, 8, 65, 25, 0)
GUICtrlSetFont(-1, 12, 400, 2, "Monotype Corsiva")
GUICtrlSetColor(-1, 0xFF0000)
$Schliessen = GUICtrlCreateButton("Schliessen", 248, 8, 81, 25, 0)
GUICtrlSetFont(-1, 12, 400, 2, "Monotype Corsiva")
GUICtrlSetColor(-1, 0xFF0000)
$G = GUICtrlCreateLabel("G Press", 64, 40, 44, 22)
GUICtrlSetFont(-1, 12, 400, 2, "Monotype Corsiva")
GUICtrlSetColor(-1, 0xFF0000)
$SRO_Client = GUICtrlCreateLabel("SRO_Client", 216, 40, 73, 22)
GUICtrlSetFont(-1, 12, 400, 2, "Monotype Corsiva")
GUICtrlSetColor(-1, 0xFF0000)
$SRO_Helper = GUICtrlCreateLabel("SRO_Helper", 296, 248, 104, 17)
GUICtrlSetFont(-1, 12, 400, 2, "Monotype Corsiva")
GUICtrlSetColor(-1, 0xFF0000)
$List1 = GUICtrlCreateList("", 24, 216, 257, 24)
GUICtrlSetData(-1, "...Euro Mobs...|lvl 01 Movia [54]|lvl 02 Movoi [55]|lvl 03 Graesp [85]|lvl 04 Edenp [83]|lvl 05 Baroi Wolf [119]|lvl 06 Barus Wolf [114]|lvl 07 Logos Baroi [158]|lvl 08 Bartis [204]|lvl 09 Misos Baroi [192]|lvl 10 Barpolle [249]|lvl 11 Dow Genetos [310]|lvl 12 Dow Genema [359]|lvl 12 Kiklopes [359]|lvl 13 Brontes [411]|lvl 14 Aduna Ladon [470]|lvl 15 Polipemos [607]|lvl 16 Simos Ladon [628]|lvl 17 Nemea"&Chr(39)&"s Lion [749]|lvl 18 Seirenes [730]|lvl 19 Selene"&Chr(39)&"s Lion [871]|lvl 20 Seiren [840]|lvl 21 Megalopa [1106]|lvl 22 pilot log [1184]|lvl 23 Crab [1264]|lvl 23 Pirate Brigand [1264]|lvl 24 Cerberus [693.072] (unique)|lvl 24 Dark Wolf [1347]|lvl 25 Evil Wolf [1433]|lvl 26 Evil Order Archer [1217]|lvl 27 Evil Order Hunter [1287]|lvl 27 Evil Order Warrior [1614]|lvl 28 Evil Order Soldier [1709]|lvl 29 Closier [1807]|lvl 30 Captin Ivy [1.094.835] (unique)|lvl 30 Punisher [1909]|lvl 31 Kokoru [1593]|lvl 32 Periton [1676]|lvl 33 Blood Ong [1997]|lvl 34 Ong [2099]|lvl 35 Hun Archer [1940]|lvl 36 Hun Defense Lancer [2312]|lvl 36 Hun Shooter [2034]|lvl 37 Hun Assault Lancer [2424]|lvl 37 Sosungsung [2424]|lvl 38 Sungsung [2539]|lvl 39 Stone Golem [2982]|lvl 40 Rock Golem [3121] ")
GUICtrlSetFont(-1, 12, 400, 2, "Monotype Corsiva")
GUICtrlSetColor(-1, 0xFF0000)
$List2 = GUICtrlCreateList("", 24, 248, 257, 24)
GUICtrlSetData(-1, ".Roc Mounten Mobs:|lvl 70 Feather Cloke [8603]|lvl 72 Black Eagle [10954]|lvl 73 Feather Mask [9820]|lvl 75 Shawo [10477]|lvl 76 Goat [10819]|lvl 78 Wing Tribe [11532]|lvl 80 Wing Tribe Guardian [12666]|lvl 82 Antinoke [13482]|lvl 83 Antlerope [13906]|lvl 85 Wing Tribe Chaser [17077]|lvl 87 Wing Tribe Attacker [18159]|lvl 88 Rocky [18722]|lvl 90 Demon Shaitan [12.732.060] (unique) ")
GUICtrlSetFont(-1, 12, 400, 2, "Monotype Corsiva")
GUICtrlSetColor(-1, 0xFF0000)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
TraySetState()
AdlibEnable('_start', 500)While 1
[/autoit] [autoit][/autoit] [autoit]
$nMsg = GUIGetMsg()
$trMsg = TrayGetMsg()
Select
Case $nMsg = $GUI_EVENT_CLOSE
Exit
Case $nMsg = $Schliessen
$exist = ProcessExists ("SRO_Client.exe")
If $exist = 0 Then
MsgBox (0, "Error", "SRO_Client.exe" & " konnte nicht gefunden werden!")
Else
ProcessClose ("SRO_Client.exe")
EndIf
Case $nMsg = $clear
GUICtrlSetData ($exp, "Exp für Level up")
GUICtrlSetData ($exp_x, "Exp pro Mob")
GUICtrlSetData ($exp_y, "Vorhandene Exp")
GUICtrlSetData ($Er1, "Ergebniss 1")
GUICtrlSetData ($er2, "Ergebniss 2")
GUICtrlSetData ($er3, "Ergebniss 3")
Case $nMsg = $Hide
WinSetState("SRO_Client","", @SW_HIDE)
Case $nMsg = $re
$1 = GUICtrlRead ($exp)
$2 = GUICtrlRead ($exp_x)
$3 = GUICtrlRead ($exp_y)
$pro = (100/$1*$2)
GUICtrlSetData ($Er1,$pro)$ins = (100/(100/$1*$2))
[/autoit] [autoit][/autoit] [autoit]
GUICtrlSetData ($er3,$ins)$neu = ($1-$3)
[/autoit] [autoit][/autoit] [autoit]
$neu_x = (100/$neu*$2)
$lvl = (100/$neu_x)
GUICtrlSetData ($er2,$lvl)
Case $nMsg = $Start
_start
Case $nMsg = $Stop
_stop
EndSelect
Select
Case $trMsg = $12
exit
Case $trMsg = $13
$exist = ProcessExists ("SRO_Client.exe")
If $exist = 0 Then
MsgBox (0, "Error", "SRO_Client.exe" & " konnte nicht gefunden werden!")
Else
ProcessClose ("SRO_Client.exe")
EndIf
Case $trMsg = $14
WinSetState("SRO_Client","", @SW_SHOW)
Case $trMsg = $15
GUISetState (@sw_show)
Case $trMsg = $16
MsgBox (0, "Info", "Diese Tool wurde für dsa Onlinegame Silkroad Online erstellt, und ist Free, von daher nicht zu verkaufen" & " Mit freundlichen Grüßen " & "Nismo - Production")
Case $trMsg = $17
MsgBox (0, "Hilfe-Datei", "Die Hilfe Datei erscheint, bei beendigung, in der neueren Version 1.2")
EndSelect
WEndFunc _start()
[/autoit] [autoit][/autoit] [autoit]
Send ("g")
EndFuncFunc _switch()
[/autoit]
$switch = BitXOR($switch, 1)
If $switch = 0 Then
AdlibEnable() ; hebt das Ausführen der Func _start auf
Else
AdlibEnable('_start', 500) ; aktiviert _start erneut
EndIf
EndFunc -
Ich bevorzuge auch OnEventMode. Gerade wenn man mit mehreren GUI arbeitet, wird es mit GUIGetMsg sehr aufwändig.
-
FireFlyer: Puh, wird ja immer mehr ums Eck
. Darum hatte ich ja die Empfehlung mit AdlibEnable gegeben, dann braucht man die Schleifen nicht. -
Schnuffel: Grundsätzlich hast du recht, aber wir sind kein Profiboard und ich denke, wenn immer mehr Fehler auftauchen ist er zwangsläufig gezwungen sich etwas tiefer damit zu beschäftigen.
All jene, die dachten wir fertigen hier Skripte für jedermann, waren nach 2..3 Posts nicht mehr gesehen.
Also, nimms gelassen. -
AdlibEnable() direkt hinter dein HotKeySet().
-
Deine Funktionen _start und _stop sind beides Endlosschleifen, die man nicht abbrechen kann.
[autoit]
Verwende AdlibEnableGlobal $stop = 0
[/autoit][autoit][/autoit][autoit]
AdlibEnable('_start', 500)Func _start()
[/autoit][autoit][/autoit][autoit]
If $stop = 0 Then Send ("g")
EndFuncFunc _stop()
[/autoit]
$stop = 1
; AdlibEnable() ; ==> beendet die Funktion AdlibEnable()
EndFunc