upsidedown

mi2-totally working..kudos to me!

Feb 10th, 2012
198
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. INCLUDE IO.H
  2.  
  3. CR EQU 0DH
  4. LF EQU 0AH
  5.  
  6. DATA SEGMENT
  7. X DW 40 DUP (?)
  8. C DW ?
  9. STRING DB 40 DUP (?)
  10. PROMPT1 DB  'ENTER THE NUMBER OF VALUES'
  11.         DB CR,LF,0
  12. PROMPT2 DB 'ENTER THE VALUES'
  13.         DB CR,LF,0
  14. L2  DB CR,LF,'THE SUM IS :'
  15. SUM DB 8 DUP (?)
  16.     DB CR,LF,0
  17. L1  DB CR,LF,'THE AVERAGE IS :'
  18. AVG DB 6 DUP (?)
  19.     DB CR,LF,0
  20. L3  DB CR,LF,'NUMBER GREATER THAN AVERAGE IS :'
  21. VAL DB 3 DUP (?)
  22.     DB CR,LF,0
  23.    
  24. DATA ENDS
  25.  
  26. CODE SEGMENT
  27. ASSUME CS:code,DS:data
  28.  
  29. START: MOV AX,SEG DATA
  30.        MOV DS,AX
  31.  
  32. PROMPT: OUTPUT PROMPT1
  33.         INPUTS STRING,40
  34.         ATOI STRING
  35.         MOV C,AX
  36.         MOV BX,C
  37.         OUTPUT PROMPT2
  38.         MOV SI,OFFSET X
  39.                        
  40.  AGAIN: INPUTS STRING,40
  41.         ATOI STRING
  42.         MOV [SI],AX
  43.         INC SI
  44.         INC SI
  45.         DEC BX
  46.         JNZ AGAIN
  47.        
  48.         MOV BX,C
  49.         MOV SI, OFFSET X   
  50.         XOR DX,DX
  51.        
  52.    SAGN:ADD DX,[SI]
  53.         INC SI
  54.         INC SI
  55.         DEC BX
  56.         JNZ SAGN
  57.         ITOA SUM,DX
  58.         OUTPUT L2
  59.        
  60.        
  61.         MOV AX,DX
  62.         CWD
  63.         DIV C
  64.         ITOA AVG,AX
  65.         OUTPUT L1
  66.        
  67.         MOV BX,C
  68.         MOV SI,OFFSET X
  69.                
  70.         XOR DX,DX
  71.  SEARCH:MOV DX,[SI]
  72.         CMP DX,AX
  73.         JG PRINT
  74.         INC SI
  75.         INC SI
  76.         DEC BX
  77.         JNZ SEARCH
  78.         JZ LAST
  79.        
  80.           XOR CX,CX
  81.     PRINT:MOV CX,[SI]
  82.           ITOA VAL,CX
  83.           OUTPUT L3
  84.           INC SI
  85.           INC SI
  86.           DEC BX
  87.           JNZ SEARCH
  88.           LAST:
  89.        
  90.     QUIT: MOV AL,0
  91.          MOV AH,4CH
  92.          INT 21H
  93.          
  94.     CODE ENDS
  95.     END START
  96.  
  97. OUTPUT:
  98. ENTER THE NUMBER OF VALUES
  99. 5
  100. ENTER THE VALUES
  101. 12
  102. 15
  103. 20
  104. 5
  105. 6
  106.  
  107. THE SUM IS :    58
  108. THE AVERAGE IS :    11
  109.  
  110. NUMBER GREATER THAN AVERAGE IS :    12
  111. NUMBER GREATER THAN AVERAGE IS :    15
  112. NUMBER GREATER THAN AVERAGE IS :    20
Advertisement
Add Comment
Please, Sign In to add comment