Advertisement
Guest User

Untitled

a guest
Jan 27th, 2015
171
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.07 KB | None | 0 0
  1. section .text
  2. global _start
  3. _start:
  4. finit
  5. fld qword [zmA] ;st4 = A
  6. fld qword [zmB] ;st3 = B
  7. fld qword [zmC] ;st2 = C
  8. fld qword [mnoznik] ;st1 = mnoznik
  9. fldz ;st0 = 0
  10.  
  11. fadd st0, st3 ;st5 = A
  12. fmul st0, st3 ;st4 = B
  13. fldz ;st3 = C
  14. ;st2 = mnoznik
  15. ;st1 = b^2
  16. ;st0 = 0
  17.  
  18. fadd st0, st5 ;st6 = A
  19. fmul st0, st3 ;st5 = B
  20. fmul st0, st2 ;st4 = C
  21. fldz ;st3 = mnoznik
  22. ;st2 = b^2
  23. ;st1 = 4ac
  24. ;st0 = 0
  25.  
  26. fadd st0, st2
  27. fsub st0, st1
  28. fsqrt
  29.  
  30. fist dword [temp]
  31. mov al, [temp]
  32. add al, 48
  33. mov [znak], al
  34.  
  35. mov eax, 4
  36. mov ebx, 1
  37. mov ecx, znak
  38. mov edx, 1
  39. int 80h
  40.  
  41. fldz ;st8 = A
  42. ;st7 = B
  43. ;st6 = C
  44. ;st5 = mnoznik
  45. ;st4 = b^2
  46. ;st3 = 4ac
  47. ;st2 = delta
  48. ;st1 = 2a
  49. ;st0 = 0
  50.  
  51. fadd st0, st7
  52. fadd st0, st7
  53. fldz
  54.  
  55. fsub st0, st7
  56. fsub st0, st2
  57. fdiv st0, st1
  58.  
  59. fist dword [temp1]
  60. mov al, [temp1]
  61. add al, 48
  62. mov [znak1], al
  63.  
  64. mov eax, 4
  65. mov ebx, 1
  66. mov ecx, znak1
  67. mov edx, 1
  68. int 80h
  69.  
  70. mov eax, 1
  71. int 80h
  72.  
  73. section .data
  74. zmA dq 1.0
  75. zmB dq -5.0
  76. zmC dq 4.0
  77. mnoznik dq 4.0
  78. temp dd 0
  79. znak db 0
  80. temp1 dd 0
  81. znak1 db 0
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement