The Fourth Dimension Space

枯叶北风寒，忽然年以残，念往昔，语默心酸。二十光阴无一物，韶光贱，寐难安； 不畏形影单，道途阻且慢，哪曲折，如渡飞湍。斩浪劈波酬壮志，同把酒，共言欢！ -如梦令

微机接口 实验四 使得0-F循环再LED上显示

.model small
.stack
.data
LEDtb db 0c0h,0f9h,0a4h,0b0h,99h,92h,82h,0f8h,80h,90h,88h,83h,0c6h,0a1h,86h,8eh
portA dw 0e400h
portB dw 0e401h
portCro dw 0e403h
.code

time proc near
     push dx
     push bx
     mov dx,5fffh
bahar:    mov bx,5fffh
fuuy:  dec bx
     jnz fuuy
     dec dx
     jnz bahar
     pop bx
     pop dx
     ret
     time endp


pckey proc near
      push dx
      push ax
      mov ah,6
      mov dl,0ffh
      int 21h
      je  p1
      mov ax,4c00h
      int 21h
p1:   pop ax
      pop dx
      ret
      pckey endp

start:
init:
    mov ax,@data
    mov ds,ax
    lea si,LEDtb
    mov dx,portCro
    mov al,80h
    out dx,al
    mov cl,0f7h
    mov bx,00h
s1:
    mov dx,portA
    mov al,[si+bx]
    out dx,al
    mov dx,portB
    mov al,cl
    out dx,al
    inc bx

    call time
    call pckey
    cmp bx,0fh
    jg s2
next:
    cmp cl,0feh
    jz s3
next2:
    ror cl,1
    jmp s1


s2:
    mov bx,00h
    jmp next
s3:
    mov cl,0efh
    jmp next2
 end start

posted on 2010-04-24 17:58 abilitytao 阅读(180) 评论(0)  编辑 收藏 引用


只有注册用户登录后才能发表评论。
网站导航: 博客园   IT新闻   BlogJava   博问   Chat2DB   管理