|
You last visited: Today at 08:19
Advertisement
Tratsch rund um Autoit / Autoit Talk | kleinere Fragen
Discussion on Tratsch rund um Autoit / Autoit Talk | kleinere Fragen within the AutoIt forum part of the Coders Den category.
09/16/2013, 16:30
|
#1636
|
elite*gold: 50
Join Date: Sep 2012
Posts: 3,841
Received Thanks: 1,462
|
Quote:
Originally Posted by Ruffу
habe es so versucht aber
"INSTANCE" ändern sich bei jedem Kontakt  ist das iwie anders möglich ?
|
"INSTANCE" lässt du ganz weg wie ich geschrieben habe .
Bei controlclick kannst du auch nur coordinaten relativ zu der fenstergröße nehmen und dann in die textbox klicken.
Findest du im Window Info tool bei autoit ^^
|
|
|
09/16/2013, 17:07
|
#1637
|
elite*gold: 0
Join Date: May 2012
Posts: 319
Received Thanks: 67
|
Quote:
Originally Posted by Der-Eddy

Lass auslesen wie alt die Dateien sind und berechne die älteste von diesen
diese wird dann gelöscht
|
mmm...und wie kann ich das machen  ?
fur orner geht das nicht
|
|
|
09/16/2013, 21:03
|
#1638
|
elite*gold: 5
Join Date: Dec 2011
Posts: 3,930
Received Thanks: 1,918
|
Quote:
Originally Posted by »FlutterShy™
"INSTANCE" lässt du ganz weg wie ich geschrieben habe .
Bei controlclick kannst du auch nur coordinaten relativ zu der fenstergröße nehmen und dann in die textbox klicken.
Findest du im Window Info tool bei autoit ^^
|
er sendet dann nichts
|
|
|
09/16/2013, 22:20
|
#1639
|
elite*gold: 400
Join Date: Nov 2008
Posts: 67,905
Received Thanks: 19,505
|
Quote:
Originally Posted by [becky]
mmm...und wie kann ich das machen  ?
fur orner geht das nicht
|
Stichwörter: For Schleife, Multidimensionale Arrays, 
Übung macht den Meister, Selbsinitiative ist gefragt
Alternativ könnte man über RegEx das Datum aus den Dateinamen auslesen, das müsste aber noch schwieriger sein
|
|
|
09/17/2013, 16:34
|
#1640
|
elite*gold: 0
Join Date: May 2012
Posts: 319
Received Thanks: 67
|
ich habe eine leichtere methode gefunden. ich habe aber ein problem...
Code:
#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_Icon=Guillendesign-Variations-2-Backup.ico
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
#include <wait.au3>
#include <Date.au3>
While 1
DirCopy("E:\D Diverse\Minecraft\Minecraft\Server\world", "E:\D Diverse\Minecraft\Minecraft\backup\world" & " " & @MDAY & "." & @MON & "." & @YEAR & " _ " & @HOUR & "." & @MIN)
DirRemove("E:\D Diverse\Minecraft\Minecraft\backup\world" & " " & @MDAY & "." & @MON & "." & @YEAR & " _ " & @HOUR & "." & @MIN - 3, 1)
;wait(3600000)
wait(60000)
WEnd
also er copiert das order jeder minute und loscht der order der drei minuten fruher ist.
also, als beispiel:
world 17.09.2013_17.29
world 17.09.2013_17.30
world 17.09.2013_17.31
world 17.09.2013_17.32 - und world 17.09.2013_17.29 wird geloscht.
und bleiben:
world 17.09.2013_17.30
world 17.09.2013_17.31
world 17.09.2013_17.32
dann copieren sich noch:
world 17.09.2013_17.33
world 17.09.2013_17.34
aber es loschen sich nicht mehr weiter. mann musste world 17.09.2013_17.30 aber es loshct sich nichts mehr, nur das erste mal...
|
|
|
09/17/2013, 17:07
|
#1641
|
elite*gold: 3570
Join Date: Dec 2012
Posts: 13,044
Received Thanks: 8,252
|
Ich hab nen Radiostreamer für TechnoBase.FM, der über das WMP Object läuft.
Wie kann ich es machen, dass er das in einer mp3 datei speichert, während es läuft?
Also es geht mir nur darum, den Sound, der gerade aus dem Programm läuft, in einer mp3 abzuspeichern.
|
|
|
09/17/2013, 17:12
|
#1642
|
elite*gold: 50
Join Date: Sep 2012
Posts: 3,841
Received Thanks: 1,462
|
Bass.dll + Autoit UDF
|
|
|
09/17/2013, 17:40
|
#1643
|
elite*gold: 280
Join Date: May 2007
Posts: 2,818
Received Thanks: 3,483
|
Quote:
Originally Posted by [becky]
ich habe eine leichtere methode gefunden. ich habe aber ein problem...
Code:
#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_Icon=Guillendesign-Variations-2-Backup.ico
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
#include <wait.au3>
#include <Date.au3>
While 1
DirCopy("E:\D Diverse\Minecraft\Minecraft\Server\world", "E:\D Diverse\Minecraft\Minecraft\backup\world" & " " & @MDAY & "." & @MON & "." & @YEAR & " _ " & @HOUR & "." & @MIN)
DirRemove("E:\D Diverse\Minecraft\Minecraft\backup\world" & " " & @MDAY & "." & @MON & "." & @YEAR & " _ " & @HOUR & "." & @MIN - 3, 1)
;wait(3600000)
wait(60000)
WEnd
also er copiert das order jeder minute und loscht der order der drei minuten fruher ist.
also, als beispiel:
world 17.09.2013_17.29
world 17.09.2013_17.30
world 17.09.2013_17.31
world 17.09.2013_17.32 - und world 17.09.2013_17.29 wird geloscht.
und bleiben:
world 17.09.2013_17.30
world 17.09.2013_17.31
world 17.09.2013_17.32
dann copieren sich noch:
world 17.09.2013_17.33
world 17.09.2013_17.34
aber es loschen sich nicht mehr weiter. mann musste world 17.09.2013_17.30 aber es loshct sich nichts mehr, nur das erste mal...
|
du gehst da doch etwas sehr stumpf rann... du solltest einfach immer die ordner einlesen und die ersten eingelesenen löschen...
das ganze kann dauerhaft im hintergrund passieren, damit nicht irgendwann aus irgendeinem grund doch mehr ordner existieren...
bsp:
Code:
Dim $timer, $path = @ScriptDir
While Sleep(1)
deleteOldFolders(getAllFolders($path), 3)
If TimerDiff($timer)>60000 Then
createNewFolder($path)
$timer = TimerInit()
EndIf
WEnd
Func getAllFolders($path)
local $return[1]=[0], $file = FileFindFirstFile($path&"\world*")
Do
$current = FileFindNextFile($file)
If @error Then ExitLoop
If @extended=1 Then
$return[0]+=1
ReDim $return[$return[0]+1]
$return[$return[0]]=$path&'\'&$current
EndIf
Until $current=''
Return $return
EndFunc
Func deleteOldFolders($fileArray, $maxNumberOfFolders)
If $fileArray[0]>$maxNumberOfFolders Then
For $i=1 To $fileArray[0]-$maxNumberOfFolders
DirRemove($fileArray[$i], 1)
Next
EndIf
EndFunc
Func createNewFolder($path)
DirCreate($path&"\world "&@MDAY&'.'&@MON&'.'&@YEAR&'_'&@HOUR&'.'&@MIN)
EndFunc
hier mal ein code welcher nur den ordner erstellt... du müsstest bei dir natürlich wieder mit dircopy arbeiten.
|
|
|
10/04/2013, 01:31
|
#1644
|
elite*gold: 3570
Join Date: Dec 2012
Posts: 13,044
Received Thanks: 8,252
|
Ich versuche gerade für  einen autoplayer zu machen, mit den vorgelegten Sheets.
Kein Problem - Dachte ich mir. Ich schaffe es nicht, in einer For Schleife die Buchstaben eines Strings durch zu gehen.
Script jetzt:
Code:
#include <Array.au3>
#include <String.au3>
HotKeySet("{F1}", "_play")
HotKeySet("{ESC}", "_exit")
$aChar = "dd jj kk j hh gg ff d jj hh gg f jj hh gg f dd jj kk j hh gg ff d"
_pause()
Func _play()
Local $aChars[StringLen($aChar)]
_ArrayDisplay($achars)
For $i = 1 To StringLen($aChar)
$aChars[$i] = _Need_Funktion($aChar, $i)
_ArrayDisplay($achars)
Next
_ArrayDisplay($aChar)
For $s In $aChars
Send($s)
Next
EndFunc
Func _pause()
While 1
Sleep(10)
WEnd
EndFunc
Func _exit()
Exit
EndFunc
Dort wo _Need_Funktion steht, brauche ich eine Funktion, die im String $aChar beim Delimeter $i den Buchstaben rausfischt.
StringLeft probiert, aber dann sah ich, dass es alles von 1 bis $i fischt.
|
|
|
10/04/2013, 10:44
|
#1645
|
elite*gold: 95
Join Date: May 2011
Posts: 982
Received Thanks: 189
|
Stringsplit($string,"") damit kannste die ganze schleife ersetzen
|
|
|
10/04/2013, 15:21
|
#1646
|
elite*gold: 3570
Join Date: Dec 2012
Posts: 13,044
Received Thanks: 8,252
|
Dass ich da nicht sofort drauf gekommen bin, dass StringSplit einen Array zurück gibt
Dann danke ich dir
|
|
|
10/04/2013, 15:29
|
#1647
|
elite*gold: 280
Join Date: May 2007
Posts: 2,818
Received Thanks: 3,483
|
noch besser sollte das ganze wohl per stringmid funktionieren, du da ohnehin jeden buchstaben abarbeiten musst.
|
|
|
10/05/2013, 12:58
|
#1648
|
elite*gold: 60
Join Date: Aug 2009
Posts: 2,256
Received Thanks: 815
|
Bei StringSplit sollte man aber als Flag 2 verwenden, da sonst im [0] Eintrag die Arraygröße drinne steckt.
|
|
|
10/05/2013, 14:07
|
#1649
|
elite*gold: 3570
Join Date: Dec 2012
Posts: 13,044
Received Thanks: 8,252
|
Das ist mir auch aufgefallen. Ich hab einfach den ersten Array auf nichts gesetzt.
EDIT:
Habe nun an zweites Problem. Es gibt oft Noten, bei denen man 2-4 Tasten gleichzeitig drücken muss.
Gekennzeichnet wäre sie so [ary]
Wie könnte ich es so splitten, dass er die buchstaben im [] zusammen lässt aber die Klammern entfernt?
|
|
|
10/09/2013, 14:40
|
#1650
|
elite*gold: 0
Join Date: Sep 2013
Posts: 1,927
Received Thanks: 201
|
Problem
:
Code:
PHP Code:
#RequireAdmin #Region ;**** Directives created by AutoIt3Wrapper_GUI **** #AutoIt3Wrapper_Res_Comment=Animewatchlist #AutoIt3Wrapper_Res_Fileversion=1.0 #AutoIt3Wrapper_Res_LegalCopyright=Me #EndRegion ;**** Directives created by AutoIt3Wrapper_GUI **** #include <ButtonConstants.au3> #include <EditConstants.au3> #include <GUIConstantsEx.au3> #include <GUIListBox.au3>
$sini = @DesktopDir & "\Watchlistconfig.ini" Local $var #Region ### START Koda GUI section ### Form= $Form1_1 = GUICreate("Watchlist Tool By Me", 478, 327, 454, 468) $List = GUICtrlCreateList("", 16, 24, 169, 279) $Input1 = GUICtrlCreateInput("", 208, 32, 217, 21) $button = GUICtrlCreateButton("Add Anime!", 240, 72, 161, 25) GUISetState(@SW_SHOW) #EndRegion ### END Koda GUI section ### $var = IniReadSection($sini, "Anime") For $i = 1 To $var[0][0] GUICtrlSetData($List,$var[$i] [1]) Next
While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit Case $button _add() EndSwitch WEnd
Func _add() IniWrite($sini,"Anime", GUICtrlRead($Input1),GUICtrlRead($Input1)) GUICtrlSetData($List,GUICtrlRead($Input1)) EndFunc
|
|
|
Similar Threads
|
[Sammelthread]Fragen zu Autoit wie man Hacks herstellt(Autoit) + Antworten
11/16/2011 - Metin2 - 0 Replies
Hallo Liebe Community,
Ich habe diesen Thread aufgemacht weil manche leute mit Autoit nicht mehr weiterkommen wie man Hack herstellt ,ich habe mit schon ein Multihack mit Autoit herstellt das war einfach .Da viele User nicht weiterkommen werden habe ich mich entschieden ein Thread aufzumachen mit Fragen und ich den dann Antworten kann und helfen kann!
------------------------------------------------- ---------------------------
Mein Multihack:...
|
All times are GMT +1. The time now is 08:19.
|
|