home *** CD-ROM | disk | FTP | other *** search
/ DOS/V Power Report 1997 March / VPR9703B.ISO / driver / iodata / dvnt120 / winnt31 / oemsetnt.inf < prev    next >
INI File  |  1995-02-02  |  27KB  |  599 lines
  1. [Identification]
  2.     OptionType = VIDEO
  3.  
  4. [LanguagesSupported]
  5.     ENG
  6.  
  7. [Options]
  8.     "ALP640x480x4x60"    = cirrus4m, 4, 640,  480, 60, 0
  9.     "ALP640x480x4x75"    = cirrus4m, 4, 640,  480, 75, 0
  10.     "ALP640x480x8x60"    = cirrus4m, 8, 640,  480, 60, 0
  11.     "ALP640x480x8x75"    = cirrus4m, 8, 640,  480, 75, 0
  12.     "ALP800x600x4x60"    = cirrus4m, 4, 800,  600, 60, 0
  13.     "ALP800x600x4x72"    = cirrus4m, 4, 800,  600, 72, 0
  14.     "ALP800x600x4x75"    = cirrus4m, 4, 800,  600, 75, 0
  15.     "ALP800x600x8x60"    = cirrus4m, 8, 800,  600, 60, 0
  16.     "ALP800x600x8x72"    = cirrus4m, 8, 800,  600, 72, 0
  17.     "ALP800x600x8x75"    = cirrus4m, 8, 800,  600, 75, 0
  18.     "ALP1024x768x4x60"   = cirrus4m, 4, 1024, 768, 60, 0
  19.     "ALP1024x768x4x70"   = cirrus4m, 4, 1024, 768, 70, 0
  20.     "ALP1024x768x4x72"   = cirrus4m, 4, 1024, 768, 72, 0
  21.     "ALP1024x768x4x75"   = cirrus4m, 4, 1024, 768, 75, 0
  22.     "ALP1024x768x8x60"   = cirrus4m, 8, 1024, 768, 60, 0
  23.     "ALP1024x768x8x70"   = cirrus4m, 8, 1024, 768, 70, 0
  24.     "ALP1024x768x8x72"   = cirrus4m, 8, 1024, 768, 72, 0
  25.     "ALP1024x768x8x75"   = cirrus4m, 8, 1024, 768, 75, 0
  26.     "ALP1280x1024x4x60"  = cirrus4m, 4, 1280, 1024, 60, 0
  27.     "ALP1280x1024x4x45I" = cirrus4m, 4, 1280, 1024, 45, 1
  28.     "ALP1280x1024x8x60"  = cirrus4m, 8, 1280, 1024, 60, 0
  29.     "ALP1280x1024x8x45I" = cirrus4m, 8, 1280, 1024, 45, 1
  30.  
  31. ;
  32. ; This maps detected options into the options we support
  33. ;
  34. ; Format: DetectedOption = MappedOption
  35. ;
  36.  
  37. [MapOfOptions]
  38.     "VGA"                       = "VGA"
  39. [MiniportDrivers]
  40.     cirrus4m   = !SERVICE_KERNEL_DRIVER, Video, !SERVICE_ERROR_NORMAL, 16, {clvga16,clblt256}, 1 , %SystemRoot%\System32\IoLogMsg.dll , 7
  41.  
  42.  
  43. ;-----------------------------------------------------------------------
  44. ; OPTION TEXT SECTION
  45. ; -------------------
  46. ; These are text strings used to identify the option to the user.  There
  47. ; are separate sections for each language supported.  The format of the
  48. ; section name is "OptionsText" concatenated with the Language represented
  49. ; by the section.
  50. ;
  51. ;-----------------------------------------------------------------------
  52.  
  53. [OptionsTextENG]
  54.     "ALP640x480x4x60"   = "GA-DVL II/DPC II  640x480, 16 colors 60Hz"
  55.     "ALP640x480x4x75"   = "GA-DVL II/DPC II  640x480, 16 colors 75Hz"
  56.     "ALP640x480x8x60"   = "GA-DVL II/DPC II  640x480, 256 colors 60Hz"
  57.     "ALP640x480x8x75"   = "GA-DVL II/DPC II  640x480, 256 colors 75Hz"
  58.     "ALP800x600x4x60"   = "GA-DVL II/DPC II  800x600, 16 colors 60Hz"
  59.     "ALP800x600x4x72"   = "GA-DVL II/DPC II  800x600, 16 colors 72Hz"
  60.     "ALP800x600x4x75"   = "GA-DVL II/DPC II  800x600, 16 colors 75Hz"
  61.     "ALP800x600x8x60"   = "GA-DVL II/DPC II  800x600, 256 colors 60Hz"
  62.     "ALP800x600x8x72"   = "GA-DVL II/DPC II  800x600, 256 colors 72Hz"
  63.     "ALP800x600x8x75"   = "GA-DVL II/DPC II  800x600, 256 colors 75Hz"
  64.     "ALP1024x768x4x60"  = "GA-DVL II/DPC II  1024x768, 16 colors 60Hz"
  65.     "ALP1024x768x4x70"  = "GA-DVL II/DPC II  1024x768, 16 colors 70Hz"
  66.     "ALP1024x768x4x72"  = "GA-DVL II/DPC II  1024x768, 16 colors 72Hz"
  67.     "ALP1024x768x4x75"  = "GA-DVL II/DPC II  1024x768, 16 colors 75Hz"
  68.     "ALP1024x768x8x60"  = "GA-DVL II/DPC II  1024x768, 256 colors 60Hz"
  69.     "ALP1024x768x8x70"  = "GA-DVL II/DPC II  1024x768, 256 colors 70Hz"
  70.     "ALP1024x768x8x72"  = "GA-DVL II/DPC II  1024x768, 256 colors 72Hz"
  71.     "ALP1024x768x8x75"  = "GA-DVL II/DPC II  1024x768, 256 colors 75Hz"
  72.     "ALP1280x1024x4x60"  = "GA-DVL II/DPC II  1280x1024, 16 colors 60Hz"
  73.     "ALP1280x1024x4x45I" = "GA-DVL II/DPC II  1280x1024, 16 colors Interlaced"
  74.     "ALP1280x1024x8x60"  = "GA-DVL II/DPC II  1280x1024, 256 colors 60Hz"
  75.     "ALP1280x1024x8x45I" = "GA-DVL II/DPC II  1280x1024, 256 colors Interlaced"
  76.  
  77.  
  78.  
  79. ;---------------------------------------------------------------------------
  80. ; 1. Identify
  81. ;
  82. ; DESCRIPTION:   To verify that this INF deals with the same type of options
  83. ;                as we are choosing currently.
  84. ;
  85. ; INPUT:         None
  86. ;
  87. ; OUTPUT:        $($R0): STATUS: STATUS_SUCCESSFUL
  88. ;                $($R1): Option Type (COMPUTER ...)
  89. ;                $($R2): Diskette description
  90. ;---------------------------------------------------------------------------
  91.  
  92. [Identify]
  93.     read-syms Identification
  94.     set Status     = STATUS_SUCCESSFUL
  95.     set Identifier = $(OptionType)
  96.     set Media      = #("Source Media Descriptions", 1, 1)
  97.     Return $(Status) $(Identifier) $(Media)
  98. [ReturnOptions]
  99.     set Status        = STATUS_FAILED
  100.     set OptionList     = {}
  101.     set OptionTextList = {}
  102.     set LanguageList = ^(LanguagesSupported, 1)
  103.     Ifcontains(i) $($0) in $(LanguageList)
  104.         goto returnoptions
  105.     else
  106.         set Status = STATUS_NOLANGUAGE
  107.         goto finish_ReturnOptions
  108.     endif
  109. returnoptions = +
  110.     set OptionList     = ^(Options, 0)
  111.     set OptionTextList = ^(OptionsText$($0), 1)
  112.     set Status         = STATUS_SUCCESSFUL
  113. finish_ReturnOptions = +
  114.     Return $(Status) $(OptionList) $(OptionTextList)
  115. [MapToSupportedOption]
  116.     set Status = STATUS_FAILED
  117.     set MappedOption = $($0)
  118.     set OptionList = ^(MapOfOptions, 0)
  119.     ifcontains $($0) in $(OptionList)
  120.         set MappedOption = #(MapOfOptions, $($0), 1)
  121.     else
  122.         set MappedOption = "VGA"
  123.     endif
  124.     set Status = STATUS_SUCCESSFUL
  125.     Return $(Status) $(MappedOption)
  126. [ServicesEntry]
  127.     CurrentEntry = "" ? $(!LIBHANDLE) GetDevicemapValue Video \Device\Video0
  128. [InstallOption]
  129.     set Status       = STATUS_FAILED
  130.     set DrivesToFree = {}
  131.     set Option   = $($1)
  132.     set SrcDir   = $($2)
  133.     set AddCopy  = $($3)
  134.     set DoCopy   = $($4)
  135.     set DoConfig = $($5)
  136.     set LanguageList = ^(LanguagesSupported, 1)
  137.     Ifcontains(i) $($0) in $(LanguageList)
  138.     else
  139.         set Status = STATUS_NOLANGUAGE
  140.         goto finish_InstallOption
  141.     endif
  142.     read-syms Strings$($0)
  143.     set OptionList = ^(Options, 0)
  144.     ifcontains $(Option) in $(OptionList)
  145.     else
  146.         goto finish_InstallOption
  147.     endif
  148.     set OptionList = ""
  149.     set MiniportDriver    = #(Options, $(Option), 1)
  150.     set BitsPerPel        = #(Options, $(Option), 2)
  151.     set XResolution       = #(Options, $(Option), 3)
  152.     set YResolution       = #(Options, $(Option), 4)
  153.     set VRefresh          = #(Options, $(Option), 5)
  154.     set Interlaced        = #(Options, $(Option), 6)
  155.     set Type              = $(#(MiniportDrivers, $(MiniportDriver), 1))
  156.     set Group             =   #(MiniportDrivers, $(MiniportDriver), 2)
  157.     set ErrorControl      = $(#(MiniportDrivers, $(MiniportDriver), 3))
  158.     set Tag               =   #(MiniportDrivers, $(MiniportDriver), 4)
  159.     set InstalledDisplays =   #(MiniportDrivers, $(MiniportDriver), 5)
  160.     set VgaCompatible     =   #(MiniportDrivers, $(MiniportDriver), 6)
  161.     set EventMessageFile  =   #(MiniportDrivers, $(MiniportDriver), 7)
  162.     set TypesSupported    =   #(MiniportDrivers, $(MiniportDriver), 8)
  163.     read-syms ServicesEntry
  164.     detect    ServicesEntry
  165. installtheoption = +
  166.     ifstr(i) $(AddCopy) == "YES"
  167.         set DoActualCopy = NO
  168.         set FileToCheck = #(Files-DisplayMiniportDrivers, $(MiniportDriver), 2)
  169.         LibraryProcedure STATUS,$(!LIBHANDLE),CheckFileExistance $(!STF_WINDOWSSYSPATH)"\drivers\"$(FileToCheck)
  170.         ifstr(i) $(STATUS) == NO
  171.             set DoActualCopy = YES
  172.             goto addfiles
  173.         endif
  174.         ForListDo $(InstalledDisplays)
  175.             set FileToCheck = #(Files-DisplayDLLs, $($), 2)
  176.             LibraryProcedure STATUS,$(!LIBHANDLE),CheckFileExistance $(!STF_WINDOWSSYSPATH)"\"$(FileToCheck)
  177.             ifstr(i) $(STATUS) == NO
  178.                 set DoActualCopy = YES
  179.             endif
  180.         EndForListDo
  181. addfiles = +
  182.         ifstr(i) $(DoActualCopy) == NO
  183.             shell "subroutn.inf" DriversExist $($0) $(String1)
  184.             ifint $($ShellCode) != $(!SHELL_CODE_OK)
  185.                 Debug-Output "VIDEO.INF: shelling DriversExist failed"
  186.                 goto finish_InstallOption
  187.             endif
  188.             ifstr(i) $($R0) == STATUS_CURRENT
  189.             else-ifstr(i) $($R0) == STATUS_NEW
  190.                 set DoActualCopy = YES
  191.             else-ifstr(i) $($R0) == STATUS_USERCANCEL
  192.                 Debug-Output "VIDEO.INF: User cancelled video installation"
  193.                 goto finish_InstallOption
  194.             else
  195.                 Debug-Output "VIDEO.INF: Error reported in DriversExist routine in SUBROUTN.INF"
  196.                 goto finish_InstallOption
  197.             endif
  198.         endif
  199.         ifstr(i) $(DoActualCopy) == YES
  200.             shell "subroutn.inf" DoAskSourceEx $(SrcDir) $(String2)
  201.             ifint $($ShellCode) != $(!SHELL_CODE_OK)
  202.                 Debug-Output "VIDEO.INF: shelling DoAskSourceEx failed"
  203.                 goto finish_InstallOption
  204.             endif
  205.             ifstr(i) $($R0) == STATUS_SUCCESSFUL
  206.                 set SrcDir = $($R1)
  207.                 ifstr(i) $($R2) != ""
  208.                     set DrivesToFree = >($(DrivesToFree), $($R2))
  209.                 endif
  210.             else
  211.                 Debug-Output "VIDEO.INF: User cancelled asking source."
  212.                 goto finish_InstallOption
  213.             endif
  214.             install Install-AddCopyOption
  215.             ifstr(i) $(STF_INSTALL_OUTCOME) != "STF_SUCCESS"
  216.                 Debug-Output "VIDEO.INF: Adding video files to copy list failed"
  217.                 goto finish_InstallOption
  218.             endif
  219.         else
  220.             set DoCopy = NO
  221.         endif
  222.     endif
  223.     ifstr(i) $(DoCopy) == "YES"
  224.         read-syms ProgressCopy$($0)
  225.         install Install-DoCopyOption
  226.         ifstr(i) $(STF_INSTALL_OUTCOME) == "STF_FAILURE"
  227.             Debug-Output "Copying files failed"
  228.             goto finish_InstallOption
  229.         else-ifstr(i) $(STF_INSTALL_OUTCOME) == "STF_USERQUIT"
  230.             set Status = STATUS_USERCANCEL
  231.             goto finish_InstallOption
  232.         endif
  233.     endif
  234.     ifstr(i) $(DoConfig) == "YES"
  235.         shell "registry.inf" CheckSetupModify
  236.         ifint $($ShellCode) != $(!SHELL_CODE_OK)
  237.             goto finish_InstallOption
  238.         endif
  239.         ifstr(i) $($R0) != STATUS_SUCCESSFUL
  240.             goto finish_InstallOption
  241.         endif
  242.         set ServiceNode   = $(MiniportDriver)
  243.         set ServiceBinary = %SystemRoot%\System32\drivers\#(Files-DisplayMiniportDrivers, $(MiniportDriver), 2)
  244.         set ServicesValues   = { +
  245.                 {Type,           0, $(!REG_VT_DWORD),     $(Type)                  }, +
  246.                 {Start,          0, $(!REG_VT_DWORD),     $(!SERVICE_SYSTEM_START) }, +
  247.                 {Group,          0, $(!REG_VT_SZ),        $(Group)                 }, +
  248.                 {ErrorControl,   0, $(!REG_VT_DWORD),     $(ErrorControl)          }, +
  249.                 {Tag,            0, $(!REG_VT_DWORD),     $(Tag)                   }, +
  250.                 {BinaryPathName, 0, $(!REG_VT_EXPAND_SZ), $(ServiceBinary)         }  +
  251.                 }
  252.         set ParametersValues = { +
  253.                 {InstalledDisplayDrivers,     0, $(!REG_VT_MULTI_SZ), $(InstalledDisplays) }, +
  254.                 {VgaCompatible,               0, $(!REG_VT_DWORD),    $(VgaCompatible)     }, +
  255.                 {DefaultSettings.BitsPerPel,  0, $(!REG_VT_DWORD),    $(BitsPerPel)        }, +
  256.                 {DefaultSettings.XResolution, 0, $(!REG_VT_DWORD),    $(XResolution)       }, +
  257.                 {DefaultSettings.YResolution, 0, $(!REG_VT_DWORD),    $(YResolution)       }  +
  258.                 }
  259.         ifstr(i) $(VRefresh) != ""
  260.             set VRefreshValue = {DefaultSettings.VRefresh, 0, $(!REG_VT_DWORD), $(VRefresh)}
  261.             set ParametersValues = >($(ParametersValues), $(VRefreshValue))
  262.         endif
  263.         ifstr(i) $(Interlaced) != ""
  264.             set InterlacedValue = {DefaultSettings.Interlaced, 0, $(!REG_VT_DWORD), $(Interlaced)}
  265.             set ParametersValues = >($(ParametersValues), $(InterlacedValue))
  266.         endif
  267.         set DeviceValues     = {}
  268.         set EventLogValues   = { +
  269.                 {EventMessageFile, 0, $(!REG_VT_EXPAND_SZ), $(EventMessageFile) }, +
  270.                 {TypesSupported,   0, $(!REG_VT_DWORD),     $(TypesSupported)   }  +
  271.                 }
  272.         shell "registry.inf"  MakeServicesEntry $(ServiceNode)      +
  273.                                                 $(ServicesValues)   +
  274.                                                 $(ParametersValues) +
  275.                                                 $(DeviceValues)     +
  276.                                                 $(EventLogValues)   +
  277.                                                 Device0
  278.         ifint $($ShellCode) != $(!SHELL_CODE_OK)
  279.             Debug-Output "Couldn't execute MakeServicesEntry in registry.inf"
  280.             goto finish_InstallOption
  281.         endif
  282.         ifstr(i) $($R0) != STATUS_SUCCESSFUL
  283.             Debug-Output "MakeServicesEntry failed for video"
  284.             goto finish_InstallOption
  285.         endif
  286.         ifstr(i) $(CurrentEntry) != $(MiniportDriver)
  287.             ifstr(i) $(CurrentEntry) != VGA
  288.                 ifstr(i) $(CurrentEntry) != ""
  289.                     shell "registry.inf" ModifyServicesEntry $(CurrentEntry) $(!SERVICE_DISABLED)
  290.                     ifint $($ShellCode) != $(!SHELL_CODE_OK)
  291.                         Debug-Output "Couldn't find DisableServicesEntry in registry.inf"
  292.                         goto errorconfig
  293.                     endif
  294.                     ifstr(i) $($R0) != STATUS_SUCCESSFUL
  295.                         Debug-Output "DisableServices entry failed"
  296.                     endif
  297.                 endif
  298.             endif
  299.         endif
  300.         goto configdone
  301. errorconfig = +
  302.         ifstr(i) $(CurrentEntry) != $(MiniportDriver)
  303.             shell "registry.inf" ModifyServicesEntry $(MiniportDriver) $(!SERVICE_DISABLED)
  304.             ifstr(i) $(CurrentEntry) != ""
  305.                 shell "registry.inf" ModifyServicesEntry $(CurrentEntry) $(!SERVICE_SYSTEM_START)
  306.             endif
  307.         endif
  308.         goto finish_InstallOption
  309. configdone = +
  310.     endif
  311.     set Status = STATUS_SUCCESSFUL
  312. finish_InstallOption = +
  313.     ForListDo $(DrivesToFree)
  314.         LibraryProcedure STATUS,$(!LIBHANDLE), DeleteNetConnection $($) "TRUE"
  315.     EndForListDo
  316.     Return $(Status)
  317. [Install-AddCopyOption]
  318.     set STF_VITAL = ""
  319.     AddSectionKeyFileToCopyList   Files-DisplayMiniportDrivers   +
  320.                                   $(MiniportDriver)              +
  321.                                   $(SrcDir)                      +
  322.                                   $(!STF_WINDOWSSYSPATH)\drivers
  323.     ForListDo $(InstalledDisplays)
  324.         AddSectionKeyFileToCopyList   Files-DisplayDLLs          +
  325.                                       $($)                       +
  326.                                       $(SrcDir)                  +
  327.                                       $(!STF_WINDOWSSYSPATH)
  328.     EndForListDo
  329.     exit
  330. [Install-DoCopyOption]
  331.     CopyFilesInCopyList
  332.     exit
  333.  
  334.  
  335.  
  336.  
  337.  
  338.  
  339.  
  340. [MapToSupportedOption]
  341.     set Status = STATUS_FAILED
  342.     set MappedOption = $($0)
  343.     set OptionList = ^(MapOfOptions, 0)
  344.     ifcontains $($0) in $(OptionList)
  345.         set MappedOption = #(MapOfOptions, $($0), 1)
  346.     else
  347.         set MappedOption = "VGA"
  348.     endif
  349.     set Status = STATUS_SUCCESSFUL
  350.     Return $(Status) $(MappedOption)
  351. [ServicesEntry]
  352.     CurrentEntry = "" ? $(!LIBHANDLE) GetDevicemapValue Video \Device\Video0
  353. [InstallOption]
  354.     set Status       = STATUS_FAILED
  355.     set DrivesToFree = {}
  356.     set Option   = $($1)
  357.     set SrcDir   = $($2)
  358.     set AddCopy  = $($3)
  359.     set DoCopy   = $($4)
  360.     set DoConfig = $($5)
  361.     set LanguageList = ^(LanguagesSupported, 1)
  362.     Ifcontains(i) $($0) in $(LanguageList)
  363.     else
  364.         set Status = STATUS_NOLANGUAGE
  365.         goto finish_InstallOption
  366.     endif
  367.     read-syms Strings$($0)
  368.     set OptionList = ^(Options, 0)
  369.     ifcontains $(Option) in $(OptionList)
  370.     else
  371.         goto finish_InstallOption
  372.     endif
  373.     set OptionList = ""
  374.     set MiniportDriver    = #(Options, $(Option), 1)
  375.     set BitsPerPel        = #(Options, $(Option), 2)
  376.     set XResolution       = #(Options, $(Option), 3)
  377.     set YResolution       = #(Options, $(Option), 4)
  378.     set VRefresh          = #(Options, $(Option), 5)
  379.     set Interlaced        = #(Options, $(Option), 6)
  380.     set Type              = $(#(MiniportDrivers, $(MiniportDriver), 1))
  381.     set Group             =   #(MiniportDrivers, $(MiniportDriver), 2)
  382.     set ErrorControl      = $(#(MiniportDrivers, $(MiniportDriver), 3))
  383.     set Tag               =   #(MiniportDrivers, $(MiniportDriver), 4)
  384.     set InstalledDisplays =   #(MiniportDrivers, $(MiniportDriver), 5)
  385.     set VgaCompatible     =   #(MiniportDrivers, $(MiniportDriver), 6)
  386.     set EventMessageFile  =   #(MiniportDrivers, $(MiniportDriver), 7)
  387.     set TypesSupported    =   #(MiniportDrivers, $(MiniportDriver), 8)
  388.     read-syms ServicesEntry
  389.     detect    ServicesEntry
  390. installtheoption = +
  391.     ifstr(i) $(AddCopy) == "YES"
  392.         set DoActualCopy = NO
  393.         set FileToCheck = #(Files-DisplayMiniportDrivers, $(MiniportDriver), 2)
  394.         LibraryProcedure STATUS,$(!LIBHANDLE),CheckFileExistance $(!STF_WINDOWSSYSPATH)"\drivers\"$(FileToCheck)
  395.         ifstr(i) $(STATUS) == NO
  396.             set DoActualCopy = YES
  397.             goto addfiles
  398.         endif
  399.         ForListDo $(InstalledDisplays)
  400.             set FileToCheck = #(Files-DisplayDLLs, $($), 2)
  401.             LibraryProcedure STATUS,$(!LIBHANDLE),CheckFileExistance $(!STF_WINDOWSSYSPATH)"\"$(FileToCheck)
  402.             ifstr(i) $(STATUS) == NO
  403.                 set DoActualCopy = YES
  404.             endif
  405.         EndForListDo
  406. addfiles = +
  407.         ifstr(i) $(DoActualCopy) == NO
  408.             shell "subroutn.inf" DriversExist $($0) $(String1)
  409.             ifint $($ShellCode) != $(!SHELL_CODE_OK)
  410.                 Debug-Output "VIDEO.INF: shelling DriversExist failed"
  411.                 goto finish_InstallOption
  412.             endif
  413.             ifstr(i) $($R0) == STATUS_CURRENT
  414.             else-ifstr(i) $($R0) == STATUS_NEW
  415.                 set DoActualCopy = YES
  416.             else-ifstr(i) $($R0) == STATUS_USERCANCEL
  417.                 Debug-Output "VIDEO.INF: User cancelled video installation"
  418.                 goto finish_InstallOption
  419.             else
  420.                 Debug-Output "VIDEO.INF: Error reported in DriversExist routine in SUBROUTN.INF"
  421.                 goto finish_InstallOption
  422.             endif
  423.         endif
  424.         ifstr(i) $(DoActualCopy) == YES
  425.             shell "subroutn.inf" DoAskSourceEx $(SrcDir) $(String2)
  426.             ifint $($ShellCode) != $(!SHELL_CODE_OK)
  427.                 Debug-Output "VIDEO.INF: shelling DoAskSourceEx failed"
  428.                 goto finish_InstallOption
  429.             endif
  430.             ifstr(i) $($R0) == STATUS_SUCCESSFUL
  431.                 set SrcDir = $($R1)
  432.                 ifstr(i) $($R2) != ""
  433.                     set DrivesToFree = >($(DrivesToFree), $($R2))
  434.                 endif
  435.             else
  436.                 Debug-Output "VIDEO.INF: User cancelled asking source."
  437.                 goto finish_InstallOption
  438.             endif
  439.             install Install-AddCopyOption
  440.             ifstr(i) $(STF_INSTALL_OUTCOME) != "STF_SUCCESS"
  441.                 Debug-Output "VIDEO.INF: Adding video files to copy list failed"
  442.                 goto finish_InstallOption
  443.             endif
  444.         else
  445.             set DoCopy = NO
  446.         endif
  447.     endif
  448.     ifstr(i) $(DoCopy) == "YES"
  449.         read-syms ProgressCopy$($0)
  450.         install Install-DoCopyOption
  451.         ifstr(i) $(STF_INSTALL_OUTCOME) == "STF_FAILURE"
  452.             Debug-Output "Copying files failed"
  453.             goto finish_InstallOption
  454.         else-ifstr(i) $(STF_INSTALL_OUTCOME) == "STF_USERQUIT"
  455.             set Status = STATUS_USERCANCEL
  456.             goto finish_InstallOption
  457.         endif
  458.     endif
  459.     ifstr(i) $(DoConfig) == "YES"
  460.         shell "registry.inf" CheckSetupModify
  461.         ifint $($ShellCode) != $(!SHELL_CODE_OK)
  462.             goto finish_InstallOption
  463.         endif
  464.         ifstr(i) $($R0) != STATUS_SUCCESSFUL
  465.             goto finish_InstallOption
  466.         endif
  467.         set ServiceNode   = $(MiniportDriver)
  468.         set ServiceBinary = %SystemRoot%\System32\drivers\#(Files-DisplayMiniportDrivers, $(MiniportDriver), 2)
  469.         set ServicesValues   = { +
  470.                 {Type,           0, $(!REG_VT_DWORD),     $(Type)                  }, +
  471.                 {Start,          0, $(!REG_VT_DWORD),     $(!SERVICE_SYSTEM_START) }, +
  472.                 {Group,          0, $(!REG_VT_SZ),        $(Group)                 }, +
  473.                 {ErrorControl,   0, $(!REG_VT_DWORD),     $(ErrorControl)          }, +
  474.                 {Tag,            0, $(!REG_VT_DWORD),     $(Tag)                   }, +
  475.                 {BinaryPathName, 0, $(!REG_VT_EXPAND_SZ), $(ServiceBinary)         }  +
  476.                 }
  477.         set ParametersValues = { +
  478.                 {InstalledDisplayDrivers,     0, $(!REG_VT_MULTI_SZ), $(InstalledDisplays) }, +
  479.                 {VgaCompatible,               0, $(!REG_VT_DWORD),    $(VgaCompatible)     }, +
  480.                 {DefaultSettings.BitsPerPel,  0, $(!REG_VT_DWORD),    $(BitsPerPel)        }, +
  481.                 {DefaultSettings.XResolution, 0, $(!REG_VT_DWORD),    $(XResolution)       }, +
  482.                 {DefaultSettings.YResolution, 0, $(!REG_VT_DWORD),    $(YResolution)       }  +
  483.                 }
  484.         ifstr(i) $(VRefresh) != ""
  485.             set VRefreshValue = {DefaultSettings.VRefresh, 0, $(!REG_VT_DWORD), $(VRefresh)}
  486.             set ParametersValues = >($(ParametersValues), $(VRefreshValue))
  487.         endif
  488.         ifstr(i) $(Interlaced) != ""
  489.             set InterlacedValue = {DefaultSettings.Interlaced, 0, $(!REG_VT_DWORD), $(Interlaced)}
  490.             set ParametersValues = >($(ParametersValues), $(InterlacedValue))
  491.         endif
  492.         set DeviceValues     = {}
  493.         set EventLogValues   = { +
  494.                 {EventMessageFile, 0, $(!REG_VT_EXPAND_SZ), $(EventMessageFile) }, +
  495.                 {TypesSupported,   0, $(!REG_VT_DWORD),     $(TypesSupported)   }  +
  496.                 }
  497.         shell "registry.inf"  MakeServicesEntry $(ServiceNode)      +
  498.                                                 $(ServicesValues)   +
  499.                                                 $(ParametersValues) +
  500.                                                 $(DeviceValues)     +
  501.                                                 $(EventLogValues)   +
  502.                                                 Device0
  503.         ifint $($ShellCode) != $(!SHELL_CODE_OK)
  504.             Debug-Output "Couldn't execute MakeServicesEntry in registry.inf"
  505.             goto finish_InstallOption
  506.         endif
  507.         ifstr(i) $($R0) != STATUS_SUCCESSFUL
  508.             Debug-Output "MakeServicesEntry failed for video"
  509.             goto finish_InstallOption
  510.         endif
  511.         ifstr(i) $(CurrentEntry) != $(MiniportDriver)
  512.             ifstr(i) $(CurrentEntry) != VGA
  513.                 ifstr(i) $(CurrentEntry) != ""
  514.                     shell "registry.inf" ModifyServicesEntry $(CurrentEntry) $(!SERVICE_DISABLED)
  515.                     ifint $($ShellCode) != $(!SHELL_CODE_OK)
  516.                         Debug-Output "Couldn't find DisableServicesEntry in registry.inf"
  517.                         goto errorconfig
  518.                     endif
  519.                     ifstr(i) $($R0) != STATUS_SUCCESSFUL
  520.                         Debug-Output "DisableServices entry failed"
  521.                     endif
  522.                 endif
  523.             endif
  524.         endif
  525.         goto configdone
  526. errorconfig = +
  527.         ifstr(i) $(CurrentEntry) != $(MiniportDriver)
  528.             shell "registry.inf" ModifyServicesEntry $(MiniportDriver) $(!SERVICE_DISABLED)
  529.             ifstr(i) $(CurrentEntry) != ""
  530.                 shell "registry.inf" ModifyServicesEntry $(CurrentEntry) $(!SERVICE_SYSTEM_START)
  531.             endif
  532.         endif
  533.         goto finish_InstallOption
  534. configdone = +
  535.     endif
  536.     set Status = STATUS_SUCCESSFUL
  537. finish_InstallOption = +
  538.     ForListDo $(DrivesToFree)
  539.         LibraryProcedure STATUS,$(!LIBHANDLE), DeleteNetConnection $($) "TRUE"
  540.     EndForListDo
  541.     Return $(Status)
  542.     set STF_VITAL = ""
  543.     AddSectionKeyFileToCopyList   Files-DisplayMiniportDrivers   +
  544.                                   $(MiniportDriver)              +
  545.                                   $(SrcDir)                      +
  546.                                   $(!STF_WINDOWSSYSPATH)\drivers
  547.     ForListDo $(InstalledDisplays)
  548.         AddSectionKeyFileToCopyList   Files-DisplayDLLs          +
  549.                                       $($)                       +
  550.                                       $(SrcDir)                  +
  551.                                       $(!STF_WINDOWSSYSPATH)
  552.     EndForListDo
  553.     exit
  554. [Install-DoCopyOption]
  555.     CopyFilesInCopyList
  556.     exit
  557.  
  558. [ProgressCopyENG]
  559.     ProCaption   = "Windows NT セットアップ"
  560.     ProCancel    = "ｷｬﾝｾﾙ"
  561.     ProCancelMsg = "Windows NT は正しく組み込まれていません。"+
  562.                    "ファイルのコピーを中止しますか?"
  563.     ProCancelCap = "セットアップ メッセージ"
  564.     ProText1     = "コピー元:"
  565.     ProText2     = "コピー先:"
  566. [StringsENG]
  567.     String1 = "ディスプレイ"
  568.     String2 = "Windows NT ディスプレイ ドライバ ファイルへのフル パスを入力してください。"+
  569.               "セットアップ フロッピー ディスクからファイルを組み込む場合は、"+
  570.               "ドライブ名 (A: など) を入力してください。"+
  571.               "セットアップは適切なディスクを挿入するよう指示します。"+
  572.               "これらの操作が終わったら[続行]を選んでください。"
  573.  
  574. ;-----------------------------------------------------------------------
  575. ; SOURCE MEDIA DESCRIPTIONS
  576. ; -------------------------
  577. ; The OEM should list all the diskette labels here.  The source media
  578. ; description is used during copy to prompt the user for a diskette
  579. ; if the source is diskettes.
  580. ;
  581. ; Use 1 = "Diskette 1 Label" , TAGFILE = disk1
  582. ;     2 = "Diskette 2 Label" , TAGFILE = disk2
  583. ;     ...
  584. ;-----------------------------------------------------------------------
  585.  
  586. ;--------------------------------------------------------------------
  587. ; THE SECTIONS BELOW SHOULD BE AUTOMATICALLY GENERATED BY THE EXCEL
  588. ; SPREAD SHEETS
  589. ;--------------------------------------------------------------------
  590.  
  591. [Source Media Descriptions]
  592.     1  = 
  593. [Files-DisplayDLLs]
  594. clvga16 = 1,clvga16.dll , SIZE=999
  595. clblt256 = 1,clblt256.dll , SIZE=999
  596.  
  597. [Files-DisplayMiniportDrivers]
  598. cirrus4m = 1,cirrus4m.sys , SIZE=999
  599.