在六位数码管上显示自己 的学号

8255在六位数码管上显示自己 的学号（6位）

 

 

PA8255 EQU 0600H
PB8255 EQU 0602H
PC8255 EQU 0604H
CTL EQU 0606H
.MODEL SMALL
.DATA
SEGTAB DB 3FH,06H,5BH,4FH,66H,6DH,7DH,07H
       DB 7FH,6FH,77H,7CH,39H,5EH,79H,71H,73H,3EH
N DB 0,0,0,0,0,0            此处的数字按照这个格式改成自己的学号
.CODE
.STARTUP
MOV AL,10000000B
MOV DX,CTL
OUT DX,AL
AB:LEA SI,N
MOV AH,0FEH
MOV CX,0006H
AC:MOV AL,AH
MOV DX,PA8255
OUT DX,AL
MOV AL,[SI]
LEA BX,SEGTAB
XLAT
MOV DX,PB8255
OUT DX,AL 
ROL AH,01H
INC SI
CALL DELAY
LOOP AC
MOV AH,1
INT 16H
JZ AB
.EXIT 0
DELAY:PUSH BX
PUSH CX
MOV BX,0FH
DLY0:MOV CX,0020H
DLY1:LOOP DLY1
DEC BX
JNZ DLY0
POP CX
POP BX
RET
END