Vlt. Kann ja ein Admin das in Talk verschieben??
[autoit]
#include <GuiConstantsEx.au3>
#include <WindowsConstants.au3>
Beiträge von L3viathan
-
-
Alles anzeigen
Also die was du als [] meinst sind Array's. Lies dir dazu am besten ein Tut. durch.
Kurz erklärt .. die Variable $ahButton hat 8 Speicherplätze.
Immer beginnend von 0:
$ahButton[0]
$ahButton[1]
$ahButton[2]
...
$ahButton[8]
9 Speicherplätze... 0;1;2;3;...;6;7;8Und danke für IniGetSection oder so, kannte ich noch nicht...
-
Wenn das Sprachauswahlfenster optional ist (so sieht es bei dir zumindest aus), dann:
[autoit]
[/autoit] [autoit][/autoit] [autoit]
;~ Ende der Deinstallation
;~ ####################################################################ShellExecute(@ScriptDir & "\TriCAD\Disk1\Setup.exe")
[/autoit] [autoit][/autoit] [autoit]If WinWait("Wählen Sie eine Setup-Sprache aus", "Wählen Sie die Sprache", 3) Then
[/autoit]
ControlClick("Wählen Sie eine Setup-Sprache aus", "", "Button1")
EndIf
Das ist auch Schwachsinn... Das ist das selbe wie unten:
Winwait wartet ja, BIS das Fenster existiert. Dann wird If immer True, also ausgeführt.
Du musst also in jedem Fall das untere Beispiel nehmen -
In dem Forum von meiner Community haben wir für sowas das Spam-Forum.
Wenn überhaupt, dann gehört es in Talk...
-
Nein HotKeySet ist global.
Guck dir mal _ispressed an. -
Aber es wäre doch (prinzipiell) möglich den zweiten Thread auf den zweiten CPU-Kern (wenn vorhanden) zu schieben, oder?
-
Wenn du WinRAR besitzt, kannst dus auch mit der Winrar-Cmdline machen...
Liegt auch im WinRAR-Verzeichnis, "rar.exe". -
Hast du schon mal die Registry nach deinem WLANKey durchsucht?
-
Guck dir mal Modulo, aslo Mod() an.
-
-
Soweit ich es erkennen kann, aktualisierst du das auch nicht, oder?
-
1.) In welcher Sprache gehen denn bitte Zahlen als Funktionsnamen?
2) TjaSchicksal konnte drüber lachen
, außerdem ist es doch zum wegschmeißen 
-
Wo gibts denn nen String2QR-Converter?
Der Javacode kann ja nur erkennen... -
Dein Code darf eigtl. nicht funzen, wegen dem Funktionsnamen...
Hier meine Version...UDF
[autoit]
[/autoit] [autoit][/autoit] [autoit]
Func leet($leet,$zahlen=False,$Clip=False)
If StringLeft($leet, 1) = "#" Then $zahlen = True
$leet = StringTrimLeft($leet, 1)
$leet = StringReplace($leet, "a", "4")
$leet = StringReplace($leet, "er", "0r", 0, 1)
If $zahlen Then
$leet = StringReplace($leet, "b", "3")
Else
$leet = StringReplace($leet, "b", "|3")
EndIf
If $zahlen Then
$leet = StringReplace($leet, "c", "6")
Else
$leet = StringReplace($leet, "c", "(")
EndIf
If $zahlen Then
$leet = StringReplace($leet, "d", "0")
Else
$leet = StringReplace($leet, "d", "|)")
EndIf$leet = StringReplace($leet, "e", "3")
[/autoit] [autoit][/autoit] [autoit]
$leet = StringReplace($leet, "f", "##/=\##", 0, 1)
$leet = StringReplace($leet, "F", "##/}\##", 0, 1)
$leet = StringReplace($leet, "g", "9")
If $zahlen Then
$leet = StringReplace($leet, "h", "4")
Else
$leet = StringReplace($leet, "h", "|-|")
EndIf
$leet = StringReplace($leet, "i", "1")
$leet = StringReplace($leet, "j", "9")
$leet = StringReplace($leet, "k", "4")
$leet = StringReplace($leet, "l", "1")
$leet = StringReplace($leet, "m", "3")
If $zahlen Then
$leet = StringReplace($leet, "n", "5")
Else
$leet = StringReplace($leet, "n", "/\/")
EndIf
$leet = StringReplace($leet, "o", "0")
If $zahlen Then
$leet = StringReplace($leet, "p", "9")
Else
$leet = StringReplace($leet, "p", "|)")
EndIfIf $zahlen Then
[/autoit]
$leet = StringReplace($leet, "q", "9")
Else
$leet = StringReplace($leet, "q", "()_")
EndIf
$leet = StringReplace($leet, "0r", "##/\##")
If $zahlen Then
$leet = StringReplace($leet, "r", "8")
Else
$leet = StringReplace($leet, "r", "|2")
EndIf
$leet = StringReplace($leet, "##/\##", "0r")
$leet = StringReplace($leet, "s", "5")
$leet = StringReplace($leet, "t", "7")
If $zahlen Then
$leet = StringReplace($leet, "u", "0")
Else
$leet = StringReplace($leet, "u", "()")
EndIf
If $zahlen Then
$leet = StringReplace($leet, "v", "4")
Else
$leet = StringReplace($leet, "v", "\/")
EndIf
If $zahlen Then
$leet = StringReplace($leet, "w", "4")
Else
$leet = StringReplace($leet, "w", "\/\/")
EndIf
$leet = StringReplace($leet, "x", "8")
$leet = StringReplace($leet, "y", "4")
$leet = StringReplace($leet, "z", "2")
$leet = StringReplace($leet, "##/=\##", "ph", 0, 1)
$leet = StringReplace($leet, "##/}\##", "Ph", 0, 1)
If $clip Then ClipPut($leet)
return $leet
EndFunc -
Ich hab das Programm nicht getestet, aber sind die Screenies aktuell?
Styleauswahl wäre doch als Radio sinnvoller! -
Schreiben kann ichs dir nicht, nur die Befehle sagen:
GUICtrlCreateGraphic
Dann kannst du da drin per Befehl zeichnen, guck einfach in der Hilfe. -
In der Hilfe gibt es fast fertige Beispiele dazu.
TCPSend und TCPRecv glaub ich. -
Angeregt von Fast2 habe ich jetzt mal einen Leetspeak-generator geschaffen, zwar sehr simpel, aber lustig.
Man kann zwischen zwei Modi, nur Zahlen und Buchstaben, oder auch noch normale Sonderzeichen wählen.Aus:
Dieses Programm macht zwar schon Fun, wird aber noch besser.Macht er:
13535 |)|209|2433 34(|-|7 2\/\/4|2 5(|-|0/\/ Ph()/\/, \/\/1|2|) 4|30r /\/0(|-| |33550r.Bzw.:
013535 98098433 34647 2448 56405 Ph05, 4180 430r 5064 33550r.Spoiler anzeigen
[autoit]$zahlen=False
[/autoit] [autoit][/autoit] [autoit]
$leet = InputBox("13370r", "7\/|)3 \/4 |)474:" & @CRLF & "# 04408 = 208 248135)")
If StringLeft($leet, 1) = "#" Then $zahlen = True
$leet = StringTrimLeft($leet, 1)
$leet = StringReplace($leet, "a", "4")
$leet = StringReplace($leet, "er", "0r", 0, 1)
If $zahlen Then
$leet = StringReplace($leet, "b", "3")
Else
$leet = StringReplace($leet, "b", "|3")
EndIf
If $zahlen Then
$leet = StringReplace($leet, "c", "6")
Else
$leet = StringReplace($leet, "c", "(")
EndIf
If $zahlen Then
$leet = StringReplace($leet, "d", "0")
Else
$leet = StringReplace($leet, "d", "|)")
EndIf$leet = StringReplace($leet, "e", "3")
[/autoit] [autoit][/autoit] [autoit]
$leet = StringReplace($leet, "f", "##/=\##", 0, 1)
$leet = StringReplace($leet, "F", "##/}\##", 0, 1)
$leet = StringReplace($leet, "g", "9")
If $zahlen Then
$leet = StringReplace($leet, "h", "4")
Else
$leet = StringReplace($leet, "h", "|-|")
EndIf
$leet = StringReplace($leet, "i", "1")
$leet = StringReplace($leet, "j", "9")
$leet = StringReplace($leet, "k", "4")
$leet = StringReplace($leet, "l", "1")
$leet = StringReplace($leet, "m", "3")
If $zahlen Then
$leet = StringReplace($leet, "n", "5")
Else
$leet = StringReplace($leet, "n", "/\/")
EndIf
$leet = StringReplace($leet, "o", "0")
If $zahlen Then
$leet = StringReplace($leet, "p", "9")
Else
$leet = StringReplace($leet, "p", "|)")
EndIfIf $zahlen Then
[/autoit]
$leet = StringReplace($leet, "q", "9")
Else
$leet = StringReplace($leet, "q", "()_")
EndIf
$leet = StringReplace($leet, "0r", "##/\##")
If $zahlen Then
$leet = StringReplace($leet, "r", "8")
Else
$leet = StringReplace($leet, "r", "|2")
EndIf
$leet = StringReplace($leet, "##/\##", "0r")
$leet = StringReplace($leet, "s", "5")
$leet = StringReplace($leet, "t", "7")
If $zahlen Then
$leet = StringReplace($leet, "u", "0")
Else
$leet = StringReplace($leet, "u", "()")
EndIf
If $zahlen Then
$leet = StringReplace($leet, "v", "4")
Else
$leet = StringReplace($leet, "v", "\/")
EndIf
If $zahlen Then
$leet = StringReplace($leet, "w", "4")
Else
$leet = StringReplace($leet, "w", "\/\/")
EndIf
$leet = StringReplace($leet, "x", "8")
$leet = StringReplace($leet, "y", "4")
$leet = StringReplace($leet, "z", "2")
$leet = StringReplace($leet, "##/=\##", "ph", 0, 1)
$leet = StringReplace($leet, "##/}\##", "Ph", 0, 1)
ClipPut($leet)
MsgBox(64, "13370r", "1337 157 13 (1!|)|304|2|)!" & @CRLF & @CRLF & $leet) -
Drucken kannst du (ungetestet) mit
Run('print "C:\druck\bla.txt"')Aber nur Textdateien. Worddokumente druckst du anders, weiß aber nicht wie, hab grad kein Office
-
Den Nachrichtendienst zu AKTIVIEREN, oder zu benutzen?
Benutzen:
Run("net send * Hallo")
Würd ich aber von abraten, SPAMgefahr.
