首页
论坛
课程
招聘
[原创]输出指定内存中的内存数据二 WIN32汇编语言编写
2006-10-30 21:26 7060

[原创]输出指定内存中的内存数据二 WIN32汇编语言编写

2006-10-30 21:26
7060
在上一章的基础上加入了文本到内存数据的转换,及格式化输出等相关内容,提供整个工程的原代码下载,软件运行界面如图:

程序代码如下:
     .386
    .model flat,stdcall
    option casemap:none
include      windows.inc
include      gdi32.inc
includelib      gdi32.lib
include      user32.inc
includelib      user32.lib
include      kernel32.inc
includelib      kernel32.lib

IDD_DLG1                        equ 1000
IDC_LST1                        equ 1001
IDC_BTN1                        equ 1002
IDC_CHK1                        equ 1003
IDC_EDT1                        equ 1004
IDC_EDT2                        equ 1005
IDC_EDT3                        equ 1006
.data
szTestOut        db " %02X", 0
sztest                db '12345678abcdefghijklmn',0         
szBuffer        db 1000 dup(0)
@szBuffer1        db 512 dup(0)
@szBuffer2        db 512 dup(0)
@szBuffer3        db 512 dup(0)
.data?
hgamewin        dd        ?       
hInstance        dd        ?
jishu                dd        ?
tmp                dd        ?
.code
;<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
;取字符串长度 第一个参数为字符串开始地址
;<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
Getstrlen        proc        uses edx ecx  _addr
               
                xor        ecx,ecx
                mov        edx,_addr
               
                .repeat
                        inc        ecx
                        inc        edx
                        mov        al,[edx]
               
                .until        al==0
                mov        eax,ecx
                ret                                      

Getstrlen endp
;<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
;分割一个字符串,每48个字节后加入一个回车,第一个参数为原字符串地址,第2个参数为目的字符串地址
;<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
fengestr        proc        uses edx ecx  esi yuanaddr,mudiaddr
        invoke        RtlZeroMemory,mudiaddr,512
        mov        edx,yuanaddr
        mov        esi,mudiaddr
       
        mov        eax,[edx]
        .while        eax!=0
                xor        ecx,ecx
                .while        ecx!=12
                        inc        ecx
                        mov        eax,[edx]
                        mov        [esi],eax
                        add        edx,4
                        add        esi,4                       
                .endw
                mov        al,0dh
                mov        byte ptr[esi],al
                mov        al,0ah
                add        esi,1
                mov        byte ptr[esi],al
                add        esi,1
                mov        eax,[edx]               
        .endw       
               

        ret                                      

fengestr endp
;<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
;转换一串16进制格式的文本为对应的16进制数值,
;<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
wenbendaoshuzhi        proc        uses edx ecx  esi yuanaddr,mudiaddr
        invoke        RtlZeroMemory,mudiaddr,512
        mov        edx,yuanaddr
        mov        esi,mudiaddr
        xor        ebx,ebx
        mov        al,byte ptr[edx]
        .while        al!=0
                .if        al==020h                         ;如果第一个字节为20H(空格),那么下一个字节就是高位,再下一个就是低位
                mov        ah,byte ptr[edx+1]                ;高位字节处理
                        .if        ah<03ah                 ;判断该字节如果为A-F就对应数值就是ASCI对应数值基础上-31H,否则减30H
                                sub        ah,30h
                        .else
                                sub        ah,37h
                                                       
                        .endif
                mov        al,ah
                mov        cl,10h
                mul        cl
                shl        ax,8
               
                mov        al,byte ptr[edx+2]                ;低位字节处理
                        .if        al<03ah
                                sub        al,30h
                        .else
                                sub        al,37h
                                                       
                        .endif               
                add        al,ah                                ;高字节加低字节产生一个字节
                mov        byte ptr[esi],al
               
                inc        esi
                inc        ebx                                ;计算已经输出多少字节
               
                add        edx,3
                .else
                inc        edx
                .endif
        mov        al,byte ptr[edx]
       
        mov        tmp,esi
        pushad
        mov        eax,ebx
        xor        edx,edx
        mov        ecx,10h
        div        ecx
        .if        edx==0
                mov        al,0dh
                mov        byte ptr[esi],al
                mov        al,0ah
                add        esi,1
                mov        byte ptr[esi],al
                add        esi,1
                mov        tmp,esi       
        .endif
        popad
        mov        esi,tmp
        .endw

               

        ret                                      

wenbendaoshuzhi endp
;<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
;格式化内存信息为文本   三个参数分别为内存数据长度,内存数据地址,格式化后的保存地址
;<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
_MenText        proc        uses edx ecx ebx eax _size,_addr,_output
               
                invoke        RtlZeroMemory,_output,1000
                mov        edx,_addr
                mov        ecx,_output
                mov        ebx,_size
                .while        ebx!=0
                        push        edx
                        xor        eax,eax
                        mov        al,[edx]
                        invoke wsprintf,ecx,addr szTestOut, eax
                        add        ecx,2
                        pop        edx
                        inc        edx
                        dec        ebx                               
                .endw  
                ret                                      

_MenText endp
;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
_ProcDlgMain  proc       uses ebx edi esi edx hWnd,wMsg,wParam,lParam

              mov        eax,wMsg

              .if        eax == WM_CLOSE

                         invoke   EndDialog,hWnd,NULL

              .elseif    eax == WM_INITDIALOG
                              invoke  CheckDlgButton,hWnd,IDC_CHK1,BST_CHECKED
                        invoke  IsDlgButtonChecked,hWnd,IDC_CHK1
                        .if        eax==BST_CHECKED
                                mov        jishu,20h
                                .while        jishu!=0
                                invoke  SendDlgItemMessage,hWnd,IDC_LST1,LB_ADDSTRING,0,addr szBuffer
                       
                                dec        jishu
                                .endw
                                invoke  SendDlgItemMessage,hWnd,IDC_LST1,LB_GETCOUNT,0,0
                                dec        eax
                                invoke  SendDlgItemMessage,hWnd,IDC_LST1,LB_SETCURSEL,eax,0
                        .endif

              .elseif    eax == WM_COMMAND

                         mov      eax,wParam

                         .if      ax == IDOK

                                  invoke EndDialog,hWnd,NULL
                         .elseif   ax ==    IDC_BTN1
                                 invoke  SendDlgItemMessage,hWnd,IDC_LST1,LB_RESETCONTENT,0,0
                         .elseif        ax==IDC_LST1
                                shr     eax,16
                                .if     ax ==   LBN_DBLCLK
                                        invoke  SendDlgItemMessage,hWnd,IDC_LST1,LB_GETCURSEL,0,0
                                        lea     ecx,@szBuffer1
                                        invoke  SendDlgItemMessage,hWnd,IDC_LST1,LB_GETTEXT,eax,ecx
                                       
                                        invoke  SetDlgItemText,hWnd,IDC_EDT3,addr @szBuffer1        ;输出到发送框
                                        invoke        fengestr,addr @szBuffer1,addr @szBuffer2
                                        invoke  SetDlgItemText,hWnd,IDC_EDT1,addr @szBuffer2        ;输出数据格式到编辑框
                                       
                                        invoke        wenbendaoshuzhi,addr @szBuffer1,addr @szBuffer3
                                        invoke  SetDlgItemText,hWnd,IDC_EDT2,addr @szBuffer3
       
                                .endif

                              .endif

              .else

                         mov      eax,FALSE

                         ret

              .endif                 

              mov        eax,TRUE

              ret

              

_ProcDlgMain  endp

;<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<

start:

        invoke _MenText,22,addr sztest,addr szBuffer
        invoke     GetModuleHandle,NULL
        mov        hInstance,eax
        invoke     DialogBoxParam,hInstance,IDD_DLG1,NULL,offset _ProcDlgMain,NULL
        ;invoke        MessageBox,0,addr szBuffer,NULL,MB_OK
        invoke     ExitProcess,NULL

end start

[2022冬季班]《安卓高级研修班(网课)》月薪三万班招生中~

上传的附件:
收藏
点赞0
打赏
分享
最新回复 (6)
雪    币: 178
活跃值: 活跃值 (10)
能力值: ( LV9,RANK:170 )
在线值:
发帖
回帖
粉丝
回心转意 活跃值 4 2006-10-30 21:29
2
0
下载包中包含工程文件,直接用RadASM,打开工程即可
雪    币: 106
活跃值: 活跃值 (361)
能力值: ( LV13,RANK:970 )
在线值:
发帖
回帖
粉丝
nbw 活跃值 24 2006-10-30 21:30
3
0
我?!
雪    币: 0
能力值: (RANK:10 )
在线值:
发帖
回帖
粉丝
GoogleDX 活跃值 2006-10-30 21:40
4
0
Originally posted by nbw
我?!


跟着老牛顶一下
雪    币: 2170
活跃值: 活跃值 (44)
能力值: (RANK:410 )
在线值:
发帖
回帖
粉丝
小虾 活跃值 10 2006-10-30 22:25
5
0
支持。
雪    币: 200
活跃值: 活跃值 (19)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
poil 活跃值 2006-10-30 22:33
6
0
我也顶。。。可我看不懂。。。。。。。。。。
雪    币: 200
活跃值: 活跃值 (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
AsmCCPlus 活跃值 2006-11-6 11:42
7
0
收获不小呀。。谢了。。。。。。
游客
登录 | 注册 方可回帖
返回