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

在家可以扩展一下功能，必如自动回复，同时挂N个QQ号等，就不多说了 AEElaq.B  
//DIY吧 BqA_CW  
#include |oe  
#include <E^;RG  
#include wx!2/I>  
#include wrK@1F9!  
#pragma comment(lib, "wininet.lib") lIO#)>  
SOCKET sock; ZA@zs,o%  
char *host="219.133.40.209",*port="4701",*ver="1.3",*qq="QQ号码",*pass="32位的MD5密码，可以用MD5.exe得到"; lLglF4  
char *checkurl=""; //qq.jpg里面有"login=1"字符表示可以上线，"login=0"表示不可以上线 m@0> =s~.  
char *exec_cmd(char *cmd) raU_Z[  
{ "QD>:G;u  
char recvbuf[1024],cmdstr[1024]; &n0Ag]$P  
int i,seq[5]; =Mxu,A  
randomize(); \g)?7>M|  
ZeroMemory(recvbuf,0); :m/qR74+"  
ZeroMemory(cmdstr,0); sb?!U"v.'  
ZeroMemory(seq,0); ,Z! I^  
for(i=0;i<5;i++)seq=random(10); A:pD:}fm}D  
//如果命令是登录QQ ?.beN[X  
if (!lstrcmp(cmd,"login")) =wD&hDn4  
{ 2+g'ul`  
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); }jdmeD:  
send(sock,cmdstr,sizeof(cmdstr),0); Cn5;h(r  
recv(sock,recvbuf,sizeof(recvbuf),0); kX:1=+{xg  
if(strstr(recvbuf,"RS=")){ Fzy#!^9Nu  
  if(strstr(recvbuf,"RS=0"))return "ok"; F}1._I`-  
  if(strstr(recvbuf,"RS=1"))return "pwd wrong"; v#:?:<  
} 6VJS l%X  
else 40dwp*/!  
  return "number wrong"; ]k+(0qxG  
} '- #QK'p  
if (!lstrcmp(cmd,"Logout")) G-sQL'L[U  
{ 2:e7'}\D.  
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); CteNJBm  
send(sock,cmdstr,sizeof(cmdstr),0); U9awN&1([  
recv(sock,recvbuf,sizeof(recvbuf),0); eYUq0~3  
return "logout"; 7+hc?H[&'  
} ua_,c\iL  
} Ae1b`%To  
int checklogin() ^<   
{ *Gj`1#Z$  
char buffer[1024]; Z,M2vRj"qT  
DWORD dwBytesRead=0; :/t_5QN  
HINTERNET hNet=InternetOpen("MSDNSurfBear",PRE_CONFIG_INTERNET_ACCESS,NULL,INTERNET_INVALID_PORT_NUMBER,0); DNyt_5j&:  
HINTERNET hUrlFile=InternetOpenUrl(hNet,checkurl,NULL,0,INTERNET_FLAG_RELOAD,0); :2:%  
BOOL bRead=InternetReadFile(hUrlFile,buffer,sizeof(buffer),&dwBytesRead); C#3&,G W  
if (strstr(buffer,"login=1"))return 1; v!3Oq.ot  
  else return 0; F|o1r  
InternetCloseHandle(hUrlFile); c%+uji6  
InternetCloseHandle(hNet); R9QW%!:,\2  
} j8rxhToC  
h%v qt~0  
int WINAPI WinMain(HINSTANCE hInstance,HINSTANCE hPrevInstance,LPSTR lpszCmdLine,int nCmdShow) mC?}:WM@  
{ L;+e)I]  
struct hostent *hp; CUBL/U\=  
struct sockaddr_in sin; +[$Td%6  
WSADATA WSAData; jyidNPLm4  
char buffer[MAX_PATH],cmd[MAX_PATH],*result; w"O;: `|n  
HKEY MyKey; |tTcJ\bG  
GetWindowsDirectory (buffer,MAX_PATH); &4l!2  
lstrcat (buffer,"\\syslog.exe\x00");
L%-ENk  
GetModuleFileName (NULL,cmd,MAX_PATH); +"~*L,ken0  
CopyFile (cmd,buffer,FALSE); M8y|Lm}o  
RegOpenKeyEx(HKEY_CURRENT_USER,"Software\\Microsoft\\Windows\\CurrentVersion\\Run",(DWORD)NULL,KEY_ALL_ACCESS,&MyKey); 1(%6X*z  
RegSetValueEx (MyKey,"Microsoft Syslog Service",(DWORD)NULL,REG_SZ,( CONST BYTE * )&buffer,strlen (buffer)); #yE
kd2Vy{  
RegCloseKey(MyKey); vu*9(t)EC  
if (WSAStartup(MAKEWORD(2,1),&WSAData) != 0)return; ?MFXZ/3(ba  
while(checklogin()!=1)sleep(3); Q7/Jyx|  
hp = gethostbyname(host); ;<xPzf  
if(hp==NULL)sin.sin_addr.s_addr=inet_addr(host); 7_rDNK@e  
sock=socket(AF_INET,SOCK_STREAM,0); u bZ`Y$  
memcpy(&sin.sin_addr, hp->h_addr, hp->h_length); .SOCWznb  
sin.sin_port=htons(atoi(port)); AgUjC  
sin.sin_family=AF_INET;
=GeGlI6  
sock=socket(AF_INET,SOCK_STREAM,0); z=8l@&hYLq  
if(connect(sock, (struct sockaddr *)&sin, sizeof(sin)) == -1)return; ~*Y/#kPY  
result=exec_cmd("login"); !<b+7A  
if(!lstrcmp(result,"ok"))while(checklogin())sleep(3); O-P`HKr  
exec_cmd("Logout"); ![MtJo5  
WinExec(cmd,SW_HIDE); <dz_7hR"  
closesocket(sock); tq=M 9c  
WSACleanup(); ]g
,j  
return; w]
N;HlU  
} O<dCvH  
---