前文
[085][汇编语言]课程设计2 ：（1）从软盘启动，开机后主界面，列出选项
https://www.jianshu.com/p/0a99d34113c0
[086][汇编语言]课程设计2 ：（2）从软盘启动，功能化选项按键 "1"（测试版）
https://www.jianshu.com/p/bfe3c83359e8
[087][汇编语言]课程设计2 ：（3）从软盘启动，功能化选项按键 "3"，F1键改显示颜色、ESC键返回主选单（测试版）
https://www.jianshu.com/p/6adb66c62b81
[088][汇编语言]课程设计2 ：（4）动态显示当前时间（动态时钟） F1键改显示颜色 ESC键返回（测试版）
https://www.jianshu.com/p/f470d973de1e
课程设计2 ：（5）进入选项4，输入字符串，同步显示（测试版）
- 新增：进入选项4，输入字符串可以同步显示（尚未完成时间修改的功能）
1、从主选单，按下按键4，进入选项4；
2、输入字符串，可以同步显示；
3、按下 Backpace 退格键可以删除字符；
4、按下Enter 键返回到主选单；
运行测试
![[090][汇编语言]课程设计2 ：（5）进入选项4，输入字符串，同步显示（测试版）_第1张图片](http://img.e-com-net.com/image/info10/430f251ec5a6465e8df956aad925a4da.jpg)
进入选项4） 输入字符串立刻显示 按下 Enter 键返回到主选单.png
代码修改：taskcode.asm文件 task 功能程序部分
- 增加入口
key4: call setclock
jmp short taskstart
- 新增 子程序 setclock
;--------------------------------------------------------------
setclock: call clear_screen
call clear_stack
call getstr
ret
clear_stack: push di
push bx
mov di,offset top - offset task + 7E00H
mov bx,0
mov ds:[di],bx
pop di
pop bx
ret
;--------------------------------------------------------------
; 子程序： 字符串输入
;（1）、调用16H读取键盘输入
;（2）、如果是字符，进入字符栈，显示字符栈中的所有字符；继续执行 （1）
;（3）、如果是退格键，从字符栈中弹出一个字符，显示字符栈中的所有字符来，继续执行（1）
;（4）、如果是enter键，向字符栈中压入一个0，返回。
;--------------------------------------------------------------
getstr: push ax
getstrs: mov ah,0
int 16H
cmp al,20H
jb nochar ; ASCII码小于20H，说明不是字符
mov ah,0
call charstack ;字符入栈
mov ah,2
call charstack ;显示栈中的字符
jmp getstrs
nochar: cmp ah,0eh ;退格键的扫描码
je backspace
cmp ah,1ch ;Enter键的扫描码
je enter2
jmp getstrs
backspace: mov ah,1
call charstack ;字符出栈
mov ah,2
call charstack ;显示栈中的字符
jmp getstrs
enter2: mov al,0
mov ah,0
call charstack ;0 入栈
mov ah,2
call charstack ;显示栈中的字符
pop ax
ret
;--------------------------------------------------------------
; 字符栈的入栈、出栈和显示
; 参数： （ah）=功能号，0表示入栈，1表示出栈，2表示显示
; ds:si 指向字符栈空间
; 对于0号功能，（al）=入栈字符
; 对于1号功能，（al）=返回字符串
; 对于2号功能，（dh）、（dl）=字符串在屏幕上显示的行、列位置
;--------------------------------------------------------------
charstack: jmp short charstart
table dw offset charpush - offset task + 7E00H,offset charpop - offset task + 7E00H,offset charshow - offset task + 7E00H
top dw 0 ;栈顶
timestack db 12 dup(0)
charstart: push bx
push dx
push di
push es
push bp
cmp ah,2
ja sret
mov bl,ah
mov bh,0
add bx,bx
mov di,offset table - offset task + 7E00H
jmp word ptr ds:[di+bx]
;--------------------------------------------------------------
charpush: mov di,offset top - offset task + 7E00H
mov bx,ds:[di]
mov si,offset timestack - offset task + 7E00H
mov ds:[si][bx],al
inc bx
mov ds:[di],bx
jmp sret
;--------------------------------------------------------------
charpop: mov di,offset top - offset task + 7E00H
mov bx,ds:[di]
cmp bx,0
je sret
dec bx
mov ds:[di],bx
mov bx,ds:[di]
mov si,offset timestack - offset task + 7E00H
mov al,ds:[si][bx]
jmp sret
;--------------------------------------------------------------
charshow: mov di,160*10+20*2
mov bx,0
charshows: mov bp,offset top - offset task + 7E00H
cmp bx,ds:[bp]
jne noempty
mov byte ptr es:[di],' '
jmp sret
noempty: mov si,offset timestack - offset task + 7E00H
mov al,ds:[si][bx] ; bx = 0 表示栈底
mov es:[di],al
mov al,02H
mov es:[di+1],al ; 设置颜色属性 为绿色
mov byte ptr es:[di+2],' '
inc bx
add di,2
jmp charshows
;--------------------------------------------------------------
sret: pop bp
pop es
pop di
pop dx
pop bx
ret
;--------------------------------------------------------------
完整源码
bootcode.asm 不做修改 参见
https://www.jianshu.com/p/f470d973de1e
taskcode.asm ： 尚未功能化对时间的修改
assume cs:code
data segment
db 1024 dup (0)
data ends
code segment
start:
call setup
call write
mov ax,4c00h
int 21H
setup:
; 任务程序 安装步骤
; 将任务程序机器码安装到data段开辟的内存空间
mov ax,cs
mov ds,ax
mov si, offset task
mov ax,data
mov es,ax
mov di,0
mov cx,offset taskend - offset task
cld
rep movsb
ret
write:
; 利用 int 13H 中断
; 将内存 data 处的任务程序
; 写入 软盘A 0面 0道 2扇区
mov ax,data
mov es,ax
mov bx,0
mov al,2 ; 扇区数
mov ch,0
mov cl,2
mov dl,0
mov dh,0
mov ah,3
int 13h
ret
;--------------------------------------------------------------
; 任务程序 开始
; 任务程序 从 标号 task 开始 到 标号 taskend 结束
;--------------------------------------------------------------
task: jmp short taskstart
menu_1 db '1) reset pc',0
menu_2 db '2) start system',0
menu_3 db '3) clock',0
menu_4 db '4) set clock',0
menu_address dw offset menu_1 - offset task + 7E00H
dw offset menu_2 - offset task + 7E00H
dw offset menu_3 - offset task + 7E00H
dw offset menu_4 - offset task + 7E00H
;stack db 50 dup(0)
time db 9,8,7,4,2,0
blank db '// ::'
adddata dw 0,0
aESC db 0
taskstart:
call init_reg
call clear_screen
call toppage
jmp short key_toppage
mov ax,4c00h
int 21H
;--------------------------------------------------------------
; 选项控制: key_toppage
; 功能: 针对首页 toppage 的键盘操作
; 实现： 使用 BIOS int 16h 0号功能，读取一个键盘输入
; 返回值 (ah) = 扫描码 , (al) = ASCII码
; 键 1 2 3 4
; 扫描码 02 03 04 05
;--------------------------------------------------------------
key_toppage: mov ah,0
int 16h
cmp ah,02H
je key1
cmp ah,03h
je key2
cmp ah,04h
je key3
cmp ah,05h
je key4
; 本意是，这时候读取的输入，如果不是1234就忽略，再读取一个
jmp short key_toppage
key1: call test1
jmp short taskstart
key2:
key3: call clock
jmp short taskstart
key4: call setclock
jmp short taskstart
;--------------------------------------------------------------
test1: call clear_screen
mov di,160*12+40*2
mov al,03H
mov byte ptr es:[di],'t'
mov byte ptr es:[di+1],al
mywait: mov ah,0
int 16H
cmp ah,3BH ; 3BH : F1键扫描码
je ok
jmp short mywait
ok: ret
;--------------------------------------------------------------
; 子程序：clock
; 功能： 循环显示当前时间
; F1键-改变显示颜色
; ESC键-返回到主选单
;--------------------------------------------------------------
clock: call clear_screen
call clockstart
ret
;--------------------------------------------------------------
; 子程序：clockstart
; 功能： 循环显示当前时间
;--------------------------------------------------------------
clockstart: ;ds = 0
push bx
push ax
; (int 9H)1、将原始的int 9H 入口地址保存到新开辟的 adddata 表中，
; 以便日后模拟指令的调用和还原；
mov bx,offset adddata - offset task + 7E00H
push ds:[9*4]
pop ds:[bx]
push ds:[9*4+2]
pop ds:[bx+2]
; (int 9H)2、设置新的int 9H 的入口地址；
cli ; TF = 0
mov word ptr ds:[9*4],offset int9 - offset task + 7E00H
mov word ptr ds:[9*4+2],cs
sti ; TF = 1
mov bx,offset aESC - offset task + 7E00H
mov byte ptr ds:[bx],0
mov ah,'a'
dateloop: call date
mov al,ds:[bx]
cmp al,01H
je clockend
call delay
cmp ah,'z'
jna dateloop
clockend: ; (int 9H)5、还原原始的int 9H 入口地址；
mov bx,offset adddata - offset task + 7E00H
cli ; TF = 0
push ds:[bx]
pop ds:[9*4]
push ds:[bx+2]
pop ds:[9*4+2]
sti ; TF = 1
pop ax
pop bx
ret
;--------------------------------------------------------------
delay: push ax
push dx
mov dx,0003H
mov ax,0
s1: sub ax,1
sbb dx,0
cmp ax,0
jne s1
cmp dx,0
jne s1
pop dx
pop ax
ret
;--------------------------------------------------------------
int9: push bx
in al,60H
pushf
pushf
pop bx
and bh,11111100B
push bx
popf
; (int 9H)3、模拟对原始 int 9H 指令的调用；
mov bx,offset adddata - offset task + 7E00H
call dword ptr ds:[bx]
; (int 9H)4、编写代码，实现指定按键的功能；
cmp al,01H ; ESC
jne maybeF1
mov bx,offset aESC - offset task + 7E00H
mov ds:[bx],al
maybeF1: cmp al,3BH ; F1
jne int9ret
call changcolor
int9ret: pop bx
iret
;--------------------------------------------------------------
; 子程序：changcolor
; 功能： 改变显示颜色
;--------------------------------------------------------------
changcolor: push cx
push bx
mov bx,1
mov cx,2000
colors: inc byte ptr es:[bx]
add bx,2
loop colors
pop bx
pop cx
ret
;--------------------------------------------------------------
; 子程序：date
; 功能： 显示当前时间
;--------------------------------------------------------------
date:
push di
push si
push cx
push ax
mov di,160*12+40*2
mov si,offset time - offset task + 7E00H
mov cx,6
showdate: push cx
mov al,[si]
out 70H,al
in al,71H
mov ah,al
mov cl,4
shr ah,cl
and al,00001111B
add ah,30H
add al,30H
mov byte ptr es:[di],ah
mov byte ptr es:[di+2],al
add di,6
inc si
pop cx
loop showdate
mov di,160*12+40*2
mov si,offset blank - offset task + 7E00H
mov cx,5
showblank: push cx
mov al,[si]
mov byte ptr es:[di+4],al
add di,6
inc si
pop cx
loop showblank
dateend: pop ax
pop cx
pop si
pop di
ret
;--------------------------------------------------------------
setclock: call clear_screen
call clear_stack
call getstr
ret
clear_stack: push di
push bx
mov di,offset top - offset task + 7E00H
mov bx,0
mov ds:[di],bx
pop di
pop bx
ret
;--------------------------------------------------------------
; 子程序： 字符串输入
;（1）、调用16H读取键盘输入
;（2）、如果是字符，进入字符栈，显示字符栈中的所有字符；继续执行 （1）
;（3）、如果是退格键，从字符栈中弹出一个字符，显示字符栈中的所有字符来，继续执行（1）
;（4）、如果是enter键，向字符栈中压入一个0，返回。
;--------------------------------------------------------------
getstr: push ax
getstrs: mov ah,0
int 16H
cmp al,20H
jb nochar ; ASCII码小于20H，说明不是字符
mov ah,0
call charstack ;字符入栈
mov ah,2
call charstack ;显示栈中的字符
jmp getstrs
nochar: cmp ah,0eh ;退格键的扫描码
je backspace
cmp ah,1ch ;Enter键的扫描码
je enter2
jmp getstrs
backspace: mov ah,1
call charstack ;字符出栈
mov ah,2
call charstack ;显示栈中的字符
jmp getstrs
enter2: mov al,0
mov ah,0
call charstack ;0 入栈
mov ah,2
call charstack ;显示栈中的字符
pop ax
ret
;--------------------------------------------------------------
; 字符栈的入栈、出栈和显示
; 参数： （ah）=功能号，0表示入栈，1表示出栈，2表示显示
; ds:si 指向字符栈空间
; 对于0号功能，（al）=入栈字符
; 对于1号功能，（al）=返回字符串
; 对于2号功能，（dh）、（dl）=字符串在屏幕上显示的行、列位置
;--------------------------------------------------------------
charstack: jmp short charstart
table dw offset charpush - offset task + 7E00H,offset charpop - offset task + 7E00H,offset charshow - offset task + 7E00H
top dw 0 ;栈顶
timestack db 12 dup(0)
charstart: push bx
push dx
push di
push es
push bp
cmp ah,2
ja sret
mov bl,ah
mov bh,0
add bx,bx
mov di,offset table - offset task + 7E00H
jmp word ptr ds:[di+bx]
;--------------------------------------------------------------
charpush: mov di,offset top - offset task + 7E00H
mov bx,ds:[di]
mov si,offset timestack - offset task + 7E00H
mov ds:[si][bx],al
inc bx
mov ds:[di],bx
jmp sret
;--------------------------------------------------------------
charpop: mov di,offset top - offset task + 7E00H
mov bx,ds:[di]
cmp bx,0
je sret
dec bx
mov ds:[di],bx
mov bx,ds:[di]
mov si,offset timestack - offset task + 7E00H
mov al,ds:[si][bx]
jmp sret
;--------------------------------------------------------------
charshow: mov di,160*10+20*2
mov bx,0
charshows: mov bp,offset top - offset task + 7E00H
cmp bx,ds:[bp]
jne noempty
mov byte ptr es:[di],' '
jmp sret
noempty: mov si,offset timestack - offset task + 7E00H
mov al,ds:[si][bx] ; bx = 0 表示栈底
mov es:[di],al
mov al,02H
mov es:[di+1],al ; 设置颜色属性 为绿色
mov byte ptr es:[di+2],' '
inc bx
add di,2
jmp charshows
;--------------------------------------------------------------
sret: pop bp
pop es
pop di
pop dx
pop bx
ret
;--------------------------------------------------------------
;--------------------------------------------------------------
; 子程序: toppage
; 功能： 在首页列出4个选项
;--------------------------------------------------------------
toppage: push bx
push di
push cx
push ax
push ds
push es
push si
mov bx, offset menu_address - offset task + 7E00H
mov di,160*8+25*2
mov cx,4 ; 主页显示 4行 功能选项
mov ax,0
mov ds,ax
mov ax,0B800H
mov es,ax
showtoppage: mov si,ds:[bx]
call oneline
add bx,2
add di,160
loop showtoppage
pop si
pop es
pop ds
pop ax
pop cx
pop di
pop bx
ret
oneline: push cx
push di
push si
onelines: mov cl,ds:[si]
mov ch,0
jcxz onelineok
mov byte ptr es:[di],cl
mov ch,02H
mov byte ptr es:[di+1],ch
inc si
add di,2
jmp short onelines
onelineok: pop si
pop di
pop cx
ret
;--------------------------------------------------------------
;--------------------------------------------------------------
; 常用子程序集合 开始
;--------------------------------------------------------------
; 子程序: clear_screen
; 功能: 清屏，将显存中当前屏幕中的字符设为空格符
;--------------------------------------------------------------
clear_screen: push bx
push cx
push es
push ax
mov bx,0B800H
mov es,bx
mov bx,0
mov cx,2000
mov ah,'a'
mov al,00000111B ;黑底白字
clear_screens: mov byte ptr es:[bx],ah
mov byte ptr es:[bx+1],al
add bx,2
loop clear_screens
pop ax
pop es
pop cx
pop bx
ret
;--------------------------------------------------------------
; 子程序：init_reg
; 功能： 寄存器设置
;--------------------------------------------------------------
init_reg: mov ax,0
mov ds,ax
mov ax,0B800H
mov es,ax
ret
;--------------------------------------------------------------
;--------------------------------------------------------------
; 常用子程序集合 结束
;--------------------------------------------------------------
taskend: nop
;--------------------------------------------------------------
; 任务程序结束
;--------------------------------------------------------------
code ends
end start
代码说明
字符串显示代码
- 代码参考：字符串显示
https://www.jianshu.com/p/93559ebe0445
-
代码修改思路
![[090][汇编语言]课程设计2 ：（5）进入选项4，输入字符串，同步显示（测试版）_第2张图片](http://img.e-com-net.com/image/info10/b400a3ce18684fdf87d054b64e45a152.jpg)
字符串显示代码修改思路 表 table top timestack 以及 charpush.PNG
![[090][汇编语言]课程设计2 ：（5）进入选项4，输入字符串，同步显示（测试版）_第3张图片](http://img.e-com-net.com/image/info10/0099c53dce704f88bde566dc9ee62cc6.jpg)
字符串显示代码修改思路 charpop charshow.PNG
主要是对 charstack 开始的部分做一些修改，把地址标号 table以及top 等结合功能代码的安装地址0000:7E00H，给替换成固定的内存地址。
图片显示的修改思路掺杂了很多伪代码，具体实现以【完整源码】部分为准。