disp.asm

使用汇编语言进行编程

DATAS SEGMENT
   disbuf db 0C0H,0F9H,0A4H,0B0H,99H,92H,82H,0F8H,80H,90H,89H,0BFH,0DCH,0ADH,0B7H
   btab db 01H,02H,04H,08H,10H,20H 

DATAS ENDS

STACKS SEGMENT
    dw 100h dup(?)
   top label word
STACKS ENDS

CODES SEGMENT
    ASSUME CS:CODES,DS:DATAS,SS:STACKS
START:
     MOV AX,DATAS
     MOV DS,AX
     mov ax,stacks
     mov ss,ax
     mov sp,offset top
     mov AL,82h
     mov DX,0EE03h
     OUT DX,AL                         ;//初始化8255
DISPLAY:
     LEA DI,disbuf
     LEA SI,BTAB
     MOV CX,6
AGAIN:
     MOV AL,[SI]
     MOV DX,0EE05H
     OUT DX,AL
     MOV AL,[DI]
     MOV DX,0EE02H
     OUT DX,AL
     
     INC SI
     INC DI
     

     
DELAY:PUSH CX
     MOV BX,10000
AGAIND:
     MOV CX,65000
 DLP:
     LOOP DLP
     DEC BX
     CMP BX,0
     JNZ AGAIND    ;延时段
     
     POP CX
     LOOP AGAIN
     MOV AH,4CH
     INT 21H
CODES ENDS
     END START