#include "Winhttp.au3"
#include "ZLIB.au3"

$account = 'zqHPIVE'
$name = __WinHttpURLEncode($account)
$pass = $account
$key = __WinHttpURLEncode("558686")
$sReferrer = 'https://trafficmonsoon.com/activation.php?code='&$name&'&key='&$key
$postdata = 'username='&$name&'&password='&$pass&'&key='&$key&'&ocd=update&username='&$name
Local $Host = "trafficmonsoon.com"
Local $target = "/activation.php"
Local $hOpen = _WinHttpOpen('User-Agent: Mozilla/5.0 (Windows NT 6.1; rv:34.0) Gecko/20100101 Firefox/34.0')
Local $hConnect = _WinHttpConnect($hOpen, $Host)
Local $hRequest = _WinHttpOpenRequest($hConnect, "POST", $target, 'HTTP/1.1', $sReferrer , Default, $WINHTTP_FLAG_SECURE)

_WinHttpAddRequestHeaders($hRequest, 'Host: trafficmonsoon.com')
_WinHttpAddRequestHeaders($hRequest, 'User-Agent: Mozilla/5.0 (Windows NT 6.1; rv:34.0) Gecko/20100101 Firefox/34.0')
_WinHttpAddRequestHeaders($hRequest, 'Accept: text/html,application/xhtml+xml,application/xml;q=0.9,*/*;q=0.8')
_WinHttpAddRequestHeaders($hRequest, 'Accept-Language: vi-VN,vi;q=0.8,en-US;q=0.5,en;q=0.3')
_WinHttpAddRequestHeaders($hRequest, 'Accept-Encoding: gzip, deflate, br')
_WinHttpAddRequestHeaders($hRequest, 'Referer: https://trafficmonsoon.com/activation.php?code='&$name&'&key='&$key)
_WinHttpAddRequestHeaders($hRequest, 'Connection: close')
_WinHttpAddRequestHeaders($hRequest, 'Content-Length: '&StringLen($Postdata))
_WinHttpSendRequest($hRequest, 'Content-Type: application/x-www-form-urlencoded', $postdata )
_WinHttpReceiveResponse($hRequest)



 Local $hRequest = _WinHttpOpenRequest($hConnect, 'GET' ,'/member/view_ad.php' , 'HTTP/1.1')
_WinHttpAddRequestHeaders($hRequest, 'User-Agent: Mozilla/5.0 (Windows NT 6.1; WOW64; rv:46.0) Gecko/20100101 Firefox/46.0')
_WinHttpAddRequestHeaders($hRequest, 'Accept: text/html,application/xhtml+xml,application/xml;q=0.9,*/*;q=0.8')
_WinHttpAddRequestHeaders($hRequest, 'Accept-Language: vi-VN,vi;q=0.8,en-US;q=0.5,en;q=0.3')
_WinHttpAddRequestHeaders($hRequest, 'Accept-Encoding: gzip, deflate, br')
_WinHttpAddRequestHeaders($hRequest, 'Referer: https://trafficmonsoon.com/activation.php?code='&$name&'&key='&$key)
_WinHttpAddRequestHeaders($hRequest, 'Connection: keep-alive')

Sleep(12000)

Local $hRequest = _WinHttpOpenRequest($hConnect, 'GET' ,'/member/overview.php' , 'HTTP/1.1')
_WinHttpAddRequestHeaders($hRequest, 'User-Agent: Mozilla/5.0 (Windows NT 6.1; WOW64; rv:46.0) Gecko/20100101 Firefox/46.0')
_WinHttpAddRequestHeaders($hRequest, 'Accept: text/html,application/xhtml+xml,application/xml;q=0.9,*/*;q=0.8')
_WinHttpAddRequestHeaders($hRequest, 'Accept-Language: vi-VN,vi;q=0.8,en-US;q=0.5,en;q=0.3')
_WinHttpAddRequestHeaders($hRequest, 'Accept-Encoding: gzip, deflate, br')
_WinHttpAddRequestHeaders($hRequest, 'Referer: http://trafficmonsoon.com/member/view_ad.php')
_WinHttpAddRequestHeaders($hRequest, 'Connection: keep-alive')





If (_WinHttpReceiveResponse($hRequest)==1) Then
        Local $Header = _WinHttpQueryHeaders($hRequest)
		Local $Data = _WinHttpSimpleReadData($hRequest , 2)
         $Data = BinaryToString(_ZLIB_GZUncompress($Data) , 4)
        ConsoleWrite($Header)
        _WriteHtml($Data)
EndIf

_WinhttpCloseHandle($hRequest)
_WinhttpCloseHandle($hRequest)
_WinhttpCloseHandle($hRequest)
_WinHttpCloseHandle($hOpen)

Func _WriteHtml($Data)
        Local $hFOpen = FileOpen(@ScriptDir &"\tms.html", 2+8+256)
        FileWrite($hFOpen, $Data)
        FileClose($hFOpen)
        ShellExecute(@ScriptDir &"\tms.html")
EndFunc