;***********************************************;
;*本程序為從鍵盤輸入數據(0-9)控制LED數碼管發光 *
;*      LED_1.ASM                              *
;***********************************************;
data  segment
	led      db        3fh,06h,5bh,4fh,66h,6dh,7dh,07h,7fh,6fh
	mesg1    db        0dh,0ah,'Input a num (0--9h):',0dh,0ah,'$'
	data ends
code  segment
	assume cs:code,ds:data
start:  mov ax,data
	mov ds,ax
	mov dx,28bh            ;使8255的A口為輸出方式
	mov ax,80h
	out dx,al
sss:    mov dx,offset mesg1    ;顯示提示信息
	mov ah,09h
	int 21h
	mov ah,01              ;從鍵盤接收字符
	int 21h
	cmp al,'0'             ;是否小于0
	jl  exit               ;若是則退出
	cmp al,'9'             ;是否大于9
	jg  exit               ;若是則退出
	sub al,30h             ;將所得字符的ASCII碼減30H
	mov bx,offset led      ;bx為數碼表的起始地址
	xlat                   ;求出相應的段碼
	mov dx,288h            ;從8255的A口輸出
	out dx,al
	jmp sss                ;轉SSS
exit:   mov ah,4ch             ;返回DOS
	int 21h
code ends
	end start