;主程序實現了A/D轉換；延時子程序實現了0.2ms的延時
DATA SEGMENT
BUF DB 60000 DUP(?);定義數據緩沖區
DATA ENDS
CODE SEGMENT
      ASSUME CS:CODE,DS:DATA
START:
      MOV AX,DATA
      MOV DS,AX
      MOV SI,OFFSET BUF;定義緩沖區指針
      MOV CX,60000
BBB:
      MOV DX,298H
      OUT DX,AL;啟動一次A/D轉換
      CALL DELAY;調用延時子程序
      IN AL,DX
      MOV [SI],AL
      INC SI
      LOOP BBB
      MOV AX,4C00H
      INT 21H;DOS返回
      DELAY PROC NEAR
      PUSH DX
      MOV AL,00010000B
      MOV DX,283H
      OUT DX,AL;設置計數器0為方式0
      MOV AL,200
      MOV DX,280H
      OUT DX,AL;設置計數器0的初值
      MOV DX,300H
CCC:
      IN AL,DX
      TEST AL,00000001B;檢查PA0的狀態
      JZ CCC
      POP DX
      DELAY ENDP
CODE ENDS
      END START