From: david@maxwell.ucsc.edu (David Darknell)
Newsgroups: comp.os.os2.misc
Subject: Video Benchmark (of sorts)
Date: 7 Nov 1992 16:39:58 GMT
Organization: University of California, Santa Cruz
NNTP-Posting-Host: maxwell.ucsc.edu
Keywords: Benchmark


Since I have been having such a terrible time with the scrolling
speed of my os/2 windows (after upgrading to the CSD) I decided
to do a little benchmark of my own.  I wrote a REXX script to
type the OS/2 README file and time how long it takes to do so.

Please cut this out, and run it on your system!  My system is 
386SX25 with 16M memory, with an Orchid Prodesigner II graphic
card (tseng 4000), on an ISA bus operating at 12.5 Mhz.  My benchmark
(both for 25 line screens)

Full Screen: 16.6 Seconds   Window: 1577.6 Seconds

THATS 91X SLOWER!  Since my desktop is running in 1024x768x256 mode
it is perhaps justified (but still unusable.)  If enough people
send me their results I will post a summary we can all use to compare
the `relative' speed of our full screen/windowed OS/2, and perhaps
suggest which adapters are best for OS/2..

Note: that I have designed this to work with the CSD README file dated
10/92 only.  If you have not installed the latest CSD you can still
run this file by editing the line:
call SysFileSearch 'OS/2 2.0 README (10/92)', fspec, 'found.' 
and changing the date to reflect the version you have.  If you do,
please tell me what readme date you are using with your results!

David


==================cut here===================
/*
** timer.cmd
**
** Sort of a screen scrolling benchmark.
** Calculates the amount of time it takes for the file
** readme to scroll on your screen.  You should run this
** program in a 25 line OS/2 window, and a 25 line full
** screen session.  
**
** email your results to: david@maxwell.ucsc.edu
**
** Along with the two times, be sure to include:
** Your CPU Type: (386SX,386DX,486SX,486DX,486DX2,586)
** Your CPU speed: (in Megahertz)
** Your BUS type: (ISA,EISA,MCA,LOCAL-VL,LOCAL-PCI,LOCAL-PROPRIETARY)
** Your BUS clock speed (in Megahertz).  This should be the speed of
** the local bus if you have one. Your graphics card (i.e. tseng 4K, 
** Paradise, ...)  and the graphics resolution of your desktop.  For 
** example 1024x768x256 or 1024x768x16.
**
** I will post the results once I have accumulated a good 
** cross section of different system types!
**
** David Darknell  5 Nov, 1992
*/

/* load SysSearchPath function */
call RxFuncAdd 'SysSearchPath', 'RexxUtil', 'SysSearchPath'
call RxFuncAdd 'SysGetKey', 'RexxUtil', 'SysGetKey'
call RxFuncAdd 'SysFileSearch', 'RexxUtil', 'SysFileSearch'

/* figure out where the OS/2 README file is located  */
fspec = SysSearchPath('PATH','README')
if fspec == '' 
	then do 
	say "I can't find your README file"
	say 'sorry.  You should place it somewhere '
	say 'in a directory on your path. '
	exit
end
/* found a README file, is it the right one? */
call SysFileSearch 'OS/2 2.0 README (10/92)', fspec, 'found.' 
	if found.0 == 0
	then do
	say " "
	say "I can't find your OS/2 CSD Level XR06055"
	say "README file on your path.  Please place it"
	say "somewhere in a directory on your path. "
	exit
end
/* whew, got it! */
/* remind user to send add'l info */
call SysCls
say '===' fspec '==='
say '**'
say '** This program is sort of a screen scrolling benchmark.'
say '** It calculates the amount of time it takes for your readme'
say '** file to scroll on your screen.  You should run this'
say '** program in a 25 line OS/2 window (unobscured), and a 25 line full'
say '** screen session. '  
say '**'
say '** email your results to: david@maxwell.ucsc.edu'
say '**'
say '** Along with the two times, be sure to include:'
say '** Your CPU Type: (386SX,386DX,486SX,486DX,486DX2,586)'
say '** Your CPU speed: (in Megahertz)'
say '** Your BUS type: (ISA,EISA,MCA,LOCAL-VL,LOCAL-PCI,LOCAL-PROPRIETARY)'
say '** Your BUS clock speed (in Megahertz).  This should be the speed of'
say '** the local bus if you have one. Your graphics card (i.e. tseng 4K,' 
say '** Paradise, ...)  and the graphics resolution of your desktop.  For' 
say '** example 1024x768x256 or 1024x768x16.'
say '**'
say '** Press any key to begin the test.'
SysGetKey(NOECHO)  

/* start timer */
elapsd = time('e')
type fspec
elapsd = time('r')

say 'Elapsed time for this run was:' elapsd 'seconds.'
exit

==================cut here===================