Frage...Inputbox Countdown ins Label ...

Teddy

Hallo leute .... ich hab ne frage^^
Ich weiß nicht wie ich des machen kann ...
Ich hab

$Label1 -> Bis -> Label8
$Plvl1 -> Bis -> Plvl8
$Input1 -> Bis -> Input8

Wenn ich in der Inputbox ($input1 - 8 ) Eine Zahl (Minuten) reinschreibe ...und ich den Plvl1 - 8 Knopf drücke ...soll daneben die "Zeit" (Minuten ; Sekunden) stehen ....deswegen Label1 - 8 ..

[autoit]

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

[/autoit][autoit][/autoit][autoit]

HotKeySet ("^{F1}", "dauerbuff")

[/autoit][autoit][/autoit][autoit]

$iniaccread1 = IniRead( @scriptdir & "/Datei.ini" , "Taste1" , "" , "" )
$iniaccread2 = IniRead( @scriptdir & "/Datei.ini" , "Taste2" , "" , "" )
$iniaccread3 = IniRead( @scriptdir & "/Datei.ini" , "Taste3" , "" , "" )
$iniaccread4 = IniRead( @scriptdir & "/Datei.ini" , "Taste4" , "" , "" )
$iniaccread5 = IniRead( @scriptdir & "/Datei.ini" , "Taste5" , "" , "" )
$iniaccread6 = IniRead( @scriptdir & "/Datei.ini" , "Taste6" , "" , "" )
$iniaccread7 = IniRead( @scriptdir & "/Datei.ini" , "Taste7" , "" , "" )

[/autoit][autoit][/autoit][autoit][/autoit][autoit]

#Region ### START Koda GUI section ###
$Form1 = GUICreate("New Programm", 487, 390, 195, 155)
$Tab1 = GUICtrlCreateTab(3, 1, 480, 387)
GUICtrlSetResizing(-1, $GUI_DOCKWIDTH+$GUI_DOCKHEIGHT)

[/autoit][autoit][/autoit][autoit][/autoit][autoit][/autoit][autoit]

$TabSheet1 = GUICtrlCreateTabItem("Einstellungen")
$VerzeichnisWaelen = GUICtrlCreateButton("Sro_Client Suchen", 32, 48, 121, 41, 0)
$Start = GUICtrlCreateButton("Start-Sro", 32, 98, 121, 41, 0)
$Zeit5 = GUICtrlCreateInput("", 50, 290, 27, 21)
$Zeit6 = GUICtrlCreateInput("", 90, 290, 27, 21)
$Zeit7 = GUICtrlCreateInput("", 130, 290, 27, 21)
$Zeit8 = GUICtrlCreateLabel("Uhrzeit", 175, 295, 47, 31)

[/autoit][autoit][/autoit][autoit][/autoit][autoit][/autoit][autoit]

$TabSheet2 = GUICtrlCreateTabItem("Auto Wep-Switcher")
$Combo1 = GUICtrlCreateCombo($iniaccread1, 24, 46, 161, 21)
GUICtrlSetData(-1, "F1|F2|F3|F4|1|2|3|4|5|6|7|8|9|0| |", "")

[/autoit][autoit][/autoit][autoit]

$Combo2 = GUICtrlCreateCombo($iniaccread2, 24, 76, 161, 21)
GUICtrlSetData(-1, "F1|F2|F3|F4|1|2|3|4|5|6|7|8|9|0| |", "")

[/autoit][autoit][/autoit][autoit]

$Combo3 = GUICtrlCreateCombo($iniaccread3, 24, 106, 161, 21)
GUICtrlSetData(-1, "F1|F2|F3|F4|1|2|3|4|5|6|7|8|9|0| |", "")

[/autoit][autoit][/autoit][autoit]

$Combo4 = GUICtrlCreateCombo($iniaccread4, 24, 136, 161, 21)
GUICtrlSetData(-1, "F1|F2|F3|F4|1|2|3|4|5|6|7|8|9|0| |", "")

[/autoit][autoit][/autoit][autoit]

$Combo5 = GUICtrlCreateCombo($iniaccread5, 24, 166, 161, 21)
GUICtrlSetData(-1, "F1|F2|F3|F4|1|2|3|4|5|6|7|8|9|0| |", "")

[/autoit][autoit][/autoit][autoit]

$Combo6 = GUICtrlCreateCombo($iniaccread6, 24, 196, 161, 21)
GUICtrlSetData(-1, "F1|F2|F3|F4|1|2|3|4|5|6|7|8|9|0| |", "")

[/autoit][autoit][/autoit][autoit]

$Combo7 = GUICtrlCreateCombo($iniaccread7, 24, 226, 161, 21)
GUICtrlSetData(-1, "F1|F2|F3|F4|1|2|3|4|5|6|7|8|9|0| |", "")

[/autoit][autoit][/autoit][autoit]

$Speichern123 = GuiCtrlCreateButton("Speichern",24, 266, 161, 41, 0)

[/autoit][autoit][/autoit][autoit]

$TabSheet3 = GUICtrlCreateTabItem("Powerlevel Helper")

[/autoit][autoit][/autoit][autoit]

$Zeit1 = GUICtrlCreateInput("", 50, 290, 27, 21)
$Zeit2 = GUICtrlCreateInput("", 90, 290, 27, 21)
$Zeit3 = GUICtrlCreateInput("", 130, 290, 27, 21)
$Zeit4 = GUICtrlCreateLabel("Uhrzeit", 175, 295, 47, 31)

[/autoit][autoit][/autoit][autoit][/autoit][autoit][/autoit][autoit][/autoit][autoit]

$Label1 = GUICtrlCreateLabel("", 288, 52, 132, 17)
$Label2 = GUICtrlCreateLabel("", 288, 82, 132, 17)
$Label3 = GUICtrlCreateLabel("", 288, 112, 132, 17)
$Label4 = GUICtrlCreateLabel("", 288, 142, 132, 17)
$Label5 = GUICtrlCreateLabel("", 288, 172, 132, 17)
$Label6 = GUICtrlCreateLabel("", 288, 202, 132, 17)
$Label7 = GUICtrlCreateLabel("", 288, 232, 132, 17)
$Label8 = GUICtrlCreateLabel("", 288, 262, 132, 17)

[/autoit][autoit][/autoit][autoit]

$Plvl1 = GUICtrlCreateButton("Start",192, 46, 70, 22, 0)
$Plvl2 = GUICtrlCreateButton("Start",192, 76, 70, 22, 0)
$Plvl3 = GUICtrlCreateButton("Start",192, 106, 70, 22, 0)
$Plvl4 = GUICtrlCreateButton("Start",192, 136, 70, 22, 0)
$Plvl5 = GUICtrlCreateButton("Start",192, 166, 70, 22, 0)
$Plvl6 = GUICtrlCreateButton("Start",192, 196, 70, 22, 0)
$Plvl7 = GUICtrlCreateButton("Start",192, 226, 70, 22, 0)
$Plvl8 = GUICtrlCreateButton("Start",192, 256, 70, 22, 0)

[/autoit][autoit][/autoit][autoit]

$Input1 = GUICtrlCreateInput("Zeit in Minuten", 24, 46, 161, 21, 1, 5)
$Input2 = GUICtrlCreateInput("Zeit in Minuten", 24, 76, 161, 21, 1, 5)
$Input3 = GUICtrlCreateInput("Zeit in Minuten", 24, 106, 161, 21, 1, 5)
$Input4 = GUICtrlCreateInput("Zeit in Minuten", 24, 136, 161, 21, 1, 5)
$Input5 = GUICtrlCreateInput("Zeit in Minuten", 24, 166, 161, 21, 1, 5)
$Input6 = GUICtrlCreateInput("Zeit in Minuten", 24, 196, 161, 21, 1, 5)
$Input7 = GUICtrlCreateInput("Zeit in Minuten", 24, 226, 161, 21, 1, 5)
$Input8 = GUICtrlCreateInput("Zeit in Minuten", 24, 256, 161, 21, 1, 5)

[/autoit][autoit][/autoit][autoit][/autoit][autoit][/autoit][autoit][/autoit][autoit][/autoit][autoit]

GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

[/autoit][autoit][/autoit][autoit][/autoit][autoit]

Func _SROexesuchen()
SetError(0)
$Path = FileSelectFolder("Wähle den Ordner in dem sich die Silkroad.exe befindet", "", 1)
IniWrite( @scriptdir & "\Datei.ini" , "Silkroad Ordner", "Silkroad", $Path & "\Silkroad.exe")
If @error = 1 Then
EndIf
EndFunc

[/autoit][autoit][/autoit][autoit]

$buff = 0 ; speichert, ob dauerbuff an / aus ist
Func buff()
$Alex = GUICtrlRead ($Combo1)
$Alex2 = GUICtrlRead ($Combo3)
$Alex3 = GUICtrlRead ($Combo4)
$Alex4 = GUICtrlRead ($Combo5)
$Alex5 = GUICtrlRead ($Combo6)
$Alex6 = GUICtrlRead ($Combo7)
$Alex7 = GUICtrlRead ($Combo2)

[/autoit][autoit][/autoit][autoit]

Send(" {END} ")
Sleep(1500)
Send(" {END} ")
Sleep(1500)

[/autoit][autoit][/autoit][autoit]

Send('{' & $Alex & '}')
Sleep(4500)
Send('{' & $Alex2 & '}')
Sleep(4500)
Send('{' & $Alex3 & '}')
Sleep(4500)
Send('{' & $Alex4 & '}')
Sleep(4500)
Send('{' & $Alex5 & '}')
Sleep(4500)
Send('{' & $Alex6 & '}')
Sleep(4500)
Send('{' & $Alex7 & '}')
Sleep(4500)

[/autoit][autoit][/autoit][autoit]

Send(" {INSERT} ")
Sleep(1500)
Send(" {INSERT} ")
Sleep(1500)
EndFunc

[/autoit][autoit][/autoit][autoit][/autoit][autoit][/autoit][autoit]

Func dauerbuff()
If $buff = 0 Then
buff()
AdlibEnable( "buff" , 50000); alle 5 Min. wird automatisch buff() ausgeführt
$buff = 1; setzt dauerbuff an
Else
AdlibDisable ( )
$buff = 0 ; setzt dauerbuff aus
EndIf
EndFunc

[/autoit][autoit][/autoit][autoit][/autoit][autoit][/autoit][autoit]

While 1

[/autoit][autoit][/autoit][autoit]

GUICtrlSetData($Zeit1,@HOUR)
GUICtrlSetData($Zeit2,@MIN)
GUICtrlSetData($Zeit3,@SEC)
GUICtrlSetData($Zeit5,@HOUR)
GUICtrlSetData($Zeit6,@MIN)
GUICtrlSetData($Zeit7,@SEC)

[/autoit][autoit][/autoit][autoit]

$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $VerzeichnisWaelen
_SROexesuchen()

case $Speichern123
Global $frank1 = GUICtrlRead( $Combo1 )
Global $frank2 = GUICtrlRead( $Combo2 )
Global $frank3 = GUICtrlRead( $Combo3 )
Global $frank4 = GUICtrlRead( $Combo4 )
Global $frank5 = GUICtrlRead( $Combo5 )
Global $frank6 = GUICtrlRead( $Combo6 )
Global $frank7 = GUICtrlRead( $Combo7 )
Global $Belegung1 = iniwrite( @scriptdir & "\Datei.ini" , "Taste1" , "" , $frank1 )
Global $Belegung2 = IniWrite( @scriptdir & "\Datei.ini" , "Taste2" , "" , $frank2 )
Global $Belegung3 = iniwrite( @scriptdir & "\Datei.ini" , "Taste3" , "" , $frank3 )
Global $Belegung4 = IniWrite( @scriptdir & "\Datei.ini" , "Taste4" , "" , $frank4 )
Global $Belegung5 = iniwrite( @scriptdir & "\Datei.ini" , "Taste5" , "" , $frank5 )
Global $Belegung6 = IniWrite( @scriptdir & "\Datei.ini" , "Taste6" , "" , $frank6 )
Global $Belegung7 = iniwrite( @scriptdir & "\Datei.ini" , "Taste7" , "" , $frank7 )
TrayTip( "" , "Datein gespeichert" , 4 )

Case $Start
$startpath = IniRead( @scriptdir & "\Datei.ini" , "Silkroad Ordner", "Silkroad" , "" )
run ( $startpath )

Case $Plvl1
guictrlsetdata($Label1, guictrlread($Input1) )
Case $Plvl2
guictrlsetdata($Label2, guictrlread($Input2) )
Case $Plvl3
guictrlsetdata($Label3, guictrlread($Input3) )
Case $Plvl4
guictrlsetdata($Label4, guictrlread($Input4) )
Case $Plvl5
guictrlsetdata($Label5, guictrlread($Input5) )
Case $Plvl6
guictrlsetdata($Label6, guictrlread($Input6) )
Case $Plvl7
guictrlsetdata($Label7, guictrlread($Input7) )
Case $Plvl8
guictrlsetdata($Label8, guictrlread($Input8) )
sleep(1000)
EndSwitch
WEnd

[/autoit]

Ist nen bisschen groß ... xD
Bitte hilft mir =)

Teddy

kann mir den keiner helfen >_>

[autoit]

$Label1 = GUICtrlCreateLabel("", 288, 52, 132, 17)

[/autoit][autoit]

$Plvl1 = GUICtrlCreateButton("Start",192, 46, 70, 22, 0)

[/autoit][autoit]

$Input1 = GUICtrlCreateInput("Zeit in Minuten", 24, 46, 161, 21, 1, 5)

[/autoit]

Muss ich das ins Case machen ...oder wie ...Des wenn man "Start" ($Plvl1) Drückt der $Input1 ausliest und bei $Label1 reinschreibt

z.B. 4 Minuten 13Sekunden

..MfG Teddy -.-

**BugFix**

Meinst du sowas:

[autoit]

#include<guiconstants.au3>
GUICreate('test')
$bt = GUICtrlCreateButton('set Time', 10,10,60,20)
$lbl = GUICtrlCreateLabel('', 100, 13, 80, 17)
GUISetState()
While True
$msg = GUIGetMsg()
Switch $msg
Case $bt
GUICtrlSetData($lbl, @HOUR & ':' & @MIN & ':' & @SEC)
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd

[/autoit]

Teddy

hi
Da soll ja nicht die Aktuelle Zeit stehen ...
Sonder eine art countdown ... in der inputbox gebe ich z.B. 5 (minuten) ein ...drücke auf start und rechts im label kommt der countdown

**BugFix**

Dann so:

Spoiler anzeigen

[autoit]

#include<guiconstants.au3>
GUICreate('test')
$bt = GUICtrlCreateButton('set Time', 10,10,60,20)
$in = GUICtrlCreateInput('', 80, 10, 40, 20)
$lbl = GUICtrlCreateLabel('', 140, 13, 80, 17)
GUISetState()
AdlibEnable('ende', 100)

[/autoit] [autoit][/autoit] [autoit]

While True
$msg = GUIGetMsg()
Switch $msg
Case $bt
_CountDown(0, GUICtrlRead($in), 0, 0, True, $lbl)
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd

[/autoit] [autoit][/autoit] [autoit]

Func ende() ; damit kann beendet werden, auch wenn der Timer läuft ==> hat kleine Verzögerung
If GUIGetMsg() = $GUI_EVENT_CLOSE Then Exit
EndFunc

[/autoit] [autoit][/autoit] [autoit]

;----------------------------------------------------------------------------------------------------------------------
; Funktion _CountDown($SEC [, $MIN=0 [, $HOUR=0 [, $DAY=0 [, $VISIBLEDOWN=True [, $ALTERNATECTRL='TT']]]]])
;
; Beschreibung zählt vorgegebene Zeitspanne (Tage, Stunden, Minuten, Sekunden) herunter mit Anzeige Tooltip (Standard)
; oder Ausgabe in GUI-Ctrl; wahlweise Anzeige von Restzeit (Standard) oder abgelaufener Zeit
;
; Parameter $SEC: Sekunden
; optional $MIN: Minuten
; optional $HOUR: Stunden
; optional $DAY: Tage
; optional $VISIBLEDOWN: Ansicht (herunterzählen/heraufzählen)
; optional $ALTERNATECTRL: GUI-Ctrl in das die Ausgabe mittels GUICtrlSetData() ausgegeben wird
;
; Erfordernisse #include <Date.au3>
;
; Autor BugFix ([email='bugfix@autoit.de'][/email])
;----------------------------------------------------------------------------------------------------------------------
#include <Date.au3>
Func _CountDown($SEC, $MIN=0, $HOUR=0, $DAY=0, $VISIBLEDOWN=True, $ALTERNATECTRL='TT')
$Sekunden = $SEC + $MIN*60 + $HOUR*3600 + $DAY*86400
$end = _DateAdd('s', $Sekunden, _NowCalc())
Local $message
Do
Sleep(100)
$sec = _DateDiff('s', _NowCalc(), $end)
If Not $VISIBLEDOWN Then
$secShow = $Sekunden - $sec
Else
$secShow = $sec
EndIf
Select
Case $secShow < 60
If $ALTERNATECTRL = 'TT' Then
ToolTip(StringFormat('%02u', $secShow) & ' s')
Else
GUICtrlSetData($ALTERNATECTRL, StringFormat('%02u', $secShow) & ' s')
EndIf
Case $secShow < 60*60
$message = StringFormat('%02u', Floor($secShow/60)) & ':' & _
StringFormat('%02u', Mod($secShow,60)) & ' min'
If $ALTERNATECTRL = 'TT' Then
ToolTip($message)
Else
GUICtrlSetData($ALTERNATECTRL, $message)
EndIf
Case $secShow < 60*60*24
$message = StringFormat('%02u', Floor($secShow/3600)) & ':' & _
StringFormat('%02u', Floor(Mod($secShow,3600)/60)) & ':' & _
StringFormat('%02u', Mod(Mod($secShow,3600),60)) & ' h'
If $ALTERNATECTRL = 'TT' Then
ToolTip($message)
Else
GUICtrlSetData($ALTERNATECTRL, $message)
EndIf
Case Else
$message = Floor($secShow/86400) & ' d / ' & _
StringFormat('%02u', Floor(Mod($secShow,86400)/3600)) & ':' & _
StringFormat('%02u', Floor(Mod(Mod($secShow,86400),3600)/60)) & ':' & _
StringFormat('%02u', Mod(Mod(Mod($secShow,86400),3600),60)) & ' h'
If $ALTERNATECTRL = 'TT' Then
ToolTip($message)
Else
GUICtrlSetData($ALTERNATECTRL, $message)
EndIf
EndSelect
Until $sec = 0
EndFunc ;==>_CountDown

[/autoit]

Teddy

Hi Klappt subber

Nur des beenden geht net ...auch wenn die Zeit Läuft kann ich des nicht beenden in meinem program...
Und die Normale standart uhr die ich eingebaut habe läuft dann auch nimmer ....

Mhm

Teddy

Ich hab noch nen Problem ich hab 8 Knöpfe ...es geht aber immer nur einer ...

Taek

Ich glaube du hast mit jedem Button die _Countdown Funktion verknüpft. Kopier die Funktion einfach und benenn sie in _Countdown1 um (den Aufruf und die Funktion selber!). Dann sollte es gehen.

**BugFix**

Ich hab dir mal ein Muster für 4 Eingaben gemacht. Kannst es dann erweitern.

Spoiler anzeigen

[autoit]

#include <guiconstants.au3>
#include <Date.au3>

[/autoit] [autoit][/autoit] [autoit]

Global $arIn[4][3], $arCounter[4][2]
GUICreate('test')
$bt1 = GUICtrlCreateButton('set Time', 10,10,60,20)
$arIn[0][0] = GUICtrlCreateInput('', 80, 10, 40, 20)
$arCounter[0][0] = GUICtrlCreateLabel('', 140, 13, 80, 17)

[/autoit] [autoit][/autoit] [autoit]

$bt2 = GUICtrlCreateButton('set Time', 10,40,60,20)
$arIn[1][0] = GUICtrlCreateInput('', 80, 40, 40, 20)
$arCounter[1][0] = GUICtrlCreateLabel('', 140, 43, 80, 17)

[/autoit] [autoit][/autoit] [autoit]

$bt3 = GUICtrlCreateButton('set Time', 10,70,60,20)
$arIn[2][0] = GUICtrlCreateInput('', 80, 70, 40, 20)
$arCounter[2][0] = GUICtrlCreateLabel('', 140, 73, 80, 17)

[/autoit] [autoit][/autoit] [autoit]

$bt4 = GUICtrlCreateButton('set Time', 10,100,60,20)
$arIn[3][0] = GUICtrlCreateInput('', 80, 100, 40, 20)
$arCounter[3][0] = GUICtrlCreateLabel('', 140, 103, 80, 17)
GUISetState()

[/autoit] [autoit][/autoit] [autoit]

While True
$msg = GUIGetMsg()
For $i = 0 To UBound($arCounter) -1
If $arCounter[$i][1] = 1 Then _SetCounter()
Next
Switch $msg
Case $bt1
$arCounter[0][1] = 1
$arIn[0][1] = GUICtrlRead($arIn[0][0]) * 60
$arIn[0][2] = _NowCalc()
GUICtrlSetState($bt1, $GUI_DISABLE)
Case $bt2
$arCounter[1][1] = 1
$arIn[1][1] = GUICtrlRead($arIn[1][0]) * 60
$arIn[1][2] = _NowCalc()
GUICtrlSetState($bt2, $GUI_DISABLE)
Case $bt3
$arCounter[2][1] = 1
$arIn[2][1] = GUICtrlRead($arIn[2][0]) * 60
$arIn[2][2] = _NowCalc()
GUICtrlSetState($bt3, $GUI_DISABLE)
Case $bt4
$arCounter[3][1] = 1
$arIn[3][1] = GUICtrlRead($arIn[3][0]) * 60
$arIn[3][2] = _NowCalc()
GUICtrlSetState($bt4, $GUI_DISABLE)
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd

[/autoit] [autoit][/autoit] [autoit]

Func _SetCounter()
Local $sec
For $i = 0 To UBound($arCounter) -1
If $arIn[$i][1] = 0 Then ContinueLoop
$sec = $arIn[$i][1] - _DateDiff("s", $arIn[$i][2], _NowCalc())
Select
Case $sec < 60
GUICtrlSetData($arCounter[$i][0], StringFormat('%02u', $sec) & ' s')
Case $sec < 60*60
GUICtrlSetData($arCounter[$i][0], StringFormat('%02u', Floor($sec/60)) & ':' & _
StringFormat('%02u', Mod($sec,60)) & ' min')
EndSelect
Next
EndFunc

[/autoit]

Teddy

@Taek das hab ich ja schon probiert klappte aber net...

BugFix Super aber er beendet das program nicht wenn die zeit läuft ...dann muss ich rechtsklick unten und Schließen

Teddy

Ich bins nochmal Wenn die Zeit auf 0:00 ist .... Soll ein sounds kommen wo muss ich des einbinden ? =)

**BugFix**

Zitat von Teddy

aber er beendet das program nicht wenn die zeit läuft

Kann ich nicht nachvollziehen, ich kann jederzeit beenden.

Zitat von Teddy

Wenn die Zeit auf 0:00 ist .... Soll ein sounds kommen

Habs mal etwas geändert und den Sound eingebaut:

Spoiler anzeigen

[autoit]

#include <guiconstants.au3>
#include <Date.au3>

[/autoit] [autoit][/autoit] [autoit]

Global $arIn[4][3], $arCounter[4][2]
GUICreate('test')
$bt1 = GUICtrlCreateButton('set Time', 10,10,60,20)
$arIn[0][0] = GUICtrlCreateInput('', 80, 10, 40, 20)
$arCounter[0][0] = GUICtrlCreateLabel('', 140, 13, 80, 17)

[/autoit] [autoit][/autoit] [autoit]

$bt2 = GUICtrlCreateButton('set Time', 10,40,60,20)
$arIn[1][0] = GUICtrlCreateInput('', 80, 40, 40, 20)
$arCounter[1][0] = GUICtrlCreateLabel('', 140, 43, 80, 17)

[/autoit] [autoit][/autoit] [autoit]

$bt3 = GUICtrlCreateButton('set Time', 10,70,60,20)
$arIn[2][0] = GUICtrlCreateInput('', 80, 70, 40, 20)
$arCounter[2][0] = GUICtrlCreateLabel('', 140, 73, 80, 17)

[/autoit] [autoit][/autoit] [autoit]

$bt4 = GUICtrlCreateButton('set Time', 10,100,60,20)
$arIn[3][0] = GUICtrlCreateInput('', 80, 100, 40, 20)
$arCounter[3][0] = GUICtrlCreateLabel('', 140, 103, 80, 17)
GUISetState()

[/autoit] [autoit][/autoit] [autoit]

While True
$msg = GUIGetMsg()
_SetCounter()
Switch $msg
Case $bt1
$arCounter[0][1] = 1
$arIn[0][1] = GUICtrlRead($arIn[0][0]) * 60
$arIn[0][2] = _NowCalc()
GUICtrlSetState($bt1, $GUI_DISABLE)
Case $bt2
$arCounter[1][1] = 1
$arIn[1][1] = GUICtrlRead($arIn[1][0]) * 60
$arIn[1][2] = _NowCalc()
GUICtrlSetState($bt2, $GUI_DISABLE)
Case $bt3
$arCounter[2][1] = 1
$arIn[2][1] = GUICtrlRead($arIn[2][0]) * 60
$arIn[2][2] = _NowCalc()
GUICtrlSetState($bt3, $GUI_DISABLE)
Case $bt4
$arCounter[3][1] = 1
$arIn[3][1] = GUICtrlRead($arIn[3][0]) * 60
$arIn[3][2] = _NowCalc()
GUICtrlSetState($bt4, $GUI_DISABLE)
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd

[/autoit] [autoit][/autoit] [autoit]

Func _SetCounter()
Local $sec
For $i = 0 To UBound($arCounter) -1
If $arCounter[$i][1] <> 1 Then ContinueLoop
If $arIn[$i][1] = 0 Then ContinueLoop
$sec = $arIn[$i][1] - _DateDiff("s", $arIn[$i][2], _NowCalc())
Select
Case $sec < 60
GUICtrlSetData($arCounter[$i][0], StringFormat('%02u', $sec) & ' s')
Case $sec < 60*60
GUICtrlSetData($arCounter[$i][0], StringFormat('%02u', Floor($sec/60)) & ':' & _
StringFormat('%02u', Mod($sec,60)) & ' min')
EndSelect
If $sec = 0 Then
SoundPlay(@WindowsDir & '\Media\tada.wav')
$arCounter[$i][1] = 0
EndIf
Next
EndFunc

[/autoit]

Teddy

...Die ersten 4 Zeiten gehen supper , klappt auch sofort...
Aber ab der 5 -8 dauert des ja schon lange. ...warum?

Edit*

Lass die zeit mal bis 0 laufen ....danach kommt 49812378812s ....komisch

Spoiler anzeigen

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <Date.au3>

HotKeySet ("^{F1}", "dauerbuff")
HotKeySet ("^{F5}", "_exit")

$iniaccread1 = IniRead( @scriptdir & "/Datei.ini" , "Taste1" , "" , "" )
$iniaccread2 = IniRead( @scriptdir & "/Datei.ini" , "Taste2" , "" , "" )
$iniaccread3 = IniRead( @scriptdir & "/Datei.ini" , "Taste3" , "" , "" )
$iniaccread4 = IniRead( @scriptdir & "/Datei.ini" , "Taste4" , "" , "" )
$iniaccread5 = IniRead( @scriptdir & "/Datei.ini" , "Taste5" , "" , "" )
$iniaccread6 = IniRead( @scriptdir & "/Datei.ini" , "Taste6" , "" , "" )
$iniaccread7 = IniRead( @scriptdir & "/Datei.ini" , "Taste7" , "" , "" )

Global $Input[8][3], $Label[8][2]
#Region ### START Koda GUI section ###
$Form1 = GUICreate("New Programm", 487, 390, 195, 155)
$Tab1 = GUICtrlCreateTab(3, 1, 480, 387)
GUICtrlSetResizing(-1, $GUI_DOCKWIDTH+$GUI_DOCKHEIGHT)

$TabSheet1 = GUICtrlCreateTabItem("Einstellungen")
$Credits1 = GUICtrlCreateLabel("(¯`·.•»Credits«•.·´¯)", 200, 56, 287, 32)
GUICtrlSetFont(-1, 18, 800, 4, "Monotype Corsiva")
$Credits2 = GUICtrlCreateLabel("_P_auf_K_", 240, 104, 119, 32)
GUICtrlSetFont(-1, 18, 800, 2, "Monotype Corsiva")
GUICtrlSetColor(-1, 0xFF0000)
$Credits3 = GUICtrlCreateLabel("Hotkeys", 256, 168, 81, 23)
GUICtrlSetFont(-1, 14, 400, 6, "Lucida Console")
$Credits4 = GUICtrlCreateLabel("Strg+F1 Macht Powerlevel-Helper an", 184, 200, 263, 15)
GUICtrlSetFont(-1, 9, 400, 3, "Lucida Console")
$Credits5 = GUICtrlCreateLabel("Strg+F5 Beendet das Programm", 184, 230, 263, 15)
GUICtrlSetFont(-1, 9, 400, 3, "Lucida Console")
$VerzeichnisWaelen = GUICtrlCreateButton("Sro_Client Suchen", 32, 120, 97, 33, 0)
$Start = GUICtrlCreateButton("Start-Sro", 32, 168, 97, 33, 0)
$Min = GUICtrlCreateButton("Verkleinert Sro", 32, 216, 97, 33, 0)
$Hide = GUICtrlCreateButton("Versteckt Sro", 32, 264, 97, 33, 0)
$Max = GUICtrlCreateButton("Zeigt Sro", 32, 312, 97, 33, 0)

$Zeit5 = GUICtrlCreateInput("", 16, 48, 25, 21)
$Zeit6 = GUICtrlCreateInput("", 48, 48, 25, 21)
$Zeit7 = GUICtrlCreateInput("", 80, 48, 25, 21)
$Zeit8 = GUICtrlCreateLabel("Uhrzeit", 112, 48, 52, 23)
GUICtrlSetFont(-1, 10, 800, 0, "Comic Sans MS")

$TabSheet2 = GUICtrlCreateTabItem("Auto Wep-Switcher")

$Combo1 = GUICtrlCreateCombo($iniaccread1, 24, 46, 161, 21)
GUICtrlSetData(-1, "F1|F2|F3|F4|1|2|3|4|5|6|7|8|9|0| |", "")

$Combo2 = GUICtrlCreateCombo($iniaccread2, 24, 76, 161, 21)
GUICtrlSetData(-1, "F1|F2|F3|F4|1|2|3|4|5|6|7|8|9|0| |", "")

$Combo3 = GUICtrlCreateCombo($iniaccread3, 24, 106, 161, 21)
GUICtrlSetData(-1, "F1|F2|F3|F4|1|2|3|4|5|6|7|8|9|0| |", "")

$Combo4 = GUICtrlCreateCombo($iniaccread4, 24, 136, 161, 21)
GUICtrlSetData(-1, "F1|F2|F3|F4|1|2|3|4|5|6|7|8|9|0| |", "")

$Combo5 = GUICtrlCreateCombo($iniaccread5, 24, 166, 161, 21)
GUICtrlSetData(-1, "F1|F2|F3|F4|1|2|3|4|5|6|7|8|9|0| |", "")

$Combo6 = GUICtrlCreateCombo($iniaccread6, 24, 196, 161, 21)
GUICtrlSetData(-1, "F1|F2|F3|F4|1|2|3|4|5|6|7|8|9|0| |", "")

$Combo7 = GUICtrlCreateCombo($iniaccread7, 24, 226, 161, 21)
GUICtrlSetData(-1, "F1|F2|F3|F4|1|2|3|4|5|6|7|8|9|0| |", "")

$Speichern123 = GuiCtrlCreateButton("Speichern",24, 266, 161, 41, 0)

$TabSheet3 = GUICtrlCreateTabItem("Powerlevel Helper")
Global $Input[8][3], $Label[8][2]
$Zeit1 = GUICtrlCreateInput("", 50, 290, 27, 21)
$Zeit2 = GUICtrlCreateInput("", 90, 290, 27, 21)
$Zeit3 = GUICtrlCreateInput("", 130, 290, 27, 21)
$Zeit4 = GUICtrlCreateLabel("Uhrzeit", 175, 295, 47, 31)

$Label[0][0] = GUICtrlCreateLabel("", 288, 52, 132, 17)
$Label[1][0] = GUICtrlCreateLabel("", 288, 82, 132, 17)
$Label[2][0] = GUICtrlCreateLabel("", 288, 112, 132, 17)
$Label[3][0] = GUICtrlCreateLabel("", 288, 142, 132, 17)
$Label[4][0] = GUICtrlCreateLabel("", 288, 172, 132, 17)
$Label[5][0] = GUICtrlCreateLabel("", 288, 202, 132, 17)
$Label[6][0] = GUICtrlCreateLabel("", 288, 232, 132, 17)
$Label[7][0] = GUICtrlCreateLabel("", 288, 262, 132, 17)

$Plvl1 = GUICtrlCreateButton("Start",192, 46, 70, 22, 0)
$Plvl2 = GUICtrlCreateButton("Start",192, 76, 70, 22, 0)
$Plvl3 = GUICtrlCreateButton("Start",192, 106, 70, 22, 0)
$Plvl4 = GUICtrlCreateButton("Start",192, 136, 70, 22, 0)
$Plvl5 = GUICtrlCreateButton("Start",192, 166, 70, 22, 0)
$Plvl6 = GUICtrlCreateButton("Start",192, 196, 70, 22, 0)
$Plvl7 = GUICtrlCreateButton("Start",192, 226, 70, 22, 0)
$Plvl8 = GUICtrlCreateButton("Start",192, 256, 70, 22, 0)

$Input[0][0] = GUICtrlCreateInput("Zeit in Minuten", 24, 46, 161, 21, 1, 5)
$Input[1][0] = GUICtrlCreateInput("Zeit in Minuten", 24, 76, 161, 21, 1, 5)
$Input[2][0] = GUICtrlCreateInput("Zeit in Minuten", 24, 106, 161, 21, 1, 5)
$Input[3][0] = GUICtrlCreateInput("Zeit in Minuten", 24, 136, 161, 21, 1, 5)
$Input[4][0] = GUICtrlCreateInput("Zeit in Minuten", 24, 166, 161, 21, 1, 5)
$Input[5][0] = GUICtrlCreateInput("Zeit in Minuten", 24, 196, 161, 21, 1, 5)
$Input[6][0] = GUICtrlCreateInput("Zeit in Minuten", 24, 226, 161, 21, 1, 5)
$Input[7][0] = GUICtrlCreateInput("Zeit in Minuten", 24, 256, 161, 21, 1, 5)

GUICtrlCreateTabItem("")
$MenuItem1 = GUICtrlCreateMenu("&File")
$MenuItem3 = GUICtrlCreateMenuItem("Exit", $MenuItem1)
$MenuItem2 = GUICtrlCreateMenu("&Credits")
$MenuItem4 = GUICtrlCreateMenuItem("Credits", $MenuItem2)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

Func _exit()
Exit
EndFunc

Func _SROexesuchen()
SetError(0)
$Path = FileSelectFolder("Wähle den Ordner in dem sich die Silkroad.exe befindet", "", 1)
IniWrite( @scriptdir & "\Datei.ini" , "Silkroad Ordner", "Silkroad", $Path & "\Silkroad.exe")
If @error = 1 Then
EndIf
EndFunc

Func _SetCounter()
Local $sec
For $i = 0 To UBound($Label) -1
If $Input[$i][1] = 0 Then ContinueLoop
$sec = $Input[$i][1] - _DateDiff("s", $Input[$i][2], _NowCalc())
Select
Case $sec < 60
GUICtrlSetData($Label[$i][0], StringFormat('%02u', $sec) & ' s')
Case $sec < 60*60
GUICtrlSetData($Label[$i][0], StringFormat('%02u', Floor($sec/60)) & ':' & _
StringFormat('%02u', Mod($sec,60)) & ' min')
EndSelect
Next
EndFunc

Func ende() ; damit kann beendet werden, auch wenn der Timer läuft ==> hat kleine Verzögerung
If GUIGetMsg() = $GUI_EVENT_CLOSE Then Exit
EndFunc

$buff = 0 ; speichert, ob dauerbuff an / aus ist
Func buff()
$Alex = GUICtrlRead ($Combo1)
$Alex2 = GUICtrlRead ($Combo3)
$Alex3 = GUICtrlRead ($Combo4)
$Alex4 = GUICtrlRead ($Combo5)
$Alex5 = GUICtrlRead ($Combo6)
$Alex6 = GUICtrlRead ($Combo7)
$Alex7 = GUICtrlRead ($Combo2)

Send(" {END} ")
Sleep(1500)
Send(" {END} ")
Sleep(1500)

Send('{' & $Alex & '}')
Sleep(4500)
Send('{' & $Alex7 & '}')
Sleep(4500)
Send('{' & $Alex2 & '}')
Sleep(4500)
Send('{' & $Alex3 & '}')
Sleep(4500)
Send('{' & $Alex4 & '}')
Sleep(4500)
Send('{' & $Alex5 & '}')
Sleep(4500)
Send('{' & $Alex6 & '}')
Sleep(4500)

Send(" {INSERT} ")
Sleep(1500)
Send(" {INSERT} ")
Sleep(1500)
EndFunc

Func dauerbuff()
If $buff = 0 Then
buff()
AdlibEnable( "buff" , 60000); alle 5 Min. wird automatisch buff() ausgeführt
$buff = 1; setzt dauerbuff an
Else
AdlibDisable ( )
$buff = 0 ; setzt dauerbuff aus
EndIf
EndFunc

While 1

GUICtrlSetData($Zeit1,@HOUR)
GUICtrlSetData($Zeit2,@MIN)
GUICtrlSetData($Zeit3,@SEC)
GUICtrlSetData($Zeit5,@HOUR)
GUICtrlSetData($Zeit6,@MIN)
GUICtrlSetData($Zeit7,@SEC)

$nMsg = GUIGetMsg()
For $i = 0 To UBound($Label) -1
If $Label[$i][1] = 1 Then _SetCounter()
Next
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $VerzeichnisWaelen
_SROexesuchen()
Case $MenuItem3
Exit
Case $MenuItem4
$starlol = ShellExecute ( @ScriptDir & "\Help.ini" )
Case $Min
WinSetState("SRO_Client","",@SW_SHOWMINNOACTIVE)
Case $Hide
WinSetState("SRO_Client","",@SW_HIDE)
TrayTip( "","Silkroad ist gehided !" , 15 )
Case $Max
WinSetState("SRO_Client","",@SW_MAXIMIZE)

case $Speichern123
Global $frank1 = GUICtrlRead( $Combo1 )
Global $frank2 = GUICtrlRead( $Combo2 )
Global $frank3 = GUICtrlRead( $Combo3 )
Global $frank4 = GUICtrlRead( $Combo4 )
Global $frank5 = GUICtrlRead( $Combo5 )
Global $frank6 = GUICtrlRead( $Combo6 )
Global $frank7 = GUICtrlRead( $Combo7 )
Global $Belegung1 = iniwrite( @scriptdir & "\Datei.ini" , "Taste1" , "" , $frank1 )
Global $Belegung2 = IniWrite( @scriptdir & "\Datei.ini" , "Taste2" , "" , $frank2 )
Global $Belegung3 = iniwrite( @scriptdir & "\Datei.ini" , "Taste3" , "" , $frank3 )
Global $Belegung4 = IniWrite( @scriptdir & "\Datei.ini" , "Taste4" , "" , $frank4 )
Global $Belegung5 = iniwrite( @scriptdir & "\Datei.ini" , "Taste5" , "" , $frank5 )
Global $Belegung6 = IniWrite( @scriptdir & "\Datei.ini" , "Taste6" , "" , $frank6 )
Global $Belegung7 = iniwrite( @scriptdir & "\Datei.ini" , "Taste7" , "" , $frank7 )
TrayTip( "" , "Datein gespeichert" , 4 )

Case $Start
$startpath = IniRead( @scriptdir & "\Datei.ini" , "Silkroad Ordner", "Silkroad" , "" )
run ( $startpath )

Case $Plvl1
$Label[0][1] = 1
$Input[0][1] = GUICtrlRead($Input[0][0]) * 60
$Input[0][2] = _NowCalc()
GUICtrlSetState($Plvl1, $GUI_DISABLE)
Case $Plvl2
$Label[1][1] = 1
$Input[1][1] = GUICtrlRead($Input[1][0]) * 60
$Input[1][2] = _NowCalc()
GUICtrlSetState($Plvl2, $GUI_DISABLE)
Case $Plvl3
$Label[2][1] = 1
$Input[2][1] = GUICtrlRead($Input[2][0]) * 60
$Input[2][2] = _NowCalc()
GUICtrlSetState($Plvl3, $GUI_DISABLE)
Case $Plvl4
$Label[3][1] = 1
$Input[3][1] = GUICtrlRead($Input[3][0]) * 60
$Input[3][2] = _NowCalc()
GUICtrlSetState($Plvl4, $GUI_DISABLE)
Case $Plvl5
$Label[4][1] = 1
$Input[4][1] = GUICtrlRead($Input[4][0]) * 60
$Input[4][2] = _NowCalc()
GUICtrlSetState($Plvl5, $GUI_DISABLE)
Case $Plvl6
$Label[5][1] = 1
$Input[5][1] = GUICtrlRead($Input[5][0]) * 60
$Input[5][2] = _NowCalc()
GUICtrlSetState($Plvl6, $GUI_DISABLE)
Case $Plvl7
$Label[6][1] = 1
$Input[6][1] = GUICtrlRead($Input[6][0]) * 60
$Input[6][2] = _NowCalc()
GUICtrlSetState($Plvl7, $GUI_DISABLE)
Case $Plvl8
$Label[7][1] = 1
$Input[7][1] = GUICtrlRead($Input[7][0]) * 60
$Input[7][2] = _NowCalc()
GUICtrlSetState($Plvl8, $GUI_DISABLE)

sleep(1000)
EndSwitch
WEnd

**BugFix**

Zitat von Teddy

Lass die zeit mal bis 0 laufen ....danach kommt 49812378812s ....komisch

Jetzt nicht mehr - Habe eine Änderung drin, dass ab 0 das Feld nicht mehr abgefragt wird.

Teddy

Wenn die Zeit auf 0 ist ..

Und ich des Reseten will muss ja klar nen button machen ...nur wie soll das gehen ...ich will nähmlich des programm net beenden ...wenn ich ne neue zeit machen will.

MfG Teddy

Teddy

nochwas

1.das programm kann ich nur beenden wenn EINE zeit abgelaufen ist ...
2.mann kann ja net 61eingeben .... Sprich 61 minuten nur 60minuten xD

**BugFix**

Zitat von Teddy

1.das programm kann ich nur beenden wenn EINE zeit abgelaufen ist ...

Was ist da bei dir los?? - Ich kann JEDERZEIT beenden (auch logisch laut Code).

Zitat von Teddy

2.mann kann ja net 61eingeben .... Sprich 61 minuten nur 60minuten xD

Du wolltest nur Minuten - also hast du Minuten bekommen. Das kann man aber ändern.

Übrigens läuft es völlig mit normaler Geschwindigkeit, egal ob 4 oder 8 Controls.

Spoiler anzeigen

[autoit]

#include <guiconstants.au3>
#include <Date.au3>

[/autoit] [autoit][/autoit] [autoit]

Global $arBt[8], $arIn[8][3], $arCounter[8][2], $y = 10
GUICreate('test')
For $i = 0 To UBound($arBt) -1
$arBt[$i] = GUICtrlCreateButton('set Time', 10, $y, 60, 20)
$arIn[$i][0] = GUICtrlCreateInput('', 80, $y, 40, 20)
$arCounter[$i][0] = GUICtrlCreateLabel('', 140, $y+3, 80, 17)
$y += 30
Next
GUISetState()

[/autoit] [autoit][/autoit] [autoit]

Do
$msg = GUIGetMsg()
_SetCounter()
For $i = 0 To UBound($arBt) -1
If $msg = $arBt[$i] Then
$arCounter[$i][1] = 1
$arIn[$i][1] = GUICtrlRead($arIn[$i][0]) * 60
$arIn[$i][2] = _NowCalc()
GUICtrlSetState($arBt[$i], $GUI_DISABLE)
EndIf
Next
Until $msg = $GUI_EVENT_CLOSE

[/autoit] [autoit][/autoit] [autoit]

Func _SetCounter()
Local $sec
For $i = 0 To UBound($arCounter) -1
If $arCounter[$i][1] <> 1 Then ContinueLoop
If $arIn[$i][1] = 0 Then ContinueLoop
$sec = $arIn[$i][1] - _DateDiff("s", $arIn[$i][2], _NowCalc())
Select
Case $sec < 60
GUICtrlSetData($arCounter[$i][0], StringFormat('%02u', $sec) & ' s')
Case $sec < 60*60
GUICtrlSetData($arCounter[$i][0], StringFormat('%02u', Floor($sec/60)) & ':' & _
StringFormat('%02u', Mod($sec,60)) & ' min')
EndSelect
If $sec = 0 Then
SoundPlay(@WindowsDir & '\Media\tada.wav')
$arCounter[$i][1] = 0
GUICtrlSetState($arBt[$i], $GUI_ENABLE)
GUICtrlSetData($arCounter[$i][0], '')
GUICtrlSetData($arIn[$i][0], '')
EndIf
Next
EndFunc

[/autoit]

Teddy

Nicht die Geschwindigkeit sonder Wenn ich auf "Start" drücke ($Button1 - Button4) geht des noch ..
Aber wenn ich "Start" drücke ab Button5-8 dauert es knapp 1minute bis die Zeit da steht und runter zählt...

Edit*

Spoiler anzeigen

[autoit]

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <Date.au3>

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

HotKeySet ("^{F1}", "dauerbuff")
HotKeySet ("^{F5}", "_exit")

[/autoit] [autoit][/autoit] [autoit]

$iniaccread1 = IniRead( @scriptdir & "/Datei.ini" , "Taste1" , "" , "" )
$iniaccread2 = IniRead( @scriptdir & "/Datei.ini" , "Taste2" , "" , "" )
$iniaccread3 = IniRead( @scriptdir & "/Datei.ini" , "Taste3" , "" , "" )
$iniaccread4 = IniRead( @scriptdir & "/Datei.ini" , "Taste4" , "" , "" )
$iniaccread5 = IniRead( @scriptdir & "/Datei.ini" , "Taste5" , "" , "" )
$iniaccread6 = IniRead( @scriptdir & "/Datei.ini" , "Taste6" , "" , "" )
$iniaccread7 = IniRead( @scriptdir & "/Datei.ini" , "Taste7" , "" , "" )

[/autoit] [autoit][/autoit] [autoit]

Global $Input[8][3], $Label[8][2]
#Region ### START Koda GUI section ###
$Form1 = GUICreate("New Programm", 487, 390, 195, 155)
$Tab1 = GUICtrlCreateTab(3, 1, 480, 387)
GUICtrlSetResizing(-1, $GUI_DOCKWIDTH+$GUI_DOCKHEIGHT)

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

$TabSheet1 = GUICtrlCreateTabItem("Einstellungen")
$Credits1 = GUICtrlCreateLabel("(¯`·.•»Credits«•.·´¯)", 200, 56, 287, 32)
GUICtrlSetFont(-1, 18, 800, 4, "Monotype Corsiva")
$Credits2 = GUICtrlCreateLabel("_P_auf_K_", 240, 104, 119, 32)
GUICtrlSetFont(-1, 18, 800, 2, "Monotype Corsiva")
GUICtrlSetColor(-1, 0xFF0000)
$Credits3 = GUICtrlCreateLabel("Hotkeys", 256, 168, 81, 23)
GUICtrlSetFont(-1, 14, 400, 6, "Lucida Console")
$Credits4 = GUICtrlCreateLabel("Strg+F1 Macht Powerlevel-Helper an", 184, 200, 263, 15)
GUICtrlSetFont(-1, 9, 400, 3, "Lucida Console")
$Credits5 = GUICtrlCreateLabel("Strg+F5 Beendet das Programm", 184, 230, 263, 15)
GUICtrlSetFont(-1, 9, 400, 3, "Lucida Console")
$VerzeichnisWaelen = GUICtrlCreateButton("Sro_Client Suchen", 32, 120, 97, 33, 0)
$Start = GUICtrlCreateButton("Start-Sro", 32, 168, 97, 33, 0)
$Min = GUICtrlCreateButton("Verkleinert Sro", 32, 216, 97, 33, 0)
$Hide = GUICtrlCreateButton("Versteckt Sro", 32, 264, 97, 33, 0)
$Max = GUICtrlCreateButton("Zeigt Sro", 32, 312, 97, 33, 0)

[/autoit] [autoit][/autoit] [autoit]

$Zeit5 = GUICtrlCreateInput("", 16, 48, 25, 21)
$Zeit6 = GUICtrlCreateInput("", 48, 48, 25, 21)
$Zeit7 = GUICtrlCreateInput("", 80, 48, 25, 21)
$Zeit8 = GUICtrlCreateLabel("Uhrzeit", 112, 48, 52, 23)
GUICtrlSetFont(-1, 10, 800, 0, "Comic Sans MS")

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

$TabSheet2 = GUICtrlCreateTabItem("Auto Wep-Switcher")

[/autoit] [autoit][/autoit] [autoit]

$Combo1 = GUICtrlCreateCombo($iniaccread1, 24, 46, 161, 21)
GUICtrlSetData(-1, "F1|F2|F3|F4|1|2|3|4|5|6|7|8|9|0| |", "")

[/autoit] [autoit][/autoit] [autoit]

$Combo2 = GUICtrlCreateCombo($iniaccread2, 24, 76, 161, 21)
GUICtrlSetData(-1, "F1|F2|F3|F4|1|2|3|4|5|6|7|8|9|0| |", "")

[/autoit] [autoit][/autoit] [autoit]

$Combo3 = GUICtrlCreateCombo($iniaccread3, 24, 106, 161, 21)
GUICtrlSetData(-1, "F1|F2|F3|F4|1|2|3|4|5|6|7|8|9|0| |", "")

[/autoit] [autoit][/autoit] [autoit]

$Combo4 = GUICtrlCreateCombo($iniaccread4, 24, 136, 161, 21)
GUICtrlSetData(-1, "F1|F2|F3|F4|1|2|3|4|5|6|7|8|9|0| |", "")

[/autoit] [autoit][/autoit] [autoit]

$Combo5 = GUICtrlCreateCombo($iniaccread5, 24, 166, 161, 21)
GUICtrlSetData(-1, "F1|F2|F3|F4|1|2|3|4|5|6|7|8|9|0| |", "")

[/autoit] [autoit][/autoit] [autoit]

$Combo6 = GUICtrlCreateCombo($iniaccread6, 24, 196, 161, 21)
GUICtrlSetData(-1, "F1|F2|F3|F4|1|2|3|4|5|6|7|8|9|0| |", "")

[/autoit] [autoit][/autoit] [autoit]

$Combo7 = GUICtrlCreateCombo($iniaccread7, 24, 226, 161, 21)
GUICtrlSetData(-1, "F1|F2|F3|F4|1|2|3|4|5|6|7|8|9|0| |", "")

[/autoit] [autoit][/autoit] [autoit]

$Speichern123 = GuiCtrlCreateButton("Speichern",24, 266, 161, 41, 0)

[/autoit] [autoit][/autoit] [autoit]

$TabSheet3 = GUICtrlCreateTabItem("Powerlevel Helper")
Global $Input[8][3], $Label[8][2]
$Zeit1 = GUICtrlCreateInput("", 50, 290, 27, 21)
$Zeit2 = GUICtrlCreateInput("", 90, 290, 27, 21)
$Zeit3 = GUICtrlCreateInput("", 130, 290, 27, 21)
$Zeit4 = GUICtrlCreateLabel("Uhrzeit", 175, 295, 47, 31)

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

$Label[0][0] = GUICtrlCreateLabel("", 288, 52, 132, 17)
$Label[1][0] = GUICtrlCreateLabel("", 288, 82, 132, 17)
$Label[2][0] = GUICtrlCreateLabel("", 288, 112, 132, 17)
$Label[3][0] = GUICtrlCreateLabel("", 288, 142, 132, 17)
$Label[4][0] = GUICtrlCreateLabel("", 288, 172, 132, 17)
$Label[5][0] = GUICtrlCreateLabel("", 288, 202, 132, 17)
$Label[6][0] = GUICtrlCreateLabel("", 288, 232, 132, 17)
$Label[7][0] = GUICtrlCreateLabel("", 288, 262, 132, 17)

[/autoit] [autoit][/autoit] [autoit]

$Plvl1 = GUICtrlCreateButton("Start",192, 46, 70, 22, 0)
$Plvl2 = GUICtrlCreateButton("Start",192, 76, 70, 22, 0)
$Plvl3 = GUICtrlCreateButton("Start",192, 106, 70, 22, 0)
$Plvl4 = GUICtrlCreateButton("Start",192, 136, 70, 22, 0)
$Plvl5 = GUICtrlCreateButton("Start",192, 166, 70, 22, 0)
$Plvl6 = GUICtrlCreateButton("Start",192, 196, 70, 22, 0)
$Plvl7 = GUICtrlCreateButton("Start",192, 226, 70, 22, 0)
$Plvl8 = GUICtrlCreateButton("Start",192, 256, 70, 22, 0)

[/autoit] [autoit][/autoit] [autoit]

$Input[0][0] = GUICtrlCreateInput("Zeit in Minuten", 24, 46, 161, 21, 1, 5)
$Input[1][0] = GUICtrlCreateInput("Zeit in Minuten", 24, 76, 161, 21, 1, 5)
$Input[2][0] = GUICtrlCreateInput("Zeit in Minuten", 24, 106, 161, 21, 1, 5)
$Input[3][0] = GUICtrlCreateInput("Zeit in Minuten", 24, 136, 161, 21, 1, 5)
$Input[4][0] = GUICtrlCreateInput("Zeit in Minuten", 24, 166, 161, 21, 1, 5)
$Input[5][0] = GUICtrlCreateInput("Zeit in Minuten", 24, 196, 161, 21, 1, 5)
$Input[6][0] = GUICtrlCreateInput("Zeit in Minuten", 24, 226, 161, 21, 1, 5)
$Input[7][0] = GUICtrlCreateInput("Zeit in Minuten", 24, 256, 161, 21, 1, 5)

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

GUICtrlCreateTabItem("")
$MenuItem1 = GUICtrlCreateMenu("&File")
$MenuItem3 = GUICtrlCreateMenuItem("Exit", $MenuItem1)
$MenuItem2 = GUICtrlCreateMenu("&Credits")
$MenuItem4 = GUICtrlCreateMenuItem("Credits", $MenuItem2)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

Func _exit()
Exit
EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func _SROexesuchen()
SetError(0)
$Path = FileSelectFolder("Wähle den Ordner in dem sich die Silkroad.exe befindet", "", 1)
IniWrite( @scriptdir & "\Datei.ini" , "Silkroad Ordner", "Silkroad", $Path & "\Silkroad.exe")
If @error = 1 Then
EndIf
EndFunc

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

Func _SetCounter()
Local $sec
For $i = 0 To UBound($Label) -1
If $Label[$i][1] <> 1 Then ContinueLoop
If $Input[$i][1] = 0 Then ContinueLoop
$sec = $Input[$i][1] - _DateDiff("s", $Input[$i][2], _NowCalc())
Select
Case $sec < 60
GUICtrlSetData($Label[$i][0], StringFormat('%02u', $sec) & ' s')
Case $sec < 60*60
GUICtrlSetData($Label[$i][0], StringFormat('%02u', Floor($sec/60)) & ':' & _
StringFormat('%02u', Mod($sec,60)) & ' min')
EndSelect
If $sec = 0 Then
SoundPlay(@ScriptDir & '\Media\Sound.wav')
$Label[$i][1] = 0
EndIf
Next
EndFunc

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

Func ende() ; damit kann beendet werden, auch wenn der Timer läuft ==> hat kleine Verzögerung
If GUIGetMsg() = $GUI_EVENT_CLOSE Then Exit
EndFunc

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

$buff = 0 ; speichert, ob dauerbuff an / aus ist
Func buff()
$Alex = GUICtrlRead ($Combo1)
$Alex2 = GUICtrlRead ($Combo3)
$Alex3 = GUICtrlRead ($Combo4)
$Alex4 = GUICtrlRead ($Combo5)
$Alex5 = GUICtrlRead ($Combo6)
$Alex6 = GUICtrlRead ($Combo7)
$Alex7 = GUICtrlRead ($Combo2)

[/autoit] [autoit][/autoit] [autoit]

Send(" {END} ")
Sleep(1500)
Send(" {END} ")
Sleep(1500)

[/autoit] [autoit][/autoit] [autoit]

Send('{' & $Alex & '}')
Sleep(4500)
Send('{' & $Alex7 & '}')
Sleep(4500)
Send('{' & $Alex2 & '}')
Sleep(4500)
Send('{' & $Alex3 & '}')
Sleep(4500)
Send('{' & $Alex4 & '}')
Sleep(4500)
Send('{' & $Alex5 & '}')
Sleep(4500)
Send('{' & $Alex6 & '}')
Sleep(4500)

[/autoit] [autoit][/autoit] [autoit]

Send(" {INSERT} ")
Sleep(1500)
Send(" {INSERT} ")
Sleep(1500)
EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func dauerbuff()
If $buff = 0 Then
buff()
AdlibEnable( "buff" , 60000); alle 5 Min. wird automatisch buff() ausgeführt
$buff = 1; setzt dauerbuff an
Else
AdlibDisable ( )
$buff = 0 ; setzt dauerbuff aus
EndIf
EndFunc

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

While 1

GUICtrlSetData($Zeit1,@HOUR)
GUICtrlSetData($Zeit2,@MIN)
GUICtrlSetData($Zeit3,@SEC)
GUICtrlSetData($Zeit5,@HOUR)
GUICtrlSetData($Zeit6,@MIN)
GUICtrlSetData($Zeit7,@SEC)

[/autoit] [autoit][/autoit] [autoit]

$nMsg = GUIGetMsg()
For $i = 0 To UBound($Label) -1
If $Label[$i][1] = 1 Then _SetCounter()
Next
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $VerzeichnisWaelen
_SROexesuchen()
Case $MenuItem3
Exit
Case $MenuItem4
$starlol = ShellExecute ( @ScriptDir & "\Help.ini" )
Case $Min
WinSetState("SRO_Client","",@SW_SHOWMINNOACTIVE)
Case $Hide
WinSetState("SRO_Client","",@SW_HIDE)
TrayTip( "","Silkroad ist gehided !" , 15 )
Case $Max
WinSetState("SRO_Client","",@SW_MAXIMIZE)

case $Speichern123
Global $frank1 = GUICtrlRead( $Combo1 )
Global $frank2 = GUICtrlRead( $Combo2 )
Global $frank3 = GUICtrlRead( $Combo3 )
Global $frank4 = GUICtrlRead( $Combo4 )
Global $frank5 = GUICtrlRead( $Combo5 )
Global $frank6 = GUICtrlRead( $Combo6 )
Global $frank7 = GUICtrlRead( $Combo7 )
Global $Belegung1 = iniwrite( @scriptdir & "\Datei.ini" , "Taste1" , "" , $frank1 )
Global $Belegung2 = IniWrite( @scriptdir & "\Datei.ini" , "Taste2" , "" , $frank2 )
Global $Belegung3 = iniwrite( @scriptdir & "\Datei.ini" , "Taste3" , "" , $frank3 )
Global $Belegung4 = IniWrite( @scriptdir & "\Datei.ini" , "Taste4" , "" , $frank4 )
Global $Belegung5 = iniwrite( @scriptdir & "\Datei.ini" , "Taste5" , "" , $frank5 )
Global $Belegung6 = IniWrite( @scriptdir & "\Datei.ini" , "Taste6" , "" , $frank6 )
Global $Belegung7 = iniwrite( @scriptdir & "\Datei.ini" , "Taste7" , "" , $frank7 )
TrayTip( "" , "Datein gespeichert" , 4 )

Case $Start
$startpath = IniRead( @scriptdir & "\Datei.ini" , "Silkroad Ordner", "Silkroad" , "" )
run ( $startpath )

Case $Plvl1
$Label[0][1] = 1
$Input[0][1] = GUICtrlRead($Input[0][0]) * 60
$Input[0][2] = _NowCalc()
GUICtrlSetState($Plvl1, $GUI_DISABLE)
Case $Plvl2
$Label[1][1] = 1
$Input[1][1] = GUICtrlRead($Input[1][0]) * 60
$Input[1][2] = _NowCalc()
GUICtrlSetState($Plvl2, $GUI_DISABLE)
Case $Plvl3
$Label[2][1] = 1
$Input[2][1] = GUICtrlRead($Input[2][0]) * 60
$Input[2][2] = _NowCalc()
GUICtrlSetState($Plvl3, $GUI_DISABLE)
Case $Plvl4
$Label[3][1] = 1
$Input[3][1] = GUICtrlRead($Input[3][0]) * 60
$Input[3][2] = _NowCalc()
GUICtrlSetState($Plvl4, $GUI_DISABLE)
Case $Plvl5
$Label[4][1] = 1
$Input[4][1] = GUICtrlRead($Input[4][0]) * 60
$Input[4][2] = _NowCalc()
GUICtrlSetState($Plvl5, $GUI_DISABLE)
Case $Plvl6
$Label[5][1] = 1
$Input[5][1] = GUICtrlRead($Input[5][0]) * 60
$Input[5][2] = _NowCalc()
GUICtrlSetState($Plvl6, $GUI_DISABLE)
Case $Plvl7
$Label[6][1] = 1
$Input[6][1] = GUICtrlRead($Input[6][0]) * 60
$Input[6][2] = _NowCalc()
GUICtrlSetState($Plvl7, $GUI_DISABLE)
Case $Plvl8
$Label[7][1] = 1
$Input[7][1] = GUICtrlRead($Input[7][0]) * 60
$Input[7][2] = _NowCalc()
GUICtrlSetState($Plvl8, $GUI_DISABLE)

[/autoit] [autoit][/autoit] [autoit]

sleep(1000)
EndSwitch
WEnd

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit]

Guck es dir an...

**BugFix**

Zitat von Teddy

Aber wenn ich "Start" drücke ab Button5-8 dauert es knapp 1minute bis die Zeit da steht und runter zählt...

Kann es sein, dass dein Arbeitsspeicher voll ausgelastet ist ?
Bei mir erscheint die Anzeige sofort (innerhalb von 2-3 Zehntel Sekunden.

Edit:
LOL ==> du hast ein Sleep von 1000 (= 1 Sekunde!!) in deiner Schleife(zeile 321). Brauchst du gar nicht, hast doch GUIGetMsg. Also Löschen!!
Und übernimm mal die Änderungen, die ich gemacht habe.

Teddy

so klappt jetzt
Nur was muss ich machen , dass man die Reseten kann ...wenn sie auf 0waren ?!