Loading

Server notice script

  1. ; Useful mIRC script for opers. Send snotices to separate @windows
  2. on $^*:Snotice:/(\S+)\s\((\S+)\)\sdid\sa\s.whois\son\syou/Si:{
  3.   if (!$window($($+(@whois.,$network),2))) { window -ne $($+(@whois.,$network),2) }
  4.   ; echo -sgt 4Whois -> 12[11 $+ $network $+ 12:11 $+ $+($regml(1),!,$regml(2)) $+ 12]
  5.   aline -pa $($+(@whois.,$network),2) 12( $+ $snoticets $+ 12) $1-
  6.   haltdef
  7. }
  8. on $^*:Snotice:/HelpOp\s--\sfrom\s(\S+)\s(\(HelpOp\):\s)?(?:\(Local\):\s)?(.+)/Si:{
  9.   if (!$regml(3)) {
  10.     ;echo 4*** 12HelpOP: 11(4 $+ $network $+ 11:4 $+ $regml(1) $+ 11:4 $+ $regml(2) $+ 11)
  11.     ; query -n $regml(1)
  12.     ;echo $regml(1) 4*** Needed HelpOp for -> $regml(2)
  13.   }
  14.   if (!$window($($+(@HelpOp.,$network),2))) { window -ne $($+(@HelpOp.,$network),2) }
  15.   aline -pa $($+(@HelpOp.,$network),2) 12( $+ $snoticets $+ 12) 04HelpOp: $regml(1) 12-> $iif($regml(3),$regml(3),$regml(2))
  16.   haltdef
  17. }
  18. on $^*:Snotice:/NetAdmin.Chat\s--\sfrom\s(\S+):\s(.+)/Si:{
  19.   if (!$window($($+(@NaChat.,$network),2))) { window -ne $($+(@NaChat.,$network),2) }
  20.   aline -pa $($+(@NaChat.,$network),2) 12( $+ $snoticets $+ 12) 4NaChat: $regml(1) 12-> $regml(2)
  21.   haltdef
  22. }
  23. on $^*:Snotice:/AdminChat\s--\sfrom\s(\S+):\s(.+)/Si:{
  24.   if (!$window($($+(@Adminchat.,$network),2))) { window -ne $($+(@AdminChat.,$network),2) }
  25.   aline -pa $($+(@AdminChat.,$network),2) 12( $+ $snoticets $+ 12) 4AdminChat: $regml(1) 12-> $regml(2)
  26.   haltdef
  27. }
  28. on $^*:Snotice:/Global\s--\sfrom\s(\S+):\s(.+)/Si:{
  29.   if (!$window($($+(@GlobOPS.,$network),2))) { window -ne $($+(@GlobOPS.,$network),2) }
  30.   aline $iif($regml(1) == OperServ,-pa,-pa) $($+(@GlobOPS.,$network),2) 12( $+ $snoticets $+ 12) 4Global: $regml(1) 12-> $regml(2)
  31.   haltdef
  32. }
  33. on $^*:Snotice:/LocOps\s--\sfrom\s(\S+):\s(.+)/Si: {
  34.   if (!$window($($+(@LocOPS.,$network),2))) { window -ne $($+(@LocOPS.,$network),2) }
  35.   aline -pa $($+(@LocOPS.,$network),2) 12( $+ $snoticets $+ 12) 4LocOps: $regml(1) 12-> $regml(2)
  36.   haltdef
  37.  
  38. }
  39. on $^*:Snotice:/ChatOps\s--\sfrom\s(\S+):\s(.+)/Si:{
  40.   if (!$window($($+(@ChatOPS.,$network),2))) { window -ne $($+(@ChatOPS.,$network),2) }
  41.   aline -pa $($+(@ChatOPS.,$network),2) 12( $+ $snoticets $+ 12) 4ChatOps: $regml(1) 12-> $regml(2)
  42.   haltdef
  43. }
  44. on $^*:WALLOPS:*:{
  45.   if (!$window($($+@WallOPS.,$network),2))) { window -ne $($+(@WallOPS.,$network),2) }
  46.   aline -pa $($+(@WallOPS.,$network),2) 12( $+ $snoticets $+ 12) 4WallOps: $nick 12-> $1-
  47.   haltdef
  48. }
  49. ;on *:INPUT:@ChatOPS.*:{ ChatOps $1- | haltdef }
  50. ;on *:INPUT:@HelpOp.*:{ helpop $1- | haltdef }
  51. ;on *:INPUT:@NaChat.*:{ nachat $1- | haltdef }
  52. ;on *:INPUT:@AdminChat.*:{ AdChat $1- | haltdef }
  53. ;on *:INPUT:@GlobOPS.*:{ GlobOPS $1- | haltdef }
  54. ;on *:INPUT:@WallOPS.*:{ WallOPS $1- | haltdef }
  55.  
  56. ;
  57. ; Some #Services stuff (Written for Anope)
  58. ;
  59. on $*:TEXT:/New\svHost\sRequested\sby\s(\S+)/Si:#Services:{
  60.   if ($nick == Global) {
  61.     if (!$window($($+(@Services.,$network),2))) { window -ne $($+(@Services.,$network),2) }
  62.     aline -pa $($+(@Services.,$network),2) 12( $+ $snoticets $+ 12) 4vHost Request: $regml(1)
  63.   }
  64. }
  65. on $*:TEXT:/NickServ.\s(\S+)\s(automatically\s)?identified\sfor\snick\s(\S+)/Si:#Services:{
  66.   if ($nick == Global) {
  67.     if (!$window($($+(@Services.,$network),2))) { window -ne $($+(@Services.,$network),2) }
  68.     aline -pa $($+(@Services.,$network),2) 12( $+ $snoticets $+ 12) 4Nick Identification: $regml(1) 12-> $iif($regml(3),$regml(3),$regml(2))
  69.   }
  70. }
  71. on $*:TEXT:/NickServ.\s(\S+)\slogged\sout\snickname\s(\S+):#Services:{
  72.   if ($nick == Global) {
  73.     if (!$window($($+(@Services.,$network),2))) { window -ne $($+(@Services.,$network),2) }
  74.     aline -pa $($+(@Services.,$network),2) 12( $+ $snoticets $+ 12) 4Nick Logout: $regml(1) 12-> $regml(2)
  75.   }
  76. }
  77. on $*:TEXT:/NickServ.\sFailed\sIDENTIFY\sfor\s(\S+)/Si:Services:{
  78.   if ($nick == Global) {
  79.     if (!$window($($+(@Services.,$network),2))) { window -ne $($+(@Services.,$network),2) }
  80.     aline -pa $($+(@Services.,$network),2) 12( $+ $snoticets $+ 12) 4Identification Failure: $regml(1)
  81.   }
  82. }
  83. on $*:TEXT:/ChanServ.\s(\S+)\sidentified\sfor\(\S+):#Services:{
  84.   if ($nick == Global) {
  85.     if (!$window($($+(@Services.,$network),2))) { window -ne $($+(@Services.,$network),2) }
  86.     aline -pa $($+(@Services.,$network),2) 12( $+ $snoticets $+ 12) 4Channel Identification: $regml(1) 12-> $regml(2)
  87.   }
  88. }
  89. on $*:TEXT:/NickServ.\sNick\s(\S+)\shas\sbeen\srequested/Si:#Services:{
  90.   if ($nick == Global) {
  91.     if (!$window($($+(@Services.,$network),2))) { window -ne $($+(@Services.,$network),2) }
  92.     aline -pa $($+(@Services.,$network),2) 12( $+ $snoticets $+ 12) 4Nick Request: $regml(1) 12was requested.
  93.   }
  94. }
  95. on $*:TEXT:/NickServ.\ssent\sregistration\sverification\scode\sto\s(\S+)/Si:#Services:{
  96.   if ($nick == Global) {
  97.     if (!$window($($+(@Services.,$network),2))) { window -ne $($+(@Services.,$network),2) }
  98.     aline -pa $($+(@Services.,$network),2) 12( $+ $snoticets $+ 12) 4Registration sent: $regml(1)
  99.   }
  100. }
  101. on $*:TEXT:/NickServ.\s'(\S+)'\sregistered\sby\s(\S+)\s\(e-mail.\s(\S+)\)/Si:#Services:{
  102.   if ($nick == Global) {
  103.     if (!$window($($+(@Services.,$network),2))) { window -ne $($+(@Services.,$network),2) }
  104.     aline -pa $($+(@Services.,$network),2) 12( $+ $snoticets $+ 12) 4Nick Registration: $($+($regml(1),!,$regml(2)),2) 12email: $regml(3)
  105.   }
  106. }
  107. on $*:TEXT:/ChanServ.\sChannel\s'(\S+)'\sregistered\sby\s(\S+)/Si:#Services:{
  108.   if ($nick == Global) {
  109.     if (!$window($($+(@Services.,$network),2))) { window -ne $($+(@Services.,$network),2) }
  110.     aline -pa $($+(@Services.,$network),2) 12( $+ $snoticets $+ 12) 4Channel Registration: $regml(2) 12-> $regml(1)
  111.   }
  112. }
  113. on $*:TEXT:/ChanServ.\sChannel\s(\S+)\sdropped\sby\s(\S+)\s\(founder.\s(\S+)\)/Si:#Services:{
  114.   if ($nick == Global) {
  115.     if (!$window($($+(@Services.,$network),2))) { window -ne $($+(@Services.,$network),2) }
  116.     aline -pa $($+(@Services.,$network),2) 12( $+ $snoticets $+ 12) 4Channel Drop: $regml(2) 12-> $regml(1) 12Founder: $regml(3)
  117.   }
  118. }
  119. on $*:TEXT:/Expiring\snickname\s(\S+)\s\(group.\s(\S+)\)\s\(e-mail.\s(\S+)\)/Si:#Services:{
  120.   if ($nick == Global) {
  121.     if (!$window($($+(@Services.,$network),2))) { window -ne $($+(@Services.,$network),2) }
  122.     aline -pa $($+(@Services.,$network),2) 12( $+ $snoticets $+ 12) 4Nick Expire:12 Nick: $regml(1) 12Group: $regml(2) 12Email: $regml(3)
  123.   }
  124. }
  125. on $*:TEXT:/NickServ.\sdeleting\snickname\sgroup\s(\S+)/Si:#Services:{
  126.   if ($nick == Global) {
  127.     if (!$window($($+(@Services.,$network),2))) { window -ne $($+(@Services.,$network),2) }
  128.     aline -pa $($+(@Services.,$network),2) 12( $+ $snoticets $+ 12) 4Deleting NickGroup: $regml(1)
  129.   }
  130. }
  131.  
  132. ;
  133. ; This part makes Connects & Disconnects go to @Clients
  134. ;
  135. on $^*:Snotice:/Notice\s--\sClient\sconnecting\s(?:on|at).+:\s(\S+)\s\((\S+)\)/Si:{
  136.   if (!$window($($+(@Connects.,$network),2))) { window -ne $($+(@Connects.,$network),2) }
  137.   ;  aline -pa $($+(@Connects.,$network),2) 12( $+ $snoticets $+ 12) 4Connect: $+($regml(1),!,$regml(2))
  138.   aline -pa $($+(@Connects.,$network),2) 12( $+ $snoticets $+ 12) $1-
  139.   haltdef
  140. }
  141. on $^*:Snotice:/Notice\s--\sClient\sexitin(?:g\sat.+:\s(\S+)\s\(.+\)|g:\s(\S+)\s\((\S+)\)\s\[(.+)\])/Si:{
  142.   if (!$window($($+(@Exits.,$network),2))) { window -ne $($+(@Exits.,$network),2) }
  143.   ;  aline -pa $($+(@Exits.,$network),2) 12( $+ $snoticets $+ 12) 4Disconnect: $+($regml(1),!,$regml(2)) 12-> $regml(3)
  144.   aline -pa $($+(@Exits.,$network),2) 12( $+ $snoticets $+ 12) $1-
  145.   ;echo -gs exit-debug: $regml(1)
  146.   ;echo -gs exit-debug: $regml(2)
  147.   ;echo -gs exit-debug: $regml(3)
  148.   ;echo -gs exit-debug: $1-
  149.   haltdef
  150. }
  151. alias snoticets { return $asctime(mmmm dd yyyy HH:nn:ss) }
  152. ; This takes ALL of the ban messages and slides them into @Network-Kills/Bans
  153. ;
  154. on $^*:Snotice:/Notice\s--\sReceived\sKILL\smessage\sfor\s(\S+)\sfrom\s(\S+)\sPath:\s(\S+)!(\S+)\s\((.+)\)/Si:{
  155.   if (!$window($($+(@Kills.,$network),2))) { window -ne $($+(@Kills.,$network),2) }
  156.   aline -pa $($+(@Kills.,$network),2) 12( $+ $snoticets $+ 12) 4KILL: $regml(1) 12was killed by $+($regml(2),!,$regml(4),@,$regml(3)) 12for $regml(5)
  157.   haltdef
  158. }
  159. ;@Network-Kills/Bans.
  160. on $^*:Snotice:/(.:Line)\sadded\sfor\s(\S+)\son.+\(from\s(\S+)(?:\sto\sexpire\sat\s(.+))?:\s(.+)\)/Si:{
  161.   if (!$window($($+(@Bans.,$network),2))) { window -ne $($+(@Bans.,$network),2) }
  162.   aline -pa $($+(@Bans.,$network),2) 12( $+ $snoticets $+ 12) $+(4,$regml(1),:) $regml(3) 12set $regml(2) 12set to expire on: $iif($regml(5),$regml(4),Permanent) 12reason: $iif($regml(5),$regml(5),$regml(4))
  163.   haltdef
  164. }
  165. on $^*:Snotice:/Expiring\s(?:Global\s)?(.):Line\s\((\S+)\)\smade\sby\s(\S+)\s\(Reason:\s(.+)\)/Si:{
  166.   if (!$window($($+(@Bans.,$network),2))) { window -ne $($+(@Bans.,$network),2) }
  167.   aline -pa $($+(@Bans.,$network),2) 12( $+ $snoticets $+ 12) 4Expiring $+($regml(1),:Line:) $regml(2) 12set by $regml(3) 12reason $regml(4)
  168.   haltdef
  169. }
  170. on $^*:Snotice:/(\S+)\sremoved\s(?:Global\s)?(\S+)\s(\S+).+\sreason:\s(.+)\)/Si:{
  171.   if (!$window($($+(@Bans.,$network),2))) { window -ne $($+(@Bans.,$network),2) }
  172.   aline -pa $($+(@Bans.,$network),2) 12( $+ $snoticets $+ 12) $+(4Removed,$chr(32),$regml(2),:) $regml(1) 12removed $regml(3)
  173.   haltdef
  174. }
  175. ;
  176. ; This part handles the nick changes & puts them in @NickChanges
  177. ;
  178. on $^*:Snotice:/Notice\s--\s(\S+)\s\((\S+)\)\shas\s(?:been\sforced\sto\s)?change(?:d)?\shis.her\snickname\sto\s(\S+)/Si:{
  179.   if (!$window($($+(@NickChanges.,$network),2))) { window -ne $($+(@NickChanges.,$network),2) }
  180.   aline -pa $($+(@NickChanges.,$network),2) 12( $+ $snoticets $+ 12) 4NickChange: $+($regml(1),!,$regml(2)) 12-> $regml(3)
  181.   haltdef
  182. }
  183. ;
  184. ; This does most oper shit & keeps it in @Oper
  185. ;
  186. on $^*:Snotice:/OperOverride\s--\s(\S+)\s\((\S+)\)\s(.+)/Si:{
  187.   if (!$window($($+(@Oper.,$network),2))) { window -ne $($+(@Oper.,$network),2) }
  188.   aline -pa $($+(@Oper.,$network),2) 12( $+ $snoticets $+ 12) 4OverRide: $+($regml(1),!,$regml(2)) 12used Oper-Override for: $regml(3)
  189.   haltdef
  190. }
  191. on $^*:Snotice:/(\S+)\s\((\S+)\)\s\[(\S+)\]\sis\snow\s(.+)/Si:{
  192.   if (!$window($($+(@Oper.,$network),2))) { window -ne $($+(@Oper.,$network),2) }
  193.   aline -pa $($+(@Oper.,$network),2) 12( $+ $snoticets $+ 12) 4Oper: $+($regml(1),!,$regml(2)) 12using OperID $regml(3) 12is now $regml(4)
  194.   haltdef
  195. }
  196. on $^*:Snotice:/Failed\sOPER\sattempt\sby\s(\S+)\s\((\S+)\)\s(?:using\sUID\s(\S+)\s)?\[(.+)\]/Si:{
  197.   if (!$window($($+(@Oper.,$network),2))) { window -ne $($+(@Oper.,$network),2) }
  198.   aline -pa $($+(@Oper.,$network),2) 12( $+ $snoticets $+ 12) 4Failed Oper Attempt: $+($regml(1),!,$regml(2)) 12OperID $iif($regml(4),$regml(3),Not Valid) 12reason: $iif($regml(4),$regml(4),$regml(3))
  199.   haltdef
  200. }
  201. on $^*:Snotice:/Notice\s--\s(\S+)\sused\s(\S+)\sto\smake\s(\S+)\s(\S+)\s(\S+)/Si:{
  202.   if (!$window($($+(@Oper.,$network),2))) { window -ne $($+(@Oper.,$network),2) }
  203.   aline -pa $($+(@Oper.,$network),2) 12( $+ $snoticets $+ 12) $+(4,$regml(2),:) $regml(1) 12used $regml(2) to make $regml(3) $+(12,$regml(4),) $regml(5)
  204.   haltdef
  205. }
  206. on $^*:Snotice:/(\S+)\sused\sSAMODE\s(\S+)\s\((.+)\)/Si:{
  207.   if (!$window($($+(@Oper.,$network),2))) { window -ne $($+(@Oper.,$network),2) }
  208.   aline -pa $($+(@Oper.,$network),2) 12( $+ $snoticets $+ 12) 4SAMODE: $regml(1) 12used SAMODE on $regml(2) 12to set modes $regml(3)
  209. }
  210. on $^*:Snotice:/(\S+)\schanged\sthe\svirtual\s(\S+)\sof\s(\S+)\s\((\S+)\)\sto\sbe\s(\S+)/Si:{
  211.   if (!$window($($+(@Oper.,$network),2))) { window -ne $($+(@Oper.,$network),2) }
  212.   aline -pa $($+(@Oper.,$network),2) 12( $+ $snoticets $+ 12) $+(4CHG,$iif($regml(2) == ident,IDENT,HOST),:) $regml(1) 12changed the virtual $regml(2) of $+($regml(3),!,$regml(4)) 12to $regml(5)
  213.   haltdef
  214. }
  215. on $^*:Snotice:/(\S+)\schanged\sthe\sGECOS\sof\s(\S+)\s\((\S+)\)\sto\sbe\s(.+)/Si:{
  216.   if (!$window($($+(@Oper.,$network),2))) { window -ne $($+(@Oper.,$network),2) }
  217.   aline -pa $($+(@Oper.,$network),2) 12( $+ $snoticets $+ 12) 4CHGNAME: $regml(1) 12changed the real name of $+($regml(2),!,$regml(3)) 12to $regml(4)
  218.   haltdef
  219. }
  220. ;
  221. ; Used with the CLOSE command, closes unknown connections (Not exactly sure what the
  222. ; purpose of this is though)
  223. ;
  224. on $^*:Snotice:/Notice\s--\s(\S+)\sclosed\s(\S+)\sunknown\sconnections/Si:{
  225.   if (!$window($($+(@Oper.,$network),2))) { window -ne $($+(@Oper.,$network),2) }
  226.   aline -pa $($+(@Oper.,$network),2) 12( $+ $snoticets $+ 12) 4CLOSE: $regml(1) 12used CLOSE to close $regml(2) 12unknown connections.
  227.   haltdef
  228. }
  229. ;
  230. ; Grabs the /STATS requests.
  231. ;
  232. on $^*:Snotice:/Stats\s'(\S+)'\srequested\sby\s(\S+)\s\((\S+)\)/Si:{
  233.   if (!$window($($+(@Oper.,$network),2))) { window -ne $($+(@Oper.,$network),2) }
  234.   aline -pa $($+(@Oper.,$network),2) 12( $+ $snoticets $+ 12) 4STATS: $+($regml(2),!,$regml(3)) 12requested stats: $regml(1)
  235.   haltdef
  236. }
  237. ;
  238. ; TS Control stuff
  239. ;
  240. on $^*:Snotice:/Notice\s--\sTS\sControl\s-\s(\S+)\sset\stime\sto\sbe\s(\S+)\s\(timediff:\s(\S+)\)/Si:{
  241.   if (!$window($($+(@Oper.,$network),2))) { window -ne $($+(@Oper.,$network),2) }
  242.   aline -pa $($+(@Oper.,$network),2) 12( $+ $snoticets $+ 12) 4TS Control: $regml(1) 12set the IRC time to be $regml(2) 12TimeDifference is now $regml(3)
  243.   haltdef
  244. }
  245. ;
  246. ; The RecvQ flood limits
  247. ;
  248. on $^*:Snotice:/Flood\s--\s(\S+)\s\((\S+)\)\sexceeds\s(\S+)\srecvQ/Si:{
  249.   if (!$window($($+(@Oper.,$network),2))) { window -ne $($+(@Oper.,$network),2) }
  250.   aline -pa $($+(@Oper.,$network),2) 12( $+ $snoticets $+ 12) 4Flood: $regml(1) 12exceeded the recvQ limit $regml(2) > $regml(3)
  251.   haltdef
  252. }
  253. ;
  254. ; Spamfilters
  255. ;
  256. on $^*:Snotice:/\[Spamfilter\]\s(\S+)\smatches\sfilter\s'(\S+)':\s\[([^\]]+)\]\s\[([^\]]+)\]/Si:{
  257.   if (!$window($($+(@Spamfilter.,$network),2))) { window -ne $($+(@Spamfilter.,$network),2) }
  258.   aline -pa $($+(@Spamfilter.,$network),2) 12( $+ $snoticets $+ 12) 4SpamFilter: $regml(1) 12Matched $regml(2) 12using $regml(3) 12reason for filter: $regml(4)
  259.   haltdef
  260. }
  261. on $^*:Snotice:/(\S+)\sremoved\sspamfilter\s'(\S+)'/Si:{
  262.   if (!$window($($+(@Spamfilter.,$network),2))) { window -ne $($+(@Spamfilter.,$network),2) }
  263.   aline -pa $($+(@Spamfilter.,$network),2) 12( $+ $snoticets $+ 12) 4SpamFilter: $regml(1) 12removed spamfilter $regml(2)
  264.   haltdef
  265. }
  266. on $^*:Snotice:/Spamfilter\sAdded:\s\S+\s\[target:\s(\S+)\]\s\[action:\s([^\]]+)\]\s\[reason:\s([^\]]+)\]\son\s.*\(from\s(\S+)\)/Si:{
  267.   if (!$window($($+(@Spamfilter.,$network),2))) { window -ne $($+(@Spamfilter.,$network),2) }
  268.   aline -pa $($+(@Spamfilter.,$network),2) 12( $+ $snoticets $+ 12) 4SpamFilter: $regml(4) 12added $4 12targeting: $regml(1) 12action: $regml(2) 12reason: $regml(3)
  269.   haltdef
  270. }
  271. ;
  272. ; Linking/Delinking
  273. ; Currently untested. It's on my list of shit to do.
  274. *
  275. on $*^:Snotice:/Received\sSQUIT\s(\S+)\sfrom\s(\S+)\[(\S+)\]\s\((.+)\)/Si:{
  276.   if (!$window($($+(@Link.,$network),2))) { window -ne $($+(@Link.,$network),2) }
  277.   aline -pa $($+(@Link.,$network),2) 12( $+ $snoticets $+ 12) 4SQUIT: $regml(1) 12from $regml(2) ( $+ $regml(3) $+ ) 12reason: $regml(4)
  278.   haltdef
  279. }
  280. on $^*:Snotice:/Notice\s--\s\(link\)\sLink\s(\S+)\s->\s(\S+)\[@(\S+)\]\sestablished/Si:{
  281.   if (!$window($($+(@Link.,$network),2))) { window -ne $($+(@Link.,$network),2) }
  282.   aline -pa $($+(@Link.,$network),2) 12( $+ $snoticets $+ 12) 4LINK: $regml(1) 12linked $regml(2) ( $+ $regml(3) $+ )
  283.   haltdef
  284. }
  285. on $^*:Snotice:/Notice\s--\sLink\s(\S+)\s->\s(\S+)\sis\snow\ssynced\s\[secs:\s(\S+)\srecv:\s(\S+)\ssent:\s(\S+)\]/Si:{
  286.   if (!$window($($+(@Link.,$network),2))) { window -ne $($+(@Link.,$network),2) }
  287.   aline -pa $($+(@Link.,$network),2) 12( $+ $snoticets $+ 12) 4SYNC: $regml(1) 12-> $regml(2)
  288.   haltdef
  289. }
  290.  
  291. on $^*:Snotice:/Lag\sreply\s--\s(\S+)\s(\S+)\s(\d+)/Si:{
  292.   if (!$window($($+(@Link.,$network),2))) { window -ne $($+(@Link.,$network),2) }
  293.   aline -pa $($+(@Link.,$network),2) 12( $+ $snoticets $+ 12) 4LAG: $regml(1) 12<--> $regml(2) 12-> $regml(3) 12( $+ $duration($calc($ctime - $regml(3))) $+ 12)
  294.   haltdef
  295. }
  296.  
  297. on ^*:snotice:*** Notice --*: {
  298.   if (!$window($($+(@misc.,$network),2))) { window -ne $($+(@misc.,$network),2) }
  299.   aline -pa $($+(@misc.,$network),2) 12( $+ $snoticets $+ 12) $1-
  300.   haltdef
  301. }
  302. on ^*:snotice:*[vhost]*: {
  303.   if (!$window($($+(@misc.,$network),2))) { window -ne $($+(@misc.,$network),2) }
  304.   aline -pa $($+(@misc.,$network),2) 12( $+ $snoticets $+ 12) $1-
  305.   haltdef
  306. }
  307.  
  308. on ^*:snotice:*** Notice -- Please be sure your clock is always synchronized*: {
  309.   if (!$window($($+(@Link.,$network),2))) { window -ne $($+(@Link.,$network),2) }
  310.   aline -pa $($+(@Link.,$network),2) 12( $+ $snoticets $+ 12) $1-
  311.   haltdef
  312. }
  313. on ^*:snotice:*** Notice -- Incorrect time for IRC servers is a serious problem*: {
  314.   if (!$window($($+(@Link.,$network),2))) { window -ne $($+(@Link.,$network),2) }
  315.   aline -pa $($+(@Link.,$network),2) 12( $+ $snoticets $+ 12) $1-
  316.   haltdef
  317. }
  318. on ^*:snotice:*** Notice -- [TimeShift] Resetting some timers!: {
  319.   if (!$window($($+(@Link.,$network),2))) { window -ne $($+(@Link.,$network),2) }
  320.   aline -pa $($+(@Link.,$network),2) 12( $+ $snoticets $+ 12) $1-
  321.   haltdef
  322. }
  323.  
  324. on ^*:snotice:*** Notice -- No response from*: {
  325.   if (!$window($($+(@Link.,$network),2))) { window -ne $($+(@Link.,$network),2) }
  326.   aline -pa $($+(@Link.,$network),2) 12( $+ $snoticets $+ 12) $1-
  327.   haltdef
  328. }
  329.  
  330. on ^*:snotice:*** Notice -- (link) Secure ZIPlink *: {
  331.   if (!$window($($+(@Link.,$network),2))) { window -ne $($+(@Link.,$network),2) }
  332.   aline -pa $($+(@Link.,$network),2) 12( $+ $snoticets $+ 12) $1-
  333.   haltdef
  334. }
  335. on ^*:snotice:*** Notice -- Zipstats for link to*: {
  336.   if (!$window($($+(@Link.,$network),2))) { window -ne $($+(@Link.,$network),2) }
  337.   aline -pa $($+(@Link.,$network),2) 12( $+ $snoticets $+ 12) $1-
  338.   haltdef
  339. }
  340.  
  341. ;on ^*:snotice:(Lost connection)[A-z0-9.,:() ]*: {
  342. ;  if (!$window($($+(@Link.,$network),2))) { window -ne $($+(@Link.,$network),2) }
  343. ;  aline -pa $($+(@Link.,$network),2) 12 $+ $snoticets $+ 12) $1-
  344. ;  haltdef
  345. ;}
  346. on ^*:snotice:Lost connection*: {
  347.   if (!$window($($+(@Link.,$network),2))) { window -ne $($+(@Link.,$network),2) }
  348.   aline -pa $($+(@Link.,$network),2) 12( $+ $snoticets $+ 12) $1-
  349.   haltdef
  350. }

Comments