Got an iPhone or iPad? We have a brand new Pastebin App for both devices, and it's totally free! Click here to download the new Pastebin App for iOS.
Public Pastes
Guest

Angel

By: a guest on Feb 9th, 2010  |  syntax: ASM (NASM)  |  size: 0.50 KB  |  hits: 20  |  expires: Never
download  |  raw  |  embed  |  report abuse
Copied
  1. N EQU 5
  2.  
  3. DATOS1 SEGMENT
  4.         VECT1 DW N DUP(5)
  5.         VECT2 DW N DUP(7)
  6. DATOS1 ENDS
  7.  
  8. DATOS2 SEGMENT
  9.         VECT3 DW N DUP(?)
  10. DATOS2 ENDS
  11.  
  12. PILA SEGMENT STACK 'STACK'
  13.         DATOS DW 100 DUP(?)
  14.         ARRIBA DW (?)
  15. PILA ENDS
  16.  
  17. CODIGO SEGMENT
  18.         ASSUME CS:CODIGO,DS:DATOS1,ES:DATOS2,SS:PILA
  19.  
  20. INICIO:
  21.         MOV AX,DATOS1
  22.         MOV DS,AX
  23.         MOV AX,DATOS2
  24.         MOV ES,AX
  25.         MOV CX,N
  26.         XOR BX,BX
  27.  
  28. CONT:
  29.         MOV AX,VECT1[BX]
  30.         ADD AX,VECT2[BX]
  31.         MOV VECT3[BX],AX
  32.         ADD BX,2
  33.         LOOP CONT
  34.  
  35. FIN:
  36.         MOV AH,4Ch
  37.         INT 21h
  38.  
  39.  
  40. CODIGO ENDS
  41. END INICIO
create a new version of this paste RAW Paste Data