home *** CD-ROM | disk | FTP | other *** search
/ HaCKeRz KrOnIcKLeZ 3 / HaCKeRz_KrOnIcKLeZ.iso / scriptz / i98patch.exe / RAW.INI < prev    next >
INI File  |  1997-01-23  |  5KB  |  99 lines
  1. [Raw]
  2. n0=#clones disabled
  3. n1=352:* {
  4. n2=  if ($parm4 !isin %address) { %address = %address $parm4 }
  5. n3=  if ([ %addr [ $+ [ $parm4 ] ] ] != $null) {
  6. n4=    if ([ %clone [ $+ [ $parm4 ] ] ] == $null) {
  7. n5=      set % [ $+ [ clone [ $+ [ $parm4 ] ] ] ] [ %addr [ $+ [ $parm4 ] ] ] , $parm6
  8. n6=    }
  9. n7=    else {
  10. n8=      set % [ $+ [ clone [ $+ [ $parm4 ] ] ] ] [ %clone [ $+ [ $parm4 ] ] ] , $parm6
  11. n9=    }
  12. n10=  }
  13. n11=  else {
  14. n12=    set % [ $+ [ addr [ $+ [ $parm4 ] ] ] ] $parm6
  15. n13=  }
  16. n14=  halt
  17. n15=}
  18. n16=315:* {
  19. n17=  .disable #clones
  20. n18=  set %a 1
  21. n19=  :next
  22. n20=  set %token $token(%a,32,%address)
  23. n21=  if (%token == $null) { goto done } | else {
  24. n22=    if ([ %clone [ $+ [ %token ] ] ] != $null) {
  25. n23=      inc %total | inc %a
  26. n24=      if (%option == 1) { write $mircdir $+ raw.txt /echo 5 %chan 10[2 $+ [ %clone [ $+ [ %token ] ] ] * %token $+ 10] }
  27. n25=      if (%option == 2) { write $mircdir $+ raw.txt /msg %chan 10[2 $+ [ %clone [ $+ [ %token ] ] ] * %token $+ 10] }
  28. n26=      unset [ %clone [ $+ [ %token ] ] ]
  29. n27=      unset [ %addr [ $+ [ %token ] ] ]
  30. n28=      goto next
  31. n29=    }
  32. n30=    else { unset [ %addr [ $+ [ %token ] ] ] | inc %a | goto next }
  33. n31=  }
  34. n32=  :done
  35. n33=  if (%option == 1) { write $mircdir $+ raw.txt /echo 4 %chan 10[2END of list:10] [12Total:10]12 %total  }
  36. n34=  if (%option == 2) { write $mircdir $+ raw.txt /msg %chan  10[2END of list:10] [12Total:10]12 %total  }
  37. n35=  play -c $me $mircdir $+ raw.txt 300
  38. n36=  unset %token | unset %total | unset %a | unset %addr* | unset %clone* | unset %chan | unset %option | halt
  39. n37=}
  40. n38=#clones end
  41. n39=#pervscan disabled
  42. n40=319:*:if sex isin $parm3* || porn isin $parm3* { if $parm2 ison $chan(1) { onotice $chan(1) OpNotice for $chan(1) --> 4Perv Detected --> $parm2 is on $parm3* %ind | ban -u300 $chan(1) $parm2 2 | kick $chan(1) $parm2 You're on a 114SEX CHANNEL11 Pervs aren't welcome here *AutoKick&5MinuteBan* %ind } | ban -u300 $chan(2) $parm2 2 | kick $chan(2) $parm2 You're on a 114perverted channel11 Pervs aren't welcome here *AutoKick&5MinuteBan* %ind | s12 } 
  43. n41=#pervscan end
  44. n42=#pervcheck start
  45. n43=319:*:if (sex isin $parm3* || porn isin $parm3*) && $level($parm2) > 99 { echo 4 Perv Detected --> $parm2 is on $parm3* | set %Count 0 | :cont | inc %Count 1 | if $parm2 ison $chan(%count) && $opnick(0,$chan(%count)) != 1 { .onotice $chan(%count) OpNotice for $chan(%count) --> 4Perv Detected --> $parm2 is on $parm3* %ind } | ban -u300 $chan(%count) $parm2 2 | kick $chan(%count) $parm2 You're on a 114SEX CHANNEL11 Pervs aren't welcome here *AutoKick&5MinuteBan* %ind | if (%Count == $chan(0)) { goto end } | goto cont | :end | unset %Count | s12 } | pervc 
  46. n44=310:*:pervc
  47. n45=311:*:pervc
  48. n46=312:*:pervc
  49. n47=313:*:pervc
  50. n48=317:*:pervc
  51. n49=318:*:if %perv1 isin $parms { unset %perv1 | halt } | else if %perv2 isin $parms { unset %perv2 | halt } | else if %perv3 isin $parms { unset %perv3 | halt } | else if %perv4 isin $parms { unset %perv4 | halt } | else if %perv5 isin $parms { unset %perv5 | halt } | else if %perv6 isin $parms { unset %perv6 | halt } | else if %perv7 isin $parms { unset %perv7 | halt } | else if %perv8 isin $parms { unset %perv8 | halt }
  52. n50=#pervcheck end
  53. n51=421:*:splay comp3.wav
  54. n52=482:*:splay comp3.wav
  55. n53=473:*:msg chanserv invite $parm2 $me | .enable #beeninvited
  56. n54=474:*:msg ChanServ unban $parm2 me
  57. n55=478:*:onotice $parm2 Important Op Notice for 12 $+ $parm2 $+  --> =ATTENTION= The channel ban list is FULL %ind
  58. n56=352:* { 
  59. n57=  if (%chanst == on) {
  60. n58=    if (* isin $parm7) { 
  61. n59=      inc %ircops 
  62. n60=    } 
  63. n61=    if (G isin $parm7) { 
  64. n62=      inc %anum 
  65. n63=    } 
  66. n64=    if (@ isin $parm7) { 
  67. n65=      inc %opnum 
  68. n66=    } 
  69. n67=    if (@ !isin $parm7) { 
  70. n68=      inc %nopnum 
  71. n69=    } 
  72. n70=    inc %unum
  73. n71=    inc %hops $parm8 
  74. n72=    if ($parm4 isin %addies) {
  75. n73=      inc %clones
  76. n74=    }
  77. n75=    /set %addies %addies $parm4
  78. n76=  }
  79. n77=}
  80. n78=315:* { if (%chanst == on) {
  81. n79=    if (%cstat == $null) %cstat = msg $parm2
  82. n80=    %cstat Indigo '98 Channel Statistics for: = $+ $parm2 $+ =
  83. n81=    %cstat Total Users: %unum / IRC Ops: %ircops
  84. n82=    %cstat Non Ops: %nopnum / Chan Ops: %opnum
  85. n83=    %avghops = %hops / %unum
  86. n84=    %here = %unum - %anum
  87. n85=    %cstat Away: %anum / Here: %here
  88. n86=    %cstat Avg Hops: %avghops / Clones: %clones
  89. n87=    /set %chanst off
  90. n88=    unset %cstat  
  91. n89=  }
  92. n90=  if (%sban != $null) set %sban
  93. n91=  if (%fk != $null) set %fk
  94. n92=  if (%ck == on) set %ck off
  95. n93=  if (%ckb == on) set %ckb off
  96. n94=  if (%lo == on) msg $parm2 Total IRCops Listed:  $+ %ol $+  | /set %lo off
  97. n95=}
  98. n96=465:*:echo 4 Indigo '98 K-Line Detected. trying new server. | server irc.dal.net
  99.