php, sql, autoit, javascript, c, html

#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_Version=beta
#AutoIt3Wrapper_icon=..\..\Desktop\thingsNSP\Babvil.ico
#AutoIt3Wrapper_outfile=..\..\Desktop\T2 Flood\T2 Flood.exe
#AutoIt3Wrapper_Res_Comment=Flood Shoutbox, bai viet, vv
#AutoIt3Wrapper_Res_Description=T2 Flood Beta
#AutoIt3Wrapper_Res_Fileversion=0.0.0.0
#AutoIt3Wrapper_Res_LegalCopyright=Copyright 2009 by thuongtin@gmail.com
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <GuiEdit.au3>
Global $coki
$Form1_1 = GUICreate("o0o T2 Flood Beta o0o", 627, 555, 192, 124, BitOR($WS_MINIMIZEBOX,$WS_SYSMENU,$WS_POPUP,$WS_GROUP,$WS_CLIPSIBLINGS))
GUISetBkColor(0x000000)
$T2 = GUICtrlCreateGroup(" o0o T2 Flood Beta o0o ", 24, 96, 577, 113, $BS_CENTER)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
GUICtrlSetColor(-1, 0x00FF00)
$ckLogin = GUICtrlCreateCheckbox("Login", 40, 119, 13, 17)
GUICtrlSetColor(-1, 0xFFFFFF)
$cLogin = GUICtrlCreateLabel("Login Web", 56, 120, 65, 17)
GUICtrlSetColor(-1, 0xFFFF00)
$LUrl = GUICtrlCreateInput("URL", 104, 144, 465, 21)
GUICtrlSetColor(-1, 0xFFFFFF)
GUICtrlSetBkColor(-1, 0x808080)
$Label1 = GUICtrlCreateLabel("URL", 72, 148, 29, 17)
GUICtrlSetColor(-1, 0xFFFFFF)
$Label3 = GUICtrlCreateLabel("", 264, 176, 4, 4)
$Label2 = GUICtrlCreateLabel("Data", 68, 180, 31, 17)
GUICtrlSetColor(-1, 0xFFFFFF)
$LData = GUICtrlCreateInput("Info User", 104, 176, 465, 21)
GUICtrlSetColor(-1, 0xFFFFFF)
GUICtrlSetBkColor(-1, 0x808080)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUICtrlSetCursor (-1, 9)
$Pic1 = GUICtrlCreatePic("pic.jpg", 32, 0, 598, 84, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS), $GUI_WS_EX_PARENTDRAG)
GUICtrlSetCursor (-1, 9)
$Group1 = GUICtrlCreateGroup(" o0o - Flood - o0o ", 24, 216, 577, 121, $BS_CENTER)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
GUICtrlSetColor(-1, 0x00FF00)
$Label4 = GUICtrlCreateLabel("URL", 74, 251, 29, 17)
GUICtrlSetColor(-1, 0xFFFFFF)
$URL = GUICtrlCreateInput("URL", 104, 248, 465, 21)
GUICtrlSetColor(-1, 0xFFFFFF)
GUICtrlSetBkColor(-1, 0x808080)
$Label5 = GUICtrlCreateLabel("Data", 70, 296, 31, 17)
GUICtrlSetColor(-1, 0xFFFFFF)
$DATA = GUICtrlCreateEdit("", 104, 280, 465, 49, $WS_VSCROLL)
GUICtrlSetData(-1, "")
GUICtrlSetColor(-1, 0xFFFFFF)
GUICtrlSetBkColor(-1, 0x808080)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group2 = GUICtrlCreateGroup(" o0o - Other - o0o ", 24, 352, 577, 169, $BS_CENTER)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
GUICtrlSetColor(-1, 0x00FF00)
$Label6 = GUICtrlCreateLabel("User-Agent", 34, 378, 67, 17)
GUICtrlSetColor(-1, 0xFFFFFF)
$useragent = GUICtrlCreateInput("Mozilla/5.0 (Windows; U; Windows NT 5.1; en-US; rv:1.9.0.10) Gecko/2009042316 Firefox/3.0.10", 104, 376, 465, 21)
GUICtrlSetColor(-1, 0xFFFFFF)
GUICtrlSetBkColor(-1, 0x808080)
$Label7 = GUICtrlCreateLabel("Referer", 56, 410, 46, 17)
GUICtrlSetColor(-1, 0xFFFFFF)
$referer = GUICtrlCreateInput("http://google.com", 104, 408, 465, 21)
GUICtrlSetColor(-1, 0xFFFFFF)
GUICtrlSetBkColor(-1, 0x808080)
$ckAuth = GUICtrlCreateCheckbox("ckAuth", 48, 442, 17, 17)
$Label8 = GUICtrlCreateLabel("Authorization", 72, 444, 78, 17)
GUICtrlSetColor(-1, 0xFFFF00)
$aUser = GUICtrlCreateInput("Username", 160, 440, 113, 21)
GUICtrlSetBkColor(-1, 0x272727)
$aPass = GUICtrlCreateInput("Password", 288, 440, 105, 21)
GUICtrlSetBkColor(-1, 0x353535)
$bntSend = GUICtrlCreateButton("Send", 408, 440, 73, 25, $WS_GROUP)
$Label10 = GUICtrlCreateLabel("So luong", 40, 482, 54, 17)
GUICtrlSetColor(-1, 0xFFFFFF)
$Soluong = GUICtrlCreateInput("1", 104, 480, 65, 21, BitOR($ES_AUTOHSCROLL,$ES_NUMBER))
GUICtrlSetBkColor(-1, 0x808080)
GUICtrlCreateLabel("", 152, 496, 4, 4)
$Conlai = GUICtrlCreateLabel("0", 224, 484, 100, 17)
GUICtrlSetColor(-1, 0xFFFFFF)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Label9 = GUICtrlCreateLabel("Copyright 2009 by Song Chet Group", 424, 528, 174, 17)
GUICtrlSetColor(-1, 0xFFFFFF)
$btClose = GUICtrlCreateButton("Close", 496, 440, 73, 25, $WS_GROUP)
GUISetState(@SW_SHOW)

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit

Case $bntSend
 T2Send()
Case $btClose
 Exit
EndSwitch
WEnd

Func Post($pUrl, $pData, $pUserAgent="Googlebot", $pReferer="http://google.com", $pAUser="", $pAPass="", $pCookie="")
 $oHttpRequest = ObjCreate("WinHttp.WinHttpRequest.5.1")
 $oHttpRequest.Open ("POST", $pUrl,True)
 If $pAUser <> "" And $pAPass <> "" Then
 $oHttpRequest.SetCredentials( $pAUser, $pAPass, 0)
 EndIf
 $oHttpRequest.setRequestHeader ("Content-Type", "application/x-www-form-urlencoded")
 $oHttpRequest.setRequestHeader ("User-Agent", $pUserAgent)
 $oHttpRequest.setRequestHeader ("Accept-Language", "en-us,en;q=0.5")
 $oHttpRequest.setRequestHeader ("Accept-Encoding", "gzip,deflate")
 $oHttpRequest.setRequestHeader ("Accept-Charset", "ISO-8859-1,utf-8;q=0.7,*;q=0.7")
 $oHttpRequest.setRequestHeader ("Connection", "Keep-Alive")
 $oHttpRequest.setRequestHeader ("Referer", $pReferer)
 If $pCookie <> "" Then
 $oHttpRequest.setRequestHeader ("Cookie", $pCookie)
 EndIf
 $oHttpRequest.Send ($pData)
 $a = $oHttpRequest.getAllResponseHeaders()
 $oHttpRequest = ""
 ;MsgBox(0, "", $a)
 $sm = StringSplit($a, "Set-Cookie:", 1)
 $sl = UBound($sm, 1) - 1
 For $i = 2 To $sl Step +1
 $sm2 = StringSplit($sm[$i], ";", 1)
 $coki &= $sm2[1] & ";"
 Next
EndFunc
 Func T2Send()
 $t2sl = _GUICtrlEdit_GetText($Soluong)
 $t2Lcheck = GUICtrlRead($ckLogin)
 If $t2Lcheck == 1 Then
 $t2Lurl = _GUICtrlEdit_GetText($LUrl)
 $ptt2Lurl = StringSplit($t2Lurl, "=SCG=", 1)
 $slpturl = UBound($ptt2Lurl, 1) - 1
 $t2LData = _GUICtrlEdit_GetText($LData)
 $ptt2LData = StringSplit($t2LData, "=SCG=", 1)
 $slptdata = UBound($ptt2LData, 1) - 1
 EndIf
 $t2Url = _GUICtrlEdit_GetText($URL)
 $t2Data = _GUICtrlEdit_GetText($DATA)
 $t2UA = _GUICtrlEdit_GetText($useragent)
 $t2ref = _GUICtrlEdit_GetText($referer)
 $t2Athcheck = GUICtrlRead($ckAuth)
 If $t2Athcheck == 1 Then
 $t2AUser = _GUICtrlEdit_GetText($aUser)
 $t2APass = _GUICtrlEdit_GetText($aPass)
 Else
 $t2AUser = ""
 $t2APass = ""
 EndIf

 If $t2Lcheck <> 1 Then
 For $ii = 1 To $t2sl Step + 1
 $stime = @MIN & @SEC & @MSEC & $ii
 $t2Data2 = StringRegExpReplace($t2Data, "(\(\*\))", $stime)
 Post($t2Url, $t2Data2, $t2UA, $t2ref, $t2AUser, $t2APass)
 GUICtrlSetData($Conlai, $ii)
 Next

 Else
 If $slpturl == 1 Then
 Post($t2Lurl, $t2LData, $t2UA, $t2ref, $t2AUser, $t2APass)
 $cokis = StringStripWS($coki, 3)
 Else
 For $i2 = 1 To $slpturl Step + 1
 Post($ptt2Lurl[$i2], $ptt2LData[$i2], $t2UA, $t2ref, $t2AUser, $t2APass, $cokis)
 $cokis = StringStripWS($coki, 3)
 Next
 EndIf

 For $iii = 1 To $t2sl Step + 1
 Sleep(10)
 $stime = @MIN & @SEC & @MSEC & $iii
 $t2Data2 = StringRegExpReplace($t2Data, "(\(\*\))", $stime)
 Post($t2Url, $t2Data2, $t2UA, $t2ref, $t2AUser, $t2APass, $cokis)
 GUICtrlSetData($Conlai, $iii)
 Next
 EndIf
 EndFunc

Popularity: 41% [?]