Beiträge von stayawayknight

Hab da mal einen Chat gebastelt wo jeder Client und Server gleichzeitig ist...
vll hilft dir das weiter:

[autoit]

#include <GUIConstantsEx.au3>

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

;IP, Port und Nick von Client
$ip = "192.168.178.23"
$port = 3000
$nick = ""

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

;IP, Port und Nick von Server
$ip2 = "192.168.178.21"
$port2 = 3000
$nick2 = ""

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

TCPStartUp ()
$server = TCPListen($ip,$port,1)

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

$form = GUICreate("Chat", 625, 445, 192, 124)
$edit = GUICtrlCreateEdit("", 56, 16, 505, 265)
$input = GUICtrlCreateInput("", 64, 336, 401, 21)
$sender = GUICtrlCreateButton("Send", 488, 336, 97, 25, 0)
GUISetState(@SW_SHOW)
ControlClick("", "", $edit)
Send("Connection von " & $ip & " zu " & $ip2 & " wird aufgebaut...")

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

While 1
$msg = GUIGetMsg()
Switch $msg
Case $GUI_EVENT_CLOSE
Exit
Case $sender
$client2 = TCPConnect ($ip2,$port2)
TCPSend ($client2, GUICtrlRead($input))
ControlClick ("","",$edit)
Send("[" & @HOUR & ":" & @MIN & ":" & @SEC & "] " & $nick & ": " & GUICtrlRead($input),1)
Send(" {Enter}",0)

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

EndSwitch

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

$client = TCPAccept($server)
If $client >= 0 Then
Do
$message = TCPRecv($client,2048)
Until $message <> ""
ControlClick ("","",$edit)
Send("[" & @HOUR & ":" & @MIN & ":" & @SEC & "] " & $nick2 & ": " & $message,1)
Send(" {Enter}",0)
EndIf
WEnd

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

TCPShutdown()

[/autoit]

ich kapier ehrlich gesagt dein problem nicht, einmal willst du eine Unendlichschleife und einmal nicht?

die am meisten gewählte Antwort.. ist auch irgendwie zu erwarten gewesen in einem "Fingersportforum"

[autoit]

MouseGetCursor()

[/autoit]

Gibt die Cursor ID zurück
Hoffe das ist das was du suchst.

dann mach ganz unten die while schleife hin und schreib nix rein, also:

[autoit]

#Include <Constants.au3>
#include <Array.au3>
Opt("TrayMenuMode", 2)
Opt("TrayAutoPause", 0)
Global $trayxx[11]
for $i=0 To UBound($trayxx) -1
$trayint = RegRead("HKEY_CURRENT_USER\Software\App", "Eintrag"&$i)
$traytime = RegRead("HKEY_CURRENT_USER\Software\App", "Zeit"&$i)
if $trayint then
$trayints = $traytime & " " & $trayint
else
$trayints = "Leer"
endif
$trayxx[$i] = $trayints
Next
_ArraySort($trayxx, 1)
For $y = 0 To UBound($trayxx) -1
TrayCreateItem($trayxx[$y])
Next
TraySetState()
$msg = TrayGetMsg()
Switch $msg
Case $trayxx[0] to UBound($trayxx) -1
$traytmp = $msg - $trayxx[0] + 1
$read = RegRead("HKEY_CURRENT_USER\Software\App", "Eintrag"&$traytmp)
ClipPut($read)
EndSwitch
Exit

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

While 1
Sleep(250) ;<= gegen CPu-Überlastung
WEnd

[/autoit]

wenigstens noch G9

verändert das auch Msg-Boxen?

öh.. wie soll das denn eingebaut werden?

Tannenzapfen wunderharke 5000... ich krieg mich nimmer vor Lachen
"Und - haben wir Tannenzapfen schon erwähnt?"

Zitat von Spiesi

Ne is nich fürn Bot... Ich will einfach nur nach einer bestimmten zeit eine Seite immer ein stückchen hinunterscrolen

Ich weiß nicht ob das jetzt wichtig ist, aber da würde ich statt der linken Maustaste die bildauf und bildab taste verwenden, nur nebenbei

Zitat von Ubuntu

Ich glaube Schnitzel meinte das das ja jeder kann, der AutoIt kann.

Ja, ich bin auch noch Anfänger... wollte einfach mal meine Idee vorstellen, mir ist klar das das nix besonderes ist

Um ehrlich zu sein, ich hab Random versucht, aber nicht wirklich hinbekommen...

[autoit]

Random( 1, _FileCountLines("playlist.ini"),1) , "")

[/autoit]

bah, dieser Befehl "_FileCountLines" hat mir immer gefehlt, ich habs immer per Variable versucht, die bei jeder hinzugefügten Zeile mit 1 addiert wird und in eine Ini gespeichert wird...
Daran bin ich gescheitert weil das nicht wirklich funtkioniert hat... Danke dir auf jeden Fall !! Hast mir sehr geholfen!

Sieht etwas blaulich aus was den Titel anbelangt, untypisch für eine Info (64) Box.

klingt für meinen Geschmack auch stark nach einem Bot, der automatisch Spielaktionen ausführt...
Das wäre gegen die Forenregeln

Ja und das in der Kombination mit

[autoit]

StringRegExp

[/autoit]

, der dann die Zeichenkette ausliest...
Ich denk das ist dann die Lösung, gibts da eig, auch ne andere Möglichkeit

Zitat von Alizame

die schlechte seite daran ist leider:
wenn man am proggen/schreiben ist labert der einen voll mit dem drucken (also fürn drucker)
sonst ganz okay =)

Ja, deswegen ist es ja Alt+P und nicht Strg+P.

Zitat

jup richtig praktisch ist es dann wenn man sich die hotkeys selbst einstellen kann

Ja,danke für den Tipp ich arbeite dran

wenn die Farbe der grünen Markierung auf der Website nicht weiter vorkommt, könntest du es mit Pixelsearch versuchen... Ist aber auch sehr umständlich und glaube auch das das
einfacher geht

ich add noch mal^^ so liste eränz könnt immernoch umstimmen wenn ihr wollt
ich spiel Fußball aber nur Freizeit, nicht Verein, dafür jedoch sehr oft:-)

außerdem solltst du überprüfen ob das bei dir wirlich Mozille Firefox.exe heißt!

aber Mozilla Firefox aktualisiert sich ja nicht von selber...
Würde noch folgendes einbauen:

[autoit]

ShellExecute("Mozilla Firefox.exe")
While sleep(250)
Send("{F5}")
If WinExists("Google - Mozilla Firefox") Then
machweiter()
ExitLoop

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

WEnd

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

Func machweiter()
Send("Google")
Send("{ENTER}")
EndFunc

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

was in der Func machweiter() steht, wird gemacht falls Google da ist.

ich glaub das kann man sich denken