home *** CD-ROM | disk | FTP | other *** search
- From: Jerry.Guizar@f347.n109.z1.fidonet.org (Jerry Guizar)
- Sender: Uucp@blkcat.UUCP
- Path: sparky!uunet!blkcat!Uucp
- Newsgroups: comp.os.os2.misc
- Subject: Video Benchmark (of sort
- Message-ID: <721274423.AA00000@blkcat.UUCP>
- Date: Sun, 08 Nov 1992 15:43:02 -0500
- Lines: 72
-
-
- In article from David Darknell (david@maxwell.ucsc.edu)
-
- > Full Screen: 16.6 Seconds Window: 1577.6 Seconds
-
- CPU: 486DX2/50
- BUS: ISA
- Card: ATI Graphics Ultra w/1MB VRAM
- Desktop: 1024x768x256 using 8514 drivers
-
- > /* load SysSearchPath function */
- > call RxFuncAdd 'SysSearchPath', 'RexxUtil', 'SysSearchPath'
- > call RxFuncAdd 'SysGetKey', 'RexxUtil', 'SysGetKey'
- > call RxFuncAdd 'SysFileSearch', 'RexxUtil', 'SysFileSearch'
-
- *** call RxFuncAdd 'SysCls', 'RexxUtil', 'SysCls' needed here. ***
-
- > /* 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
-
- ___
- X KWQ/2 1.0C X Air conditioned environment - Do not open Windows.
-
-