Beispielscript
#NewScriptBegin Beispielscript1 Sub Chan_Msg(Text, Nick, Channel, FrameID, ConnID) Print "<" & Nick & "> ", FrameID, valcSender, 0,"", 3 Print Text, FrameID, valcText, 1 'SkipEvent End Sub Sub Serv_Query(Text, Nick, FrameID, ConnID) Print "<" & Nick & "> ", FrameID, valcSender, 0,"", 3 Print Text, FrameID, valcText, 1 SkipEvent End Sub Sub SendMsg(Text, Channel, FrameID, ConnID) Nick = GetVal(ConnID, 5) Print "<" & Nick & "> ", FrameID, valcSender, 0,"", 3 Print Text, FrameID, valcText, 1 Send "/quote privmsg " & Channel & " :" & Text, FrameID SkipEvent End Sub Sub SendQuery(Text, Receiver, FrameID, ConnID) Nick = GetVal(ConnID, 5) Print "<" & Nick & "> ", FrameID, valcSender, 0,"", 3 Print Text, FrameID, valcText, 1 Send "/quote privmsg " & Receiver & " :" & Text, FrameID SkipEvent End Sub
Sie befinden sich hier: start » nettalk » scripting » changetextoutput