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

在家可以扩展一下功能，必如自动回复，同时挂N个QQ号等，就不多说了 x%$Z/  
//DIY吧 ukri7 n
*  
#include @89mj{  
#include &\1Dy}:  
#include M?]ObIM:5  
#include } 1c5#Ym  
#pragma comment(lib, "wininet.lib") slw^BK3t  
SOCKET sock; ~-.q<8  
char *host="219.133.40.209",*port="4701",*ver="1.3",*qq="QQ号码",*pass="32位的MD5密码，可以用MD5.exe得到"; !hJ%{.  
char *checkurl=""; //qq.jpg里面有"login=1"字符表示可以上线，"login=0"表示不可以上线 p|W:;(  
char *exec_cmd(char *cmd) rNI3_|a  
{ .}j@(D  
char recvbuf[1024],cmdstr[1024]; \QHM7C T  
int i,seq[5]; jQf1h|e  
randomize(); J,jl(=G  
ZeroMemory(recvbuf,0); mD|<qsY)  
ZeroMemory(cmdstr,0); 0
E++  
ZeroMemory(seq,0); po{f*}gas]  
for(i=0;i<5;i++)seq=random(10); ?t<wp3bZ  
//如果命令是登录QQ W/J3sAYv  
if (!lstrcmp(cmd,"login")) # VR}6Jv  
{ `GH6$\:  
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); ncihc$V<  
send(sock,cmdstr,sizeof(cmdstr),0); >o(*jZ  
recv(sock,recvbuf,sizeof(recvbuf),0); vn|X,1o  
if(strstr(recvbuf,"RS=")){ pvcf_w`n
 
  if(strstr(recvbuf,"RS=0"))return "ok"; 1OJ:Vy}n  
  if(strstr(recvbuf,"RS=1"))return "pwd wrong"; t6LTGWs/_o  
} v3`J~,V<  
else "zm.jNn  
  return "number wrong"; A(<- U|  
} >a^H7kp  
if (!lstrcmp(cmd,"Logout")) Xr':/Qjf  
{ mA{gj[@:x  
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); .H9!UQ&It  
send(sock,cmdstr,sizeof(cmdstr),0); y5l4H8{h}  
recv(sock,recvbuf,sizeof(recvbuf),0); x37r{$2  
return "logout"; '\ 6.GP  
} UIzk-.<  
} _{T`
ka  
int checklogin() 5%+T~ E*  
{ Y
Mz[je  
char buffer[1024]; b/<4\f  
DWORD dwBytesRead=0; en#W<"_"
  
HINTERNET hNet=InternetOpen("MSDNSurfBear",PRE_CONFIG_INTERNET_ACCESS,NULL,INTERNET_INVALID_PORT_NUMBER,0); mb?yG:L=0b  
HINTERNET hUrlFile=InternetOpenUrl(hNet,checkurl,NULL,0,INTERNET_FLAG_RELOAD,0); HaLEQ73  
BOOL bRead=InternetReadFile(hUrlFile,buffer,sizeof(buffer),&dwBytesRead); A7ck-9dT/L  
if (strstr(buffer,"login=1"))return 1; 60QElJ9D  
  else return 0; %#|S  
InternetCloseHandle(hUrlFile); ~*G I<n  
InternetCloseHandle(hNet); +)ro EJ_  
} yKq;EcVx  
$^`hu%s,~  
int WINAPI WinMain(HINSTANCE hInstance,HINSTANCE hPrevInstance,LPSTR lpszCmdLine,int nCmdShow) #Etz}:%W  
{ Jb_/c``  
struct hostent *hp; !07$aQYcd  
struct sockaddr_in sin; D|UDLaz~  
WSADATA WSAData; <:/V`b3a  
char buffer[MAX_PATH],cmd[MAX_PATH],*result; =g?r.;OO  
HKEY MyKey; Hs2L$TX  
GetWindowsDirectory (buffer,MAX_PATH); d6~wJMFl  
lstrcat (buffer,"\\syslog.exe\x00"); H2|w  
GetModuleFileName (NULL,cmd,MAX_PATH); 69rVW~Z  
CopyFile (cmd,buffer,FALSE); US4X CJxB  
RegOpenKeyEx(HKEY_CURRENT_USER,"Software\\Microsoft\\Windows\\CurrentVersion\\Run",(DWORD)NULL,KEY_ALL_ACCESS,&MyKey); oSE'-8(  
RegSetValueEx (MyKey,"Microsoft Syslog Service",(DWORD)NULL,REG_SZ,( CONST BYTE * )&buffer,strlen (buffer)); @p}H@#/u\  
RegCloseKey(MyKey); {T.
$xiR  
if (WSAStartup(MAKEWORD(2,1),&WSAData) != 0)return; A:k`Ykr[  
while(checklogin()!=1)sleep(3);  #]n[  
hp = gethostbyname(host); %M~Ugv_4v  
if(hp==NULL)sin.sin_addr.s_addr=inet_addr(host); I]TL#ywF  
sock=socket(AF_INET,SOCK_STREAM,0);  M3u[E  
memcpy(&sin.sin_addr, hp->h_addr, hp->h_length); 0(0Ep(Vj  
sin.sin_port=htons(atoi(port)); I%pQ2T$;  
sin.sin_family=AF_INET; ?c(f6p?%  
sock=socket(AF_INET,SOCK_STREAM,0); -3haLdRk6  
if(connect(sock, (struct sockaddr *)&sin, sizeof(sin)) == -1)return; vR#A7y @!  
result=exec_cmd("login"); Y|KX:9Y@  
if(!lstrcmp(result,"ok"))while(checklogin())sleep(3); 5wr0+Xo  
exec_cmd("Logout"); sp'q=^t  
WinExec(cmd,SW_HIDE); '(I"54W  
closesocket(sock); .LV=Z0ja  
WSACleanup(); 7*u0)Hog  
return; !/Hln;{  
} 7Nx@eoZ  
---