汇编小程序

;***********************************************************

 ;*性能度量

 ;***********************************************************


 ;***********************************************************

 ;*程序运行平台

 .386

 .MODEL FLAT,STDCALL

 OPTION CASEMAP:NONE

 ;***********************************************************



 ;***********************************************************

 ;*文件包含

 INCLUDE Irvine32.inc

 ;***********************************************************


 ;***********************************************************

 ;*数据段定义

 .data

 OUTER_LOOP_COUNT=3

 startTime DWORD ?

 msg1 BYTE "Please wait...",0dh,0ah,0

 msg2 BYTE "Elapsed milliseconds:",0

 ;***********************************************************


 ;***********************************************************

 ;代码段定义


 .code

 main proc

   mov edx,offset msg1;

   call WriteString;

   mov startTime,eax;

   mov ecx,OUTER_LOOP_COUNT

   ;执行循环

   L1:

      call innerLoop;

   loopd L1;

   ;显示用去的时间

   call GetMseconds;

   sub eax,startTime;

   mov edx,offset msg2;

   call WriteString;

   call WriteDec;

   call Crlf;

   exit

 main endp


 innerLoop proc

    push ecx;

    mov ecx,0ffffffffh

    L1:

       mov eax,ecx;

    loopd L1;

    pop ecx;

    ret;  

 innerLoop endp;

 end main
;***********************************************************


;**************************************************************
 ;*整数I/O
 ;**************************************************************

 ;**************************************************************
 ;*程序运行平台
 .386
 .model flat,stdcall
 option casemap:none
 ;**************************************************************


 ;**************************************************************
 ;文件包含
 INCLUDE Irvine32.inc
 ;**************************************************************

 ;**************************************************************
 ;*数据段定义
 .data
 arrayD DWORD 100h,2000h,3000h
 prompt1 BYTE "Enter a 32-bit signed integer:",0
 dwordval dword ?
 ;**************************************************************

 ;**************************************************************
 ;*代码段定义
 .code
 main proc 
   mov eax,yellow+(blue*16)
    call SetTextColor;
    call Clrscr
    ;设置文本时蓝底黄字
    mov esi,offset arrayD;
    mov ecx,LENGTHOF arrayD;
    mov ebx,TYPE arrayD
    call DumpMem;
    call Crlf;
    ;提示用户输入一个十进制整数
    mov edx,offset prompt1;
    call WriteString;
    call ReadInt;
    mov dwordval,eax;
    ;以十进制和十六进制和二进制数显示整数
    call Crlf;;换行
    call WriteInt;有符号数十进制格式显示
    call Crlf
    call WriteBin;以二进制显示
    call Crlf
    call WriteHex;以十六进制显示
    call Crlf
    call WaitMsg;
    ;将控制台设置为默认颜色
    mov eax,lightGray+(black*16)
    call SetTextColor;
    call Clrscr
    exit
 main endp 
 end main
 ;**************************************************************

;********************************************************************
 TITLE 随机整数
 ;********************************************************************

 ;********************************************************************
 ;*程序运行平台定义
 .386
 .MODEL FLAT,STDCALL
 OPTION CASEMAP:NONE
 ;********************************************************************

 ;********************************************************************
 ;*文件包含
 INCLUDE Irvine32.inc
 ;********************************************************************

 ;********************************************************************
 ;数据段定义
 .data
 TAB=9
 ;********************************************************************

 ;********************************************************************
 ;*代码段定义
 .code
 main proc
   ;初始化随机数发生器
   call Randomize;
   call Rand1;
   call Rand2;
   exit
 main endp


 Rand1 proc

 mov ecx,10;
 L1:
     CALL Random32
     CALL WriteInt
     MOV  al,TAB;
     CALL WriteChar    
     loop L1;
     CALL Crlf;
 ret    ;
 Rand1 endp;


 Rand2 proc
 mov ecx,10;
 L1:
   ;生成随机数
   call RandomRange;
   sub eax,50;
   call WriteInt;
   mov  al,TAB;
   call WriteChar;  
 loop L1;
 call Crlf;
 ret ;
 Rand2 endp;

 end main;
 ;********************************************************************
;*********************************************************
 TITLE 反转字符
 ;*********************************************************

 ;*********************************************************
 ;*程序要求的运行平台
 .386
 .MODEL FLAT,STDCALL
 OPTION CASEMAP:NONE
 ;*********************************************************

 ;*********************************************************
 ;*文件包含
 INCLUDE Irvine32.inc
 ;*********************************************************

 ;*********************************************************
 ;*数据段定义
 .data
 aName BYTE "Abraham Lincoln",0
 nameSize=$-(aName+1);
 ;*********************************************************

 ;*********************************************************
 ;*代码段定义
 .code
 main proc
    mov ecx,nameSize;
    mov esi,0
    ;将字符串压入堆栈
    L1:
       movzx eax,aName[esi];
       push eax;
       inc esi            
    loop L1;
    ;从堆栈中反弹出字符
    mov ecx,nameSize;重新设置循环次数
    mov esi,0
    L2:
      pop eax;
      mov aName[esi],al;
      inc esi;
    loop L2;
    mov edx,offset aName;
    call WriteString
    exit
 main endp
 end main
 ;*********************************************************

;**************************************************************
 TITLE 三个数相加
 ;**************************************************************

 ;**************************************************************
 ;*程序运行平台
 .386
 .MODEL FLAT,STDCALL
 OPTION CASEMAP:NONE
 ;**************************************************************

 ;**************************************************************
 ;*文件包含
 INCLUDE Irvine32.inc
 ;**************************************************************

 ;**************************************************************
 ;*数据段定义
 .DATA
 val1 BYTE 32h
 val2 BYTE 54h
 val3 BYTE 1ah;
 ;**************************************************************

 ;**************************************************************
 ;*数据段定义
 .CODE
 main proc
   ;函数通过寄存器传递
   XOR EAX,EAX
   XOR EBX,EBX
   XOR EDX,EDX
   MOVZX EAX,val1;
   MOVZX EBX,val2;
   MOVZX EDX,val3
   CALL SumProc
   ;结果存放在edx当中  
   CALL DumpRegs
   exit  
 main endp
 ;--------------------------------------------------------------
 ;SumProc PROC
 ;将EAX,EBX,EDX三个数相加，结果存放在EAX当中
 ;Receives:接收参数
 ;Returns:EAX=SUM
 ;--------------------------------------------------------------
 SumProc proc
   ADD EAX,EBX;
   ADD EAX,EDX;
   RET
 SumProc endp
 end main
 ;**************************************************************


;**************************************************
 TITLE 程序函数调用
 ;**************************************************

 ;**************************************************
 ;程序运行平台要求
 .386
 .MODEL FLAT,STDCALL
 OPTION CASEMAP:NONE
 ;**************************************************

 ;**************************************************
 ;文件包含
 INCLUDE Irvine32.inc
 ;**************************************************


 ;**************************************************
 ;*数据段定义
 .DATA
 msg1 BYTE "The First Function",0dh,0ah,0
 msg2 BYTE "The second Function",0dh,0ah,0
 msg3 BYTE "The Third Function",0dh,0ah,0
 ;**************************************************


 ;**************************************************
 ;*代码段的定义
 .CODE
 main proc
    call function1;
    exit;   
 main endp
 function1 proc
    mov edx,offset msg1;
    call WriteString;
    call function2
    ret
 function1 endp
  
 function2 proc
    mov edx,offset msg2;
    call WriteString;
    ret;
 function2 endp

 function3 proc
    mov edx,offset msg3;
    call WriteString;
    ret;
 function3 endp;
 end main
 ;**************************************************

;************************************************************************
 TITLE 数组求和过程函数化
 ;************************************************************************

 ;************************************************************************
 ;*程序运行平台要求
 .386
 .MODEL FLAT,STDCALL
 OPTION CASEMAP:NONE
 ;************************************************************************

 ;************************************************************************
 ;*文件包含
 INCLUDE Irvine32.inc
 ;************************************************************************


 ;************************************************************************
 ;*数据段定义
 .DATA
 bwarn byte "the Result is ",0;
 array1 BYTE 25h,43h,76h,78h,89H
 array2 BYTE 32h,43h,43h,67h
 bEnter byte 0dh,0ah,0;
 ;************************************************************************

 ;************************************************************************
 ;*代码段定义
 .CODE
 main proc
    ;输出提示信息
    mov edx,offset bwarn;  
    call WriteString;
    mov esi,offset array1;
    mov ecx,sizeof array1;
    call SumProc;
    call WriteHex
    ;输出换行
    mov edx,offset bEnter
    call WriteString;
    ;输出提示信息
    mov edx,offset bwarn;  
    call WriteString;   
    mov esi,offset array2;
    mov ecx,SIZEOF array2;
    call SumProc;
    call WriteHex
    ;输出换行
    mov edx,offset bEnter
    call WriteString;
    exit
 main endp

 SumProc proc USES ESI EAX 
    ;eax存放结果，首先清零
    xor eax,eax
    ;数组索引置零
    xor ebx,ebx;
    L1:
       add al,[esi+ebx]
       ;检测是否产生了进位
       JC CF;
       JMP NCF;
       CF:
             inc ah;
       NCF:
             inc ebx
    loop L1;
    ret;
 SumProc endp

 end main
 ;************************************************************************;************************************************************************
 TITLE 数组求和过程函数化
 ;************************************************************************

 ;************************************************************************
 ;*程序运行平台要求
 .386
 .MODEL FLAT,STDCALL
 OPTION CASEMAP:NONE
 ;************************************************************************

 ;************************************************************************
 ;*文件包含
 INCLUDE Irvine32.inc
 ;************************************************************************


 ;************************************************************************
 ;*数据段定义
 .DATA
 bwarn byte "the Result is ",0;
 array1 BYTE 25h,43h,76h,78h,89H
 array2 BYTE 32h,43h,43h,67h
 bEnter byte 0dh,0ah,0;
 ;************************************************************************

 ;************************************************************************
 ;*代码段定义
 .CODE
 main proc
    ;输出提示信息
    mov edx,offset bwarn;  
    call WriteString;
    mov esi,offset array1;
    mov ecx,sizeof array1;
    call SumProc;
    call WriteHex
    ;输出换行
    mov edx,offset bEnter
    call WriteString;
    ;输出提示信息
    mov edx,offset bwarn;  
    call WriteString;   
    mov esi,offset array2;
    mov ecx,SIZEOF array2;
    call SumProc;
    call WriteHex
    ;输出换行
    mov edx,offset bEnter
    call WriteString;
    exit
 main endp

 SumProc proc USES ESI EAX 
    ;eax存放结果，首先清零
    xor eax,eax
    ;数组索引置零
    xor ebx,ebx;
    L1:
       add al,[esi+ebx]
       ;检测是否产生了进位
       JC CF;
       JMP NCF;
       CF:
             inc ah;
       NCF:
             inc ebx
    loop L1;
    ret;
 SumProc endp

 end main
 ;************************************************************************

USES指令一般是和PROC指令一起被使用的，该指令的作用是，我么可以指定某几个寄存器在函数调用过程中，可以被自由使用，在函数结尾，改寄存器的值，被恢复

比如说USES ECX EDX

那么在函数开始会将这几个寄存器的值压入堆栈，然后再函数返回之前，将这几个寄存器恢复到原来的值（也就是说弹出堆栈）

在此记录下一个小常识，就是JMP后面的指令是目的地址距离当前位置的偏移量，向后则是正数，向前则是负数（使用补码表示）