Public paste
raw
By: raw | Date: Mar 22 2011 02:15 | Format: None | Expires: never | Size: 5.17 KB | Hits: 580

  1. ; 末末末末末末末末末末末末末末末末末末末末
  2. ; NNScript by ESNation v4.22 - raws - coded by greeny & mute
  3. ; Don't edit anything in here unless you REALLY know what you're doing!
  4. ; 末末末末末末末末末末末末末末末末末末末末
  5. raw 0:*:{
  6.   if (!$2) {
  7.     if ($dialog(silence)) {
  8.       if (+*!*@* iswm $1) {
  9.         did -a silence 1 $mid($1,2)
  10.         did -e silence 1,2,3,4
  11.       }
  12.       elseif (-*!*@* iswm $1) {
  13.         while ($didwm(silence,1,$mid($1,2),1)) { did -d silence 1 $v1 }
  14.         did -e silence 1,2,3,4
  15.       }
  16.       haltdef
  17.     }
  18.   }
  19. }
  20. raw 001:*:{
  21.   set %rconnected. $+ $cid 1
  22.   .signal -n connect
  23. }
  24. raw 005:*:{
  25.   if ($gettok($wildtok($1-,TOPICLEN=?*,1,32),2,61)) { set %topiclen. $+ $cid $v1 }
  26.   if ($gettok($wildtok($1-,SILENCE=?*,1,32),2,61)) { set %silencenum. $+ $cid $v1 }
  27.   if ($gettok($wildtok($1-,MAXBANS=?*,1,32),2,61)) { set %maxbans. $+ $cid $v1 }
  28. }
  29. raw 004:*:{ set %usermodes. $+ $cid $4 }
  30. raw 271:*:{
  31.   if ($dialog(silence)) {
  32.     while ($didwm(silence,1,$3,1)) { did -d silence 1 $v1 }
  33.     did -a silence 1 $3
  34.     haltdef
  35.   }
  36. }
  37. raw 272:*:{
  38.   if ($dialog(silence)) {
  39.     did -e silence 1,2,3,4
  40.     haltdef
  41.   }
  42. }
  43. raw 315:*:{
  44.   if (!%who.show. [ $+ [ $cid ] ]) {
  45.     haltdef
  46.     if (%showialupd) && ($2 ischan) { thmecho -s Addresses from $thmhl($2) saved. Now $thmhl($ial(*,0)) entries. }
  47.     if (%ialupdate. [ $+ [ $cid ] ]) {
  48.       var %c = $wd($v1,1)
  49.       $+(.timerialq.,$cid,.,%c) 1 $rand(5,10) ialq.start %c
  50.     }
  51.   }
  52.   else { unset $+(%,who.show.,$cid) }
  53.   if ($dialog(clonescan)) && ($did(clonescan,7).seltext == $2) { cscan.do }
  54. }
  55. raw 324:*:{
  56.   if ($chan($2).key) && ($curconserv) { set $+(%,pass.chan.,$v1,.,$2) $encode($chan($2).key,m) }
  57.   if (!%modedsp. [ $+ [ $cid ] $+ ] . [ $+ [ $2 ] ]) { haltdef }
  58. }
  59. raw 329:*:{
  60.   if (!%modedsp. [ $+ [ $cid ] $+ ] . [ $+ [ $2 ] ]) { haltdef }
  61.   else { unset $+(%,modedsp.,$cid,.,$2) }
  62. }
  63. raw 330:*:{
  64.   if ($q.net) && ($2 == $me) {
  65.     set %q.authed. $+ $cid 1
  66.     if (!%q.auth.nick) {
  67.       set %q.auth.nick $3
  68.       if ($dialog(settings)) { did -ra $v1 17 %q.auth.nick }
  69.     }
  70.   }
  71. }
  72. raw 333:*:{ topic.shist $2 $4 $chan($2).topic }
  73. raw 352:*:{ if (!%who.show. [ $+ [ $cid ] ]) { haltdef } }
  74. raw 366:*:{
  75.   if ($nick($2,0)) && ((!$hget(peaks,$2)) || ($wd($hget(peaks,$2),1) < $nick($2,0))) { hadd -m peaks $2 $nick($2,0) $ctime }
  76.   if (%cs.autoident) && (ChanServ ison $2) { cs.chanauth $chan }
  77.   if (%ialupdate) {
  78.     if ($nick($2,0) < %maxwhousers) {
  79.       if (!%ialupdate. [ $+ [ $cid ] ]) { $+(.timerialq.,$cid,.,$2) 1 $rand(5,10) ialq.start $2 }
  80.       ialq.update add $2
  81.     }
  82.     elseif ($nick($2,0) != $null) && (%showialupd) { thmerror -s Addresses from $thmhl($2) not saved. (too many users) }
  83.   }
  84.   if ($nick($2,0) == 1) { .timer 1 3 if ($ccontrol($2)) $chr(123) mode $2 $iif($q.net,+CnNt,+nt) $chr(125) }
  85. }
  86. raw 371:*:{
  87.   haltdef
  88.   var %w = $specialcidwin(Info)
  89.   if ($window(%w)) { echo -mti6 %w    $2- }
  90.   else {
  91.     window -nk0g1v %w
  92.     thmecho %w Server info on $thmhl($server)
  93.     echo %w 
  94.     echo -mti6 %w    $2-
  95.   }
  96. }
  97. raw 372:*:{
  98.   haltdef
  99.   if ($window($specialcidwin(MOTD))) { echo -mti6 $v1    $2- }
  100. }
  101. raw 374:*:{
  102.   haltdef
  103.   var %w = $specialcidwin(Info)
  104.   if ($window(%w)) {
  105.     echo %w 
  106.     thmecho %w End of $thmhl($server) info
  107.   }
  108. }
  109. raw 375:*:{
  110.   haltdef
  111.   var %w = $specialcidwin(MOTD)
  112.   if ($gettok($readini($mircini,options,n1),11,44)) && (!%motd.manual. [ $+ [ $cid ] ]) { return }
  113.   if ($window($specialcidwin(MOTD))) { window -c %w }
  114.   window -nk0g1v %w
  115.   thmecho %w Message of the day on $thmhl($server)
  116.   echo %w 
  117. }
  118. raw 376:*:{
  119.   haltdef
  120.   var %w = $specialcidwin(MOTD)
  121.   if ($window(%w)) {
  122.     echo %w 
  123.     thmecho %w End of $thmhl($server) message of the day
  124.     unset %motd.manual. $+ $cid
  125.   }
  126. }
  127. raw 405:*:{ if ($timer(joinretry. $+ $cid)) && (%joinretry. [ $+ [ $cid ] ] == $2) { return } }
  128. raw 433:*:{
  129.   var %n = $2
  130.   if (%ghosttry. [ $+ [ $cid ] ]) {
  131.     thmecho $asecho Ghosting unsuccessful, sorry! Try ghosting manually!
  132.     unset %ghosttry. $+ $cid
  133.     haltdef
  134.   }
  135.   if (%rconnected. [ $+ [ $cid ] ]) {
  136.     if (%nsset. [ $+ [ $network ] ]) {
  137.       tokenize 32 $v1
  138.       if ($4) && (%n == $5) {
  139.         set -u60 %ghosttry. $+ $cid 1
  140.         $iif(!$1,.msg) nickserv ghost %n $decode($4,m)
  141.         thmecho $asecho Auto-ghosting $thmhl(%n) $+ ...
  142.         .timernsghost. $+ $cid 1 2 nick %n
  143.         haltdef
  144.       }
  145.     }
  146.     elseif ($gsurge) && (%gs.autoghost) {
  147.       set -u60 %ghosttry. $+ $cid 1
  148.       .msg authserv ghost %n
  149.       thmecho $asecho Auto-ghosting $thmhl(%n) $+ ...
  150.       .timergsghost. $+ $cid 1 2 nick %n
  151.       haltdef
  152.     }
  153.   }
  154.   if (!$timer(nickchg. $+ $cid)) {
  155.     set %nickretry. $+ $cid %n
  156.     .timer 1 0 thmecho $asecho Press Control+F1 to retry taking the nick $thmhl(%n) $+ !
  157.   }
  158.   else { haltdef }
  159. }
  160. raw 471:*:{ j.retry $2 }
  161. raw 473:*:{ j.retry $2 }
  162. raw 474:*:{ j.retry $2 }
  163. raw 475:*:{
  164.   haltdef
  165.   set %chankey.prompt.chan $2
  166.   .timerjoinretry. $+ $cid off
  167.   .timerchankey -io 1 0 chankey.prompt
  168. }
  169. raw 511:*:{
  170.   thmerror -a Your silence list is full! $thmhl($2)
  171.   haltdef
  172. }
  173. ; 末末末末末末末末末末末末末末末末末末末末
  174. ; End of file
  175. ; 末末末末末末末末末末末末末末末末末末末末