汇编语言程序设计：[6]数字方阵

1、打开masm汇编编译程序，新建一个masm源文件脚本。

DATAS SEGMENT

    ;此处输入数据段代码  

DATAS ENDS

STACKS SEGMENT

    ;此处输入堆栈段代码

STACKS ENDS

CODES SEGMENT

    ASSUME CS:CODES,DS:DATAS,SS:STACKS

START:

    MOV AX,DATAS

    MOV DS,AX

    ;此处输入代码段代码

    MOV AH,4CH

    INT 21H

CODES ENDS

    END START

2、在正文中输入我们的程序代码，并将文件命名为fangzhen.asm

data  segment

buf1  db '1  2  38  9  47  6  5'

buf2  db '1  2  3  412 13 14 511 16 15 610 9  8  7'

buf3  db '1  2  3  4  516 17 18 19 615 24 25 20 714 23 22 21 813 12 11 10 9'

dbuf  db 14 dup(?)

i1    db 0dh,0ah,'xiaobo welcome you !***** Designed by 1wangxiaobo@163.com'

      db 0dh,0ah,'input q to exit'

      db 0dh,0ah,'Please input a number(3--5):','$'

i2    db 0dh,0ah,'input error,please reinput!','$'

n     db ?

b     db 1

data  ends

stack segment

      db 100 dup(?)

stack ends

code  segment

      assume ds:data,cs:code,ss:stack

main: 

      mov ax,data

      mov ds,ax

      call clear

lop:  lea dx,i1

      mov ah,9

      int 21h

      mov ah,1

      int 21h

      cmp al,'q'

      jz quit

      lea si,buf1

      mov n,7

      mov cl,3

      call clear

      cmp al,'3'

      jz  s

      lea si,buf2

      mov n,10

      mov cl,4

      cmp al,'4'

      jz  s

      lea si,buf3

      mov cl,5

      mov n,13

      cmp al,'5'

      jz s

      lea dx,i2

      mov ah,9

      int 21h

      call clear

      jmp lop

s:    

      mov bl,n

      lea di,dbuf

l:    mov al,[si]

      mov [di],al

      inc si

      inc di

      dec bl

      jne l

      mov [di],byte ptr '$'

      mov ah,2

      mov dh,b

      mov dl,0

      int 10h

      lea dx,dbuf

      mov ah,9

      int 21h

      inc b

      loop s

      

      jmp lop

quit: mov ah,4ch

      int 21h

;***清屏***

clear proc near

      push ax

      push bx

      push cx

      push dx

      mov  ah,6

      mov al,0

      mov ch,0

      mov cl,0

      mov dh,24

      mov dl,79

      mov bh,7

      int 10h

      pop dx

      pop cx

      pop bx

      pop ax

      ret

clear endp

code  ends

      end main

3、运行我们编辑的文件,输入3 4 产生相应的数字的方阵 输入 退出程序  可以实现清屏显示程序