Your program in the official HC Programs?

NeoXen · 12-19-2012, 04:00 PM

Description:

A little spambot for Skype, Facebook etc.

Supported OS:

Windows (.exe)

Coded in:

Autoit 3 (Yeah i know that's nooby but i'm just 16 Sad

)

How to use:

Type in your text and how often you want to write it.
Then click start and click into the window where you want it to be written.
Wait some seconds and it'll start writing.
The programm automatically presses enter.
Enjoy!

Viruscheck:

SHA256: 5313686c0ff82b96a4ae56402c84837879f110dabe346eddbe72c0889f73203c
SHA1: 3d19af1aebaaa479bfcb64f0cae85fca11044127
MD5: 69ea4aa13ef574290a19951cedea073b
File size: 507.1 KB ( 519309 bytes )
File name: Spambot.exe
File type: Win32 EXE
Tags: peexe upx
Detection ratio: 2 / 45
Analysis date: 2012-12-19 14:33:38 UTC ( 22 Minuten ago )

I think it's just a false positive. I swear i didn't insert any virus or troyan!
(Check MD5! Original is 69ea4aa13ef574290a19951cedea073b)

To see the full virustotal check, klick ->here<-.

Screenshot:

[Image: 6n529mm4.png]

Code:

Code:
#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_Icon=Alien-Swarm-12.ico
#AutoIt3Wrapper_Res_Description=A short programm for spamming in facebook, skype and others.
#AutoIt3Wrapper_Res_Fileversion=3.4
#AutoIt3Wrapper_Res_LegalCopyright=NeoXen
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1_1 = GUICreate("Spambot", 182, 176, 607, 209)
$start = GUICtrlCreateButton("Start", 0, 0, 91, 49)
$stop = GUICtrlCreateButton("Exit", 88, 0, 91, 49)
$text = GUICtrlCreateInput("Text", 0, 48, 177, 21)
$anzahl = GUICtrlCreateInput("Count", 0, 72, 177, 21, BitOR($GUI_SS_DEFAULT_INPUT,$ES_NUMBER))
$Label1 = GUICtrlCreateLabel("Press Esc to stop writing", 0, 96, 178, 24)
GUICtrlSetFont(-1, 13, 400, 0, "MS Sans Serif")
$Label2 = GUICtrlCreateLabel("0/0", 0, 120, 178, 29, $SS_CENTER)
GUICtrlSetFont(-1, 15, 400, 0, "Impact")
$Label3 = GUICtrlCreateLabel("© NeoXen", 53, 152, 80, 17)
GUICtrlSetFont(-1, 10, 400, 0, "BankGothic Md BT")
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

HotKeySet("{esc}","_Exit")
Func _Exit()
    Exit
EndFunc
While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        Case $start
            Sleep(5000)
            $echtertext = GUICtrlRead($text)
            $echteanzahl = GUICtrlRead($anzahl)
            $i = 0

            While 2
            opt("SendKeyDelay", 0)
            $echteanzahl = GUICtrlRead($anzahl)
            Send($echtertext)
            Send("{enter}")
            $i = $i + 1
            if $i = $echteanzahl then MsgBox(0,"Finished","You just wrote -"&$echtertext&"- "&$echteanzahl&" times.")
            if $i = $echteanzahl then Exit
			GUICtrlSetData($Label2,$i + 1 & "/" & $echteanzahl)
            WEnd
        Case $stop
            Exit
    EndSwitch
WEnd

(sry but i'm german, so much variables are german... ^^)

Would be nice if you could add it Smile

I could make it look more like HC if you wish, too.

NeoXen AKA Neo

------------------------>Download: Spambot.exe<------------------------

PS: Sry for my bad english Sad

I'm from germany Smile