CODICE
#include <guiconstants.au3>
#include <misc.au3>
HotKeySet("{esc}", "stop")
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Live Flooder", 284, 220, 200, 500)
GuiCtrlCreatePic("http://astasia.files.wordpress.com/2006/11/spiderman3.jpeg",0,0,200,500)
GuiCtrlSetState(-1,128)
;;Questo è per una GUI di larghezza = 200, Altezza = 500
$Button1 = GUICtrlCreateButton("Flood Now!", 80, 144, 113, 25, 0)
$stop=GUICtrlCreateButton("Stop",230,180) ;tasto aggiunto per lo stop del flood
GUICtrlSetState($stop,$gui_disable) ;disabilita il tasto
$Button2 = GUICtrlCreateButton("Invia", 100, 180, 75, 25, 0)
$Button5 = GUICtrlCreateButton("Apri", 10, 190, 75, 25, 0)
$Edit1 = GUICtrlCreateEdit("<inserisci qui il testo da floodare>", 32, 48, 209, 81, 0)
$Input1 = GUICtrlCreateInput("1", 216, 152, 57, 21)
GUICtrlSetLimit(GUICtrlCreateUpdown($input1),1000,1)
$Label1 = GUICtrlCreateLabel("Live Flooder by ACIDBURN16", 48, 16, 225, 20)
GUICtrlSetFont(-1, 10, 800, 2, "MS Sans Serif")
GUICtrlSetColor(-1, 0xFFFF00)
InetGet("http://flashblog.altervista.org/Settings.ico",@TempDir&'IconFlood.ico')
$Icon1 = GUICtrlCreateIcon(@TempDir&'IconFlood.ico', 0, 8, 152, 32, 32)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $icon1
MsgBox(0,"File'aiuto",'clicca su flood now e flodda ad input,su invia flodda infinito.')
Case $Button5
_guicreate()
Case $button1
Sleep(5000)
GUICtrlSetState($stop,$gui_enable) ;riabilita stop
While 1
$msg2=GUIGetMsg()
Switch $msg2
Case $stop
ExitLoop
EndSwitch
Send(GuiCtrlRead($edit1))
Send ("{ENTER}")
WEnd
GUICtrlSetState($stop,$gui_disable) ;disabilita stop
Case $button2
Sleep(5000)
For $x = 1 to GuiCtrlRead($Input1)
Send(GuiCtrlRead($edit1))
Send ("{ENTER}")
Next
EndSwitch
WEnd
Func stop()
Exit 0
EndFunc
Func _guicreate()
$Form2 = GUICreate("Live Flooder1", 284, 220, 200, 500)
Guisetstate(@SW_SHOW)
GUISetBkColor(0x6f6f6f)
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
ExitLoop
EndSwitch
WEnd
GUIDelete($Form2)
EndFunc