home *** CD-ROM | disk | FTP | other *** search
/ Freesoft 1999 February / Freesoft_1999-02_cd.bin / Recenz / Utility / DisplayDoctorLinux / scitech-display-doctor-1.0beta-3.i386.rpm / scitech-display-doctor-1.0beta.3.cpio.gz / scitech-display-doctor-1.0beta.3.cpio / usr / lib / nucleus / XF86Setup / mondata.tcl < prev    next >
Text File  |  1998-09-19  |  1KB  |  47 lines
  1. # $XConsortium: mondata.tcl /main/4 1996/10/28 05:42:19 kaleb $
  2. #
  3. #
  4. #
  5. #
  6. # $XFree86: xc/programs/Xserver/hw/xfree86/XF86Setup/mondata.tcl,v 3.8.2.4 1998/02/15 16:08:53 hohndel Exp $
  7. #
  8. # Copyright 1996 by Joseph V. Moss <joe@XFree86.Org>
  9. #
  10. # See the file "LICENSE" for information regarding redistribution terms,
  11. # and for a DISCLAIMER OF ALL WARRANTIES.
  12. #
  13.  
  14. #
  15. # Data used by the monitor configuration routines
  16. #
  17.  
  18. array set MonitorVsyncRanges {}
  19. array set MonitorHsyncRanges {}
  20. set MonitorDescriptions [list]
  21.  
  22. set numMonitors 0
  23.  
  24. vbe_openmonitordb $XF86Setup_library/monitor/monitor.dbx
  25. set monitor [vbe_getfirstmonitor]
  26. while { [string compare $monitor DBX_EOF] != 0 } {
  27.     lappend MonitorDescriptions [lindex $monitor 1]
  28.     array set MonitorHsyncRanges [list $numMonitors [lindex $monitor 2]-[lindex $monitor 3] ]
  29.     array set MonitorVsyncRanges [list $numMonitors [lindex $monitor 4]-[lindex $monitor 5] ]
  30.     incr numMonitors
  31.     set monitor [vbe_getnextmonitor]
  32. }
  33. vbe_closemonitordb
  34.  
  35. set haveSelectedModes 0
  36.  
  37. set DefaultColorDepth 8
  38.  
  39. array set SelectedMonitorModes {}
  40. array set MonitorStdModes {}
  41.  
  42. foreach m [vbe_getmodelist 8] {
  43.     set modeInfo [vbe_getmodecrtcinfo $m $OptionRefreshRate]
  44.     array set MonitorStdModes [list " [lindex $modeInfo 1]x[lindex $modeInfo 5] SciTech mode [format "0x%x" $m]" $modeInfo]
  45. }
  46.  
  47.