28.01.09, 01:03:44 | #21 |
Senior Member
Täglich verrückt!
Registriert seit: 29.01.03
Style: Roter Spinat
Ort: Freiburg
Alter: 38
Geschlecht:
Beiträge: 11.522
IRC Zeilen: 181381
Quizrunden gewonnen: 76
|
Ich hab noch nie gesehen, dass jemand ne Mailadresse mit eckigen Klammern drum hat.
|
27.05.09, 20:08:25 | #22 |
Senior Member
Täglich verrückt!
Registriert seit: 29.01.03
Style: Roter Spinat
Ort: Freiburg
Alter: 38
Geschlecht:
Beiträge: 11.522
IRC Zeilen: 181381
Quizrunden gewonnen: 76
|
Sou, hier extra für Kopfnicker ein Awayscript für NetTalk.
Die Befehle sind:
/away <Nickanhängsel> <Längerer Away-Grund> Alle Parameter optional/re Folgenes im Scriptfenster von Nettalk einfügen: Code:
#NewScriptBegin AwayWithNickchange Dim zAwayTime Dim zNormalNick Dim zAwayAppend Dim zIsAway Dim zAwayReason Dim zLastAnnounce dim zLowNick Sub Load() MakeShortcut "", "away", "/call AwayWithNickchange.SetAwayMode $1 :$(room)\\-->$>1", 2 MakeShortcut "", "re", "/call AwayWithNickchange.SetRe", 1 zIsAway = "false" End Sub Sub SetAwayMode(aAppend, aReason) If aAppend = "" Then aAppend = "away" End If If LCase(aAppend) = LCase(zAwayAppend) And zIsAway <> "true" Then oChange = "false" Else oChange = "true" End If If zIsAway <> "true" Then zNormalNick = GetVal(FrontConId, 5) zLowNick = LCase(zNormalNick) zAwayTime = Time End If I = InStr(1, aReason, "\\-->") zAwayReason = Mid(aReason, I + 5) zAwayAppend = aAppend If oChange = "true" Then Send "/quote NICK :" & zNormalNick & "|" & zAwayAppend, FrontFrameID End If If zIsAway <> "true" Then If zAwayReason = "" Then Send "/me ist jetzt weg...", FrontFrameID Else Send "/me ist jetzt weg (" + zAwayReason + ")", FrontFrameID End If End If zIsAway = "true" End Sub Sub SetRe() If zIsAway = "true" Then zIsAway = "false" Send "/nick " + zNormalNick, FrontFrameID Send "/me ist nach " + TimeDiffStr(DateDiff("s", zAwayTime, Time)) & " wieder da", FrontFrameID End If End Sub Sub Chan_Msg(Text, Nick, Channel, FrameID, ConnID) If zIsAway = "true" Then If InStr(1, LCase(Text), zLowNick) > 0 And DateDiff("s", zLastAnnounce, Time) > 120 Then If zAwayReason = "" Then Send "/me ist " & zAwayAppend & ", weg seit " & TimeDiffStr(DateDiff("s", zAwayTime, Time)), FrameID Else Send "/me ist " & zAwayAppend & ", " + zAwayReason & ", weg seit " & TimeDiffStr(DateDiff("s", zAwayTime, Time)), FrameID End If zLastAnnounce = Time End If End If End Sub Function TimeDiffStr(xSeconds) oHours = 0 oMinutes = 0 oSeconds = 0 aSeconds = Val(xSeconds) Do If aSeconds >= 3600 Then oHours = oHours + 1 aSeconds = aSeconds - 3600 End If Loop Until aSeconds < 3600 Do If aSeconds >= 60 Then oMinutes = oMinutes + 1 aSeconds = aSeconds - 60 End If Loop Until aSeconds < 60 oSeconds = aSeconds oOut = "" If oHours > 0 Then oOut = oOut & " " & oHours & " Std." End If If oMinutes > 0 Then oOut = oOut & " " & oMinutes & " Min." End If If oSeconds > 0 Then oOut = oOut & " " & oSeconds & " Sek." End If TimeDiffStr = Mid(oOut, 2) End Function Danach noch auf "Script neu starten" klicken. Nur kurz getestet, Bugs müsst ihr selber beheben Geändert von Zahl (27.05.09 um 20:45:56 Uhr) Grund: Bug gefixt ;) |
28.05.09, 08:40:28 | #23 |
Registered Users
Registriert seit: 09.06.06
Style: Retro
Ort: Schleswig-Holstein
Alter: 56
Geschlecht:
Beiträge: 2.734
IRC Zeilen: 486
|
ihr habt es ja sicher schon bemerkt, ich bin im IRC nicht mehr zugegen
Obwohl ich alles versucht habe, was dieser Thread so hergibt, mit Serverwechsel, Neuinstallation etc... - Ich komme einfach nicht mehr rein Bin für alle Ideen dankbar. (Die Fehlermeldung ist die Selbe wie bei Peppar letztes Jahr (siehe Seite 2 dieses Threads). Ciao `O´rcus |
28.05.09, 09:13:24 | #24 |
Master of the Kanu.
Registriert seit: 11.05.06
Style: Roter Spinat
Ort: zwischen Bielefeld und Paderborn
Alter: 38
Geschlecht:
Beiträge: 2.740
IRC Zeilen: 25949
Quizrunden gewonnen: 25
|
Du gehst aber schon auf icr.spieleplanet.eu:7011 oder?
Ansonsten, einfach zahl oder mich mal über Teamviewer gucken lassen. MFG JaNu |
28.05.09, 16:51:48 | #26 |
Senior Member
Täglich verrückt!
Registriert seit: 29.01.03
Style: Roter Spinat
Ort: Freiburg
Alter: 38
Geschlecht:
Beiträge: 11.522
IRC Zeilen: 181381
Quizrunden gewonnen: 76
|
Seit vorgestern oder so. Die Anleitung habe ich gestern editiert.
Eigentlich sollte das ganze jetzt einfacher sein, ich hoffe ich habe alle unnötigen Infos aus dem ersten Post gelöscht. Hier nochmal die Kompaktanleitung, vielleicht ist es so klarer:
|
28.05.09, 20:53:05 | #27 |
Senior Member
Täglich verrückt!
Registriert seit: 29.01.03
Style: Roter Spinat
Ort: Freiburg
Alter: 38
Geschlecht:
Beiträge: 11.522
IRC Zeilen: 181381
Quizrunden gewonnen: 76
|
Habe jetzt die Konfigurationsanleitung im 1. Post komplett neu geschrieben und neue Screenshots gemacht. Ich hoffe nun ist es wirklich klar.
@Orcus: Evtl. wie dort beschrieben die Verbindung noch mal löschen und dann neu anlegen. Wenn es dann nicht klappt muss irgendwas am neuen IRC Server oder so kaputt sein. |
16.06.09, 09:29:59 | #28 |
Master of the Kanu.
Registriert seit: 11.05.06
Style: Roter Spinat
Ort: zwischen Bielefeld und Paderborn
Alter: 38
Geschlecht:
Beiträge: 2.740
IRC Zeilen: 25949
Quizrunden gewonnen: 25
|
Heute ist ein neues Nettalk Update erschienen.
Wie es aussieht ist der UTF8 Bug behoben Also alle Nettalk-User schnell updaten. (Aktuelle Version nun: 6.6.5, wohl schon länger raus, nur jetzt auch über Autoupdate) MFG JaNu |
Lesezeichen |
Aktive Benutzer in diesem Thema: 1 (Registrierte Benutzer: 0, Gäste: 1) | |
|