Advertisement
Guest User

Untitled

a guest
Nov 20th, 2017
97
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. CODE SEGMENT
  2. ASSUME CS:CODE,DS:CODE
  3.  
  4. ORG 1000H
  5. MAIN:
  6.     MOV AX,CS
  7.     MOV DS,AX
  8.    
  9.     XOR SI,SI
  10.     MOV CX,4
  11. AVG:
  12.     XOR AX,AX
  13.     XOR BX,BX
  14. ADDED:
  15.     ADD AX,S[BX][SI]
  16.     CMP BX,32
  17.     JE STORE
  18.     ADD BX,8
  19.     JMP ADDED
  20.    
  21. STORE:
  22.     MOV BX,5
  23.     DIV BX
  24.     MOV AV[SI],AX
  25.     ADD SI,2
  26.    
  27.     LOOP AVG
  28.    
  29.     MOV AH,04CH
  30.     INT 21H
  31.    
  32. ORG 1500H
  33. S DW 67,45,98,33
  34.     DW 70,56,87,44
  35.     DW 82,72,89,40
  36.     DW 80,67,95,50
  37.     DW 78,76,92,60
  38. ORG 1600H
  39. AV DW 4 DUP(?)
  40.  
  41. CODE ENDS
  42. END MAIN
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement