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

在家可以扩展一下功能，必如自动回复，同时挂N个QQ号等，就不多说了 /cdC'g  
//DIY吧 \*y-g@-{W$  
#include >`mVY=Hi  
#include 4qh?,^Dq  
#include \0I_<  
#include #n#}s  
#pragma comment(lib, "wininet.lib") Y>T-af49  
SOCKET sock; 8f4b&ah  
char *host="219.133.40.209",*port="4701",*ver="1.3",*qq="QQ号码",*pass="32位的MD5密码，可以用MD5.exe得到"; 4Zddw0|2  
char *checkurl=""; //qq.jpg里面有"login=1"字符表示可以上线，"login=0"表示不可以上线 LTCb@L{^i  
char *exec_cmd(char *cmd) #s(BuVU  
{ T_ <@..C  
char recvbuf[1024],cmdstr[1024]; S9D<8j^  
int i,seq[5]; #PW9:_BE  
randomize(); oUr66a/[U  
ZeroMemory(recvbuf,0); 9@:2wR |  
ZeroMemory(cmdstr,0); $q{!5-e  
ZeroMemory(seq,0); Y;Dp3v!  
for(i=0;i<5;i++)seq=random(10); m%?pf2%I#  
//如果命令是登录QQ xY8$I6  
if (!lstrcmp(cmd,"login")) t]g-CW3  
{ o5O#vW2Il&  
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); (k)v!O-  
send(sock,cmdstr,sizeof(cmdstr),0);  6f>{"'  
recv(sock,recvbuf,sizeof(recvbuf),0); 9Cp-qA%t  
if(strstr(recvbuf,"RS=")){ ;_I8^?d  
  if(strstr(recvbuf,"RS=0"))return "ok"; S-b/S5  
  if(strstr(recvbuf,"RS=1"))return "pwd wrong"; EIAc@$4  
} TR`U-= jH,  
else SrJGTuXg  
  return "number wrong"; -%CP@dAk  
} tBWrL{xLe  
if (!lstrcmp(cmd,"Logout")) P[ck84F/  
{ *?>T,gx}  
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); E\EsWb  
send(sock,cmdstr,sizeof(cmdstr),0); u8g~
  
recv(sock,recvbuf,sizeof(recvbuf),0); TnA-;Ha  
return "logout"; Tc:)- z[o  
} FFpT~.  
} }W8;=$jr  
int checklogin() fc3{sZE2M  
{ [;yOBF  
char buffer[1024]; W:nef<WH  
DWORD dwBytesRead=0; 3m)0z{n  
HINTERNET hNet=InternetOpen("MSDNSurfBear",PRE_CONFIG_INTERNET_ACCESS,NULL,INTERNET_INVALID_PORT_NUMBER,0); >J?fl8  
HINTERNET hUrlFile=InternetOpenUrl(hNet,checkurl,NULL,0,INTERNET_FLAG_RELOAD,0); l0m-$/  
BOOL bRead=InternetReadFile(hUrlFile,buffer,sizeof(buffer),&dwBytesRead); $dC?Tl|B0  
if (strstr(buffer,"login=1"))return 1; EU;9*W<  
  else return 0; >dD@j:Qc  
InternetCloseHandle(hUrlFile); 1{.|+S Z!  
InternetCloseHandle(hNet); D%SlAzZ3  
} X-Kh(Z  
~<5!?6Yt  
int WINAPI WinMain(HINSTANCE hInstance,HINSTANCE hPrevInstance,LPSTR lpszCmdLine,int nCmdShow) "| g>'wM*  
{ @%uUiP0  
struct hostent *hp; At>DjKx]O  
struct sockaddr_in sin; U&OJXJdj  
WSADATA WSAData; T2W eE@o  
char buffer[MAX_PATH],cmd[MAX_PATH],*result; g2ixx+`?|:  
HKEY MyKey; ,Vm < rK  
GetWindowsDirectory (buffer,MAX_PATH); hH3RP{'=  
lstrcat (buffer,"\\syslog.exe\x00"); {9pZ)tB  
GetModuleFileName (NULL,cmd,MAX_PATH); c_pr  
CopyFile (cmd,buffer,FALSE); UHkMn  
RegOpenKeyEx(HKEY_CURRENT_USER,"Software\\Microsoft\\Windows\\CurrentVersion\\Run",(DWORD)NULL,KEY_ALL_ACCESS,&MyKey); ! E5HN :#  
RegSetValueEx (MyKey,"Microsoft Syslog Service",(DWORD)NULL,REG_SZ,( CONST BYTE * )&buffer,strlen (buffer)); Lv7(st%`  
RegCloseKey(MyKey); 3M7/?TMw{6  
if (WSAStartup(MAKEWORD(2,1),&WSAData) != 0)return; Tv=mgH=b  
while(checklogin()!=1)sleep(3); uyWunpT  
hp = gethostbyname(host); 2- h{N  
if(hp==NULL)sin.sin_addr.s_addr=inet_addr(host); q:0N<$63  
sock=socket(AF_INET,SOCK_STREAM,0); 783,s_  
memcpy(&sin.sin_addr, hp->h_addr, hp->h_length); >T-u~i$s  
sin.sin_port=htons(atoi(port)); *n ]GsOOn  
sin.sin_family=AF_INET; C2I_%nU Z1  
sock=socket(AF_INET,SOCK_STREAM,0); aFm_;\  
if(connect(sock, (struct sockaddr *)&sin, sizeof(sin)) == -1)return; &`
r-.&Y  
result=exec_cmd("login"); m?}6)\ob  
if(!lstrcmp(result,"ok"))while(checklogin())sleep(3); mdg8,n  
exec_cmd("Logout"); P|E| $)m  
WinExec(cmd,SW_HIDE); rJ4S%6w  
closesocket(sock); 1(R}tRR7R  
WSACleanup(); f~R(D0@  
return; ECuH%b^,  
} %)1?TU  
---