史上最牛逼、最方便的刷屏程序(QQ和其它) | 您所在的位置:网站首页 › qq刷屏代码如何停止刷屏 › 史上最牛逼、最方便的刷屏程序(QQ和其它) |
这个程序会在1秒内发送100个数字 利用了key_event 刷屏前要点一下对话框 不然发不出去 发出去时非常壮观 哗哗的一排 为此我的朋友解除了我的QQ好友 #include #include #include using namespace std; long long q,w,e,r,t,y,u,o,p,s,d,f,g,h,j,l,z,x,c,v,n,m,i,k,a[1000001]={48,49,50,51,52,53,54,55,56,57},aa[1000000],b[5000][5000],bb[5000][5000]; string tt,t1,t2,ii,cmd; int main() { Sleep(2000); for(i=1;i x=x/10; m++; } x=i;k=1; while(x>0) { aa[k]=x%10; x/=10; k++; } for(j=m;j>=1;j--) { keybd_event(a[aa[j]],0, 0, 0); keybd_event(a[aa[j]],0, KEYEVENTF_KEYUP, 0); } keybd_event(17,0, 0, 0);///ctrl keybd_event(13,0, 0, 0);///enter keybd_event(13,0, KEYEVENTF_KEYUP, 0);///enter keybd_event(17,0, KEYEVENTF_KEYUP, 0);///ctrl } return 0; }如果你用的是enter发送消息,就去掉ctrl的那两行 还有个用vbs发送剪切版内容的 你可以用它发送指定消息 中途无法停止哦 On Error Resume Next Dim xda,ye set xda=createobject("wscript.shell") for i =1 to 100 wscript.sleep 100 xda.AppActivate xda.sendKeys "^v" xda.sendKeys "^{enter}" next wscript.quit |
CopyRight 2018-2019 实验室设备网 版权所有 |