Mis Algoritmos

;Autor Victor De la Rocha
;URL vyk2rr@gmail.com

page 60,132
TITLE p04asm1 (EXE) operaciones de mover y sumar
;-----------------------------------------------------
STACKSG SEGMENT PARA STACK ´Stack´
        DW 32 DUP(0)       
STACKSG ENDS
;-----------------------------------------------------
DATASG SEGMENT PARA ´Data´
       FLDA DW 250
       FLDB DW 125
       FLDC DW ?
DATASG ENDS
;-----------------------------------------------------
CODESG SEGMENT PARA ´Code´
BEGIN PROC FAR
      ASSUME SS:STACKSG,DS:DATASG, CS:CODESG
      MOV AX,DATASG     ; SE ASIGNA DIRECCION DE DATASG
      MOV DS,AX         ; EN REGISTRO DS

      MOV AX,FLDA       ; MOVER 0250 A AX
      ADD AX,FLDB       ; SUMAR 0125 A AX
      MOV FLDC,AX       ; ALMACENAR SUMA EN FLDC
      MOV AX,4C00H      ; SALIDA A DOS
      INT 21H
BEGIN ENDP              ; FIN DE PROCEDIMIENTO
CODESG ENDS             ; FIN DE SEGMENTO
END BEGIN               ; FIN DE PROGRAMA