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