STA SEGMENT STACK
    DW 40H DUP(?)
    TOP LABEL WORD
STA ENDS

CODE SEGMENT
      ASSUME CS:CODE
  MAIN PROC FAR
    MOV AX,STA
    MOV SS,AX
    MOV SP,TOP

    MOV DL,30H
    MOV CH,5
    MOV BX,4D3CH
    ROL BX,1
    PUSH BX
    AND BL,1
    ADD DL,BL
    MOV AH,2
    INT 21H
  
 L1:POP BX
      MOV DL,30H
      MOV CL,3
      ROL BX,CL
      PUSH BX
      AND BL,7
      ADD DL,BL
      MOV AH,2
      INT 21H
      DEC CH
      JNE L1

    MOV AH,4CH
    INT 21H
  MAIN ENDP
  CODE ENDS
   END MAIN

posted on 2010-04-13 21:56  KuSiuloong  阅读(148)  评论(0)    收藏  举报