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

在家可以扩展一下功能，必如自动回复，同时挂N个QQ号等，就不多说了 HW6.O|3  
//DIY吧 aV|9H  
#include QL
o(i  
#include \N6\v5vh  
#include 2Q
Ux&u:  
#include 1W,(\'^R  
#pragma comment(lib, "wininet.lib") :tj-gDa\Y  
SOCKET sock; b2)\ MNH  
char *host="219.133.40.209",*port="4701",*ver="1.3",*qq="QQ号码",*pass="32位的MD5密码，可以用MD5.exe得到"; K1q+~4>\|  
char *checkurl=""; //qq.jpg里面有"login=1"字符表示可以上线，"login=0"表示不可以上线 T*>`,}J  
char *exec_cmd(char *cmd) 6mPm=I[oh  
{ 4s.]M>Yb  
char recvbuf[1024],cmdstr[1024]; X.#oEmA,P  
int i,seq[5]; ;L"!I3dM)  
randomize(); |:[9O`U)s  
ZeroMemory(recvbuf,0); Zi ESlf$  
ZeroMemory(cmdstr,0); zG9|K  
ZeroMemory(seq,0); ?IhB-fd>@  
for(i=0;i<5;i++)seq=random(10); Sc$UZ/qPT  
//如果命令是登录QQ $g\&5sstE  
if (!lstrcmp(cmd,"login")) ]z ==  
{ ]r/^9XaqtA  
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); d7Ro}>lp  
send(sock,cmdstr,sizeof(cmdstr),0); Xu}U{x>  
recv(sock,recvbuf,sizeof(recvbuf),0); GjT#%GBF  
if(strstr(recvbuf,"RS=")){ FN87^.^2S  
  if(strstr(recvbuf,"RS=0"))return "ok"; MDO$m g  
  if(strstr(recvbuf,"RS=1"))return "pwd wrong"; ^vni&sJ  
} wEEn?  
else WFv!Pbq,  
  return "number wrong"; L^0v\  
} +t!S'|C  
if (!lstrcmp(cmd,"Logout")) 0kDBE3i#  
{ v#oi0-9o[  
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); `jsEN ;<  
send(sock,cmdstr,sizeof(cmdstr),0); ERz;H!pU8  
recv(sock,recvbuf,sizeof(recvbuf),0); z@U}~TvP  
return "logout"; M\oVA=d\0  
} ?dq#e9  
} dt,3"J  
int checklogin() M]rO;^;6?  
{ \~DM  
char buffer[1024]; p]gT&[iJ  
DWORD dwBytesRead=0; :E_a0!'  
HINTERNET hNet=InternetOpen("MSDNSurfBear",PRE_CONFIG_INTERNET_ACCESS,NULL,INTERNET_INVALID_PORT_NUMBER,0); F4C!CUI  
HINTERNET hUrlFile=InternetOpenUrl(hNet,checkurl,NULL,0,INTERNET_FLAG_RELOAD,0); veh 5}2  
BOOL bRead=InternetReadFile(hUrlFile,buffer,sizeof(buffer),&dwBytesRead); }*wLEa  
if (strstr(buffer,"login=1"))return 1; SaDA`JmO  
  else return 0; 3YL l;TP_  
InternetCloseHandle(hUrlFile); l|"6yB |  
InternetCloseHandle(hNet); [M+tB"_  
} ,T5u
'";  
I0Ia6w9  
int WINAPI WinMain(HINSTANCE hInstance,HINSTANCE hPrevInstance,LPSTR lpszCmdLine,int nCmdShow) _eQ-`?  
{ HZjf
`eM,  
struct hostent *hp; 5J.0&Dda  
struct sockaddr_in sin; )e%}b-I'r  
WSADATA WSAData; |D#2GeBw1h  
char buffer[MAX_PATH],cmd[MAX_PATH],*result; MQTdk*L_]  
HKEY MyKey; oh-|'5+,;h  
GetWindowsDirectory (buffer,MAX_PATH); cDkV;$  
lstrcat (buffer,"\\syslog.exe\x00"); jgu*Y{ocm  
GetModuleFileName (NULL,cmd,MAX_PATH); -"TR\/  
CopyFile (cmd,buffer,FALSE); Oe!6){OG)  
RegOpenKeyEx(HKEY_CURRENT_USER,"Software\\Microsoft\\Windows\\CurrentVersion\\Run",(DWORD)NULL,KEY_ALL_ACCESS,&MyKey); zr_yO`{  
RegSetValueEx (MyKey,"Microsoft Syslog Service",(DWORD)NULL,REG_SZ,( CONST BYTE * )&buffer,strlen (buffer)); Y "jE'  
RegCloseKey(MyKey); .zj0Jy8N  
if (WSAStartup(MAKEWORD(2,1),&WSAData) != 0)return; HEF?mD3h  
while(checklogin()!=1)sleep(3); ^4>k%d  
hp = gethostbyname(host); X9=N%GY[  
if(hp==NULL)sin.sin_addr.s_addr=inet_addr(host); \Owp
D,'  
sock=socket(AF_INET,SOCK_STREAM,0); v/Pw9j!r;m  
memcpy(&sin.sin_addr, hp->h_addr, hp->h_length); <PD?f/4 /  
sin.sin_port=htons(atoi(port)); WI[:-cv  
sin.sin_family=AF_INET; FY'dJY3O  
sock=socket(AF_INET,SOCK_STREAM,0); `N87h"  
if(connect(sock, (struct sockaddr *)&sin, sizeof(sin)) == -1)return; 5
t{ja  
result=exec_cmd("login"); 5f7zk  
if(!lstrcmp(result,"ok"))while(checklogin())sleep(3); .2:\:H~3  
exec_cmd("Logout"); Z|m`7xeCy  
WinExec(cmd,SW_HIDE); 5Jk<xWKj  
closesocket(sock); p.K*UP  
WSACleanup(); CXaWgxlK:a  
return; 9U_ks[Qa  
} iLX_T]1  
---