Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- on *:text:!masshl:#:{
- if ($nick isop $chan) {
- var %loop 1
- while (%loop <= $nick($chan,0,v,oh)) {
- var %loop.name %loop.name $nick($chan,%loop,v,oh)
- inc %loop
- }
- msg $chan %loop.name
- }
- }
- on *:text:*:#tko_blitz: {
- if ($nick isop $chan) {
- var %c1 = #tevent,%c2 #tko_blitz
- if ($1 == !warscript) {
- var %x = 1,%n,%h
- while ($nick(%c1,%x,vh)) {
- if ($v1 ison %c2) {
- if ($v1 isvoice %c2) {
- var %n = $v1 %n
- }
- elseif ($nick(%c1,%x,vh) ishop %c2) {
- var %h = $v1 %h
- }
- }
- inc %x
- }
- massmodethingie %c2 -v %n
- massmodethingie %c2 -h %h
- !.notice $nick Done, executed command: $1
- }
- elseif ($1 == !revoice) {
- var %x = 1,%n
- while ($nick(%c1,%x,v)) {
- if ($v1 ison %c2) && ($v1 !isvoice %c2) {
- var %n = $v1 %n
- }
- inc %x
- }
- massmodethingie %c2 +v %n
- var %x = 1,%n
- while ($nick(%c1,%x,h)) {
- if ($v1 ison %c2) && ($v1 !ishop %c2) {
- var %n = $v1 %n
- }
- inc %x
- }
- massmodethingie %c2 +h %n
- !.notice $nick Done, executed command: $1
- }
- }
- }
- alias -l massmodethingie {
- while ($3) {
- mode $1 $+($left($2,1),$str($right($2,1),$modespl)) $gettok($3-,$+(1-,$modespl),32)
- tokenize 32 $1-2 $gettok($3-,$+($calc($modespl +1),-),32)
- }
- }
Add Comment
Please, Sign In to add comment