All pastes #352113 Raw Edit

Stuff

public text v1 · immutable
·published 2007-02-12 16:32 UTC
rendered paste body
;===========================================================
;=                                    =
;===========================================================
;
;Auteur            : G28823
;
;============================================================

;============================================================
;=                 DIRECTIVE COMPILATEUR                    =
;============================================================
.MODEL small
.STACK 100h

;============================================================
;=                         Donnée                           =
;============================================================
.DATA
  A    db  ?
  B    dw  ?
  H    db  ?
  P    db  3
  Prod db  ? 
;============================================================
;=                      CODE SOURCE                         =
;============================================================
.CODE

;============================================================
;=                  Programme principale                    =
;============================================================

main PROC
  ; ---------- Intro ----------
  mov ax,@data
  mov ds,ax

  ; -------- Programme --------
  
  mov al,A     
  sub ax,B     ; A = (A-B)
  mov cx,ax

  mov ax,2     
  add cx,ax     ; A = 2 + A

  mov ax,2     ; P = 2 * P
  mul P
  
  mul ax        ; P = P²
  mov bx,ax

  mov ax,10
  mul H        ; H = 10 * H	

  add ax,bx     ; H = H + P 
  mov bx,ax  

  mov ax,cx
  sub ax,bx     ; A = A - H
  mov cx,ax

  mov ax,6
  mul cx        ; Prod = A * 6
  mov Prod,ax

  ; -------- Epilogue ---------

  mov ax,4c00h
  int 21h
main ENDP

;============================================================
;=        FIN FICHIER SOURCE ET POINT D'ENTREE              =
;============================================================
END main