几道汇编入门题目（二）

继上次的三道汇编编程练习，本篇博客同样会介绍三道汇编相关编程题目

 

---

 

1 用汇编语言编写一个子程序，根据入口参数AL为0、1、2，分别实现大写字母转换为小写，
小写字母转换成大写或大小写字母互换。然后再编写主程序，通过调用该子程序把键盘输入
的字符串mystring（长度不超过20Byte）作相应转换（具体何种转换可以让用户通过键盘
输入来选择），并输出到屏幕显示。

 

Solution Code:

data segment

    buffer     db 81

            db 0

            db 81 dup('$')

ends



stack segment

            dw    128    dup(0)

ends



code segment

assume CS:code, DS:data



main proc far

            mov ax, data

            mov ds, ax

            mov es, ax



            mov ah, 0ah

            mov dx, seg buffer

            mov ds, dx

            lea dx, buffer

            int 21h



getkey:     mov ah, 1

            int 21h



            lea bx, buffer+2    ;input string

            mov ch, 0

            mov cl, buffer+1



            call func             ;call function



            lea dx, buffer+2    ;output string

            mov ah, 09h

            int 21h



            mov ax, 4c00h

            int 21h

main endp



func proc near

each:

            cmp al, '0'

            je func0

            cmp al, '1'

            je func1

            cmp al, '2'

            je func2

func0:

            cmp [bx], 'Z'    ;Judge whether not abc

            jle endf

            sub [bx], 32

            jmp endf

func1:

            cmp [bx], 'a'    ;Jedge whether not ABC

            jge endf

            add [bx], 32

            jmp endf

func2:

            cmp [bx], 'Z'

            jg func0

            jmp func1

endf:

            inc bx

            loop each

            ret

func endp



ends

end main

---

2 用汇编语言编写一个子程序，把一个16位二进制数用十六进制形式在屏幕上显示出来，分别运用如下3种参数传递方法，并用一个主程序验证它。

（1）    采用AX寄存器传递这个16位二进制数；

（2）    采用wordTEMP变量传递这个16位二进制数；

（3）    采用堆栈方法传递这个16位二进制数。

 

其中第二小题没有写正确，先传上来吧 :(

 

data segment

    dig dw 1010100110100011B, '$'

    tmpdig db 00, 00, 00, 00, '$'

    displayword db "     $"

    pkey db "press any key...$"

ends



stack segment

    dw 128 dup(0)

ends



code segment

main proc far

    mov ax, data

    mov ds, ax

    mov es, ax



    mov ax, dig

    call axtr        ;by register AX

    

    lea dx, displayword

    mov ah, 9

    int 21h



    call wordtmp    ;by variable wordtmp

    

    lea dx, displayword

    mov ah, 9

    int 21h



    mov ax, dig

    push ax

    mov ax, 0

    call bystack    ;by stack method



    mov ax, 4c00h

    int 21h

main endp



axtr proc near



    mov cx, 4

    mov si, 3



funcax:

    mov bx, ax

    and bx, 000Fh

    cmp bx, 0009h    ;just cmp the last bit

    jg axchar        ;jmp to axchar if it's char

    add bx, 30h        ;for ascll adjust

    jmp axsolve



axchar:

    add bx, 37h



axsolve:

    mov dx, bx

    lea bx, tmpdig

    mov [bx+si], dl    ;store current bit result

    shr ax, 4

    dec si

    loop funcax



    lea dx, tmpdig    ;display

    mov ah, 9

    int 21h

    ret



axtr endp



wordtmp proc near



    mov ax, dig

    mov cx, 4

    mov si, 3



op2:

    mov bx, ax

    and bx, 000Fh

    cmp bx, 0009h

    ja gcc3

    add bx, 30h

    jmp gcc4



gcc3:

    add bx, 37h



gcc4:

    mov dx, bx

    lea bx, tmpdig

    mov [bx+si], dl

    shr ax, 4

    dec si

    loop op2



    lea dx, tmpdig

    mov ah, 9

    int 21h

    ret



wordtmp endp



bystack proc near

    

    push bp

    mov bp, sp

    mov ax, [bp+4]

    mov cx, 4

    mov si, 3



funcstack:

    mov bx, ax

    and bx, 000Fh

    cmp bx, 0009h

    jg stackchar

    add bx, 30h

    jmp stacksolve



stackchar:

    add bx, 37h



stacksolve:

    mov dx, bx

    lea bx, tmpdig

    mov [bx+si], dl

    shr ax, 4

    dec si

    loop funcstack



    lea dx, tmpdig

    mov ah, 9

    int 21h

    pop bp

    ret



bystack endp



ends

end main

---

3 设数据段事先定义了一个数组存放着30位学生的成绩（0~100），
编写子程序，统计0~59分，60~69分，70~79分，80~89分，90~100分的人数，
编写主程序在屏幕上输出等级和所对应人数，例如：

A：2    

B：11   

C：13   

D：3    

E：1    

 

本题还没有写完，先传上来吧 :(

 

data segment

    rst db 56, 69, 84, 82, 73, 88, 99, 63, 100, 80, '$'

    se db 0, '$'

    sd db 0, '$'

    sc db 0, '$'

    sb db 0, '$'

    sa db 0, '$'

data ends



code segment 

    assume cs:code, ds:data



start:

    mov ax, data

    mov dx, ax



    lea si, rst

    mov cx, 10



    ;lea bx, se

    ;add [bx], 1;

    ;mov ax, [bx];

    ;add ax, 30h



    ;mov ah, 02H

    ;mov dl, al

    ;int 21h



lop1:

    cmp [si], 60

    ;cmp byte ptr [si], 60

    jb five

    cmp [si], 70

    ;cmp byte ptr [si], 70

    jb six

    cmp [si], 80

    ;cmp byte ptr [si], 80

    jb seven

    cmp [si], 90

    ;cmp byte ptr [si], 90

    jb eight



    jmp nine



five:

    lea bx, se

    add [bx], 1;

    jmp lop



six:

    lea bx, sd

    add [bx], 1;

    jmp lop



seven:

    lea bx, sc

    add [bx], 1;

    jmp lop



eight:

    lea bx, sb

    add [bx], 1;

    jmp lop



nine:

    lea bx, sb

    add [bx], 1;

    jmp lop



lop:

    inc si

    loop lop1



display:

    lea bx, se

    add [bx], 30h

    mov ah, 02H

    mov dl, [bx]

    int 21h



    lea bx, sd

    add [bx], 30h

    mov ah, 02H

    mov dl, [bx]

    int 21h



    lea bx, sc

    add [bx], 30h

    mov ah, 02H

    mov dl, [bx]

    int 21h



    lea bx, sb

    add [bx], 30h

    mov ah, 02H

    mov dl, [bx]

    int 21h



    lea bx, sa

    add [bx], 30h

    mov ah, 02H

    mov dl, [bx]

    int 21h



    mov ah, 02H

    mov dl, '$'

    int 21h



exit:

    mov ah, 4ch

    int 21h



code ends

    end start