Docstoc

Raw

Document Sample
Raw Powered By Docstoc
					*************************** Raw ***************************

raw 331:*:{
  echo $Color(topic text) -t $2   4»    8¤   1«      2No topic is set
  halt
}

raw 332:*: {
  echo $color(topic text) -t $2   4»    8¤   1«      2[   2Topic     2]
$strip($3-,m) $+ $chr(15) $+ '
  halt
}

raw 333:*: {
  echo $color(topic text) -t $2 4» 8¤ 1«             2[   2Topic set
by 2] 2 [ 2 $3 2 ] [ 2On 2] 2 $asctime($4)
  halt
}


raw 366:*:{
  echo -s   4»   8¤   1«      2[ End of Names list   4.    2]    4
$replace($2,$chr(35), # )   2Channel 4.
  echo -s
  unset $+(%,sync.,$2)
  halt
}

raw 401:*:echo -a 4° 4»    8¤   1« °   2[ 4Error      2]        2No Such
Nick 4/    2Channel ( 4 $+ $2 $+ 14) | halt

raw 441:*:halt

raw 403:*:halt

raw 315:*: {
  if (%in. [ $+ [ $2 ] ]) || (%op [ $+ [ $2 ] ]) { halt }
  elseif (%seti = $null) { echo -s   4»   8¤   1«    $2 isn't online |
echo -s   | halt }
  else {
    echo -s   4»   8¤   1«     2[   2End Of 2] 4 $iif($chr(35) isin
$2,$replace($2,$chr(35), # ) Channel.,$2) /WHO list.
    unset %seti
    echo -s
    halt
  }
}


raw 352:*:{
  if (%in. [ $+ [ $6 ] ] != $null) { halt }
  elseif (%op [ $+ [ $2 ] ] != $null) { halt }
  else {
    $iif(%seti = $null,echo -s     4»   8¤   1«    Who: for $iif($chr(35)
isin $2,$replace($2,$chr(35), 4 # 1) Channel,$6))
    set -u15 %seti $2
    echo -s   4»   8¤   1«    $iif($6 =
$me,$+($chr(3),07,$chr(2),$chr(31),$me,$chr(15)),$+($replace($remove($7,H
,G),@,$+($chr(3),14@),+,$+($chr(3),3+),*,$+($chr(3),4)),$6,$chr(3))) ( $+
$3 $+ 4@ 01 $+ $4 $+ ) ( 4 $+ $iif($acc($+(*!,$3,@,$4)),$v1, 3n/a) $+ )
* $9-
    halt
  }
}



raw 421:*:echo -a 4° 4»     8¤     1«    °    2[   4Error   2]   2Unknown
Command   5( $+ $2 $+ ) | halt

raw 311:*: {
  echo -a    4»  8¤   1«      7Whois Informations   4»   8¤   1«
  echo -a 2[    2Whois time    000000   2]   5 $asctime
  echo -a 2[    2Nick   000000000000    2]   5 $2
  echo -a 2[    2Address    000000000   2]   5 $3 $+ 1@ 05 $+ $4
  echo -a 2[    2Full.Name    0000000   2]   5 $6-
  $iif($acc($+($2,!,$3,@,$4)),echo -a 2[     2Account   000000000           2]   5
$acc($+($2,!,$3,@,$4)))
  halt
}

raw 378:*: {
  echo -a    2[   2Real Ip   000000000       2]    5 $5
  halt
}

raw 314:*:{
  echo -a   4»     8¤   1«     7Whowas Informations   4»  8¤   1«
  echo -a 2[      2Nick 000000000000     2]   05 $2
  echo -a 2[      2Address   000000000   2]   05 $3 $+ 1@ 05 $+ $4
  echo -a 2[      2Real-Name   0000000   2]   05 $6-
  halt
}

raw 369:*:{
  if (%s [ $+ [ $2 ] ]) { halt }
  else { echo -a   4»   8¤   1«         7End Of Whowas      4»   8¤   1«     |
halt }
}


raw 319:*:{
  var %x = 3 , %op, %voice, %reg
  while (%x <= $0) {
    if (@* iswm $gettok($1-,%x,32)) { %op = %op $gettok($1-,%x,32) }
    elseif (+* iswm $gettok($1-,%x,32)) { %voice = %voice $gettok($1-
,%x,32) }
    else { %reg = %reg $gettok($1-,%x,32) }
    inc %x
  }
  echo -a 2[    2Channels   00000000   2]    5 $pos($3-,$chr(35),0)
  $iif($len(%op) > 0,echo -a 2[    2Ops    0000000000000   2]   5
$pos(%op,$chr(35),0) $+ : $replace(%op,@, 1@ 05))
  $iif($len(%voice) > 0,echo -a 2[    2Voice 00000000000     2]   5
$pos(%voice,$chr(35),0) $+ : $replace(%voice,+, 1+ 05))
  $iif($len(%reg) > 0,echo -a 2[    2Regular 000000000     2]   5
$pos(%reg,$chr(35),0) $+ : 1 000 $replace(%reg,$chr(35), 5# 05))
  $iif($2 != $me,echo -a 2[    2Common Channels 2]     5
$pos($AdoComChan($2),$chr(35),0) $+ : 1 000
$replace($AdoComChan($2),$chr(35), 5# 05))
  halt
}

raw 312:*: { echo -a 2[     2Server   0000000000    2]   5 $3 1( 01 $+ $4-
$+ 1) | set -u5 %line ok | halt }
raw 330:*: { echo -a 2[     2Usernasay 0000000     2]   5 $3 | halt }
raw 338:*: { echo -a 2[     2Host 000000000000     2]   5 $3 | halt }
raw 307:*: { echo -a 2[     2Identified   000000    2]   5 Has 1 Identified
  5For This Nick | halt }
raw 301:*:echo 1 $2 2[     2Away   000000000000    2]   5 $3- | halt
raw 313:*:echo 1 $2 2[     2IRC Oper   00000000    2]   5 Yes | halt
raw 310:*: { echo -a $2 4 $+ $3- | halt }
raw 317:*: {
   echo -a 2[    2Idle time   0000000   2]    5 $duration($3)
   if ($4 isnum) { echo -a 2[    2Online    0000000000   2]   5
$duration($calc($ctime - $4)) | echo -a 2[      2Sign on time   0000   2]
  5 $asctime($4,ddd mm/dd/yyyy hh:nn:sst) }
   halt
}

raw 318:*: {
  $iif(%line != $null,echo -a 2[    2Notify   0000000000    2]   5 $iif($2
isnotify,Yes,$iif($2 !isnotify,No)))
  echo -a 2[    2Connect   000000000   2]   5 $iif(%line !=
$null,Online,$2 1is Offline)
  $iif(%line != $null,echo -a   4»   8¤   1«     7End Of Whois
  4»   8¤    1«  )
  echo -a
  halt
}

raw 435:*:echo -a 4¤ 4»     8¤   1« ¤   2[ 4Alert!     2]    $+ $2 $+
 2Cannot Change to a Banned Nickname | halt

raw 442:*:halt
alias AdoComChan {
  var %AdoComCh = 1
  while (%AdoComCh <= $comchan($1,0)) {
    var %AdoComLi = %AdoComLi $comchan($1,%AdoComCh)
    inc %AdoComCh
  }
    if (%AdoComLi == $null) { return   1None }
    else { return %AdoComLi }
}

raw 324:*:echo $color(mode text) -t $2      4»   8¤   1«   2[   2Modes   2]
 4 $3   | halt

raw 328:*:echo $Color(mode text) -t $2 * $2 Channel URL: $3- | halt


raw 348:*:{
  $iif(%ok = $null,echo -s   4»   8¤  1«    2[   2Exempt List Of 2]       4
$replace($2,$chr(35), # ) Channel.)
  set -u20 %okz now
  echo -s   4»   8¤   1«    $3 2Set By $gettok($4,1,$asc(!)) 2in
$asctime($5,ddd dd/mm/yyyy hh:nn:sst)
  inc %incz
  halt
}


raw 349:*:{
  if (%okz = $null) { echo -s   4»   8¤  1«     2[   2Exempts List Empty
in 2] 4 $replace($2,$chr(35), # ) Channel. | halt }
  else { echo -s   4»   8¤   1«    %incz 2Exempts -
$replace($2,$chr(35), # ) 2End of Channel Exempt List | unset %incz |
echo -s   | halt }
}

raw 346:*:{
  $iif(%ok = $null,echo -s   4»   8¤  1«    2[   2Invite List of 2]       4
$replace($2,$chr(35), # ) 2Channel 4. )
  set -u20 %okzz now
  echo -s   4»   8¤   1«    $3 2set By $gettok($4,1,$asc(!)) 2in
$asctime($5,ddd dd/mm/yyyy hh:nn:sst)
  inc %incz
  halt
}


raw 347:*:{
  if (%okzz = $null) { echo -s  4»   8¤   1«     2[   2Invite List Empty
in 2] 4 $replace($2,$chr(35), # ) 2Channel 4. | halt }
  else { echo -s   4»   8¤   1«   %incz 2Invite -
$replace($2,$chr(35), # ) 2End of Channel Invite List | unset %incz |
echo -s   | halt }
}

raw 477:*:echo -s   4»   8¤   1«    $iif($chr(35) isin $2,You Need to
Identify to a Registered Nick to Speak 4\ 1join in
$replace($2,$chr(35), # ) channel.,You need to identify to a registered
nick to private message 4 $2 $+ .) | halt
raw 437:*:echo -s  4»   8¤   1«     2Cannot Change Nickname While Banned
Or moderated on $replace($2,$chr(35), # ) 2Channel 4. | halt

raw 408:*:echo 1 $2 4° 4»    8¤         1« °     2[ 4Error          2]    2 You Cannot
Use Colors On This Channel 4. $2        2Not sent 4: $12-

raw 478:*:echo -s   4»   8¤  1«             2Ban List is Full in
$replace($2,$chr(35), # ) 2Channel          4. | halt

raw 404:*:echo -a 4° 4»    8¤   1« °   2[ 4Error               2]        2Cannot Send To
Channel ( $+ $2 $+ ) (Banned 4 / 1Mode +m) | halt

raw 405:*:echo -s ¤ 4»   8¤   1« ¤   2[           4Alert! 2]    2You Cannot
Join $replace($2,$chr(35), # ) 2Channel           4.   2you're On Too Many
Channels | halt

raw 465:*:echo -a 4° 4»          8¤    1«   °   2[   4Error    2]        2You're Banned
From This Server | halt

raw 467:*:echo -a 4°      4»     8¤    1«   °   2[   4Error    2]        2Channel Key
Already Set | halt

raw 471:*:echo -s 4¤ 4»         8¤   1« ¤    2[      4Alert! 2]
$replace($2,$chr(35), # )      2Channel Is Full      (Op: 4 /Cs invite $2 $+           ) |
halt

raw 472:*:echo -a 4° 4»     8¤         1«   °   2[   4Error    2]        2Unknown Mode
Char   2( $+ $2 $+ ) | halt

raw 473:*:echo -s 4¤ 4»    8¤   1« ¤   2[ 4Alert! 2]   2 +i Is Invite
Only in $replace($2,$chr(35), # ) 2Channel 4. (Op: 4 /Cs invite $2 $+
 ) | halt

raw 474:*:echo -s 4¤ 4»    8¤   1« ¤             2[ 4Alert!    2]   2You Are
Banned From $replace($2,$chr(35), # )           2Channel 4.    (Op: 4 /Cs invite
$2 $+ ) | halt

raw 475:*:echo -a   4°    4»     8¤    1«   °   2[   4Error    2]        2Bad Channel
Key | halt

raw 443:*:echo -s   4»   8¤  1«   $2 2is Already on
$replace($3,$chr(35), # ) 2Channel 4. | halt

raw 433:*:echo -a 4¤ 4»          8¤    1«   ¤   2[   4Alert!    2]        2Nick   $2
 2Already In Use | halt

raw 440:*:echo -s   4»   8¤ 1«    $2 -> 2Services is currently down.
Please wait a few moments 4. ( 4ÓíÑÝÑ ÏÇæä 1) | halt

raw 468:*:echo -s    4»     8¤    1«        2Only servers can change that mode
| halt

raw 2:*:halt
raw 3:*:halt

raw 6:*:halt

raw 1:*: {
  .linesep -s
  echo -s   4»   8¤        1«        $2-7   3 $gettok($8,1,33)         1( 05 $+
$gettok($8,2,33) $+       1)
  halt
}

raw 436:*:echo -s        4»     8¤    1«         2NickName Collision          03Kill . |
halt

raw 376:*: { echo -s  4»   8¤   1«      2[                  14End Of    4 /     14 MOTD
Command 4.    2] | .linesep -s | halt }

raw 375:*:echo -s - | echo -s 4»                 8¤    1«       2[   14Message Of The
Day 2] 4 $3 | echo -s - | halt

raw 2:*:{
  echo -s      4»   8¤    1«         $2-4   4:    3 $5      1Running Version 03 $8
  halt
}

raw 3:*:{
  echo -s      4»   8¤    1«         $2-5   2On       4:    3 $6-
  halt
}

raw 4:*:{
  echo -s      4»   8¤    1«         01 $2-
  halt
}

raw 5:*:{
  if (o !isin $usermode) {
    echo -s   4»   8¤   1«    01 $gettok($replace($1-
,=, 1=,$chr(32),$+($chr(32), 04)),2-,32)
  }
  halt
}

raw 251:*:echo -s   4»   8¤   1«              $2-3 $+( 04,$4, 1) $5-6 $+( 04,$7, 1)
$8-9 $+( 04,$10, 1) $11 | halt

raw 254:*:echo -s        4»     8¤    1«         2[   14Channels Formed       2]   4 $2- |
halt

raw 255:*:echo -s        4»     8¤    1«      $2-3 $+( 04,$4, 1) $5-6 $+( 04,$7, 1)
$8 | halt

raw 265:*:echo -s        4»     8¤    1«      $2-4 $+( 04,$5, 1) $6 $+( 04,$7, 1) |
halt
raw 266:*: echo -s        4»        8¤     1«        $2-4 $+( 04,$5, 1) $6 $+( 04,$7, 1)
| echo -s - | halt

raw 252:*:echo -s     4»         8¤      1«          2[   14Operators Online          2]    4 $2 |
halt

raw 253:*:echo -s     4»         8¤      1«          2[   14Unknown Connections            2]   3 $2
| halt

raw 381:*:echo -a     4»         8¤      1«          2[   6You Are Now An IRC Oper              2]    |
halt

raw 306:*: {
   echo $Color(info2 text) -set 4¤                   4»   8¤    1« ¤       2[    4Alert!     2]
  2You are Now Away 4: $awaymsg
   halt
}

raw 305:*: {
   if ($away) {
     echo $Color(info2 text) -st 4¤ 4»   8¤                      1«    ¤        2[   4Alert!     2]
  2You are Now Back ( $+ $awaymsg $+ )
     echo $Color(info2 text) -st 4¤ 4»   8¤                      1«    ¤        2[   4Alert!     2]
  2Away Duration 4: $duration($awaytime)
     linesep -s
     halt
   }
   else {
     echo $Color(info2 text) -st 4¤ 4»   8¤                      1«    ¤        2[   4Alert!     2]
  2Yor Are Not Away
     linesep -s
     halt
   }
}

raw 620:*:echo -s     4»         8¤      1«          2[   4DccAllow        2]    $2- | halt

raw 617:*:echo -s     4»         8¤      1«          2[   4DccAllow        2]    $2- | halt

raw 618:*:{ inc %dcc.a | $iif(%dcc.a = 1,echo -s 4¤ 4» 8¤   1« ¤
 2[ 4Alert! 2] 1 2The Following Users are On your dcc Allow list
 :)   | echo -s   4»   8¤   1«    $2- | halt }

raw 619:*:echo -a    4°        4»     8¤        1«   °    2[   4Error      2]    1 $2- | halt

raw 0:*:echo -s   4»   8¤   1«    $iif(+* iswm $1,Added $1 to Silence
list,Removed $1 from Silence list) | halt

raw 271:*:{
  inc %s.l.
  $iif(%s.l. = 1,echo -s              4»   8¤   1«             2Silence list :)
  echo -s   4»   8¤   1«               %s.l. $+ ) $3
  halt
}

raw 272:*:{
  if (%s.l. = $null) {
    echo -s   4»   8¤    1«        2Silence List Empty
    halt
  }
  else {
    unset %s.l.
    echo -s   4»   8¤    1«         2End of     4/      2SILENCE List     4.   | halt
  }
}

raw 372:*You are recognized as*:echo -s 4» 8¤  1«    2You Are
Recognized As   4: $6- 2In $network 2NetWork 4. | halt

raw 438:*:echo -s   4°   4»    8¤   1«     °    2[ 4Error        2]   1   2Nick Change
Too Fast, Please Wait    30   2Seconds     4.   | halt

raw 439:*:echo -s   4° 4»      8¤     1«   °     2[    4Error    2]   1   $+ $2 $+
$3-7 ( $10 ) $11- | halt

raw 406:*:set -u5 %s [ $+ [ $2 ] ] ok | echo -s 4° 4»                 8¤   1« °
 2[ 4Error 2]     2There Was No Such Nick   4: $2 4. |                halt
raw 407:*:echo -a 4° 4»     8¤   1« °    2[ 4Error 2]                 2Duplicate
Recipients   4-   2No Message | halt
raw 409:*:echo -a 4° 4»     8¤   1« °    2[ 4Error 2]                 2No Origin
Specified | halt
raw 411:*:echo -a 4° 4»     8¤   1« °    2[ 4Error 2]                 2No Recipient
Givin | halt
raw 412:*:echo -a 4° 4»     8¤   1« °    2[ 4Error 2]                 2No Text To
Send | halt
raw 413:*:echo -a 4° 4»     8¤   1« °    2[ 4Error 2]                 2No Toplevel
Domain Specified | halt
raw 414:*:echo -a 4° 4»     8¤   1« °    2[ 4Error 2]                 2Wildcard In
Toplevel Domain | halt
raw 422:*:echo -a 4° 4»     8¤   1« °    2[ 4Error 2]                 2Motd File
Missing | halt
raw 423:*:echo -a 4° 4»     8¤   1« °    2[ 4Error 2]                 2Administrative
Info Unavailable | halt
raw 431:*:echo -a 4° 4»     8¤   1« °    2[ 4Error 2]                 2No Nick Givin
| halt
raw 432:*:echo -s 4¤ 4»     8¤   1« ¤    2[ 4Alert! 2]                $2 2Nickname
is Reserved 4,    2To Remove Hold on your Nickname 4-                 2Use 4: /ns
release $2 Pass | halt

raw 444:*:echo -a 4°     4»   8¤     1«    °    2[    4Error    2]    2User Not
Logged In | halt
raw 445:*:echo -a 4°     4»   8¤     1«    °    2[    4Error    2]    2Summon Has
Been Disabled | halt
raw 446:*:echo -a 4°     4»   8¤     1«    °    2[    4Error    2]    2Users Has Been
Disabled | halt
raw 451:*:echo -a 4°     4»   8¤     1«    °    2[    4Error    2]    2You Have Not
Registered | halt
raw 461:*:echo -a 4° 4»          8¤     1«   °    2[   4Error    2]    2Not Enough
Parameters Givin | halt
raw 462:*:echo -a 4° 4»          8¤     1«   °    2[   4Error    2]    2You May Not
Register | halt
raw 463:*:echo -a 4° 4»          8¤   1«     °    2[   4Error    2]    2Your Host
Isn't Among The Privileged       | halt
raw 464:*:echo -a 4° 4»          8¤   1«     °    2[   4Error    2]    2Password
Incorrect | halt
raw 481:*:echo -a 4° 4»          8¤     1«   °    2[   4Error    2]    2You're Not An
IRC Operator | halt

raw 483:*:echo -a   4°    4»     8¤     1«   °    2[   4Error    2]    2Can't Kill
Server | halt

raw 484:*:echo -s  4° 4»    8¤ 1« °    2[               4Error    2]   1   2Can't Kill-
 , Kick Or Deop Room Service 4. | halt

raw 491:*:echo -a 4° 4»    8¤           1«   °    2[   4Error    2]    2No Olines For
Your Host | halt
raw 501:*:echo -a 4° 4»    8¤           1«   °    2[   4Error    2]    2Unknown Mode
Flag | halt
raw 502:*:echo -a 4° 4»    8¤           1«   °    2[   4Error    2]    2Can't Change
Mode For Other Users | halt

raw 482:*:if (%lols = $null) { set -u10 %lols ok | echo -a
 4° 4»    8¤   1« °    2[ 4Error 2]     2You're Not Channel Operator in
$replace($2,$chr(35), 4# 01) } | halt

raw 256:*:echo -s    4»     8¤     1«        2[   6Administrative Info      2]   4 $5 |
halt
raw 402:*:echo -a   4°    4»     8¤    1«   °     2[   4Error   2]   2No Such
Server | halt

raw 433:*:{ inc -u4 %zz | echo -s 4¤             4»   8¤   1« ¤    2[ 4Alert! 2]
 2Somebody is already Using 4 $2 $+               1. | $iif(%zz = 2,/editbox /nick)
| halt }




raw 382:*:echo -a    4»     8¤    1«        2[    6Now Rehashing Server Config
File 2] | halt
raw 295:*:echo -a    4»     8¤    1«        2[    6IRC Server Admin    2]   Yes |
halt
raw 308:*:echo -a    4»     8¤    1«        2[    6IRC Server Admin   2]    Yes |
halt
raw 309:*:echo -a    4»     8¤    1«        2[    6Services Admin    2]   Yes | halt




raw 320:*:echo -a    4»     8¤    1«        2[      6Modes   2]   4 $5- | halt


raw 353:*:{
  $iif(%ok = $null,echo -s  4»   8¤   1«     2[              2Names Of    2]   4
$replace($3,$chr(35), # ) 2Channel 4. )
  set -u20 %ok now
  echo -s   4»   8¤   1«   $sorttok($replace($4-
,@, 7@ 01,+, 3+ 01,$me, 14 $+ $me $+   1),32,c)
  halt
}
on ^*:ERROR:*:haltdef | echo -s 4°    4»   8¤   1«    °   2[   4Error   2]   1
$2- | halt
on ^*:USERMODE:echo $color(mode) -s   4»   8¤    1«       2[ 2UserMode 2]        2
$me Sets mode: $1- | halt

				
DOCUMENT INFO
Shared By:
Categories:
Tags:
Stats:
views:0
posted:11/1/2012
language:Latin
pages:11