4_14.ASM
上传用户:xinbaokeji
上传日期:2022-07-05
资源大小:295k
文件大小:2k
源码类别:

汇编语言

开发平台:

Visual C++

  1. STACK SEGMENT PARA STACK 'STACK'
  2.       DB 100 DUP(?)
  3. STACK ENDS
  4. DATA SEGMENT
  5.       BUFFER DB 3 DUP(?)
  6. DATA ENDS
  7. CODE SEGMENT
  8.      ASSUME CS: CODE,DS:DATA,SS:STACK
  9. START PROC FAR
  10. BEGIN: PUSH DS
  11.        MOV AX,0
  12.        PUSH AX
  13.        MOV AX,DATA
  14.        MOV DS,AX
  15.        MOV CX,0FFFFH
  16.        MOV BL,0
  17.        LEA SI,BUFFER
  18.        PUSH BX
  19. GOON:  MOV DL,0DH
  20.        MOV AH,02H
  21.        INT 21H
  22.        MOV DL,0AH
  23.        MOV AH,02H
  24.        POP BX
  25.        MOV AL,BL
  26.        INC AL
  27.        DAA
  28.        CMP AL,61H
  29.        JC NEXT
  30.        MOV AL,0
  31.        MOV AH,4CH
  32.        INT    21H
  33. NEXT:  MOV BL,AL
  34.        PUSH BX
  35.        MOV DL,AL
  36.        PUSH CX
  37.        MOV CL,4
  38.        SHR AL,CL
  39.        OR AL,30H
  40.        MOV [SI] ,AL
  41.        INC SI
  42.        MOV AL,DL
  43.        AND AL,0FH
  44.        OR AL,30H
  45.        MOV [SI],AL
  46.        INC SI
  47.        MOV AL,'$'
  48.        MOV [SI],AL
  49.        MOV DX,OFFSET BUFFER
  50.        MOV AH,09H
  51.        INT 21H
  52.       ; MOV CX,0FFFFH
  53. DELAY: MOV DX,3FFH
  54. TIME:   MOV CX,0FFFFH
  55. TIME1:  DEC CX
  56.        NOP
  57.        JNE TIME1
  58.        DEC DX
  59.        JNE TIME
  60.        POP DX
  61.        DEC DX
  62. ;AGAIN: DEC CX
  63. ;       JNE AGAIN
  64. ;       POP CX
  65. ;       DEC CX
  66.         JE DONE   
  67.         MOV SI, OFFSET BUFFER
  68.         JMP GOON
  69. DONE:   RET
  70. START  ENDP
  71. CODE   ENDS
  72.        END BEGIN
  73.        BL,AL
  74.        PUSH  BX
  75.        OR AL,30H
  76.        MOV DL,AL
  77.        MOV AH,2
  78.        INT 21H
  79.        MOV CX,0FFFFH
  80. AGAIN: DEC CX
  81.        JNE AGAIN
  82.        JMP GOON
  83. START  ENDP
  84. CODE   ENDS
  85.        END  BEGIN