PORTD EQU 66H ;CPU-8255控制寄存器
PORTA EQU 60H ;8086 A1接8255 A0;A2 接8255A1
PORTB EQU 62H
PORTC EQU 64H
REGIS EQU 10010000B ;A IN, B OUT,AB口工作方式0
CODES SEGMENT
    ASSUME CS:CODES,DS:DATAS
BEGIN:
      MOV DX,PORTD ;设置8255工作方式
      MOV AL,REGIS ;control byte
      OUT DX,AL

G1:   MOV DX,PORTA
      IN  AL,DX    ;读A口数据
      AND AL,00001111B  ;高四位清零
;数码管译码
      MOV BX,OFFSET LED
      XLAT          ;取LED表
     ;-------------
      PUSH CX
      MOV  CX,40H ;延时      
DELAY:LOOP DELAY
      POP  CX
      ;-------------
       MOV DX,PORTB
       OUT DX,AL
       JMP G1:
LED DB 3fH,06H,5bH,4fH,66H,6dH,7dH,07H,7fH,6fH,77H,7cH,39H,5eH,79H,71H
这是源代码，但是有问题，应该不全
图没法传
file:///C:UsersAdministratorAppDataRoamingTencentUsers425802002QQWinTempRichOleOQD_RN$(5EEE(39TVLVIM2S.jpg
file:///C:UsersAdministratorAppDataRoamingTencentUsers425802002QQWinTempRichOleOQD_RN$(5EEE(39TVLVIM2S.jpg