All pastes #538062 Raw Edit

Anonymous

public text v1 · immutable
·published 2007-06-04 22:55 UTC
rendered paste body
on *:TEXT:!pcw*:#ana, #arpc:{  
  if (%pcw == off) { halt }
  notice $nick Current PC World: %pcworld --Last Update: $+($duration($calc($ctime - %pctime)),) ago this command was used  $+  %pcusage.  times.
  inc %pcusage. 1
} 
on *:TEXT:!setworld*:#ana:{ 
  if ($nick isvoice $chan ) notice $nick You cannot change the world! 
  if ($nick isop $chan) || ($nick ishop $chan) unset %bw
  if ($nick isreg $chan) notice $nick You cannot change the world! 
  if ($nick isop $chan) || ($nick ishop $chan) set %pctime $ctime 
  if ($nick isop $chan) || ($nick ishop $chan) set %pcnick $nick 
  if ($nick isop $chan) || ($nick ishop $chan) set %pcworld $2- 
  if ($nick isop $chan) || ($nick ishop $chan) /timer100 2 2 msg #arpc 9,2 ((¯`·.¸((¯`·.¸((0,2  %pcnick has changed the world, type !pcw to see it 9,2))¸.·´¯))¸.·´¯))
  if ($nick isop $chan) || ($nick ishop $chan) /timer101 2 2 msg #arpc 9,2((¯`·.¸((¯`·.¸((0,2 YOU MUST TURN YOUR CHAT OFF FOR 10 MIN.9,2))¸.·´¯))¸.·´¯))
  if ($nick isop $chan) || ($nick ishop $chan) /timer102 1 200 msg #arpc 9,2((¯`·.¸((¯`·.¸((0,2 YOU MUST KEEP YOUR CHAT OFF FOR 6 more MIN.9,2))¸.·´¯))¸.·´¯))
  if ($nick isop $chan) || ($nick ishop $chan) /timer103 1 400 msg #arpc 9,2((¯`·.¸((¯`·.¸((0,2 YOU MUST KEEP YOUR CHAT OFF FOR 3 more MIN.9,2))¸.·´¯))¸.·´¯))
  if ($nick isop $chan) || ($nick ishop $chan) /timer104 1 600 msg #arpc  9,2((¯`·.¸((¯`·.¸((0,2 YOU MAY NOW TURN YOUR CHAT TO FRIENDS ONLY BY PMING A FRIEND9,2))¸.·´¯))¸.·´¯))
} `
on *:TEXT:!setpcw*:#ana: {
  if ($nick isvoice $chan) notice $nick You cannot change the world! 
  if ($nick isreg $chan) notice $nick You cannot change the world! 
  if ($nick isop $chan) || ($nick ishop $chan) set %pctime $ctime 
  if ($nick isop $chan) || ($nick ishop $chan) unset %bw
  if ($nick isop $chan) || ($nick ishop $chan) set %pcnick $nick 
  if ($nick isop $chan) || ($nick ishop $chan) set %pcworld $2- 
  if ($nick isop $chan) || ($nick ishop $chan) timer100 2 2 msg #arpc 9,2 ((¯`·.¸((¯`·.¸((0,2  %pcnick has changed the world, type !pcw to see it 9,2))¸.·´¯))¸.·´¯))
  if ($nick isop $chan) || ($nick ishop $chan) timer101 2 2 msg #arpc 9,2((¯`·.¸((¯`·.¸((0,2 YOU MUST TURN YOUR CHAT OFF FOR 10 MIN.9,2))¸.·´¯))¸.·´¯))
  if ($nick isop $chan) || ($nick ishop $chan) /timer102 1 200 msg #arpc 9,2((¯`·.¸((¯`·.¸((0,2 YOU MUST KEEP YOUR CHAT OFF FOR 6m more MIN.9,2))¸.·´¯))¸.·´¯))
  if ($nick isop $chan) || ($nick ishop $chan) /timer103 1 400 msg #arpc 9,2((¯`·.¸((¯`·.¸((0,2 YOU MUST KEEP YOUR CHAT OFF FOR 3m more MIN.9,2))¸.·´¯))¸.·´¯))
  if ($nick isop $chan) || ($nick ishop $chan) /timer104 1 600 msg #arpc  9,2((¯`·.¸((¯`·.¸((0,2 YOU MAY NOW TURN YOUR CHAT TO FRIENDS ONLY BY PMING A FRIEND9,2))¸.·´¯))¸.·´¯))
} 
on *:TEXT:!world:#ana:{ 
  if (%pcw == off) { halt }
  notice $nick Current PC World: %pcworld --Last Update: $+($duration($calc($ctime - %pctime)),) ago this command was used  $+  %pcusage.  times.
  inc %pcusage. 1
}
on *:TEXT:.w:#ana:{ 
  notice $nick Current PC World: %pcworld --Last Update: $+($duration($calc($ctime - %pctime)),) ago this command was used  $+  %pcusage.  times.
  inc %pcusage. 21
}
on *:TEXT:.pcw:#:{ if ($address($me,2) == $address($nick,2)) { notice $nick Current PC World: %pcworld --Last Update: $+($duration($calc($ctime - %pctime)),) ago  } }this command was used  $+  %pcusage.  times.
  inc %pcusage. 21
}



on *:TEXT:!teatime*:#:{ msg $nick Tea time starts when the world changes. You turn your chat to "off" then change worlds. 15 min latter if you want to turn it to friends only you can by pming a friend. } 
on *:TEXT:!pm:#:{if (($nick isop $chan) || ($nick ishop $chan)) { msg $chan please pm $nick to get validated } 
on *:TEXT:.pm:#:{ if (($nick isop $chan) || ($nick ishop $chan)) msg $chan please pm $2- to get validated }


on *:TEXT:*!scout*:#ana:{ msg #arpc 9,2((¯`·.¸((0,2 $nick has started scouting 9,2))¸.·´¯)) } { msg #ana 9,2((¯`·.¸((0,2 $nick has started scouting 9,2))¸.·´¯)) }
on *:TEXT:*!found*:#ana:{ msg #arpc 9,2((¯`·.¸((0,2 $nick has found a world and is checking for a game. 9,2))¸.·´¯)) } { msg #ana 9,2((¯`·.¸((0,2 $nick has found a world and is checking for a game. 9,2))¸.·´¯)) } 
on *:TEXT:!mroll*:#arpc:{ 
  if ($nick isvoice $chan) { 
    mode $chan +bb $nick $address($nick,2))
    kick $chan $nick don't try it 
  halt }
  if ($nick isop $chan) || ($nick ishop $chan) {
    if ($2 isvoice $chan) {
      notice $nick $2 is already voiced so it apears they already went to roll call 
      halt
      if ($2 isop $chan) || ($2 ishop $chan) {
        notice $nick please don't try to kick a fellow op/halfop for not showing up during roll call.
        halt    
      }
      ban -ku5400 $chan $2 You have been kicked by $nick for 90 min. please come to the next roll call.
      kick $chan $2 You have been kicked by $nick for 90 minute. Please come to Roll-Call next time.
      msg $2 12 ROLL CALL please show up every roll call failure is a 90 min ban, EXITING CHANNEL DURING ROLL CALL IS REMOVAL OF AUTOVOICE 
      msg $2 12 If you are not at PC, change ur nick to what u are doing...like this: type /nick anastasia700|afk 
    } 
  }
}
on *:text:.av*:#:{
  if ($nick isop $chan) || ($nick ishop $chan) {
    if ($2 == on) {
      set %autovoice $2
    }
    if ($2 == off) {
      set %autovoice off
      halt
    }
  }
}
on *:Join:#arpc: {
  if (%av == on) {
    /cs devoice #arpc $nick 
  }
  if (%av == off) {
    halt
  }
}
                             
                             
                             
                             
                            
on *:TEXT:!teatime*:#arpc, #arpc_lobby:{ 
  /notice $nick 0.......4Tea Time Rule Sent Via Private Message0........
  /msg $nick  0........1----------------  TEA TIMER ---------------- 
  /msg $nick 41is set to 15 mins now and is explained below 
  /msg $nick 4(this will be always used)  
  /msg $nick 4when a new world is set this is what we like for u all to do...
  /msg $nick 4turn ur chat to *off* and hop to new world
  /msg $nick 4after 10 mins pm a friend on ur list by saying hello
  /msg $nick 4This switches it to friends without it ever being set to *on* 
}
on *:text:!rules*:#arpc, #arpc_lobby: {
  /notice $nick 4RULES have been sent to Private Message welcome to #
  /msg $nick 4 The rules are simple: English only....no flooding. No profanity.bots..asking for Ops.. excessive capitalization..sounds..high ascii..abusive-annoying behavior or harassment to users.., 
  /msg $nick 12 TURN CHAT TO FRIENDS 4 REQUIREMENTS FOR #arpc is 115+ REQS 
  /msg $nick 4 you must pm in game to 1(4@1)4 Operator for verification
  /msg $nick 3ONLY LEADERS MAY GIVE KEY,12 NO SAYING WORLD IN OPEN CHAT,4 WHEN SECURITY IS ON PLZ ADD LEADER WITH SECURITY NEXT TO THEIR NICK AND FOLLOW THEIR DIRECTIONS 
  /msg $nick 12 IDENTIFY NAMES... REGISTER NICKS ONLY IS THIS CHAN
  /msg $nick 4 people that leak only spoil the game for themselves 3(blacklisted for it)
  /msg $nick 12 TEA TIME rule 12 Type !teatime list the rule and how it works
  /msg $nick 12 YOU ARE NOT PERMITTED TO ENTER OTHER CHANS WHILE HERE 4 Unless:1) NO world is set, 2) PC is not discussed, 3) it is not a secret/private channel, 4)No key is set...LEADERS MUST BE ABLE TO CHECK THE OTHER CHANNELS U ARE IN, IF THEY ARE BANNED FOR POLITLEY CHECKING UR CHANNEL, THEN U WILL BE BANNED FROM ARPC UNTIL IT IS RECTIFIED
  /msg $nick 12 ROLL CALL please show up every roll call failure is a 90 min ban, EXITING CHANNEL DURING ROLL CALL IS REMOVAL OF AUTOVOICE 
  /msg $nick 12 Please ATTACK PORTALS not PESTS, If you are not at PC, change ur nick to what u are doing...like this: type /nick anastasia700|afk
}
on *:TEXT:!friends*:#arpc: {
  if ($nick isop $chan) || ($nick ishop $chan) {
    msg $chan 9,2((¯`·.¸((0,2 please add $2 in game pm $2 and keep $2 added 9,2))¸.·´¯))
  }
}

on *:TEXT:!reqs*:#arpc_lobby: {
  if ($nick isop #arpc_lobby) || ($nick ishop #arpc_lobby) {
    if ($2 !ison #arpc_lobby) {
      notice $nick $2 is not on $chan
      halt
    }
    if ($2 ishop $chan) || ($2 isop $chan) {
      notice $nick please don't kick staff
      halt
    }
    .notice $nick 12 User has been sent for failure to meet $chan 's requirements. 
    .ban -ku10 $chan $2 $iif($3-,$3-,12 Sorry To Say But You Do Not Meet #arpc's Requirements. Please Try and Rejoining When You Have 114.5 Or Higher Combat Level. Tyvm )
  }
}
on $*:TEXT:/^[!@.]voice all/Si:#:{ 
  if ($nick isop $chan || $nick ishop $chan) && ($me ishop $chan || $me isop $chan) { 
    var %x = 1 
    while (%x <= $nick($chan,0)) { 
      if ($nick($chan,%x) isreg $chan) { mode $chan +v $nick($chan,%x)
      } 
      inc %x 
    } 
  } 
}
on $*:TEXT:/^[!@.]unvoice all/Si:#:{ 
  if ($nick isop $chan || $nick ishop $chan) && ($me ishop $chan || $me isop $chan) { 
    var %x = 1 
    while (%x <= $nick($chan,0)) { 
      if ($nick($chan,%x) isvoice $chan) { mode $chan -v $nick($chan,%x)
      } 
      inc %x 
    } 
  } 
}
on *:TEXT:!setkey*:#ana:{
  if ($nick isop $chan) {
    set %key $2
    set %nickkey $nick
    mode #arpc +i
    timer 1 2 mode #arpc +k $2
    timer 1 3 msg #arpc they key was changed to $2 by %nickkey
    timer 1 3 msg #arpc they key was changed to $2 by %nickkey
    timer 1 3 msg #arpc they key was changed to $2 by %nickkey
    timer 1 3 msg #arpc they key was changed to $2 by %nickkey
    timer 1 3 msg #arpc they key was changed to $2 by %nickkey
    timer 1 3 msg #arpc they key was changed to $2 by %nickkey
    timer 1 3 msg #arpc they key was changed to $2 by %nickkey
    timer 1 3 msg #arpc they key was changed to $2 by %nickkey
    timer 1 3 msg #arpc they key was changed to $2 by %nickkey
    timer 1 3 msg #arpc they key was changed to $2 by %nickkey
    timer 1 3 msg #arpc they key was changed to $2 by %nickkey

    /timer 1 5 mode #arpc -i
  }
}

on *:TEXT:.arpc*:#arpc_lobby:{
  if ($address($nick,2) == @Swift-FF9F0374.upc-h.chello.nl) {
    describe $chan slaps $nick
    halt

  }
  if ($nick isop $chan) || ($nick ishop $chan) || ($address($me,2) == $address($nick,2)) { 
    if ($2 ison $chan) {
      /notice $nick $2 has the key
      msg $2 please part all channels.
      msg $2 please make sure your ided by using /ns id "password"
      msg $2 type /join #arpc %key
      ban -ku10 $chan $2 read your pm from $me
    }

    else { notice $nick $2 is not on the channel.
    }
  }
  else { notice $nick You cannot use this command.    
  }
}
on *:TEXT:!key*:#ana:{ notice $nick %key }
on *:TEXT:!pcw off:#ana:{
  if ($nick == MohamedsLove) {
    set %pcw off
  }
}
on *:TEXT:!pcw on:#ana:{
  if ($nick == MohamedsLove) {
    set %pcw on
  }
}