Advertisement
Guest User

Untitled

a guest
Nov 3rd, 2019
116
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. dim as double tim = timer
  2. dim as double testdouble
  3. dim as single testsingle
  4. for i as ulong = 0 to 100000000
  5.     asm
  6.         movsd xmm0, [testdouble]
  7.         addsd xmm0, xmm0
  8.         movsd [testdouble], xmm0
  9.     end asm
  10. next
  11. print "Double: "&timer-tim
  12. tim = timer
  13. for i as ulong = 0 to 100000000
  14.     asm
  15.         movss xmm0, [testsingle]
  16.         addss xmm0, xmm0
  17.         movss [testsingle], xmm0
  18.     end asm
  19. next   
  20. print "Single: "&timer-tim
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement