IRcap — File Browser
ircap871-mircscripts_2799 / ircap871-mircscripts_2799 / s / menu_canal.mrc
menu_canal.mrc — 3.72 KB — Download this file
$m(130): _ca config $chan
$m(226)
.$m(227)
..$m(228): mode # $$?=" $m(228) "
..$m(229): mode # $replace($chan(#).mode,+,-)
..-
..$iif(n isincs $chan(#).mode,$style(1)) +n ( $m(230) ): if (n isincs $chan(#).mode) { mode # -n } | else { mode # +n }
..$iif(t isincs $chan(#).mode,$style(1)) +t ( $m(231) ): if (t isincs $chan(#).mode) { mode # -t } | else { mode # +t }
..$iif(s isincs $chan(#).mode,$style(1)) +s ( $m(232) ): if (s isincs $chan(#).mode) { mode # -s } | else { mode # +s }
..$iif(p isincs $chan(#).mode,$style(1)) +p ( $m(233) ): if (p isincs $chan(#).mode) { mode # -p } | else { mode # +p }
..$iif(i isincs $chan(#).mode,$style(1)) +i ( $m(234) ): if (i isincs $chan(#).mode) { mode # -i } | else { mode # +i }
..$iif(m isincs $chan(#).mode,$style(1)) +m ( $m(235) ): if (m isincs $chan(#).mode) { mode # -m } | else { mode # +m }
..$iif(l isincs $chan(#).mode,$style(1)) +l ( $m(236) $chr(8) $chan(#).limit ): if (l isincs $chan(#).mode) { mode # -l } | else { mode # +l $$?=" $m(237) " }
..$iif(k isincs $chan(#).mode,$style(1)) +k ( $m(238) $chr(8) $chan(#).key ): if (k isincs $chan(#).mode) { mode # -k $chan(#).key } | else { mode # +k $$?=" $m(238) " }
.+nt: mode # +nt
.+si: mode # +si
.-
.$m(239): mode # b
.$m(240): set %borraban s | mode # b
.-
.$m(241): guiacolor | topic # $$?=" $m(241) "
.$m(242): elitopic #
.$m(243): raw -q topic # :
.$m(244): write $nofile(%perfil) $+ topics.txt $chan(#).topic
$m(131)
.$m(132): hop
.-
.$m(133)
..$m(134): amsg $$?=" $mg(mensaje) "
..$m(135): ame $$?=" $mg(mensaje) "
..-
..$m(136) #: notice # $$?=" $mg(mensaje) "
..$m(137): onotice (OPs: $+ # $+ ) $$?=" $mg(onotice) "
..$m(138): omsg (OPs: $+ # $+ ) $$?=" $mg(omsg) "
..-
..$m(139): msg $snicks $$?=" $mg(mensaje) "
..-
..$m(140): invite $$?= " $mg(invita) " #
..$m(141): var %invic = #$$?=" $mg(canal) " | var %invi = 0 | :L1 | inc %invi 1 | if $gettok($snicks,%invi,44) != $null { raw -q invite $gettok($snicks,%invi,44) %invic | goto L1 }
.$m(142)
..$m(143): .disable #replicas | .timer 1 60 .enable #replicas | ctcp # ping
..finger: .disable #replicas | .timer 1 60 .enable #replicas | ctcp # finger
..version: .disable #replicas | .timer 1 60 .enable #replicas | ctcp # version
..$m(144): .disable #replicas | .timer 1 60 .enable #replicas | ctcp # time
..userinfo: .disable #replicas | .timer 1 60 .enable #replicas | ctcp # userinfo
..clientInfo: .disable #replicas | .timer 1 60 .enable #replicas | ctcp # clientinfo
..-
..$m(145): .disable #replicas | .timer 1 60 .enable #replicas | ctcp # $$?="CTCP ?"
.-
.$m(146)
..$m(147): .timerSPAMEA 0 $$?=" $mg(spseg) " msg # $$?=" $mg(texto) "
..$m(148): .timerSPAMEA 0 $$?=" $mg(spseg) " amsg $$?=" $mg(texto) "
..$m(149): .timerSPAMEA off
.-
.$m(150) #: vlog #
.$m(151): adpass canalfav # $chan(#).key | if $window(@canalfav).state == normal { canalfavsaca }
.$m(152): partall
$m(82)
.$m(83): mos cap1
.-
.$m(84)
..$m(84): mos ip
.$m(85): mos url
.$m(86): mos date
.-
.$m(texto): mos frase $active
.-
.$m(87): mos asc
.-
$m(153)
.$m(154): lwho #
.$m(155)
..$m(156): set -u60 %tmp.buscanal $$?=" $mg(tbusc) " | %busca = $gettok(* $+ %tmp.buscanal $+ * $+ $chr(1) $+ %busca,1-6,1) | lwho #
..-
..$gettok(%busca,1,1): set -u60 %tmp.buscanal $gettok(%busca,1,1) | lwho #
..$gettok(%busca,2,1): set -u60 %tmp.buscanal $gettok(%busca,2,1) | lwho #
..$gettok(%busca,3,1): set -u60 %tmp.buscanal $gettok(%busca,3,1) | lwho #
..$gettok(%busca,4,1): set -u60 %tmp.buscanal $gettok(%busca,4,1) | lwho #
..$gettok(%busca,5,1): set -u60 %tmp.buscanal $gettok(%busca,5,1) | lwho #
..$gettok(%busca,6,1): set -u60 %tmp.buscanal $gettok(%busca,6,1) | lwho #
.-
.$m(157): _ca clonchan $chan
.$m(158): .timer 1 1 set %ial.lim %ial.lim | %ial.lim = 99999 | _ca scan #