All pastes #990609 Raw Edit

Unnamed

public text v1 · immutable
#990609 ·published 2008-04-20 08:12 UTC
rendered paste body
Alias ah { msg $chan $$1: /cs access #CHAN add nick 4 }
Alias av { msg $chan $$1: /cs access #CHAN add nick 3 }
Alias ao { msg $chan $$1: /cs access #CHAN add nick 5 }
Alias admin { msg $chan $$1: /cs access #CHAN add nick 10 }
Alias inviteon { msg $chan $$1: /mode #CHAN +i }
Alias inviteoff { msg $chan $$1: /mode #CHAN -i }
Alias inviteself { msg $chan $$1: /cs invite #CHAN }
Alias inviteother { msg $chan $$1: /invite nick #CHAN }
Alias halfkick { msg $chan $$1: /cs levels #channel set kick 4 }
Alias dropnick { msg $chan $$1: /ns drop nick. }
Alias badoff { msg $chan $$1: /bs badwords #CHAN del word. }
Alias badlist { msg $chan $$1: /bs badwords #CHAN list }
Alias badon { msg $chan $$1: /bs badwords #CHAN add word. }
Alias unbanself { msg $chan $$1: /cs unban #CHAN }
Alias recover { msg $chan $$1: /ns recover nick pass then type /ns release nick pass }
Alias silence
{ msg $chan $$1: /silence +nick }
Alias group { msg $chan $$1: /ns group mainnick mainpass }
Alias chanaccess { msg $chan $$1: /cs access #CHAN list }
Alias flood { msg $chan $$1: /bs kick #CHAN flood on }
Alias drop { msg $chan $$1: #CHAN (note you must be founder) }
Alias topiclock { msg $chan $$1: /cs set #CHAN topiclock on/off }
Alias akicklist { msg $chan $$1: type /cs akick #CHAN view }
Alias unban { msg $chan $$1: /mode #CHAN -b nick/host }
Alias nnotice { msg $chan $$1: /notice nick msg }
Alias addtopic { msg $chan $$1: /cs appendtopic #CHAN TEXT }
Alias greeton { msg $chan $$1: /bs set #CHAN greet on , to disable greets, type /bs set #CHAN greet off }
Alias nickoff { msg $chan $$1: /mode #CHAN +N }
Alias nickon { msg $chan $$1: /mode #CHAN -N }
Alias floodline { msg $chan $$1: /bs kick #CHAN flood on TimesTillBan LinesPerSeconds }
Alias entry { msg $chan $$1: type /cs set #CHAN entrymsg msghere }
Alias chanpriv { msg $chan $$1: /mode #CHAN +p }
Alias restrict { msg $chan $$1: /cs set #CHAN restricted on/off }
Alias release { msg $chan $$1: /ns release nick pass }
Alias shareowner { msg $chan $$1: /cs id #CHAN pass }
Alias signkick { msg $chan $$1: /cs set #CHAN signkick on/off }
Alias idself { msg $chan $$1: /ns id pass }
Alias key { msg $chan $$1: /mode #CHAN +k KEY }
Alias clearuser { msg $chan $$1: /cs clear #CHAN users }
Alias access { msg $chan $$1: /cs access #CHAN add nick level (3 = voice, 4 = halfop, 5-9 = op, 10-9999 = admin op }
Alias soon { msg $chan $$1: /cs set #CHAN secureops on }
Alias sooff { msg $chan $$1: /cs set #CHAN secureops off }
Alias mute { msg $chan $$1: /mode #CHAN +m }
Alias unmute { msg $chan $$1: /mode #CHAN -m }
Alias akickoff { msg $chan $$1: /cs akick #CHAN add nick/host }
Alias assign { msg $chan $$1: /bs assign #CHAN BOTNAME. List: /bs botlist }
Alias avchan { msg $chan $$1: type /cs levels #CHAN set autovoice -1 }
Alias aochan { msg $chan $$1: /cs levels #CHAN set autoop -1 }
Alias ahchan { msg $chan $$1: /cs levels #CHAN set autohalfop -1 }
Alias clearchanban { msg $chan $$1: /cs clear #CHAN bans }
Alias ghost { msg $chan $$1: type /ns ghost NICK PASS }
Alias greet { msg $chan $$1: /ns set greet GREETHERE }
Alias newchanpass { msg $chan $$1: type /cs set #CHAN password NEWPASS }
Alias newnickpass { msg $chan $$1: type /ns set password NEWPASS }
Alias regchan { msg $chan $$1: /join #CHAN then.. /cs register #chan CHANPASS DESC }
Alias regnick { msg $chan $$1: /ns register PasswordYouWant EmailAddressHere }
Alias chanban { msg $chan $$1: /mode #channel +b ~c:#banned-channel }
Alias unbanself { msg $chan $$1: type /cs unban #channel }
Alias +p { msg $chan $$1: type /mode NICK +p }
Alias custom { msg $chan $$1: /invite botname #CHAN CustomBotsLink >> http://wiki.swiftirc.net/index.php/CustomBots }
Alias skick { msg $chan $$1: type /cs set #CHAN signkick off }
Alias ttopic { msg $chan $$1: type /topic #CHAN topic here }
Alias nkill { msg $chan $$1: type /ns set kill quick/on }
Alias filter { msg $chan $$1: /mode nick +f/-f }
Alias unassign { msg $chan $$1: /bs unassign #CHAN }
Alias chanaccess { msg $chan $$1: type /cs access #CHAN list }
Alias delakick { msg $chan $$1: type: /cs akick #CHAN del nick/host }
Alias clearakick { msg $chan $$1:e /cs akick #chan clear }
Alias mlock { msg $chan $$1: /cs set #CHAN mlock +/-mode }
Alias merge { msg $chan $$1: /cs set #CHAN1 mlock +lL 1 #CHAN2 }
Alias killnick { msg $chan $$1: /ns set kill on/off  }
Alias unbanother { msg $chan $$1: /mode #CHAN -b nick/host  }
Alias nonicks { msg $chan $$1: /mode #CHAN +N }
Alias nickchange { msg $chan $$1: /mode #CHAN +N }
Alias clearaccess { msg $chan $$1: /cs access #CHAN clear }
Alias sendmemo { msg $chan $$1: /ms send nick msg here }
Alias lockoff { msg $chan $$1: type /cs set #CHAN mlock +nt }
Alias delaccess { msg $chan $$1:  /cs access #CHAN del nick }
Alias muteuser { msg $chan $$1: /mode #CHAN +b ~q:host }
Alias noban { msg $chan $$1: type /mode #CHAN +e nick }
Alias hopspam { msg $chan $$1: /mode #CHAN +j JOINS:HOWMANYSECS }
Alias founder { msg $chan $$1: /cs set #CHAN founder NEWFOUNDER }
Alias users { msg $chan $$1: /mode #CHAN +l limit }
Alias caps { msg $chan $$1: /bs kick #CHAN caps on/off }
Alias akick { msg $chan $$1: /cs akick #CHAN add nick reason }
Alias clearchan { msg $chan $$1: /cs clear #CHAN setting }
Alias ctcp 
{ msg $chan $$1: /mode #CHAN +C }
Alias restrict { msg $chan $$1: /cs set #CHAN restricted on }
Alias redirect { msg $chan $$1: /cs set #CHAN mlock +lL 1 #UtargetchannelU }
Alias color { msg $chan To view alist of colours for use, type !clist (note u must be on #irchelp) then press CTRL+K and type the desired number }


Alias global { amsg 13[4AMSG13]7 $1- }

on *:TEXT:!lsw:#: { notice $nick 12,1The 10lootshare/coinshare 12worlds 10are: 137 10 11 14 29 30 33 34 37 40 43 47 51 52 85 94 95 106 108 113 117 118 126 127 134 142 153 154 15514 (F2P) 9and: 13,19 22 23 26 28 39 46 48 56 59 64 65 69 76 84 88 89 91 97 111 112 124 131 137 145 151 157 158 15914 (P2P) }

ON *:ACTION:*huggles Mark|
*:#:{ if ($me isin $1-) { describe # huggles $nick back <3 ily *hides* } }

ON *:ACTION:*slaps mark|
*:#:{ if ($me isin $1-) { Who the fuck do you think your slapping, $nick ... EH !!! *slaps $nick back harder* } }

ON *:ACTION:*rapes Mark|
*:#:{ if ($me isin $1-) { describe # bends over and yells "oh yes!!! Thats the way to do it baby ! YESSSSSSS  } }

on *:TEXT:!colors:#: { msg $chan [4For 14Colors, 4Press 14Ctrl 4+ 14K 4Then 14Type 4Number :  0 0,1 1 1,2 2 1,3 3 1,4 4 1,5 5 1,6 6 1,7 7 1,8 8 1,9 9 1,10 10 1,11 11 0,12 12 1,13 13 1,14 14 1,15 15 5,0 ] [14For 4Color 14With 4A 14Background, 4Press 14CTRL 4+ 14K 4Plus 142 4Numbers 14With 4A 14Comma 4Between 14Them [13,1 13,1  (4 13 14= 4text,14 1 4= 14background)] }

on *:INPUT:*:{
  if ($1 === +v) {
    /mode $chan +v $iif($2,$2,$me)
  }
  if ($1 === -v) {
    /mode $chan -v $iif($2,$2,$me)
  }
  if ($1 === +h) {
    /mode $chan +h $iif($2,$2,$me)
  }
  if ($1 === -h) {
    /mode $chan -h $iif($2,$2,$me)
  }
  if ($1 === +o) {
    /mode $chan +o $iif($2,$2,$me)
  }
  if ($1 === -o) {
    /mode $chan -o $iif($2,$2,$me)
  }
  if ($1 === +a) {
    /mode $chan +a $iif($2,$2,$me)
  }
  if ($1 === -a) {
    /mode $chan -a $iif($2,$2,$me)
  }
  if ($1 === +q) {
    /mode $chan +q $iif($2,$2,$me)
  }
  if ($1 === -q) {
    /mode $chan -q $iif($2,$2,$me)
  }
  if ($1 === +b) {
    if ($2 == $null) {
      /mode $chan +b $address($me,2)
    }
    if ($2) {
      if ($2 isalnum) {
        /mode $chan +b $iif($3,$address($2,$3),$address($2,2))
      }
      else {
        /mode $chan +b $2-
      }
    }
  }
  if ($1 === -b) {
    if ($2 == $null) {
      /mode $chan -b $address($me,2)
    }
    if ($2) {
      if ($2 isalnum) {
        /mode $chan -b $iif($3,$address($2,$3),$address($2,2))
      }
      else {
        /mode $chan -b $2-
      }
    }
  }
  if ($1 === +c) {
    /mode $chan +c
  }
  if ($1 === -c) {
    /mode $chan -c
  }
  if ($1 === +e) {
    if ($2 == $null) {
      /mode $chan +e $address($me,2)
    }
    if ($2) {
      if ($2 isalnum) {
        /mode $chan +e $iif($3,$address($2,$3),$address($2,2))
      }
      else {
        /mode $chan +e $2-
      }
    }
  }
  if ($1 === -e) {
    if ($2 == $null) {
      /mode $chan -e $address($me,2)
    }
    if ($2) {
      if ($2 isalnum) {
        /mode $chan -e $iif($3,$address($2,$3),$address($2,2))
      }
      else {
        /mode $chan -e $2-
      }
    }
  }
  if ($1 === +I) {
    if ($2 == $null) {
      /mode $chan +I $address($me,2)
    }
    if ($2) {
      if ($2 isalnum) {
        /mode $chan +I $iif($3,$address($2,$3),$address($2,2))
      }
      else {
        /mode $chan +I $2-
      }
    }
  }
  if ($1 === -I) {
    if ($2 == $null) {
      /mode $chan -I $address($me,2)
    }
    if ($2) {
      if ($2 isalnum) {
        /mode $chan -I $iif($3,$address($2,$3),$address($2,2))
      }
      else {
        /mode $chan -I $2-
      }
    }
  }
  if ($1 === +i) {
    /mode $chan +i
  }
  if ($1 === -i) {
    /mode $chan -i
  }
  if ($1 === +j) {
    /mode $chan +j $2-
  }
  if ($1 === -j) {
    /mode $chan -j
  }
  if ($1 === +k) {
    /mode $chan +k $2-
  }
  if ($1 === -k) {
    /mode $chan -k $2-
  }
  if ($1 === +l) {
    /mode $chan +l $2-
  }
  if ($1 === -l) {
    /mode $chan -l
  }
  if ($1 === +m) {
    /mode $chan +m
  }
  if ($1 === -m) {
    /mode $chan -m
  }
  if ($1 === +n) {
    /mode $chan +n
  }
  if ($1 === -n) {
    /mode $chan -n
  }
  if ($1 === +p) {
    /mode $chan +p
  }
  if ($1 === -p) {
    /mode $chan -p
  }
  if ($1 === +s) {
    /mode $chan +s
  }
  if ($1 === -s) {
    /mode $chan -s
  }
  if ($1 === +t) {
    /mode $chan +t
  }
  if ($1 === -t) {
    /mode $chan -t
  }
  if ($1 === +C) {
    /mode $chan +C
  }
  if ($1 === -C) {
    /mode $chan -C
  }
  if ($1 === +G) {
    /mode $chan +G
  }
  if ($1 === -G) {
    /mode $chan -G
  }
  if ($1 === +M) {
    /mode $chan +M
  }
  if ($1 === -M) {
    /mode $chan -M
  }
  if ($1 === +K) {
    /mode $chan +K
  }
  if ($1 === -K) {
    /mode $chan -K
  }
  if ($1 === +L) {
    /mode $chan +L $2-
  }
  if ($1 === -L) {
    /mode $chan -L
  }
  if ($1 === +N) {
    /mode $chan +N
  }
  if ($1 === -N) {
    /mode $chan -N
  }
  if ($1 === +Q) {
    /mode $chan +Q
  }
  if ($1 === -Q) {
    /mode $chan -Q
  }
  if ($1 === +R) {
    /mode $chan +R
  }
  if ($1 === -R) {
    /mode $chan -R
  }
  if ($1 === +S) {
    /mode $chan +S
  }
  if ($1 === -S) {
    /mode $chan -S
  }
  if ($1 === +T) {
    /mode $chan +T
  }
  if ($1 === -T) {
    /mode $chan -T
  }
  if ($1 === +V) {
    /mode $chan +V
  }
  if ($1 === -V) {
    /mode $chan -V
  }
  if ($1 === +u) {
    /mode $chan +u
  }
  if ($1 === -u) {
    /mode $chan -u
  }
}





on *:INPUT:#:
{ if ($1 ison $chan) { msg $chan 15. 14. 1: 13 $1 1: 14. 15. $2- | haltdef } }





alias age {
  var %Bday = $iif(!$2,$ctime(January 13 00:0:00 1991),$2), %years = $calc(($ctime - %bday) / 31556952), %other = $duration($calc(($ctime - %Bday))), %next = $duration($calc(($floor($calc(%years +1)) - %years)*31556952))
  me 10is12 $regsubex(%other,/([a-z]+)\b/Sig,$+($chr(3),10,\t,$chr(3),12)) 10Approx12 %years 10years old.12 $me 10will be12 $floor($calc(%years +1)) 10years old in12 $regsubex(%next,/([a-z]+)\b/Sig,$+($chr(3),10,\t,$chr(3),12)) $+ 10..
} 











on *:text:!warn*:#:{
  if ($readini(Warn.ini,$chan,$address($2,2)) == 1) {
    writeini Warn.ini $chan $address($2,2) $calc( $readini(Warn.ini,$chan,$address($2,2)) +1)
  notice $2 You are now on your second warning, 2 more and your out of here | halt }

  if ($readini(Warn.ini,$chan,$address($2,2)) == 2) {
    writeini Warn.ini $chan $address($2,2) $calc( $readini(Warn.ini,$chan,$address($2,2)) +1)
  notice $2 You just got your third warning, 1 more and your gone.. | halt }

  if ($readini(Warn.ini,$chan,$address($2,2)) == 3) {
    set %reason. I gave you 3 warnings and you blew it,
    ban -ku120 $chan $$2 2 Reason: %reason.  2 Minute Ban
    Unset %reason.
    remini Warn.ini $chan $address($2,2)
  halt }

  if ($readini(Warn.ini,$chan,$address($2,2)) == $null) {
    writeini Warn.ini $chan $address($2,2) 1
    notice $2 You have just received warn number 1, 3 more and you get Kb'd
  }
}





alias pc1 return $+($chr(3),10,$1-)
alias pc2 return $+($chr(3),03,$1-)
alias pc3 return $+($chr(3),04,$1-)
alias power {
  if (!$chan(0)) {
    echo -tsa $pc1(You aren't on) $pc2(on any) $pc3(channels!)
  }
  else {
    var %p = 1
    while (%p <= $chan(0)) {
      inc %users $nick($chan(%p),0)
      inc %users $nick($chan,%p)
      if ($me isop $chan(%p)) {
        inc %ops
      }
      if ($me ishop $chan(%p)) {
        inc %hops
      }
      if ($me isvoice $chan(%p)) {
        inc %voices
      }
      if ($me isreg $chan(%p)) {
        inc %regs
      }
      inc %p
    }
    say $pc1(10I am on) $pc3($chan(0)) $pc2(channels) $pc1(with) $pc3(%users) $pc2(people) $+ . $pc1(I am op on) $pc3($iif(%ops,%ops,0) $+ / $+ $chan(0)) $pc2(channels) $+ , $pc1(Halfop on) $pc3($iif(%hops,%hops,0) $+ / $+ $chan(0)) $pc2(channels) $pc1(voice on)  $pc3($iif(%voices,%voices,0) $+ / $+ $chan(0))  $pc2(channels) $pc1(and regular on) $pc3($iif(%regs,%regs,0) $+ / $+ $chan(0)) $pc1(channels)
    unset %ops
    unset %hops
    unset %voices
    unset %regs
    unset %users
  }
}


alias away { set %away 1
  set %fnick $me
  set %snick $1
  set %ctime $ctime 
  amsg 0¤3,9¤9,3¤1,3¤3,1¤9,1I am away for no0w, I shall 7return later.3,1¤1,3¤9,3¤3,9¤0,9¤
  nick %snick
}

alias back { amsg 0¤3,9¤9,3¤1,3¤3,1¤9,1I am now0,1 back from b7eing away.3,1¤1,3¤9,3¤3,9¤0,9¤
  nick %fnick
  unset %ctime %snick %fnick %away %told %log %loghosts
}



0$3,9$9,3$1,3$3,1$0,1 text 3,1$1,3$9,3$3,9$0,9$






on ^1:HOTLINK:*youtube.com/watch*:*: {
  if ($mouse.key & 1) YouTube $1
  halt
}
alias F2 { .url -n %YouTube }
alias -l YouTube {
  if (!%yt.title) {
    .set %YouTube $1
    .set %ytv $gettok($1,2-,109)
    .sockclose YT
    .sockopen YT www.youtube.com 80
  }
  else {
    echo -a [YouTube::Title] $replace(%YT.title,&quot;,",&amp;,&) ( $+ %YT.dur $+ ) by %YT.aut on %YT.date
    echo -a [YouTube::Desc] $replace(%YT.desc,&quot;,",&amp;,&)
    echo -a [YouTube::Stats] Views: %YT.views - Comments: %YT.com - Favourited: %YT.fav
    .unset %YT.*
  }
}
on *:SOCKOPEN:YT: {
  if ($sockerr) { echo -a $sock(YT).wsmsg | return }
  .sockwrite -nt YT GET %ytv
  .sockwrite -nt YT Host: www.youtube.com $+ $crlf $+ $crlf
}
on *:SOCKREAD:YT: {
  if ($sockerr) { echo -a $sock(YT).wsmsg | return }
  var %YT
  .sockread %YT
  if ($regex(%YT,/<meta name="title" content="(.+?)">/Si)) {
    .set %YT.title $regml(1)
  }
  if ($regex(%YT,/<meta name="description" content="(.+?)">/Si)) {
    .set %YT.desc $regml(1)
  }
  if ($regex(%YT,$+(/"l": (.+?),$chr(44))/Si)) {
    .set %YT.dur $duration($regml(1))
  }
  if ($regex(%YT,/class="viewcount">(.+?)</Si)) {
    .set %YT.views $regml(1)
  }
  if ($regex(%YT,/comments:<\/span> <a href=".+?">(.+?)<\/a>/Si)) {
    .set %YT.com $regml(1)
  }
  if ($regex(%YT,/favorited:<\/span> (.+)/Si)) {
    .set %YT.fav $regml(1)
  }
  if (%YT.from) {
    noop $regex(%YT,/>(.+?)</Si)
    .set %YT.aut $regml(1)
    .set %YT.from $false
  }
  if (%YT.add) {
    noop $regex(%YT,/>(.+?)</Si)
    .set %YT.date $regml(1)
    .sockclose YT
    .YouTube
  }
  if (<span class="normalLabel">From: isin %YT) { .set %YT.from $true }
  if (<span class="smallLabel">Added:</span> isin %YT) { .set %YT.add $true }
} 











http://pastebin.ca/594887?srch=colors+big+text





on $*:TEXT:/^[!@](gratz|grats)/:#: {
  if ($2- == $null) { .notice $nick Syntax: $1 level skill } 
  elseif (($2 > 99) || ($2 < 1)) { .notice $nick Err: The level must be between 1-99. Syntax: $1 level skill } 
  elseif (!$skill($3-)) { .notice $nick Err: $+(",$3-,") is not a skill ... Are you crazy? } 
  else { msg $chan 0,9$3,9$9,3$1,3$3,1$0,1 Congratulations, $nick - you now have $2 $skill($3) $+  - Well done! 3,1$1,3$9,3$3,9$0,9$
  }
}
alias -l skill { 
  if ($regex($1,/^((skill)?total|overall)$/Si)) return Overall 
  elseif ($regex($1,/^cmb $/Si)) return cmb
  elseif ($regex($1,/^at(t|k|tack)$/Si)) return Attack 
  elseif ($regex($1,/^def(en[cs]e)?$/Si)) return Defence 
  elseif ($regex($1,/^str(ength)?$/Si)) return Strength 
  elseif ($regex($1,/^(hp|hit(s|points)?)$/Si)) return Hitpoints 
  elseif ($regex($1,/^rang(e|er|ed|ing)$/Si)) return Ranged 
  elseif ($regex($1,/^Pray(er)?$/Si)) return Prayer 
  elseif ($regex($1,/^mag(e|ic)$/Si)) return Magic 
  elseif ($regex($1,/^(cook|cooking)?$/Si)) return Cooking 
  elseif ($regex($1,/^(wc(ing)?|woodcut(ting)?)$/Si)) return Woodcutting 
  elseif ($regex($1,/^fletch(ing)?$/Si)) return Fletching 
  elseif ($regex($1,/^fish(ing)?$/Si)) return Fishing 
  elseif ($regex($1,/^(fire|fm)(make?(ing)?|ing)?$/Si)) return Firemaking 
  elseif ($regex($1,/^craft(ing)?$/Si)) return Crafting 
  elseif ($regex($1,/^(smith|smelt)(ing)?$/Si)) return Smithing 
  elseif ($regex($1,/^min(e|e?ing)$/Si)) return Mining 
  elseif ($regex($1,/^herb(law|lore)?$/Si)) return Herblore 
  elseif ($regex($1,/^agil(ity)?$/Si)) return Agility 
  elseif ($regex($1,/^(th(ei|ie)[fv](e|ing)?)$/Si)) return Thieving 
  elseif ($regex($1,/^slay(er|ing)?$/Si)) return Slayer 
  elseif ($regex($1,/^farm(er|ing)?$/Si)) return Farming 
  elseif ($regex($1,/^(rc|runecraft)(er|ing)?$/Si)) return Runecraft 
  elseif ($regex($1,/^poh|con(struct[ion]|ing)?$/Si)) return Construction 
  elseif ($regex($1,/^Hunt(er|ing)?$/Si)) return Hunter
  elseif ($regex($1,/^(summon|summoning|sum)?$/Si)) return Summoning