home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1992 #26 / NN_1992_26.iso / spool / comp / os / os2 / misc / 35926 < prev    next >
Encoding:
Text File  |  1992-11-09  |  4.1 KB  |  125 lines
  1. Path: sparky!uunet!think.com!ames!agate!darkstar.UCSC.EDU!david
  2. From: david@maxwell.ucsc.edu (David Darknell)
  3. Newsgroups: comp.os.os2.misc
  4. Subject: CONTRIBUTE your system video scrolling performance
  5. Date: 9 Nov 1992 20:38:10 GMT
  6. Organization: University of California, Santa Cruz
  7. Lines: 113
  8. Message-ID: <1dmi7iINNrdg@darkstar.UCSC.EDU>
  9. NNTP-Posting-Host: maxwell.ucsc.edu
  10. Keywords: Video System Scrolling Performance
  11.  
  12. Ever wondered how your OS/2 system compares to others for screen
  13. scrolling, full screen and windowed?  Since there is a dearth of
  14. benchmarks that specifically test the capabilities of OS/2 I put
  15. together a screen scrolling benchmark program (in REXX) you can run on
  16. your system!
  17.  
  18. Once you run the benchmark, send the results to me
  19. (david@maxwell.ucsc.edu) and I will compile and post the results
  20. back on the net for all to see!
  21.  
  22.  
  23. *****cut here*****
  24.  
  25. /*
  26. ** vs.cmd
  27. **
  28. ** This is a new and revised video speed test
  29. ** that does not rely on the existance of a
  30. ** particular OS/2 README file.  
  31. **
  32. ** This file copies 200 carriage return/line feeds
  33. ** to your screen 4 separate times.  Each time
  34. ** the elapsed time is calculated, and after the
  35. ** fourth time a running average is calculated.
  36. ** This allegedly eliminates the deleterious effects
  37. ** of cache refill.  It also I might add, is MUCH
  38. ** faster with SLOW video systems like mine.  The
  39. ** 26 minutes plus copying the OS/2 README file for 
  40. ** real slow systems has been a real complaint from my
  41. ** original post.
  42. **
  43. ** email your results to: david@maxwell.ucsc.edu
  44. **
  45. ** Along with the two times, be sure to include:
  46. ** Your CPU Type: (386SX,386DX,486SX,486DX,486DX2,586)
  47. ** Your CPU speed: (in Megahertz)
  48. ** Your BUS type: (ISA,EISA,MCA,LOCAL-VL,LOCAL-PCI,LOCAL-PROPRIETARY)
  49. ** Your BUS clock speed (in Megahertz).  This should be the speed of
  50. ** the local bus if you have one. Your graphics card (i.e. tseng 4K, 
  51. ** Paradise, ...)  and the graphics resolution of your desktop.  For 
  52. ** example 1024x768x256 or 1024x768x16.
  53. **
  54. ** I will post the results once I have accumulated a good 
  55. ** cross section of different system types!
  56. **
  57. ** David Darknell  8 Nov, 1992
  58. */
  59.  
  60. /* load SysSearchPath function */
  61. call RxFuncAdd 'SysGetKey', 'RexxUtil', 'SysGetKey'
  62. call RxFuncAdd 'SysCls', 'RexxUtil', 'SysCls'
  63.  
  64. call SysCls
  65. say '**'
  66. say '** This program is sort of a screen scrolling benchmark.'
  67. say '** This file copies 200 carriage return/line feeds'
  68. say '** to your screen 4 separate times.  Each time'
  69. say '** the elapsed time is calculated, and after the'
  70. say '** fourth time a running average is calculated.'
  71. say '** You should run this program in a 25 line OS/2 window '
  72. say '** (unobscured), and a 25 line full screen session. '  
  73. say '**'
  74. say '** email your results to: david@maxwell.ucsc.edu'
  75. say '**'
  76. say '** Along with the two times, be sure to include:'
  77. say '** Your CPU Type: (386SX,386DX,486SX,486DX,486DX2,586)'
  78. say '** Your CPU speed: (in Megahertz)'
  79. say '** Your BUS type: (ISA,EISA,MCA,LOCAL-VL,LOCAL-PCI,LOCAL-PROPRIETARY)'
  80. say '** Your BUS clock speed (in Megahertz).  This should be the speed of'
  81. say '** the local bus if you have one. Your graphics card (i.e. tseng 4K,' 
  82. say '** Paradise, ...)  and the graphics resolution of your desktop.  For' 
  83. say '** example 1024x768x256 or 1024x768x16.'
  84. do 4
  85.     say '**'
  86. end
  87. say '** Press any key to begin the test.'
  88. SysGetKey(NOECHO)  
  89.  
  90. /* test 1 */ 
  91. elapsd1 = time('e')
  92. call screenScroll 1
  93. elapsd1 = time('r')
  94. /* test 2 */ 
  95. elapsd2 = time('e')
  96. call screenScroll 2
  97. elapsd2 = time('r')
  98. /* test 3 */ 
  99. elapsd3 = time('e')
  100. call screenScroll 3
  101. elapsd3 = time('r')
  102. /* test 4 */ 
  103. elapsd4 = time('e')
  104. call screenScroll 4
  105. elapsd4 = time('r')
  106.  
  107. say 'Elapsed time for run 1:' elapsd1
  108. say 'Elapsed time for run 2:' elapsd2
  109. say 'Elapsed time for run 3:' elapsd3
  110. say 'Elapsed time for run 4:' elapsd4
  111. say 'Average elapsed time for 4 runs:' (elapsd1+elapsd2+elapsd3+elapsd4)/4
  112. exit
  113.  
  114. /* procedure to scroll the screen 200 times */
  115. screenScroll: procedure  
  116.     j = ARG(1)
  117.     do i = 1 to 200
  118.         say j'-'i '.............................................................'
  119.     end
  120. return
  121.  
  122. *****cut here*****
  123.  
  124.  
  125.