汇编语言————练习

电话本

.386					;汇编语言的伪指令，再80386及以后的处理器中使用该指令集
.model flat,stdcall			;模式定义“model 内存模式【调用模式】”
option casemap:none			;选项设定（设定为对大小写敏感）


include windows.inc
include msvcrt.inc			;包含c语言的库
includelib msvcrt.lib			;包含c语言库对应的lib文件


.data 

;定义结构体
CONTACTSSTRUCT struct
	szName BYTE 25 dup(0)
	szPhNumber BYTE 12 dup(0)
CONTACTSSTRUCT ends

PCONTACTSSTRUCT TYPEDEF PTR CONTACTSSTRUCT 	;取别名（指针类型）

;声明全局变量
g_stConstacts CONTACTSSTRUCT 100 dup(<'0'>)	;定义结构体数组 
g_nCount DWORD 0				;元素个数 
g_nCountMax DWORD 100				;最大存放元素个数
g_strTemContacts CONTACTSSTRUCT <'0','0'>	;接收输入的信息

;定义格式控制字符
g_szScanfFormat BYTE '%s %s',0
g_szScanName BYTE '%s',0
Line db " ",0Ah,0

;菜单数据
	MenuStaly db   " ======================================",0Ah,0h
	MenuPage db    "《    根据序号选择你要进行的操作      》",0Ah,0h
	MenuReadAll db "《    --1---- 查看所有联系人 ----1-   》",0Ah,0h
	MenuAdd db     "《    --2----   添加联系人   ----2-   》",0Ah,0h
	Menudel db     "《    --3----   删除联系人   ----3-   》",0Ah,0h
	Menuchage db   "《    --4----   修改联系人   ----4-   》",0Ah,0h
	MenuSeach db   "《    --5----   搜索联系人   ----5-   》",0Ah,0h
	MenuSave db   "《    --6----    保存改变    ----6-   》",0Ah,0h
	MenuExit db    "《    --7----      退出      ----7-   》",0Ah,0h
	MenuNull db    "《                                    》",0Ah,0h
	clean db "cls",0h

;菜单选择数据
	printPlease db "请输入： ",0h
	intFormat db "%d",0h
	case byte 0
	printError db "你的输入有误： ",0Ah,0h
	
;添加用户数据所用字符串
g_szAddStr db "请输入你所要保存的联系人",0Ah,0h
g_szAddTpn db "请输入你所要保存的电话号码",0Ah,0h
g_szAddSuse db "添加成功",0Ah,0h
strPause db "pause",0h

;查询联系人所用数据
g_szFindstr db "请输入你所要查询的联系人",0Ah,0h

;删除联系人所用数据
g_szRemovepri db "请输入你要删除的数据",0Ah,0h
g_szRemovestr db "请再次确认是否删除",0Ah,0h

;修改数据所用
g_szModifypri db "请输入你要修改的数据",0Ah,0h


;文件操作所用数据
filep db "2L",0h

wb db "w+",0h

rb db "r+",0h

FilePath db ".\INFO.txt",0h

;file dword ?

Save db "保存成功",0Ah,0h


;菜单界面
MenuShell proc
	push offset clean
	call crt_system
	add esp,04h 
	push offset MenuStaly
	call crt_printf	 	
	push offset MenuPage
	call crt_printf 
	add esp,8h
	push offset MenuNull
	call crt_printf
	push offset MenuNull
	call crt_printf 
	add esp,8h
	
	push offset MenuReadAll 
	call crt_printf
	push offset MenuAdd
	call crt_printf
	add esp,8h
	
	push offset Menudel
	call crt_printf
	push offset Menuchage
	call crt_printf 
	add esp,8h
	
	
	push offset MenuSeach 
	call crt_printf 
	push offset MenuSave
	call crt_printf 	
	add esp,8h
	
	push offset MenuExit 
	call crt_printf 
	push offset MenuNull
	call crt_printf
	add esp,8h
	push offset MenuNull
	call crt_printf 
	push offset MenuStaly
	call crt_printf	
	add esp,08h

	ret

MenuShell endp

.code
;选择操作
SwitchCase proc
	

start:	

	push offset printPlease
	call crt_printf
	add esp,04h
	
	push offset case			;把接收的缓冲区压入栈
	push offset intFormat			;把接收字符的变量压入栈
	call crt_scanf				;调用接收字符的函数
	add esp,8h				;弹出接收字符的变量	
	
	push offset case
	mov al,[case]
	add esp,4
	cmp al,1h				;1查看所有联系人
	jnz next2
	call LookAllData
next2:
	cmp al,2h				;2添加一个联系人
	jnz next3
	call ADD_USER

next3:

	cmp al,3				
	jnz next4
	call RemoveData				;3删除一个联系人
next4:	
	cmp al,4
	jnz next5				;4修改一个联系人
	call ModifyData
	
	
next5:	
	
	cmp al,5				;5搜索一个联系人
	jnz next6
	call FindData
next6:
	cmp al,6
	jnz next7					;保存
	call SaveData				
	
	
next7:	
	cmp al,7				;7退出
	jz exit
defaul:
	push offset printError			;1-6的范围，其余报错，且返回主菜单
	call crt_printf
	add esp,04h
	call MenuShell
	jmp start
exit:	
	ret
SwitchCase endp


;查看所有
LookAllData proc
	pop ebp
	mov ebp,esp
	sub esp,050h
	

	mov ecx,0h				;初始化循环次数
	
NEXT:
	push ecx
	cmp ecx,g_nCount			;比较元素个数和0是否相等（循环完后即相等）
	jg EXIT
	
	
	lea esi,[g_stConstacts]		;把保存信息的结构体的地址赋值给esi
	mov eax,sizeof(CONTACTSSTRUCT)		;计算结构体大小
	imul eax,ecx				;把结构体大小乘以结构体个数（得到总大小，就是结构体尾部插入数据的偏移量）
	add esi,eax				;把这个偏移量给esi
	

	push offset Line
	call crt_printf
	add esp,4
	lea ebx,[esi+CONTACTSSTRUCT.szName]
	push ebx				;
	push offset g_szScanName		;
	call crt_printf				;
	add esp,08h		
	
	push offset Line
	call crt_printf
	add esp,4
	lea ebx,[esi+CONTACTSSTRUCT.szPhNumber]	;
	push ebx				;
	push offset g_szScanName		;
	call crt_printf				;
	add esp,08h				;
		
	pop ecx
	inc ecx					;外循环次数加1
	jmp NEXT				;继续外循环
	
	

EXIT:	
	push offset Line
	call crt_printf
	push offset strPause
	call crt_system
	add esp,8
	mov esp,ebp
	pop ebp
	call main				;返回主菜单
	
	
	
	
	
	
	ret

LookAllData endp


;添加用户信息
ADD_USER proc
	push eax
	push ebx				;先保存原来寄存器的值
	
	
	;根据ecx的值找到下一个结构体名字数组的地址
	lea esi,[g_stConstacts]			;保存结构体数组
	mov ecx,g_nCount			;保存元素个数
	mov eax,sizeof(CONTACTSSTRUCT)		;计算结构体大小
	imul eax,ecx				;当前个数乘与结构体大小，把结果放到eax中
	add esi,eax				;之前的结构体数组的地址加上偏移量，等于下一个结构体的地址
	
	
	;调用crt_scanf函数接收输入的数据
	lea eax,g_szAddStr			;lea表示取第二个操作数的地址放到第一个操作数中	
	push eax
	call crt_printf				;打印提示（字符串地址再eax中，使用lea保存到eax）
	;call crt_printf	
	add esp,4h				;平栈
		
	
	
		
	lea eax,[esi+CONTACTSSTRUCT.szName]	;把接收联系人的地址放到eax中	
	push eax				;把eax中存储的地址压到栈中
	push offset g_szScanName		;压入一个输出控制符
	call crt_scanf				;调用接收字符的c语言函数
	add esp,08h				;平栈
	
	
	lea eax,g_szAddTpn			;lea表示取第二个操作数的地址放到第一个操作数中	
	push eax
	call crt_printf				;打印提示（字符串地址再eax中，使用lea保存到eax）
	add esp,4h				;平栈
	lea edx,[esi+CONTACTSSTRUCT.szPhNumber]	;把接收电话号码的地址放到ebx中	
	push edx				;把eax中存储的地址压到栈中
	push offset g_szScanName		;压入一个输出控制符
	call crt_scanf				;调用接收字符的c语言函数
	add esp,08h				;平栈
	

	
	
	
	push offset g_szAddSuse			;添加成功字符串压入栈
	call crt_printf				;再控制台打印
	add esp,04h				;平栈
	
	inc g_nCount				;元素个数自增1
	
	push offset strPause
	call crt_system
	add esp,04h
	
	
	
	pop eax					;把之前保存的寄存器弹出
	pop ebx					;
	call SwitchCase

	ret

ADD_USER endp


;查询用户信息
FindData proc
	pop ebp
	mov ebp,esp
	sub esp,050h
	
	;输入要查询的数据
	lea eax,g_szFindstr
	push eax
	call crt_printf
	add esp,04h
	
	
	lea edi,[g_strTemContacts.szName]	;把结构体中名字的地址赋值给edi
	push edi				;把名字的地址压入栈
	push offset g_szScanName		;格式控制符
	call crt_scanf				;调用接收字符的c语言函数
	add esp,08h				;平栈
	push edi
	call crt_strlen
	pop edi
	mov [ebp-8],eax
	
	;根据输入的名字查询
	mov ecx,0h				;初始化循环次数
NEXT:
	cmp ecx,g_nCount			;比较元素个数和0是否相等（循环完后即相等）
	jge EXIT
	
	lea edi,[g_strTemContacts.szName]	;把结构体名字的地址赋值给edi
	
	lea esi,[g_stConstacts.szName]		;把保存信息的结构体的地址赋值给esi
	mov eax,sizeof(CONTACTSSTRUCT)		;计算结构体大小
	imul eax,ecx				;把结构体大小乘以结构体个数（得到总大小，就是结构体尾部插入数据的偏移量）
	add esi,eax				;把这个偏移量给esi
	
	
	;比较字符串
	mov eax,ecx				;把循环次数给eax（元素个数）
	mov ecx,[ebp-8]				;初始化
	repe cmpsb BYTE ptr [esi], BYTE ptr[edi];esi存储的是结构体里的用户信息，edi是输入的信息，将这两个信息循环比较
	jz PRINTFINFO				;如果相等就跳转（找到了）
	mov ecx,eax				;把外循环次数还给ecx
	inc ecx					;外循环次数加1
	jmp NEXT				;继续外循环
	
	
	;--------------------------------------------------------------------------------------------
	;push esi
	;push edi				;
	;call crt_strcmp
	;jz PRINTFINFO
	;add esp,8h 
	;mov ecx,eax	
	;inc ecx
	;jmp NEXT	
	
PRINTFINFO:	
	;输出查询结果
	;add esp,8h 
	mov ecx,eax				;循环
	lea esi,[g_stConstacts]
	mov ebx,sizeof(CONTACTSSTRUCT)		;计算结构体大小
	imul ebx,ecx				;把结构体大小乘以结构体个数（得到总大小，就是结构体尾部插入数据的偏移量）
	add esi,ebx				;把这个偏移量给esi(eax保存的是循环到底几次后找到的)
	;mov [ebp-12],esi
	lea ebx,[esi+CONTACTSSTRUCT.szName]	;
	
	
	push ebx				;
	push offset g_szScanName		;
	call crt_printf				;
	add esp,08h				;
	
					
	lea eax,[esi+CONTACTSSTRUCT.szPhNumber]	;
	push eax				;
	push offset g_szScanName		;
	call crt_printf				;
	add esp,08h				;
	
	
	push offset strPause
	call crt_system
	add esp,04h 
	;call crt_getchar			;
	;call crt_getchar			;
EXIT:	
	
	mov esp,ebp
	pop ebp
	call main				;返回主菜单
	
	
	ret
FindData endp

;修改数据
ModifyData proc
	pop ebp
	mov ebp,esp
	sub esp,050h
	
	;输入要查询的数据
	lea eax,g_szModifypri
	push eax
	call crt_printf
	add esp,04h
	
	
	lea edi,[g_strTemContacts.szName]	;把结构体中名字的地址赋值给edi
	push edi				;把名字的地址压入栈
	push offset g_szScanName		;格式控制符
	call crt_scanf				;调用接收字符的c语言函数
	add esp,08h				;平栈
	push edi
	call crt_strlen
	pop edi
	mov [ebp-8],eax
	
	;根据输入的名字查询
	mov ecx,0h				;初始化循环次数
NEXT:
	cmp ecx,g_nCount			;比较元素个数和0是否相等（循环完后即相等）
	jge EXIT
	
	lea edi,[g_strTemContacts.szName]	;把结构体名字的地址赋值给edi
	
	lea esi,[g_stConstacts.szName]		;把保存信息的结构体的地址赋值给esi
	mov eax,sizeof(CONTACTSSTRUCT)		;计算结构体大小
	imul eax,ecx				;把结构体大小乘以结构体个数（得到总大小，就是结构体尾部插入数据的偏移量）
	add esi,eax				;把这个偏移量给esi
	
	
	;比较字符串
	mov eax,ecx				;把循环次数给eax（元素个数）
	mov ecx,[ebp-8]				;初始化
	repe cmpsb BYTE ptr [esi], BYTE ptr[edi];esi存储的是结构体里的用户信息，edi是输入的信息，将这两个信息循环比较
	jz PRINTFINFO				;如果相等就跳转（找到了）
	mov ecx,eax				;把外循环次数还给ecx
	inc ecx					;外循环次数加1
	jmp NEXT				;继续外循环
	
	
PRINTFINFO:	
	;输出查询结果
	;add esp,8h 
	mov ecx,eax				;循环
	lea esi,[g_stConstacts]
	mov ebx,sizeof(CONTACTSSTRUCT)		;计算结构体大小
	imul ebx,ecx				;把结构体大小乘以结构体个数（得到总大小，就是结构体尾部插入数据的偏移量）
	add esi,ebx				;把这个偏移量给esi(eax保存的是循环到底几次后找到的)
	
	lea ebx,[esi+CONTACTSSTRUCT.szName]	;
	
	
	push ebx				;
	push offset g_szScanName		;
	call crt_printf				;
	add esp,08h				;
	
					
	lea eax,[esi+CONTACTSSTRUCT.szPhNumber]	;
	push eax				;
	push offset g_szScanName		;
	call crt_printf				;
	add esp,08h				;
	
	
	
	lea ebx,[esi+CONTACTSSTRUCT.szName]		
	push ebx	
	push offset g_szScanName
	call crt_scanf
	
	
	lea ebx,[esi+CONTACTSSTRUCT.szPhNumber]		
	push ebx	
	push offset g_szScanName
	call crt_scanf
	
	push offset strPause
	call crt_system
	add esp,04h 
	
EXIT:	
	
	mov esp,ebp
	pop ebp
	call main				;返回主菜单
	
	
	




ModifyData endp


;删除数据
RemoveData proc
	pop ebp
	mov ebp,esp
	sub esp,050h
	
	;输入要查询的数据
	lea eax,g_szRemovepri
	push eax
	call crt_printf
	add esp,04h
	
	
	lea edi,[g_strTemContacts.szName]	;把结构体中名字的地址赋值给edi
	push edi				;把名字的地址压入栈
	push offset g_szScanName		;格式控制符
	call crt_scanf				;调用接收字符的c语言函数
	add esp,08h				;平栈
	push edi
	call crt_strlen
	pop edi
	mov [ebp-8],eax
	
	;根据输入的名字查询
	mov ecx,0h				;初始化循环次数
NEXT:
	cmp ecx,g_nCount			;比较元素个数和0是否相等（循环完后即相等）
	jge EXIT
	
	lea edi,[g_strTemContacts.szName]	;把结构体名字的地址赋值给edi
	
	lea esi,[g_stConstacts.szName]		;把保存信息的结构体的地址赋值给esi
	mov eax,sizeof(CONTACTSSTRUCT)		;计算结构体大小
	imul eax,ecx				;把结构体大小乘以结构体个数（得到总大小，就是结构体尾部插入数据的偏移量）
	add esi,eax				;把这个偏移量给esi
	
	
	;比较字符串
	mov eax,ecx				;把循环次数给eax（元素个数）
	mov ecx,[ebp-8]				;初始化
	repe cmpsb BYTE ptr [esi], BYTE ptr[edi];esi存储的是结构体里的用户信息，edi是输入的信息，将这两个信息循环比较
	jz PRINTFINFO				;如果相等就跳转（找到了）
	mov ecx,eax				;把外循环次数还给ecx
	inc ecx					;外循环次数加1
	jmp NEXT				;继续外循环

	
PRINTFINFO:	
	;输出查询结果
	;add esp,8h 
	mov ecx,eax				;循环
	lea esi,[g_stConstacts]
	mov ebx,sizeof(CONTACTSSTRUCT)		;计算结构体大小
	imul ebx,ecx				;把结构体大小乘以结构体个数（得到总大小，就是结构体尾部插入数据的偏移量）
	add esi,ebx				;把这个偏移量给esi(eax保存的是循环到底几次后找到的)

	lea ebx,[esi+CONTACTSSTRUCT.szName]	;
	
	
	push ebx				;
	push offset g_szScanName		;
	call crt_printf				;
	add esp,08h				;
	
					
	lea eax,[esi+CONTACTSSTRUCT.szPhNumber]	;
	push eax				;
	push offset g_szScanName		;
	call crt_printf				;
	add esp,08h				;
	
	
	push offset g_szRemovestr
	call crt_printf
	add esp,04h 
	
	mov [esi+CONTACTSSTRUCT.szPhNumber],0
	mov [esi+CONTACTSSTRUCT.szName],0



			
EXIT:	
	
	mov esp,ebp
	pop ebp
	call main				;返回主菜单
	

	ret

RemoveData endp


;保存数据
SaveData proc
	push ebp
	mov ebp,esp
	sub esp,30h

	push offset wb
	push offset FilePath
	call crt_fopen
	mov [ebp-8],eax
	add esp,8h

	
	
	push [ebp-8]				;文件指针
	push 1	
	push 4
	lea ecx,g_nCount
	push ecx							
	call crt_fwrite				;文件写入函数
	add esp,16
	
	
	push [ebp-8]				;结构体指针
	mov eax,sizeof(CONTACTSSTRUCT)		;计算结构体大小
	push g_nCount				;单个大小
	push  eax				;元素个数
	push offset g_stConstacts		;文件指针
	call crt_fwrite				;文件写入函数

	add esp,10h
	
	push [ebp-8]
	call crt_fclose
	add esp,4
	
	push offset Save
	call crt_printf
	add esp,4
	
	mov esp,ebp
	pop ebp
	
	
	call SwitchCase
	ret

SaveData endp


;读取数据
ReadData proc
	
	push ebp
	mov ebp,esp
	sub esp,30h

	push offset rb
	push offset FilePath
	call crt_fopen
	mov [ebp-8],eax
	add esp,8h
	cmp eax,0
	jz tiao
	

	push [ebp-8]				;文件指针
	push 1	 
	push 4
	push offset g_nCount							
	call crt_fread				;文件写入函数
	add esp,16

	;call crt_fread				;文件写入函数
	;add esp,16

	
	push [ebp-8]				;结构体指针
	mov eax,sizeof(CONTACTSSTRUCT)		;计算结构体大小
	push offset g_nCount				;单个大小
	push  eax				;元素个数
	push offset g_stConstacts		;文件指针
	call crt_fread				;文件写入函数

	add esp,16
	
	push [ebp-8]
	call crt_fclose
	add esp,4
	
	
	
tiao:	
	
	mov esp,ebp
	pop ebp
	call MenuShell
	ret

ReadData endp


;入口函数main
.code
main:
	call ReadData
	call MenuShell
	call SwitchCase

	
end main

end

简单的窗口程序，带个按钮

.386 
.model flat,stdcall 
option casemap:none 
include windows.inc 
include user32.inc 
includelib user32.lib          				  ; calls to functions in user32.lib and kernel32.lib 
include kernel32.inc 	
includelib kernel32.lib 

WinMain proto :DWORD,:DWORD,:DWORD,:DWORD 

.DATA                    				 ; initialized data 
ClassName db "SimpleWinClass",0       			 ; the name of our window class 
AppName db "Our First Window",0       			 ; the name of our window 
szButton             db    	'button',0

szButtonText      db   		 '点我',0
StringShow 	  db 		'被点击了',0
.DATA?                					; Uninitialized data 
hInstance HINSTANCE ?       				 ; Instance handle of our program 
CommandLine LPSTR ? 
.CODE              					  ; Here begins our code 
start: 
invoke GetModuleHandle, NULL          			  ; get the instance handle of our program. 
                                                                       ; Under Win32, hmodule==hinstance mov hInstance,eax 
mov hInstance,eax 
invoke GetCommandLine                       			 ; get the command line. You don't have to call this function IF 
                                                                       ; your program doesn't process the command line. 
mov CommandLine,eax 
invoke WinMain, hInstance,NULL,CommandLine, SW_SHOWDEFAULT        ; call the main function 
invoke ExitProcess, eax                          		 ; quit our program. The exit code is returned in eax from WinMain. 

WinMain proc hInst:HINSTANCE,hPrevInst:HINSTANCE,CmdLine:LPSTR,CmdShow:DWORD 
    LOCAL wc:WNDCLASSEX                                            ; create local variables on stack 
    LOCAL msg:MSG 
    LOCAL hwnd:HWND 

    mov   wc.cbSize,SIZEOF WNDCLASSEX                   		; fill values in members of wc 
    mov   wc.style, CS_HREDRAW or CS_VREDRAW 
    mov   wc.lpfnWndProc, OFFSET WndProc 
    mov   wc.cbClsExtra,NULL 
    mov   wc.cbWndExtra,NULL 
    push  hInstance 
    pop   wc.hInstance 
    mov   wc.hbrBackground,COLOR_WINDOW+1 
    mov   wc.lpszMenuName,NULL 
    mov   wc.lpszClassName,OFFSET ClassName 
    invoke LoadIcon,NULL,IDI_APPLICATION 
    mov   wc.hIcon,eax 
    mov   wc.hIconSm,eax 
    invoke LoadCursor,NULL,IDC_ARROW 
    mov   wc.hCursor,eax 
    invoke RegisterClassEx, addr wc                       		; register our window class 
    invoke CreateWindowEx,NULL,\ 
                ADDR ClassName,\ 
                ADDR AppName,\ 
                WS_OVERLAPPEDWINDOW,\ 
                CW_USEDEFAULT,\ 
                CW_USEDEFAULT,\ 
                CW_USEDEFAULT,\ 
                CW_USEDEFAULT,\ 
                NULL,\ 
                NULL,\ 
                hInst,\ 
                NULL 
    mov   hwnd,eax 
     invoke CreateWindowEx,NULL,\

                               offset szButton,offset szButtonText,\

                              WS_CHILD or WS_VISIBLE,\

                             500,500,100,40,\

                             hwnd,1,hInst,NULL
    
    
    
    invoke ShowWindow, hwnd,CmdShow               		; display our window on desktop 
    invoke UpdateWindow, hwnd                                 	; refresh the client area 
	
    .WHILE TRUE                                                         ; Enter message loop 
                invoke GetMessage, ADDR msg,NULL,0,0 
                .BREAK .IF (!eax) 
                invoke TranslateMessage, ADDR msg 
                invoke DispatchMessage, ADDR msg 
   .ENDW 
    mov     eax,msg.wParam                                            ; return exit code in eax 
    ret 
WinMain endp 

WndProc proc hWnd:HWND, uMsg:UINT, wParam:WPARAM, lParam:LPARAM 
    .IF uMsg==WM_DESTROY                         	  	; if the user closes our window 
        invoke PostQuitMessage,NULL  				; quit our application 
        
    .ELSEIF uMsg==WM_COMMAND 
    	
    	invoke MessageBox,hWnd,offset StringShow,0,0       						
    .ELSE 
        invoke DefWindowProc,hWnd,uMsg,wParam,lParam     	; Default message processing 
        ret 
    .ENDIF 
    xor eax,eax 
    ret 
WndProc endp 

end start