汇编各种编程代码

响铃 data segment N db flog dw flag dw count dw fre dw 50000 log dw 30000 str1 db the bell is ring data ends code segment CODE assume cs code ds data start mov ax data mov ds ax mov al 1ch mov ah 35h int 21h push es push bx push ds mov count 1 mov flag 0 lea dx ring mov ax seg ring mov ds ax mov al 1ch mov ah 25h int 21h pop ds in al 21h and al 11111110b out 21h al sti K0 cmp flag 1 Jnz K1 call sound lea dx str1 mov ah 9H int 21H mov flag 0 mov count 182 mov dl 0dh mov ah 2 int 21h mov dl 0ah mov ah 2 int 21h K1 mov ah 0bh int 21h cmp al 0 Jz K0 pop bx pop ds mov al 1ch mov ah 25h int 21h mov ah 4ch int 21h ring proc push ax push bx push dx push cx mov ax data mov ds ax dec count Jnz K7 mov flag 1 K7 pop cx pop dx pop bx pop ax iret ring endp sound proc push ax push cx push dx mov bx fre mov cx log mov dx cx in al 61h and al 0fch lk xor al 2 out 61h al mov cx bx lk1 loop lk1 dec dx jnz lk pop dx pop cx pop ax ret sound endp code ends end start 4 11 从键盘上输入一串一 为结 束符的字符串 然后对其中的非数值 字符计数 以十六进制形式输出显示 CODE SEGMENT ASSUME CS CODE START MOV BL 0 LOOP1 MOV AH 1 INT 21H CMP AL JE NEXT CMP AL 30H JB NEXT1 CMP AL 39H JBE LOOP1 NEXT1 INC BL JMP LOOP1 NEXT MOV CH 2 ROTATE MOV CL 4 ROL BL CL MOV DL BL AND DL 0FH ADD DL 30H CMP DL 3AH JL PRINTIT ADD DL 7 PRINTIT MOV AH 2 INT 21H DEC CH JNZ ROTATE mov ah 1 int 21h MOV AX 4C00H INT 21H CODE ENDS END START 4 12 从键盘上输入一串一回车符为结 束符的字符串 每输入一个大写字母 则将其转换成小写字母并转换成大写 字母显示 CODE SEGMENT ASSUME CS CODE START MOV AH 1 INT 21H CMP AL 0DH JE EXIT CMP AL 41H JB START CMP AL 5AH JBE NEXT1 CMP AL 61H JB START CMP AL 7AH JA START SUB AL 20H JMP NEXT2 NEXT1 ADD AL 20H NEXT2 MOV DL AL MOV AH 2 INT 21H JMP START EXIT mov ah 1 int 21h MOV AX 4C00H INT 21H CODE ENDS END START 4 15 从键盘输入一串以 回车符 为 结束标志的字符串 并按字母数字及 其他字符分类计数 然后显示这三类 计数值 DATA SEGMENT X DB 0 Y DB 0 Z DB 0 DATA ENDS CODE SEGMENT ASSUME DS DATA CS CODE START MOV AX DATA MOV DS AX LOOP1 MOV AH 1 INT 21H CMP AL 0DH JE NEXT CMP AL 30H JB NEXT3 CMP AL 39H JBE NEXT1 CMP AL 41H JB NEXT3 CMP AL 5AH JBE NEXT2 CMP AL 61H JB NEXT3 CMP AL 7AH JBE NEXT2 NEXT3 INC Z JMP LOOP1 NEXT2 INC Y JMP LOOP1 NEXT1 INC X JMP LOOP1 NEXT LEA SI X MOV AH 2 MOV DL 0AH INT 21H MOV DH 3 LOOP2 MOV BL SI MOV CH 2 ROTATE MOV CL 4 ROL BL CL MOV DL BL AND DL 0FH ADD DL 30H CMP DL 3AH JL PRINTIT ADD DL 7 PRINTIT MOV AH 2 INT 21H DEC CH JNZ ROTATE INC SI DEC DH JNZ LOOP2 mov ah 1 int 21h MOV AX 4C00H INT 21H CODE ENDS END START DATA SEGMENT DAT DB 0 BUF DB 0DH 0AH PLEASE INPUT NUMBER 0 6 DATA ENDS CODE SEGMENT CODE ASSUME CS CODE DS DATA START MOV AX DATA MOV DS AX MOV AH 0 MOV AL 3 INT 10H MOV AH 15 INT 10H MOV SI BX MOV AH 2 MOV DX 081EH INT 10H MOV AH 9 MOV AL MOV BL 05H MOV CX 10 INT 10H LOP INC DH MOV AH 9 MOV AL MOV BL 05H INT 10H MOV CX 1 CALL PLAY INC DL MOV AL DAT MOV CX 8 CALL PLAY MOV AL MOV DL 39 MOV CX 1 MOV BL 05H CALL PLAY INC DAT INC DAT MOV DL 30 CMP DAT 8 JBE LOP INC DH MOV AL MOV CX 10 MOV BL 05H CALL PLAY MOV AH 9 LEA DX BUF INT 21H MOV AH 1 INT 21H SUB AL 30H MOV AH 6 MOV BH 7 MOV CX 091FH MOV DX 0D26H INT 10H MOV AH 10 INT 21H MOV AH 4CH INT 21H PLAY PROC PUSH AX PUSH BX MOV BX SI MOV AH 2 INT 10H POP BX POP AX MOV AH 9 INT 10H RET PLAY ENDP CODE ENDS END START 5 4 用子程序结构从键盘输入一个十 进制数 对其开平方后将平方根和余 数以十进制显示 CODE SEGMENT ASSUME CS CODE START CALL DIB MOV AX BX CALL SQUR CALL CRLF MOV SI AX MOV BX CX CALL BID CALL CRLF MOV BX SI Call bid CALL CRLF MOV AX 4C00H INT 21H CRLF ENDP CODE ENDS END START 5 8 用子程序结构从键盘输入两个 2 位的十进制数 求出其和差 DATA SEGMENT INFO1 DB 0DH 0AH The sum is INF02 DB 0DH 0AH The difference is INF0 DB 0DH 0AH Please input a decimal DATA ENDS CODE SEGMENT ASSUME CS CODE DS DATA START MOV AX DATA MOV DS AX CALL DIB MOV AH BL CALL DIB MOV AL BL ADD BL AH LEA DX INF01 CALL BID MOV BL AL SUB BL AH JNS NEXT NEG BL MOV SI 1 NEXT LEA DX INF02 CALL BID MOV AX 4C00H INT 21H DIB PROC PUSH AX PUSH CX LEA DX INF0 MOV AH 9 INT 21H MOV BL 0 MOV CX 2 REP1 MOV AH 1 INT 21H SUB AL 30H JL EXIT1 CMP AL 9 JG EXIT1 XCHG AL BL MOV BH 10 MUL BH ADD BL AL LOOP REP1 EXIT1 POP CX POP AX RET DIB ENDP BID PROC PUSH AX MOV AH 9 INT 21H CMP SI 0 JZ NEXT2 MOV DL MOV AH