前文
[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
[090][汇编语言]课程设计2 ：（5）进入选项4，输入字符串，同步显示（测试版）
https://www.jianshu.com/p/f9df61506e7b
课程设计2 ：（6）完成选项4功能，对系统时间进行修改（测试版）
- 新增：完全功能化选项4），可以对系统时间进行修改；
[测试步骤]
1、 来到主选单，按下按键3，进入选项3，查看当前系统时间，记为原始时间；
2、在选项3）中，通过按下按键ESC返回到主选单；
3、回到主选单后，按下按键4，进入选项4；
4、通过键盘输入 新的时间数据 150923074826（中间不含空格），
代表时间 15年09月23日07时48分26秒；
5、输入结束后，按下 Enter 键表示确认，随即再次返回到主选单；
6、再次回到主选单后，按下按键3，进入选项3），查看系统时间是否被修改。
由于选项3）提供的是动态时钟，
再次进入选项3）看到的时间一定和输入的时间数据有差别，
注意自己操作的用时，不要间隔太久。
测试运行
①从主选单，进行选项3 查看当前时间，显示时间 18/05/15 16:42:21.png
②回到主选单，进入选项4 修改时间 为15/09/23 07:48:26.png
③再次返回到主选单后 重新进入 选项3 查看当前时间 系统时间被顺利修改.png
代码修改：修改taskcode.asm文件 task部分
- 选项4），setclock 子程序中增加 修改时钟子程序 changeclock的调用
;--------------------------------------------------------------
; 选项 4）
;--------------------------------------------------------------
; 子程序：setclock
; 功能： 选项 4）的入口
;--------------------------------------------------------------
setclock: call clear_screen
call clear_stack
call getstr
call changeclock
ret
- 子程序：changeclock ，根据键盘输入，利用CMOS RAM 70H、71H端口 修改系统时间
;--------------------------------------------------------------
; 子程序：changeclock
; 功能： 修改系统时间
; 实现： 利用CMOS RAM端口70H、71H向对应单元送入时间数据
;--------------------------------------------------------------
changeclock: jmp short clockon
unit db 9,8,7,4,2,0
;timestack db 13 dup(0) ; 年月日 时分秒 + 0（最后压入）
clockon: push si
push bx
push cx
push ax
mov si,offset timestack - offset task + 7E00H
mov bx,offset unit - offset task + 7E00H
mov cx,6
clockonloop: push cx
mov al,ds:[si]
sub al,30H
mov cl,4
shl al,cl
mov ah,ds:[si+1]
sub ah,30H
add ah,al
mov al,ds:[bx] ; 取单元号
out 70H,al
mov al,ah ; 将单元号送入 CMOS RAM
out 71H,al ; 向指定单元号写入数据
inc bx
add si,2
pop cx
loop clockonloop
pop ax
pop cx
pop bx
pop si
ret
;--------------------------------------------------------------
- timestack 需要13个字节来存时间数据
位于标号 charstack
timestack db 13 dup(0) ; 年月日 时分秒 + 0（最后压入）
在changeclock子程序中需要用到timestack计算偏移地址，
但是timestack是放在charstack子程序里的，不要遗漏
完整源码
bootcode.asm 不做修改 ，参见
taskcode.asm : 增加子程序 changeclock
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
;--------------------------------------------------------------
; 选项 4）
;--------------------------------------------------------------
; 子程序：setclock
; 功能： 选项 4）的入口
;--------------------------------------------------------------
setclock: call clear_screen
call clear_stack
call getstr
call changeclock
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
;--------------------------------------------------------------
; 子程序：changeclock
; 功能： 修改系统时间
; 实现： 利用CMOS RAM端口70H、71H向对应单元送入时间数据
;--------------------------------------------------------------
changeclock: jmp short clockon
unit db 9,8,7,4,2,0
;timestack db 13 dup(0) ; 年月日 时分秒 + 0（最后压入）
clockon: push si
push bx
push cx
push ax
mov si,offset timestack - offset task + 7E00H
mov bx,offset unit - offset task + 7E00H
mov cx,6
clockonloop: push cx
mov al,ds:[si]
sub al,30H
mov cl,4
shl al,cl
mov ah,ds:[si+1]
sub ah,30H
add ah,al
mov al,ds:[bx] ; 取单元号
out 70H,al
mov al,ah ; 将单元号送入 CMOS RAM
out 71H,al ; 向指定单元号写入数据
inc bx
add si,2
pop cx
loop clockonloop
pop ax
pop cx
pop bx
pop si
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 13 dup(0) ; 年月日 时分秒 + 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
;--------------------------------------------------------------
; 选项4） 结束
;--------------------------------------------------------------
;--------------------------------------------------------------
; 子程序: 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
代码说明
CMOS RAM 端口 70H、71H 读写方法
通过 CMOS RAM，9,8,7,4,2,0单元为系统时间年/月/日 时:分:秒
左移指令 shl
如何对系统时间进行修改
1、在字符串输入
子程序 getstr返回后，由键盘输入的时间数据被存在表 timestack之中timestack db 13 dup(0) ; 年月日 时分秒 + 0（最后压入）;2、存在
表 timestack之中的是表示时间值的ASCII码，要得到时间的数值需要减去30H，使用sub指令；-
3、以输入时间数据
150923074826（表示 15年09月23日 07时48分26秒）举例，通过键盘输入后，按下Enter键，存到表 timestack 中的是表示时间数据的ASCII码
存在 表 timestack 中的是表示时间数据的ASCII码.PNG -
4、以
15年这个单元展开说明，子程序 changeclock是如何修改系统时间的
以 15年 这个单元进行展开说明.PNG
1 5 0 9 2 3 0 7 4 8 2 6
15 09 23 07 48 26
15年 09月 23日 07时 48分 26秒
一、时间数据来源是通过键盘输入之后，存于表 timestack 中的表示时间数值的ASCII码；
二、减去30H，就可以得到数值真正的码值，比如 1 的ASCII码是 31H，减去30H后得到 1H；
三、每2个ASCII码分别组成一个单元的 十位数以及个位数（通过移位操作以及加法组合而来）；
四、全部的时间需要6个单元，分别是年单元、月单元、日单元、时单元、分单元、秒单元；
五、这些单元在CMOS RAM中的单元号分别是 9,8,7,4,2,0；
六、最后通过 CMOS RAM 端口70H、71H 结合上面的单元号来修改系统时间。
