mirror of
https://gitee.com/gfdgd-xi/deep-wine-runner
synced 2025-01-27 00:18:09 +08:00
171 lines
2.8 KiB
NASM
171 lines
2.8 KiB
NASM
mov ax,0xb800
|
||
mov es,ax
|
||
; 清屏
|
||
mov cx,80*25
|
||
clean:
|
||
mov di,cx
|
||
add di,di
|
||
mov byte [es:di],''
|
||
add di,1
|
||
mov byte [es:di],0x0F
|
||
loop clean
|
||
; 显示上方白条
|
||
; 移除(0,0)的S字符
|
||
mov byte [es:0x00],''
|
||
mov cx,80*2-1
|
||
mov di,0
|
||
headtitle:
|
||
mov di,cx
|
||
mov byte [es:di],0xF0
|
||
; 写入空字符
|
||
add di,di
|
||
mov byte [es:di],''
|
||
;inc cx
|
||
;sub cx,1
|
||
loop headtitle
|
||
|
||
mov di,0
|
||
mov cx,80*2-1
|
||
; 显示下方白条
|
||
tailtitle:
|
||
mov di,cx
|
||
add di,80*2*24
|
||
mov byte [es:di],0xF0
|
||
; 写入空字符
|
||
mov di,cx
|
||
add di,di
|
||
add di,80*2*24
|
||
mov byte [es:di],''
|
||
loop tailtitle
|
||
; 在第一行写入文本 Hello World!
|
||
jmp near showHeadText
|
||
headText: db 'Hello World!'
|
||
showHeadText:
|
||
; 虽然可以简单粗暴的用 movsw，但是会出现问题
|
||
mov cx,showHeadText-headText
|
||
mov ax,0x7c0
|
||
mov ds,ax ; 定位到汇编程序所在的内存地址
|
||
showHeadTextLoop:
|
||
mov dx,cx
|
||
mov di,cx
|
||
add di,di
|
||
mov si,headText
|
||
sub dx,1
|
||
add si,dx
|
||
; inc si
|
||
; mov al,1000
|
||
mov al,[ds:si]
|
||
mov byte [es:di],al
|
||
loop showHeadTextLoop
|
||
jmp near showTailText
|
||
tailText: db '2020~Now gfdgd xi'
|
||
showTailText:
|
||
mov cx,showTailText-tailText
|
||
mov ax,0x7c0
|
||
mov ds,ax
|
||
showTailTextLoop:
|
||
mov dx,cx
|
||
mov di,cx
|
||
add di,di
|
||
add di,80*2*24
|
||
mov si,tailText
|
||
sub dx,1
|
||
add si,dx
|
||
mov al,[ds:si]
|
||
mov byte [es:di],al
|
||
loop showTailTextLoop
|
||
|
||
|
||
get_data:
|
||
mov di,80*2*25-2
|
||
|
||
; 读取秒
|
||
mov al,0x00
|
||
call read_time
|
||
mov byte [es:di-4],':'
|
||
mov byte [es:di-2],ah
|
||
mov byte [es:di],al
|
||
; 读取分钟
|
||
mov al,0x02
|
||
call read_time
|
||
mov byte [es:di-10],':'
|
||
mov byte [es:di-8],ah
|
||
mov byte [es:di-6],al
|
||
; 读取小时
|
||
mov al,0x04
|
||
call read_time
|
||
mov byte [es:di-14],ah
|
||
mov byte [es:di-12],al
|
||
; 读取日
|
||
mov al,0x07
|
||
call read_time
|
||
mov byte [es:di-22],'.'
|
||
mov byte [es:di-20],ah
|
||
mov byte [es:di-18],al
|
||
; 读取月
|
||
mov al,0x08
|
||
call read_time
|
||
mov byte [es:di-28],'.'
|
||
mov byte [es:di-26],ah
|
||
mov byte [es:di-24],al
|
||
; 读取年
|
||
mov al,0x09
|
||
call read_time
|
||
mov byte [es:di-32],ah
|
||
mov byte [es:di-30],al
|
||
mov cx,showTipsStr-tipsStr
|
||
sub di,30
|
||
mov ax,tipsStr
|
||
mov ds,ax
|
||
; 先跳过文本显示
|
||
jmp near showTipsStrEnd
|
||
; 显示提示文本
|
||
tipsStr: db 'Time:20'
|
||
showTipsStr:
|
||
mov di,cx
|
||
add di,showTipsStr+0x7c0
|
||
mov dl,[ds:di]
|
||
mov di,80*2*25-36
|
||
sub di,cx
|
||
mov byte [es:di],dl
|
||
loop showTipsStr
|
||
showTipsStrEnd:
|
||
|
||
hlt ; 使用停机指令降低 CPU 使用率
|
||
jmp near get_data
|
||
|
||
|
||
read_time:
|
||
out 0x70,al
|
||
in al,0x71
|
||
call bcd_to_ascii
|
||
ret
|
||
|
||
; 用于编码转换：BCD=》ASCII
|
||
; 输入：AL=bcd码
|
||
; 输出：AX=ascii
|
||
bcd_to_ascii:
|
||
mov ah,al
|
||
and al,0x0f
|
||
add al,0x30
|
||
|
||
shr ah,4
|
||
and ah,0x0f
|
||
add ah,0x30
|
||
ret
|
||
|
||
|
||
|
||
|
||
poweroff:
|
||
; 跳过关机
|
||
jmp near end
|
||
; 关机
|
||
mov ax,5307H ; 高级电源管理功能，设置电源状态
|
||
mov bx,0001H ; 设备ID，1：所有设备
|
||
mov cx,0003H ; 状态，3：表示关机
|
||
int 15h
|
||
end:
|
||
times 510-($-$$) db 0
|
||
db 0x55,0xaa
|