Unterschiede

Hier werden die Unterschiede zwischen zwei Versionen gezeigt.

Link zu dieser Vergleichsansicht

nettalk:scripting:modifytext [2012/12/13 20:55] (aktuell)
mirici angelegt
Zeile 1: Zeile 1:
 +======Modify Text=======
  
 +
 +<code vb>
 +#​NewScriptBegin TextModify
 + 
 +Sub Chan_Msg(Text,​ Nick, Channel, FrameID, ConnID)
 +  SkipEvent  ​
 +
 +  if Instr(1, Text, GetVal(ConnID,​ 5))>0 Then
 +    SetLineIcon FrameID, 0
 +    SetFrameIcon FrameID, 3
 +    SetTrayIcon 4
 +  End if
 +  SetFrameIcon FrameID, 2
 +  if Instr(1, left(Text, 7), Chr(1) & "​ACTION"​)=1 Then
 +    print "* " & Nick , FrameID , valcText
 +    print Right(Text, len(Text)-7) , FrameID , valcText, ​ 1
 +  else
 +    print "<"​ & Nick & "> " , FrameID , valcSender
 +    print Text , FrameID , valcText, ​ 1
 +  End if
 +End Sub
 +</​code>​

Eigene Werkzeuge