中国网管论坛 » 编程设计/站长论坛 » 用汇编语言写QQ任我聊

cftgusr 发表于 2007-7-5 23:35

用汇编语言写QQ任我聊

[size=4][url=http://bbs.cfan.com.cn/thread-384930-1-1.html][color=red]用汇编语言写QQ任我聊[/color][/url]

转自电脑爱好者论坛，作者：zhangke
原帖和可执行文件下载:[url]http://bbs.cfan.com.cn/thread-384930-1-1.html[/url]

［注意］原创，转载请注明!!!

呵呵！一个小工具而已，就是没加为好友也可以和别人聊天，临时会话！跟群里的和网站上的那种原理是一样的！
[img]http://bbs.cfan.com.cn/bbs-ad/luntan/tiezi/qq.jpg[/img]
原理解析：
在Tencent的互动服务里面（[url=http://imis.qq.com/][color=#0000ff]http://imis.qq.com/[/color][/url]）可以为你生成网页代码放到自己的网页中，让别人在网站上点一下就可以给你留言！
程序就是利用的这个生成的代码,直接在浏览器中输入
tencent://message/?uin=你想聊天的QQ号码&Site=im.qq.com&Menu=yes

就可以和别人聊天了，取消临时会话的用户不行（这个就是临时会话嘛！）
下面是汇编程序源代码:

.386
.model flat,stdcall  
option casemap:none  
DlgProc proto :DWORD,:DWORD,:DWORD,:DWORD
include \masm32\include\windows.inc
include \masm32\include\kernel32.inc
include \masm32\include\user32.inc
include \masm32\include\masm32.inc
include \masm32\include\shell32.inc

includelib \masm32\lib\kernel32.lib
includelib \masm32\lib\user32.lib
includelib \masm32\lib\masm32.lib
includelib \masm32\lib\shell32.lib
.data?
QQnum db ?
hInstance HINSTANCE ?
swidth  dd ?
sheight dd ?
dwidth  dd ?      
dheight dd ?
rect    RECT <>
mystr db ?
szTemp1 db ?
szTemp2 db ?
.data
str1 db "tencent://message/?uin=",0
str2 db "&Site=im.qq.com&Menu=yes",0
MainDialog db "MyDialog",0
szMutex db "zhangkesqqtalker",0
ErrorText db "Program already run...",0
ErrorTitle db "Warning!!!",0

.const
BTNSTART equ 1003
EDITNUM  equ 1002
.code

start:

Main proc
    invoke GetModuleHandle,NULL
    mov hInstance,eax
    invoke DialogBoxParam,hInstance,addr MainDialog,NULL,addr DlgProc,NULL
    invoke ExitProcess,0
Main endp
DlgProc proc hWnd:HWND,uMsg:UINT,wParam:WPARAM,lParam:LPARAM
    .if uMsg==WM_INITDIALOG
        invoke CreateMutex,NULL,FALSE,addr szMutex
        invoke GetLastError
        .IF eax == ERROR_ALREADY_EXISTS
            invoke MessageBox,NULL,addr ErrorText,addr ErrorTitle,MB_ICONWARNING
            invoke ExitProcess,NULL
        .ENDIF
        ;上面几行代码的作用的防止程序多开(即只能运行一个实例)
        invoke GetSystemMetrics,SM_CXSCREEN     ;
        mov swidth,eax                          ;
        invoke GetSystemMetrics,SM_CYSCREEN     ;
        mov sheight,eax                         ;
        invoke GetWindowRect,hWnd,addr rect     ;
        mov eax,rect.right                      ;这几行是为下面invoke SetWindowPos做准备
        sub eax,rect.left                       ;
        mov dwidth,eax                          ;
        sub swidth,eax                          ;使窗体出现在屏幕中心
        mov eax,rect.bottom                     ;
        sub eax,rect.top                        ;
        mov dheight,eax                         ;其中不明白的地方看一下Platform SDK就可以了
        sub sheight,eax                         ;
        shr sheight,1                           ;
        shr swidth,1                            ;
        invoke SetWindowPos,hWnd,HWND_NOTOPMOST,swidth,sheight,dwidth,dheight,SWP_SHOWWINDOW
    .elseif uMsg==WM_COMMAND
        mov eax,wParam
          .if ax==BTNSTART
            invoke szCopy,addr str1,addr mystr
              invoke GetDlgItemText,hWnd,EDITNUM,addr QQnum,11
            invoke szCatStr,addr mystr,addr QQnum
              invoke szCatStr,addr mystr,addr str2
              invoke ShellExecute,NULL,NULL,addr mystr,NULL,NULL,SW_HIDE
        .endif
    .elseif uMsg==WM_CLOSE
        invoke EndDialog,hWnd,0
    .else
        mov eax,FALSE
          ret
    .endif
    mov eax,TRUE
    ret
DlgProc endp

end start

忘了说！补充一句，使用工具为MASM32!!!

有任何问题请与我联系:zk_invincible@163.com
[/size]

jcj314 发表于 2007-8-8 07:38

牛气啊

linuxubuntu 发表于 2007-8-12 00:41

代码对我来说就是天书

freewinger 发表于 2008-2-5 21:29

jiayou

搞坏PC 发表于 2008-2-6 17:12

::xiao2::

jangwei 发表于 2008-2-29 16:23

真猛啊!!!!崇拜中!!!

fgold 发表于 2008-3-13 14:52

高手，崇拜...........

badboyshishi 发表于 2008-4-2 11:02

::19:: 好玩好玩!!!!!!收藏先!!!

yearn 发表于 2008-4-15 11:42

lihai

yujiameiwen 发表于 2008-4-17 13:49

强
人啊:loveliness:

fjingke9 发表于 2008-4-25 10:22

北京画廊

丹青缘画廊本着弘扬中华文化艺术，[url=http://www.danqingyuan.com/index2.htm][b]北京画廊[/b][/url]与书画收藏爱好者进行广泛交流的宗旨，[url=http://www.danqingyuan.com/index2.htm][b]北京画廊[/b][/url]同广大书画艺术家建立广泛联系，[url=http://www.danqingyuan.com/index2.htm]北京画廊[/url]为有杰出艺术造诣的中青年艺术家提供一个艺术窗口，[url=http://www.danqingyuan.com/index2.htm][b]北京画廊[/b][/url]不断推出新人新作。主要为广大书画收藏爱好者提供近现代著名画家真迹、精品，以及有较高艺术水准和增值潜力的当代中青年书画家作品，[url=http://www.danqingyuan.com/index2.htm][b]北京画廊[/b][/url]本站作品均来自于画家本人，本站向所有收藏者郑重承诺：本站所售作品，一律保真

ben1001 发表于 2008-4-28 04:53

真的么?
有没有人能告诉我
怎么样啊？

389073437 发表于 2008-5-4 12:02

利害~~~~~~~~~顶~~~~~~~~

查看完整版本: 用汇编语言写QQ任我聊