chr2.asm

来自「单片机各种通信接口程序」· 汇编 代码 · 共 48 行

DATA      SEGMENT
BUF       DB'S=1+2*3+3*4+4*5+...+N(N+1)+...=','$'
RES       DW 4 DUP(0),'$'
DATA      ENDS
CODE      SEGMENT
ASSUME    CS:CODE,DS:DATA
START:    MOV AX,DATA
          MOV DS,AX
          MOV DX,OFFSET BUF
          MOV AH,09H
          INT 21H
          MOV DX,1
          MOV BL,2
NEXT:     MOV AL,BL
          INC BL
          MUL BL
          ADD DX,AX
          CMP AX,200
          JNA NEXT
          MOV CX,0004H
          MOV DI,OFFSET RES
          ADD DI,03H
NEXT1:    MOV AX,DX
          AND AX,000FH
          CMP AL,0AH
          JB  NEXT2
          ADD AL,07
NEXT2:    ADD AL,30H
          MOV [DI],AL
          DEC DI
          PUSH CX
          MOV CL,04
          SHR DX,CL
          POP CX
          LOOP NEXT1
          MOV DX,OFFSET RES
          MOV AH,09H
          INT 21H
          MOV AH,4CH
          INT 21H
          CODE ENDS
END       START
          V AH,4CH
INT       21H
CODE      ENDS
END       START