Advertisement
Aha2Y

Untitled

Oct 24th, 2011
523
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
mIRC 2.33 KB | None | 0 0
  1. ;-AnonOps Status bot.
  2.  
  3. =[ Commands ]=
  4. Commands
  5. !check <website/url> - checks if the host is online/offline
  6. !loic - Returns the latest loic link.
  7. !hive - Returns the hive server + port.
  8. !set hive - Changes hive info.
  9. !target - Returns the current target.
  10. !set target - changes target info.
  11. !shout - Shouts the text you set with !set shout.
  12. !set shout - Changes shout text.
  13. !linux - Returns T50 link.
  14. !commands - Returns all commands you see above.
  15. !peak - Returns how much loic's are in the hive.
  16.  
  17. ;-The script starts here!
  18.  
  19. on $*:text:/^[.!@]check*/Si:#: {
  20.   if ($sock(check)) { sockclose check }
  21.   sockopen check www.downforeveryoneorjustme.com 80
  22.   sockmark check $$2 # $nick
  23. }
  24. on *:sockopen:check: {
  25.   sockwrite -n $sockname GET $+(/,$gettok($sock(check).mark,1,32)) HTTP/1.1
  26.   sockwrite -n $sockname Host: www.downforeveryoneorjustme.com
  27.   sockwrite -n $sockname Connection: close
  28.   sockwrite -n $sockname $crlf
  29. }
  30. on *:sockread:check: {
  31.   var %x | sockread %x
  32.   if ($regex(%x,(.+)<a href="(.+)"\sclass="domain">.+<\/a>(.+))) {
  33.     tokenize 32 $sock(check).mark
  34.     msg $2 $+($3,:) $regsubex($+($regml(1),,$regml(2),,$regml(3)),/(<[^>]*>)/g,)
  35.   }
  36. }
  37. on *:text:!loic:#:{
  38.   msg $chan https://github.com/NewEraCracker/LOIC/downloads
  39. }
  40.  
  41.  
  42. on *:text:!commands:#:{
  43.   notice $nick !check, !loic, !linux, !hive, !peak, !target
  44. }
  45.  
  46. on *:text:!sethive *:#:{
  47.   if ($nick isop #) {
  48.     set %hiveserver $2-
  49.     msg $chan Hive server changed, New server $2-
  50.   }
  51. }
  52.  
  53. on *:text:!hive:#:{
  54.   msg $chan HIVE: %hiveserver
  55. }
  56.  
  57. on *:join:#OpV:{
  58.   notice $nick Welcome to Operation Vendetta,  !commands for more info.
  59. }
  60. on *:text:!linux:#:{
  61.   msg $chan Get T50 at http://is.gd/u36O65
  62. }
  63.  
  64. on *:text:!set target *:#:{
  65.   if ($nick isop #) {
  66.     msg $chan Target updated see: !target
  67.     set %atarget $3-
  68.   }
  69. }
  70.  
  71. on *:text:!target:#:{
  72.   notice $nick Current Target: %atarget
  73. }
  74.  
  75. on *:text:!set shout *:#:{
  76.   if ($nick isop #) {
  77.     set %ashout $3-
  78.     msg $chan Shout changed!
  79.   }
  80. }
  81. on *:Text:!shout:#:{
  82.   if ($nick isop #) {
  83.     msg $chan %ashout
  84.   }
  85. }
  86.  
  87. on *:text:!peak:#:{ scon $getscon(irc.infatech.net) | var %a $nick(#OpV,0) | scon $getscon(belldandy.anonops.in) | msg #Opv There are %a lazors in the hive! }
  88. alias getscon var %a 1 | while ($scon(%a) != $null) { if ($scon(%a).server == $1) return %a | inc %a }
  89.  
  90.  
  91.  
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement