Schau dich mal auf Computerbild.de um. Bei mir waren die ergebnisse richtig.
Beiträge von Fast2
-
-
Danke, jetzt weiß ich endlich wieder wo das wiki ist (und nach was ich Suchen muss)
Zum 3ten Tipp: Ja, ich weiß, aber ich hab halt in letzter Zeit(meistens) ziemlich viel um die Ohren.( Ich nehm mir halt jeden Tag für AutoIt.de so viel Zeit wie ich brauch um die Beiträge zu Lesen, zu Beantworten usw.) -
Ich hoffe jetzt kann ich besser helfen.
[autoit]
AlsoWhile 1
[/autoit]
For $z = 1 to 1200 step 1
$a = StringInStr(ClipGet(), "+"&$z&"Leben"); Schaut nach der Zahl
Switch $a
Case 1 to 300 ;Wenn es 1 bis 299 ist dann...
;Hier kommt rein was du machen willst wenn es zwischen 1 und 299 ist
ExitLoop
Case 300 to 1200 ;Wenn es 300 bis 1200 ist dann...
;Was du dann machen lassen willst
ExitLoop
Case Else
;Was bei einem Fehler passieren soll
sleep(1)
EndSwitch
Next
sleep(200);Pause wegen CPU
Wend
Aber es gibt keine Garantie dass es geht -
Hallo. Also das ich in letzter Zeit immer mehr Admin/Mod kommentare unter meinen Post stehen hab, wollte ich mal fragen , was ich besser machen kann.
@pee: Ja ich weiß dass du so einen Link in deiner Signatur hast.
Dieser ist aber ziemlich umfangreich (Erinner mich doch noch mal dran wenn ich euch mal wieder Nerv weil ich zu viel Zeit hab.Außerdem such ich auch eher konkrete Tipps.
Schonmal Danke,
Fast2 -
Mir fällt spontan StringTrimRight ein, habs aber noch nicht benutzt. (siehe AutoIt Hilfe )
-
Muss das nicht
[autoit]Call(nur_ein_mal)
[/autoit]heißen?
Edit: Ignoriere mich einfach... Ich hab vergessen das das doch so passt. (Du hast recht) -
Mich nicht aber:
[autoit]
Seit wann kann man Funktionen so verschachteln?
Und es fehlt ein EndIf.
Also eigentlich muss das so sein (ich hab jetzt keine anderen Fehler auf die schnelle gefunden, korriegiert wenn ich was Vergessen hab):
[/autoit][autoit][/autoit][autoit]
#cs ----------------------------------------------------------------------------AutoIt Version: 3.2.8.1
[/autoit][autoit][/autoit][autoit]
Author: $cR!pT k!ddYScript Function:
[/autoit][autoit][/autoit][autoit]
7-Zip 4.57 installieren#ce ----------------------------------------------------------------------------
[/autoit][autoit][/autoit][autoit];$cR!pT Start
[/autoit][autoit][/autoit][autoit];7-Zip installieren
[/autoit][autoit][/autoit][autoit]$pfad = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\7-Zip", "UninstallString")
[/autoit][autoit][/autoit][autoit]
If Not @error Then
$msg = 'Programm ist bereits installiert.' & @CRLF & 'Programm deinstallieren?'
Switch MsgBox(33, '7-Zip 4.57', $msg)
Case 1; 'Ok'
If MsgBox(36,"Titel","Nach Deinstallation neu installieren?") = 6 Then _Go()
Else
Run($pfad)
_Uninstall()
Exit
EndIf
Case 2; 'Abbrechen'
Exit
EndSwitch
EndIfFunc _Go()
[/autoit][autoit][/autoit][autoit]
Call("_Uninstall")
ShellExecute(@Scriptdir & "\7-Zip 4.57.exe")
$title="7-Zip 4.57 Setup"
WinWait($title, "Choose Install Location")
ControlClick($title, "&Install","Button2")
WinWait($title, "Completing")
ControlClick($title, "&Finish","Button2")
EndFuncFunc _Uninstall()
[/autoit][autoit][/autoit][autoit][/autoit]
$title1="7-Zip 4.57 Uninstall"
WinWait($title1, "Uninstall")
ControlClick($title1, "&Uninstall","Button2")
EndFunc -
Coool Das Programm rockt es bewirkt so viel mit so wenig Script .
-
@OffTopc: @Mignon: An so was arbeite ich auch bald.
-
-
Bei mir ist die Shoutbox mal wieder weiß.
Edit: Geht wieder -
@Aiden: Muss das nicht
[autoit]Until $PIDI = 0
[/autoit]sein?
-
Notiz an mich: Server: irc://irc.afterworkchat.com
Notiz an dich: Lesezeichen im Browser hinterlegen...? (BugFix)
-
-
Kann mir denn keiner helfen?
Wieso steht der Thread af gelöst, obwohl meine Frage noch nicht geklärt ist? -
Die Geschichte meines Nicknamens:
Ich hab "Siege of Avalon" gespielt und mir ist kein Name für meinen Helden eingefallen, und schlug auf die Tastatur, machte wieder weg... .Und da las ich "Fast" ich dachte mir:
hmmm... der ist doch ganz gut... "Fast" für "Schon wieder fast gestorben!" und "Fast" für "I´m very fast!" .
Da war Fast geboren!!!
Aber es ging noch weiter:
Ich wollte mich bei "Die Stämme" anmelden, aber "Fast" hatte schon jemand anderes... also nahm ich "Fast2"
Jetzt war Fast2 da!!!
Und seitdem bin ich bei ICQ, diversen Onlinespielen usw. Fast2.
Das war die Geschichte meines Nicknamens.ENDE
-
@pee: Grad hab ich mich gewundert warum meine Signatur kürzer ist. Aber ich kriegs, glaub ich, nicht kürzer hin.
-
Kann mir bitte jemand mit der Einrichtung helfen? Ich hab gesehen das da mal was in der Shoutbox war, hatte aber keine Zeit um es zu lesen.
-
Schonmal Danke(falls ich ein mal brauch^^)
-
@Bug Fix: Hä? Hab ich da was übersehen? Ich arbeite ja an einem Trainer(naja nicht so oft...) und da geht es einfach so(Der Codeabschnitt ist nicht funktionstüchtig!)
Spoiler anzeigen
[autoit]#cs -----------------------------------------------------
[/autoit] [autoit][/autoit] [autoit]
AutoIt Version: 3.2.8.1
Von: Fast2Funktion:DragRacer3 Automatisierung
[/autoit]
#ce -----------------------------------------------------
;Anfang
#include <GUIConstants.au3>
#include <GUICombo.au3>
$MA = "Rock|Classic Rock|Hard Rock|Pop|HipHop|Rap"
$HA = "Speed|Graffiti|Skyline|Cityscape|Muscle|Money|Cash|Base"
$OA = "Outskirts (0Cr)|Hi-Rev Tuners Section (100 Cr)|'Pump It UP!' Section (100 Cr)|Luxury Section (200 Cr)|Food Court (200 Cr)|Main Floor (500 Cr)|Front Entrance(1000 Cr)"
$KDO = @AppDataCommonDir&"\XT\KD"
$KDP = $KDO&"\KOI.ini"
$OD = DirCreate($KDO)
FileInstall("C:\Dokumente und Einstellungen\Fabian\Desktop\AutoItDateien\Hilfsdateien\KOI.ini", @TempDir&"\KOI.ini", 1)
If not FileExists($KDP) Then FileMove(@TempDir&"\KOI.ini", $KDP, 9)
$G1 = GUICreate("Drag Racer Trainer", 600, 250)
GUISetFont(14)
GUICtrlCreateLabel("Dieser Trainer Automatisiert den Show Off Modus von Drag Racer v3", 20, 20)
GUICtrlCreateLabel("Achtung! Dieser Trainer wurde nur für Firefox v1.5 getestet", 60, 60)
GUICtrlCreateLabel("Bitte wählen sie im folgenden Fenster aus den Einstellungen", 60, 100)
$W1 = GUICtrlCreateButton("Weiter", 380, 210, 80)
$F1 = GUICtrlCreateButton(" Fertig", 500, 210, 75)
$Fa1 = GUISetBkColor(0x0000CD)
GUISetState(@SW_Show, $G1)
$G2 = GUICreate("Drag Racer Trainer Auswahl", 600, 150)
GUISetBkColor(0x0000CD)
$CBM = GUICtrlCreateCombo("Bitte wählen sie die Musik", 25, 20, -1 ,-1, BitOr($GUI_SS_DEFAULT_COMBO, $CBS_DROPDOWNLIST))
GUICtrlSetData($CBM, $MA)
$CBH = GUICtrlCreateCombo("Bitte wählen sie den Hintergrund", 25, 65, -1 ,-1, BitOr($GUI_SS_DEFAULT_COMBO, $CBS_DROPDOWNLIST))
GUICtrlSetData($CBH, $HA)
$CBA = GUICtrlCreateCombo("Bitte wählen sie den Ausstellungsort", 25, 110, -1 ,-1, BitOr($GUI_SS_DEFAULT_COMBO, $CBS_DROPDOWNLIST))
GUICtrlSetData($CBA, $OA)
$R1 = GUICtrlCreateRadio("Das Spiel ist in einem Fenster ", 280, 25, 300)
$R2 = GUICtrlCreateRadio("Das Spiel ist in einem Task ", 280, 60, 300)
$B2 = GUICtrlCreateButton("Bestätigen", 425, 100, 110, 35)
$B3 = GUICtrlCreateButton("Abbrechen", 280, 100, 110, 35)
GUICtrlSetFont($R1, 14, 150)
GUICtrlSetFont($R2, 14, 150)
GUICtrlSetFont($B2, 14, 150)
GUICtrlSetFont($B3, 14, 150)
While 1
$msg = GUIGetMsg()
If $msg = $W1 Then
GUISetState(@SW_Show, $G2)
GUISetState(@SW_Hide, $G1)
EndIf
Select
Case $msg = $B3 Or $msg = $F1 Or $msg = $GUI_Event_Close
Exit
Case $msg = $B2
$CB1 = GUICtrlRead($CBM)
$CB2 = GUICtrlRead($CBH)
$CB3 = GUICtrlRead($CBA)
$RB1 = GUICtrlRead($R1)
$RB2 = GUICtrlRead($R2)
Select
Case $RB1 = 1
$FoT = 0
Case $RB2 = 1
$FoT = 25
Case Else
MsgBox(0, "Bitte Wählen", "Sie haben dem Programm nicht mitgeteilt," & @CRLF & "ob das Programm in einem Task ist oder nicht!")
EndSelect
$MFI = _GUICtrlComboGetCurSel($CBM)
$HFI = _GUICtrlComboGetCurSel($CBH)
$AFI = _GUICtrlComboGetCurSel($CBA)
$MFIY = "M"&$MFI
$HFIY = "H"&$HFI
$AFIY = "A"&$AFI
MsgBox(0, "Test", "Bei Musik haben sie das ausgewählt: "&$CB1&@CRLF&"Das entspricht: "&$MFIY)
MsgBox(0, "Test", "Bei Hintergrund haben sie das ausgewählt: "&$CB2&@CRLF&"Das entspricht: "&$HFIY)
MsgBox(0, "Test", "Bei Ausstellungsort haben sie das ausgewählt: "&$CB3&@CRLF&"Das entspricht: "&$AFIY)
$MC = IniRead(
$HC = IniRead(
$AC = IniRead(
$MK = IniRead($KDP,
EndSelect
WEnd