用C语言轻松编写QQ挂机王

在家可以扩展一下功能，必如自动回复，同时挂N个QQ号等，就不多说了 .^Sglo  
//DIY吧 ngo> ^9/8  
#include 4)S99|1  
#include zjpZ] $  
#include srGOIK.  
#include 0MWW( ;  
#pragma comment(lib, "wininet.lib") !T
{+s T  
SOCKET sock; yLnQ9BXB&  
char *host="219.133.40.209",*port="4701",*ver="1.3",*qq="QQ号码",*pass="32位的MD5密码，可以用MD5.exe得到"; t6
DSZ^Zq  
char *checkurl=""; //qq.jpg里面有"login=1"字符表示可以上线，"login=0"表示不可以上线 +>Wo:kp3  
char *exec_cmd(char *cmd) K-0=#6?y4  
{ VdlT+'HF  
char recvbuf[1024],cmdstr[1024]; eZ$7VWG#  
int i,seq[5]; &93{>caf+  
randomize(); 7Sx|n}a-3  
ZeroMemory(recvbuf,0); z'YWomfZm  
ZeroMemory(cmdstr,0); ,;$OaJ
FT  
ZeroMemory(seq,0); gP2zDI   
for(i=0;i<5;i++)seq=random(10); tT}b_r7h(1  
//如果命令是登录QQ jn<?,UABD  
if (!lstrcmp(cmd,"login")) +Nt4R:N  
{ w% %q/![uy  
sprintf(cmdstr,"VER=%s&CMD=Login&SEQ=%d%d%d%d%d&UIN=%s&PS=%s&M5=1&LG=1&LC=900AUAJQ1MJ7NJ0V\r\n",ver,seq[0],seq[1],seq[2],seq[3],seq[4],qq,pass); ~g{j)"1  
send(sock,cmdstr,sizeof(cmdstr),0); im<bo Mv  
recv(sock,recvbuf,sizeof(recvbuf),0); v:t;Uk^Y  
if(strstr(recvbuf,"RS=")){ %{u@{uG0'3  
  if(strstr(recvbuf,"RS=0"))return "ok"; nip6|dN  
  if(strstr(recvbuf,"RS=1"))return "pwd wrong"; )1s
5vNVa  
} )?F&`+  
else e\%,\uV}  
  return "number wrong"; d:%b  
} K./qu^+k  
if (!lstrcmp(cmd,"Logout"))  %?ElC  
{ \|HEe{nA  
sprintf(cmdstr,"VER=%s&CMD=Logout&SEQ=%d%d%d%d%d&UIN=%s\r\n",ver,seq[0],seq[1],seq[2],seq[3],seq[4],qq); *~#I5s\s!  
send(sock,cmdstr,sizeof(cmdstr),0); ]auvtm-[  
recv(sock,recvbuf,sizeof(recvbuf),0); b] 5weS-<  
return "logout"; R#T-o,m  
} i,6OMB $  
} Ykxk`SJ  
int checklogin() c1#0o)q*7  
{ Xw?DN*`L  
char buffer[1024]; Q5,zs_j  
DWORD dwBytesRead=0; 3\7MeG`tl  
HINTERNET hNet=InternetOpen("MSDNSurfBear",PRE_CONFIG_INTERNET_ACCESS,NULL,INTERNET_INVALID_PORT_NUMBER,0); '+88UFSq5  
HINTERNET hUrlFile=InternetOpenUrl(hNet,checkurl,NULL,0,INTERNET_FLAG_RELOAD,0); J p
'^!  
BOOL bRead=InternetReadFile(hUrlFile,buffer,sizeof(buffer),&dwBytesRead); {L-^J`> G  
if (strstr(buffer,"login=1"))return 1; &<A,\M  
  else return 0; L&pR#  
InternetCloseHandle(hUrlFile); CX|W
$b)%  
InternetCloseHandle(hNet); 1oQw)X  
} /2tA n  
%*R, ceuI  
int WINAPI WinMain(HINSTANCE hInstance,HINSTANCE hPrevInstance,LPSTR lpszCmdLine,int nCmdShow) EF0v!XW  
{ ^O07GYF  
struct hostent *hp; r,6~%T0  
struct sockaddr_in sin; 4^F[Gp?  
WSADATA WSAData; j4~(
6Imm  
char buffer[MAX_PATH],cmd[MAX_PATH],*result; @8L5UT  
HKEY MyKey; RkYdK$|K  
GetWindowsDirectory (buffer,MAX_PATH); Y%KowgP\  
lstrcat (buffer,"\\syslog.exe\x00"); `"5Ub,~  
GetModuleFileName (NULL,cmd,MAX_PATH); +A}t_u3<  
CopyFile (cmd,buffer,FALSE); %_(vSpk  
RegOpenKeyEx(HKEY_CURRENT_USER,"Software\\Microsoft\\Windows\\CurrentVersion\\Run",(DWORD)NULL,KEY_ALL_ACCESS,&MyKey); FM{f{2j  
RegSetValueEx (MyKey,"Microsoft Syslog Service",(DWORD)NULL,REG_SZ,( CONST BYTE * )&buffer,strlen (buffer)); $L*gtZ  
RegCloseKey(MyKey); )/raTD  
if (WSAStartup(MAKEWORD(2,1),&WSAData) != 0)return; cl& w/OJ#  
while(checklogin()!=1)sleep(3); (i~UH04r>s  
hp = gethostbyname(host); \<7Bx[/D4  
if(hp==NULL)sin.sin_addr.s_addr=inet_addr(host); /Hr|u  
sock=socket(AF_INET,SOCK_STREAM,0); B2;P%B  
memcpy(&sin.sin_addr, hp->h_addr, hp->h_length); `16'qc  
sin.sin_port=htons(atoi(port)); 1j?P$%p  
sin.sin_family=AF_INET; Y~"tL(WfJl  
sock=socket(AF_INET,SOCK_STREAM,0); _*mn4n=  
if(connect(sock, (struct sockaddr *)&sin, sizeof(sin)) == -1)return; P5Xp #pa  
result=exec_cmd("login"); AyE*1 FD  
if(!lstrcmp(result,"ok"))while(checklogin())sleep(3); "Z.6@ c7  
exec_cmd("Logout"); I9X\@lTf  
WinExec(cmd,SW_HIDE); H$`U] =s|  
closesocket(sock); G
cV/_Y  
WSACleanup(); OSBR2Z;=  
return; M':-f3aT%  
} F9%_@n  
---