Unterschiede
Hier werden die Unterschiede zwischen zwei Versionen gezeigt.
nettalk:scripting:changetext [2005/08/29 14:35] 192.168.0.50 angelegt |
nettalk:scripting:changetext [2009/01/07 23:32] (aktuell) mirici |
||
---|---|---|---|
Zeile 1: | Zeile 1: | ||
+ | ====== Textausgabe ändern ====== | ||
+ | <code vb> | ||
+ | #NewScriptBegin ChangeInText | ||
+ | |||
+ | Sub Load() | ||
+ | regevent "PRIVMSG", ConnID | ||
+ | regevent "NOTICE", ConnID | ||
+ | End Sub | ||
+ | |||
+ | Sub Serv_RegedEvent(EventID, Sender, ConnID, Text, RawData) | ||
+ | i=instr(1, RawData, " :") | ||
+ | if Mid(RawData, i+2,1) <> Chr(1) Then | ||
+ | PhraseData Mid(RawData,1,i+1)+Chr(3)+"14,16"+Mid(RawData,i+2), ConnID | ||
+ | SkipEvent | ||
+ | End if | ||
+ | End Sub | ||
+ | </code> |
Sie befinden sich hier: start » nettalk » scripting » changetext