home *** CD-ROM | disk | FTP | other *** search
/ Chip 1996 November / Chip 11-96.iso / treiber / grafik / miro / crystal / 20pv / windows / 20pvwin.exe / INSTALL.DAT < prev    next >
Encoding:
INSTALL Professional project  |  1995-05-03  |  39.5 KB  |  1,018 lines
  1. //*****************************************************************************
  2. // Name         : INSTALL.DAT
  3. // Project      : POWER: Installation miro WINDOWS-BASIC-DISK
  4. // Function     : Scriptfile for KDC-wINSTALL
  5. // Author       : KF / miro Computer Products AG, 
  6. //                Carl-Miele-Str. 4, D-38112 Braunschweig
  7. // created      : 25.02.94
  8. // changed      : KF 26.04.95
  9. // revision......when...................who.....->.where.and.what..............
  10. // $Log:$
  11. //*****************************************************************************
  12.  
  13. //*** project header block ****************************************************
  14.  
  15. @DefineProject
  16.   @Name       = "miro╖win - High speed drivers for Windows"
  17.   @Version    = "2.10"
  18.   @OutDrive   = @WindowsDrive
  19.   @SubDir     = "@WindowsDir"
  20.   @InDiskBell = 1
  21. @EndProject
  22.  
  23.  
  24. //*** define variables ********************************************************
  25.  
  26. @DefineVars
  27.   @QString @mName     = "miroWIN Disk"
  28.   @Integer @Red       = @RGB (255,0,0)
  29.   @Integer @Green     = @RGB (0,255,0)
  30.   @Integer @Blue      = @RGB (0,0,255)
  31.   @Integer @Black     = @RGB (0,0,0)
  32.   @Integer @White     = @RGB (255,255,255)
  33.   @Integer @UnInstall = @False
  34.   @Integer @OldLang   = 0
  35.   @Integer @Delay     = 0
  36.   @Integer @d         = 5
  37.   @Integer @fflag     = 0
  38.   @Integer @x         = 0
  39.   @Integer @y         = 10
  40.   @Integer @l         = 10
  41.   @Integer @isnotdel  = @FALSE
  42.   @QString @merke     = ""
  43.   @If (@DirExists ("@WindowsDrive:@WindowsDir\\SYSTEM"))
  44.     @Dir @wSysDir     = "@SubDir\\SYSTEM"
  45.   @Else
  46.     @Dir @wSysDir     = "@SubDir"
  47.   @EndIf
  48.   @If (@DriveRemote (@InDrive))
  49.     @Integer @IsFloppy = 0
  50.   @ElseIf (@Removable (@InDrive))
  51.     @Integer @IsFloppy = 1
  52.   @Else
  53.     @Integer @IsFloppy = 0
  54.   @EndIf
  55.   @QString @msvid     = ""
  56.   @QString @msvidx    = ""
  57.   @Integer @i         = 1
  58. @EndVars
  59.  
  60.  
  61. //*** input language from user ************************************************
  62.  
  63. @SetGroup (E)
  64. @OldLang = 1
  65. @SetLang (1)
  66.  
  67. INPUTLANG:
  68. @GetGroups
  69.   @DlgCtrlSize (0,8,20,12,35)
  70.   @BackGroundMode (2,,)
  71.   @Cls 
  72.   @If ('D' [= @Group)
  73.  
  74. Willkommen bei der miro╖win Installation Version @Version
  75.  
  76. Sprachauswahl:
  77.  
  78.   @Set D = "Deutsch"
  79.   @Set E = "English"
  80.  
  81.   @Else
  82.  
  83. Welcome to the miro╖win installation version @Version
  84.  
  85. Language selection:
  86.  
  87.   @Set E = "English"
  88.   @Set D = "Deutsch"
  89.  
  90.   @EndIf
  91. @EndGroups
  92.  
  93. @If ('D' [= @Group && @OldLang != 0)
  94.   @FlushGroups ()
  95.   @SetGroup (D)
  96.   @OldLang = 0
  97.   @SetLang (0)
  98. //@Goto INPUTLANG
  99. @ElseIf ('E' [= @Group && @OldLang != 1)
  100.   @FlushGroups ()
  101.   @SetGroup (E)
  102.   @OldLang = 1
  103.   @SetLang (1)
  104. //@Goto INPUTLANG
  105. @EndIf  
  106.  
  107.  
  108. //*** define language dependant strings ***************************************
  109.  
  110. @DefineVars
  111.   @If ('D' [= @Group)
  112.     @QString @M00 = "Das @mName unterstⁿtzt keine" 
  113.     @QString @M01 = "Version von Windows vor 3.1 !"
  114.     @QString @M10 = "WΣhlen Sie das Board aus, welches Sie installieren wollen:" 
  115.     @QString @M12 = "Installierte Software komplett entfernen"
  116.     @QString @M20 = "WΣhlen Sie mit der Maus die Software aus, die Sie installieren wollen:" 
  117.     @QString @M21 = "miro-Treiber fⁿr Video for Windows"
  118.     @QString @M22 = "Windows 3.1 Treiber Software"
  119.     @QString @M23 = "zusΣtzliche miroWINTOOLS"
  120.     @QString @M24 = "miro-Hintergrundbild"
  121.     @QString @M30 = "Software entfernen:"
  122.     @QString @M31 = "Die installierte Software ist aktiv und kann nicht gel÷scht werden."
  123.     @QString @M32 = "Drⁿcken Sie OK, um mit der Installation fortzufahren."
  124.     @QString @M33 = "Fⁿr eine vollstΣndige Video-Unterstⁿtzung mⁿssen Sie "
  125.     @QString @M34 = "zuerst Video for Windows 11D oder eine spΣtere Version "
  126.     @QString @M35 = "installieren. "
  127.     @QString @M36 = "Wollen Sie trotzdem fortfahren?"
  128.     @QString @M50 = "miroMAGIC 40PV video"
  129.     @QString @M300 = "Der installierte miroVIDEO DC1 Treiber ist weiterhin aktiv." 
  130.     @QString @M301 = "Sie k÷nnen den miroMAGIC 40PV video Aufnahme-Treiber ⁿber "
  131.     @QString @M302 = "das Fenster miroVIDEO DC1 Hardware-Einstellungen aktivieren."
  132.     @QString @M303 = "Dem bisher aktiven AufnahmegerΣt wird GerΣtenummer "
  133.     @QString @M304 = ""
  134.     @QString @M305 = "zugewiesen."
  135.  
  136.   @Else
  137.     @QString @M00 = "The @mName does not support"
  138.     @QString @M01 = "any version of Windows prior to 3.1 !"
  139.     @QString @M10 = "Select with your mouse the board you want to install:" 
  140.     @QString @M12 = "Completely remove installed software"
  141.     @QString @M20 = "Select with your mouse the software you want to install:"
  142.     @QString @M21 = "miro driver for Video for Windows"
  143.     @QString @M22 = "Windows 3.1 driver software"
  144.     @QString @M23 = "additional miroWINTOOLS"
  145.     @QString @M24 = "miro wallpaper"
  146.     @QString @M30 = "Uninstall software:"
  147.     @QString @M31 = "The installed software is active and can therfore not be deleted."
  148.     @QString @M32 = "Press OK to proceed with the installation"
  149.     @QString @M33 = "For a complete video support you have to install"
  150.     @QString @M34 = "Video for Windows 11D or higher first. "
  151.     @QString @M35 = ""
  152.     @QString @M36 = "Do you want to proceed?"
  153.     @QString @M50 = "miroCRYSTAL 40PV video"
  154.     @QString @M300 = "The installed miroVIDEO DC1 driver continues to be active." 
  155.     @QString @M301 = "To activate the miroMAGIC 40PV video capture driver, go to "
  156.     @QString @M302 = "the miroVIDEO DC1 Hardware Setup window."
  157.     @QString @M303 = "Device number "
  158.     @QString @M304 = " is assigned to the Video Capture Device"
  159.     @QString @M305 = "that has been active until now."
  160.  
  161.   @EndIf
  162. @EndVars
  163.  
  164.   
  165. //*** check windows version ***************************************************
  166.  
  167. @If (@WindowsMajor < 3 || @WindowsMajor == 3 && @WindowsMinor < 1)
  168.   @FlushKeyboard
  169.   @Display
  170.   @BackGroundMode (3, @Red, @Red)
  171.   @Cls
  172. @M00
  173. @M01
  174.   @Pause
  175.   @Abort
  176.   @EndDisplay
  177. @Endif
  178.  
  179.  
  180. //***Video for Windows Message ************************************************
  181.  
  182. @If (!@Exists("@OutDrive:@wSysDir\\UDH.DLL"))
  183.   @FlushKeyboard
  184.   @Display
  185. @M33
  186. @M34
  187. @M35
  188.  
  189. @M36
  190.   @Pause
  191.   @EndDisplay
  192. @EndIf
  193.  
  194. //*** input board type by user ************************************************
  195.  
  196. BOARDSELECT:
  197. @GetOption
  198.   @DlgCtrlSize (0,4,0,10,50)
  199.   @BackGroundMode (3,@Blue, @Blue)
  200.   @Cls
  201.  
  202. @M10
  203.  
  204.   @Option 100 = "@M50" 
  205.   @Option 101 = "miroCRYSTAL 20PV avi" 
  206.   @Option 210 = "@M12"
  207. @EndOption
  208.  
  209.  
  210. //*** input items to install from user ****************************************
  211.  
  212. @If (210 [! @Option) // uninstall
  213.   @SetOption (200)
  214.   @If (100 [= @Option) // miroCRYSTAL 40PV
  215.     @SetOption (204)
  216.   @EndIf
  217.   @GetOption
  218.     @CheckBox
  219.     @DlgCtrlSize (0,4,0,10,50)
  220.     @BackGroundMode (3,@Blue, @Blue)
  221.     @Cls
  222.   
  223. @M20
  224.  
  225.     @Option 200 = "@M22"
  226.     @If (100 [= @Option) // miroCRYSTAL 40PV
  227.       @Option 204 = "@M21"
  228.     @EndIf
  229.     @Option 203 = "@M23"
  230.     @Option 202 = "@M24"
  231.   @EndOption
  232. @EndIf
  233.  
  234.  
  235. //*** Uninstall software ******************************************************
  236.  
  237. @If (210 [= @Option) // uninstall
  238. @If (   (@StrFind(@GetINI ("boot", "display.drv", "system.ini"),"C20PV") > -1)
  239.     ||  (@StrFind(@GetINI ("boot", "display.drv", "system.ini"),"c20pv") > -1)
  240.     ||  (@StrFind(@GetINI ("boot", "display.drv", "system.ini"),"C40PV") > -1)
  241.     ||  (@StrFind(@GetINI ("boot", "display.drv", "system.ini"),"c40pv") > -1)
  242.     )
  243.   @FlushKeyboard
  244.   @Display
  245. @M31
  246. @M32
  247.   @Pause
  248.   @EndDisplay
  249.   @ClearOption (210)
  250.   @UnInstall = @True
  251.   @Goto BOARDSELECT
  252.  
  253. @Else
  254.   @FlushKeyboard
  255.   @Display
  256. @M30
  257.   @Pause
  258.   @EndDisplay
  259.  
  260.   @Delete ("@OutDrive:@wSysDir\\OEMC20PV.*")
  261.   @Delete ("@OutDrive:@wSysDir\\OEMC40PV.*")
  262.   @Delete ("@OutDrive:@wSysDir\\OEMC10SD.*")
  263.   @Delete ("@OutDrive:@wSysDir\\OEMC20SD.*")
  264.   @Delete ("@OutDrive:@wSysDir\\OEMC20SV.*")
  265.   @Delete ("@OutDrive:@wSysDir\\OEMC40SV.*")
  266.   @Delete ("@OutDrive:@wSysDir\\OEMMAG40.*")
  267.   @Delete ("@OutDrive:@wSysDir\\OEMMAG20.*")
  268.   @Delete ("@OutDrive:@wSysDir\\OEMC20TW.*")
  269.   @Delete ("@OutDrive:@wSysDir\\OEMBIBO?.*")
  270.   @Delete ("@OutDrive:@wSysDir\\OEMMAGS4.*")
  271.   @Delete ("@OutDrive:@wSysDir\\OEMRAIN.*")
  272.   @Delete ("@OutDrive:@wSysDir\\OEMCR8S.*")
  273.   @Delete ("@OutDrive:@wSysDir\\OEMCR16S.*")
  274.   @Delete ("@OutDrive:@wSysDir\\OEMCR24S.*")
  275.   @Delete ("@OutDrive:@wSysDir\\OEMCR32S.*")
  276.   @Delete ("@OutDrive:@wSysDir\\C20PV*.DRV")
  277.   @Delete ("@OutDrive:@wSysDir\\C40PV*.DRV")
  278.   @Delete ("@OutDrive:@wSysDir\\1SD*.DRV")
  279.   @Delete ("@OutDrive:@wSysDir\\C20SD*.DRV")
  280.   @Delete ("@OutDrive:@wSysDir\\C20SV*.DRV")
  281.   @Delete ("@OutDrive:@wSysDir\\C40SV*.DRV")
  282.   @Delete ("@OutDrive:@wSysDir\\M20*.DRV")
  283.   @Delete ("@OutDrive:@wSysDir\\M40*.DRV")
  284.   @Delete ("@OutDrive:@wSysDir\\TW10*.DRV")
  285.   @Delete ("@OutDrive:@wSysDir\\TW20*.DRV")
  286.   @Delete ("@OutDrive:@wSysDir\\TWIN.DRV")
  287.   @Delete ("@OutDrive:@wSysDir\\MAGS4*.DRV")
  288.   @Delete ("@OutDrive:@wSysDir\\RAIN*.DRV")
  289.   @Delete ("@OutDrive:@wSysDir\\C8S*.DRV")
  290.   @Delete ("@OutDrive:@wSysDir\\CR16S*.DRV")
  291.   @Delete ("@OutDrive:@wSysDir\\CR24S*.DRV")
  292.   @Delete ("@OutDrive:@wSysDir\\CR32S*.DRV")
  293.   @Delete ("@OutDrive:@wSysDir\\OCTO.MON")
  294.   @Delete ("@OutDrive:@wSysDir\\OCTOVGA.*")
  295. //  @Delete ("@OutDrive:@wSysDir\\VDDP9100.386")
  296.   @Delete ("@OutDrive:@wSysDir\\P9100*.*")
  297.   @Delete ("@OutDrive:@wSysDir\\P91INIT.DLL")
  298.   @Delete ("@OutDrive:@SubDir\\P9X00RES.DAT")
  299.   @Delete ("@OutDrive:@SubDir\\P9X00RES.INI")
  300.   @Delete ("@OutDrive:@SubDir\\CRYS20PV.BMP")
  301.   @Delete ("@OutDrive:@SubDir\\CRYS40PV.BMP")
  302.   @Delete ("@OutDrive:@SubDir\\MINFO.TXT")
  303.   @Delete ("@OutDrive:@SubDir\\MWINTOOL.INI")
  304.   @Delete ("@OutDrive:@SubDir\\MSUP*.*")
  305.   @Delete ("@OutDrive:@SubDir\\MONSEL.*")
  306.   @Delete ("@OutDrive:@SubDir\\MIROSCOP.EXE")
  307.   @Delete ("@OutDrive:@SubDir\\MIROHOOK.DLL")
  308.   @Delete ("@OutDrive:@SubDir\\MSCOPE*.HLP")
  309.   @Delete ("@OutDrive:@SubDir\\MSIZE*.*")
  310.   @Delete ("@OutDrive:@SubDir\\WSIZER.*")
  311.   @Delete ("@OutDrive:@SubDir\\WADJUST.*")
  312.   @Delete ("@OutDrive:@SubDir\\MFONTCOM.EXE")
  313.   @Delete ("@OutDrive:@SubDir\\VIRTDLL.DLL")
  314.   @Delete ("@OutDrive:@SubDir\\MPWRSAVE.SCR")
  315.   @Delete ("@OutDrive:@SubDir\\TWIN*.*")
  316.   @Delete ("@OutDrive:@wSysDir\\OCTOVGA.*")
  317.   @Delete ("@OutDrive:@wSysDir\\MIROCAP.*")
  318.   @Delete ("@OutDrive:@wSysDir\\MIROVIXL.*")
  319.   @Delete ("@OutDrive:@wSysDir\\MIROMCI.DRV")
  320.   @Delete ("@OutDrive:@wSysDir\\MDI.DLL")
  321.  
  322.  
  323.   @WinExec ("PROGMAN.EXE", 1) 
  324. @Display // ???
  325.   @Delay = @SystemDate 
  326. CL: @If (@SystemDate - @Delay <= @d) @Goto CL @EndIf 
  327.   @ProgramManager ("[ShowGroup (miroWINTOOLS, 2)]")
  328.   @Delay = @SystemDate 
  329. CLa: @If (@SystemDate - @Delay <= @d) @Goto CLa @EndIf 
  330.   @ProgramManager ("[DeleteItem (miro SUPERSCREEN)]")
  331.   @Delay = @SystemDate 
  332. CLb: @If (@SystemDate - @Delay <= @d) @Goto CLb @EndIf 
  333.   @ProgramManager ("[DeleteItem (miro MONITOR SELECT)]")
  334.   @Delay = @SystemDate 
  335. CLc: @If (@SystemDate - @Delay <= @d) @Goto CLc @EndIf 
  336.   @ProgramManager ("[DeleteItem (miroTINT CONTROL)]")
  337.   @Delay = @SystemDate 
  338. CLf: @If (@SystemDate - @Delay <= @d) @Goto CLf @EndIf 
  339.   @ProgramManager ("[DeleteItem (miroSCOPE)]")
  340.   @Delay = @SystemDate 
  341. CLg: @If (@SystemDate - @Delay <= @d) @Goto CLg @EndIf 
  342.   @ProgramManager ("[DeleteItem (miroSIZE CALIBRATION)]")
  343.   @Delay = @SystemDate 
  344. CLi: @If (@SystemDate - @Delay <= @d) @Goto CLi @EndIf 
  345.   @ProgramManager ("[DeleteItem (Information)]")
  346.   @Delay = @SystemDate 
  347. CLd: @If (@SystemDate - @Delay <= @d) @Goto CLd @EndIf 
  348.   @ProgramManager ("[DeleteItem (miro HOTKEY)]") 
  349.   @Delay = @SystemDate 
  350. CLk: @If (@SystemDate - @Delay <= @d) @Goto CLk @EndIf 
  351.   @ProgramManager ("[DeleteItem (miro PINBOARD)]") 
  352.   @Delay = @SystemDate 
  353. CLl: @If (@SystemDate - @Delay <= @d) @Goto CLl @EndIf 
  354.   @ProgramManager ("[DeleteItem (miroSCREEN-Adjust)]") 
  355.   @Delay = @SystemDate 
  356. CLe: @If (@SystemDate - @Delay <= @d) @Goto CLe @EndIf 
  357.   @ProgramManager ("[DeleteItem (miro FONTCOMPILER)]")
  358.   @Delay = @SystemDate 
  359. CLh: @If (@SystemDate - @Delay <= @d) @Goto CLh @EndIf 
  360.   @ProgramManager ("[DeleteItem (miro TWINFACE)]")
  361.   @Delay = @SystemDate 
  362. CLj: @If (@SystemDate - @Delay <= @d) @Goto CLj @EndIf 
  363.   @ProgramManager ("[DeleteGroup (miroWINTOOLS)]")
  364.   @Delay = @SystemDate 
  365. CLm: @If (@SystemDate - @Delay <= @d) @Goto CLm @EndIf 
  366. @EndDisplay
  367.  
  368.   @If ("@GetINI ("mboot.description","boardfam","system.ini")" != "")
  369.     @isnotdel = @TRUE
  370.   @EndIf
  371.   @SetINI ("boot.description", "displayinf",, "system.ini")
  372.   @SetINI ("boot.description", "displayinf2",, "system.ini")
  373.   @SetINI ("mboot.description", "displayinf2",, "system.ini")
  374.   @SetINI ("mboot.description", "displayinf",, "system.ini")
  375.   @SetINI ("mboot.description", "left",, "system.ini")
  376.   @SetINI ("mboot.description", "right",, "system.ini")
  377.   @SetINI ("mboot.description", "mboot",, "system.ini")
  378.   @SetINI ("mboot.description", "boardfam",, "system.ini")
  379.   @SetINI ("mboot.description", "f_flag",, "system.ini")
  380.   @SetINI ("mboot.description", "resolution",, "system.ini")
  381.   @SetINI ("mboot.description", "resolutions",, "system.ini")
  382.   @SetINI ("mboot.description", "resolutions2",, "system.ini")
  383.   @SetINI ("mboot.description", "BusType",, "system.ini")
  384.   @SetINI ("mboot.description", "dpi",, "system.ini")
  385.   @SetINI ("mboot.description", "Screen_Size_X",, "system.ini")
  386.   @SetINI ("mboot.description", "Screen_Size_Y",, "system.ini")
  387.   @SetINI ("mboot.description", "Pixel_Size",, "system.ini")
  388.   @SetINI ("mboot.description", "BoardDesc",, "system.ini")
  389.   @SetINI ("mboot.description", "MonDesc",, "system.ini")
  390.   @SetINI ("mboot.description", "bootdrive",, "system.ini")
  391.  
  392.   @SetINI ("P9100.drv", "DacType",, "system.ini")
  393.   @SetINI ("P9100.drv", "MemSize",, "system.ini")
  394.   @SetINI ("P9100.drv", "TmgFileName",, "system.ini")
  395.   @SetINI ("P9100.drv", "ClockType",, "system.ini")
  396.   @SetINI ("P9100.drv", "MemClkInDecaKHz",, "system.ini")
  397.   @SetINI ("P9100.drv", "wBase",, "system.ini")
  398.   @SetINI ("P9100.drv", "CfgBA",, "system.ini")
  399.   @SetINI ("P9100.drv", "Cursors",, "system.ini")
  400.   @SetINI ("P9100.drv", "Palette",, "system.ini")
  401.   @SetINI ("P9100.drv", "DevBits",, "system.ini")
  402.   @SetINI ("P9100.drv", "BoardType",, "system.ini")
  403.   @SetINI ("P9100.drv", "MemAddr",, "system.ini")
  404.   @SetINI ("P9100.drv", "CursorUpdate",, "system.ini")
  405.   @SetINI ("P9100.drv", "Cursor",, "system.ini")
  406.   @SetINI ("P9100.drv", "Speed",, "system.ini")
  407.   @SetINI ("P9100.drv", "DefMode",, "system.ini")
  408.   @SetINI ("P9100.drv", "IBM525PLL",, "system.ini")
  409.   @SetINI ("P9100.drv", "Font",, "system.ini")
  410.   @SetINI ("P9100.drv", "FontSize",, "system.ini")
  411.   @SetINI ("P9100.drv", "Resolution",, "system.ini")
  412.   @SetINI ("P9100.drv", "BusType",, "system.ini")
  413.  
  414.   @SetINI ("928.drv", "dpi",, "system.ini")
  415.   @SetINI ("928.drv", "Virtual_Size_X",, "system.ini")
  416.   @SetINI ("928.drv", "Virtual_Size_Y",, "system.ini")
  417.   @SetINI ("928.drv", "Screen_Size_X",, "system.ini")
  418.   @SetINI ("928.drv", "Screen_Size_Y",, "system.ini")
  419.   @SetINI ("928.drv", "Memory_Size_X",, "system.ini")
  420.   @SetINI ("928.drv", "Memory_Size_Y",, "system.ini")
  421.   @SetINI ("928.drv", "Pixel_Size",, "system.ini")
  422.   @SetINI ("928.drv", "polygon-support",, "system.ini")
  423.   @SetINI ("928.drv", "TV",, "system.ini")
  424.   @SetINI ("928.drv", "2in1",, "system.ini")
  425.   @SetINI ("928.drv", "15BPP",, "system.ini")
  426.   @SetINI ("928.drv", "notaus",, "system.ini")
  427.   @SetINI ("928.drv", "DRAM",, "system.ini")
  428.   @SetINI ("928.drv", "VXPBlt",, "system.ini")
  429.   @SetINI ("928.drv", "FIFO",, "system.ini")
  430.   @SetINI ("928.drv", "Mon_Data",, "system.ini")
  431.   @SetINI ("928.drv", "Mon_Path",, "system.ini")
  432.   @SetINI ("928.drv", "MonDesc",, "system.ini")
  433.   @SetINI ("928.drv", "BoardDesc",, "system.ini")
  434.   @SetINI ("928.drv", "CardID",, "system.ini")
  435.   @SetINI ("928.drv", "CardSubID",, "system.ini")
  436.   @SetINI ("928.drv", "Font",, "system.ini")
  437.   @SetINI ("928.drv", "RAM",, "system.ini")
  438.   @SetINI ("928.drv", "PhysBoardNr",, "system.ini")
  439.   @SetINI ("928.drv", "SysColors",, "system.ini")
  440.  
  441.   @SetINI ("twinleft.drv", "dpi",, "system.ini")
  442.   @SetINI ("twinleft.drv", "Virtual_Size_X",, "system.ini")
  443.   @SetINI ("twinleft.drv", "Virtual_Size_Y",, "system.ini")
  444.   @SetINI ("twinleft.drv", "Screen_Size_X",, "system.ini")
  445.   @SetINI ("twinleft.drv", "Screen_Size_Y",, "system.ini")
  446.   @SetINI ("twinleft.drv", "Memory_Size_X",, "system.ini")
  447.   @SetINI ("twinleft.drv", "Memory_Size_Y",, "system.ini")
  448.   @SetINI ("twinleft.drv", "Pixel_Size",, "system.ini")
  449.   @SetINI ("twinleft.drv", "polygon-support",, "system.ini")
  450.   @SetINI ("twinleft.drv", "TV",, "system.ini")
  451.   @SetINI ("twinleft.drv", "2in1",, "system.ini")
  452.   @SetINI ("twinleft.drv", "15BPP",, "system.ini")
  453.   @SetINI ("twinleft.drv", "notaus",, "system.ini")
  454.   @SetINI ("twinleft.drv", "DRAM",, "system.ini")
  455.   @SetINI ("twinleft.drv", "VXPBlt",, "system.ini")
  456.   @SetINI ("twinleft.drv", "FIFO",, "system.ini")
  457.   @SetINI ("twinleft.drv", "Mon_Data",, "system.ini")
  458.   @SetINI ("twinleft.drv", "Mon_Path",, "system.ini")
  459.   @SetINI ("twinleft.drv", "MonDesc",, "system.ini")
  460.   @SetINI ("twinleft.drv", "BoardDesc",, "system.ini")
  461.   @SetINI ("twinleft.drv", "CardID",, "system.ini")
  462.   @SetINI ("twinleft.drv", "CardSubID",, "system.ini")
  463.   @SetINI ("twinleft.drv", "Font",, "system.ini")
  464.   @SetINI ("twinleft.drv", "RAM",, "system.ini")
  465.   @SetINI ("twinleft.drv", "PhysBoardNr",, "system.ini")
  466.   @SetINI ("twinleft.drv", "SysColors",, "system.ini")
  467.  
  468.   @SetINI ("twinright.drv", "dpi",, "system.ini")
  469.   @SetINI ("twinright.drv", "Virtual_Size_X",, "system.ini")
  470.   @SetINI ("twinright.drv", "Virtual_Size_Y",, "system.ini")
  471.   @SetINI ("twinright.drv", "Screen_Size_X",, "system.ini")
  472.   @SetINI ("twinright.drv", "Screen_Size_Y",, "system.ini")
  473.   @SetINI ("twinright.drv", "Memory_Size_X",, "system.ini")
  474.   @SetINI ("twinright.drv", "Memory_Size_Y",, "system.ini")
  475.   @SetINI ("twinright.drv", "Pixel_Size",, "system.ini")
  476.   @SetINI ("twinright.drv", "polygon-support",, "system.ini")
  477.   @SetINI ("twinright.drv", "TV",, "system.ini")
  478.   @SetINI ("twinright.drv", "2in1",, "system.ini")
  479.   @SetINI ("twinright.drv", "15BPP",, "system.ini")
  480.   @SetINI ("twinright.drv", "notaus",, "system.ini")
  481.   @SetINI ("twinright.drv", "DRAM",, "system.ini")
  482.   @SetINI ("twinright.drv", "VXPBlt",, "system.ini")
  483.   @SetINI ("twinright.drv", "FIFO",, "system.ini")
  484.   @SetINI ("twinright.drv", "Mon_Data",, "system.ini")
  485.   @SetINI ("twinright.drv", "Mon_Path",, "system.ini")
  486.   @SetINI ("twinright.drv", "MonDesc",, "system.ini")
  487.   @SetINI ("twinright.drv", "BoardDesc",, "system.ini")
  488.   @SetINI ("twinright.drv", "CardID",, "system.ini")
  489.   @SetINI ("twinright.drv", "CardSubID",, "system.ini")
  490.   @SetINI ("twinright.drv", "Font",, "system.ini")
  491.   @SetINI ("twinright.drv", "RAM",, "system.ini")
  492.   @SetINI ("twinright.drv", "PhysBoardNr",, "system.ini")
  493.   @SetINI ("twinright.drv", "SysColors",, "system.ini")
  494.  
  495.   @SetINI ("2in1.drv", "driverx1",, "system.ini")
  496.   @SetINI ("2in1.drv", "driverx2",, "system.ini")
  497.   @SetINI ("2in1.drv", "display1",, "system.ini")
  498.   @SetINI ("2in1.drv", "display2",, "system.ini")
  499.  
  500.   @SetINI ("miroSCOPE", "Sensibility",, "win.ini")
  501.   @SetINI ("miroSCOPE", "Zoom Factor",, "win.ini")
  502.   @SetINI ("miroSCOPE", "Hotkey Number",, "win.ini")
  503.   @SetINI ("miroSCOPE", "Window dimensions",, "win.ini")
  504.  
  505.   @SetINI ("miroTWINFACE", "top",, "win.ini")
  506.   @SetINI ("miroTWINFACE", "run",, "win.ini")
  507.   @SetINI ("miroTWINFACE", "align",, "win.ini")
  508.  
  509.   @SetINI ("miroVIRTUAL", "top",, "win.ini")
  510.   @SetINI ("miroVIRTUAL", "run",, "win.ini")
  511.   @SetINI ("miroVIRTUAL", "align",, "win.ini")
  512.  
  513.   @SetINI ("TintControl", "SIP_MONTEMP",, "win.ini")
  514.   @SetINI ("TintControl", "SIP_COLOR",, "win.ini")
  515.   @SetINI ("TintControl", "CLUT",, "win.ini")
  516.   @SetINI ("TintControl", "CLUT1",, "win.ini")
  517.   @SetINI ("TintControl", "CLUT2",, "win.ini")
  518.  
  519.   @SetINI ("miroSIZE CALIBRATION", "DP100mmX",, "win.ini")
  520.   @SetINI ("miroSIZE CALIBRATION", "DP100mmY",, "win.ini")
  521.   @SetINI ("miroSIZE CALIBRATION", "HiResMonitorX",, "win.ini")
  522.   @SetINI ("miroSIZE CALIBRATION", "HiResMonitorY",, "win.ini")
  523.  
  524.   @SetINI ("Screensaver.miroPOWERSAVE", "VESAMonitors",, "control.ini")
  525.   @SetINI ("Screensaver.miroPOWERSAVE", "ResumeAfterPOWERDOWN",, "control.ini")
  526.   @SetINI ("Screensaver.miroPOWERSAVE", "TEST_VESAMonitors",, "control.ini")
  527.   @SetINI ("Screensaver.miroPOWERSAVE", "StandbyTime",, "control.ini")
  528.   @SetINI ("Screensaver.miroPOWERSAVE", "SuspendTime",, "control.ini")
  529.  
  530.   @SetINI ("mdi.dll", "Interrupt",, "system.ini")
  531.  
  532.   @SetINI ("s3_24.drv", "FontSize",, "system.ini")
  533.   @SetINI ("s3_24.drv", "WidthXHeight",, "system.ini")
  534.  
  535.   @SetINI ("v631p.drv","FontSize",, "system.ini")
  536.   @SetINI ("v631p.drv","EnableHwCursor",, "system.ini")
  537.   @SetINI ("v631p.drv","WidthXHeight",, "system.ini")
  538.   @SetINI ("avga800.drv","FontSize",, "system.ini")
  539.   @SetINI ("avga800.drv","EnableHwCursor",, "system.ini")
  540.   @SetINI ("avga800.drv","WidthXHeight",, "system.ini")
  541.   @SetINI ("al314p.drv","FontSize",, "system.ini")
  542.   @SetINI ("al314p.drv","EnableHwCursor",, "system.ini")
  543.   @SetINI ("al314p.drv","WidthXHeight",, "system.ini")
  544.   @SetINI ("avga1280.drv","FontSize",, "system.ini")
  545.   @SetINI ("avga1280.drv","EnableHwCursor",, "system.ini")
  546.   @SetINI ("avga1280.drv","WidthXHeight",, "system.ini")
  547.   @SetINI ("al3164p.drv","FontSize",, "system.ini")
  548.   @SetINI ("al3164p.drv","EnableHwCursor",, "system.ini")
  549.   @SetINI ("al3164p.drv","WidthXHeight",, "system.ini")
  550.   @SetINI ("al3164ps.drv","FontSize",, "system.ini")
  551.   @SetINI ("al3164ps.drv","EnableHwCursor",, "system.ini")
  552.   @SetINI ("al3164ps.drv","WidthXHeight",, "system.ini")
  553.   @SetINI ("al16m.drv","FontSize",, "system.ini")
  554.   @SetINI ("al16m.drv","EnableHwCursor",, "system.ini")
  555.   @SetINI ("al16m.drv","WidthXHeight",, "system.ini")
  556.   @SetINI ("v631f8s.drv","FontSize",, "system.ini")
  557.   @SetINI ("v631f8s.drv","EnableHwCursor",, "system.ini")
  558.   @SetINI ("v631f8s.drv","WidthXHeight",, "system.ini")
  559.  
  560.   @If (@isnotdel == @TRUE)
  561.     @isnotdel = @FALSE
  562.  
  563.     //del msvideo in drivers section
  564.     @i = 1
  565.     @msvid = @GetINI ("drivers", "msvideo", "system.ini")
  566.     @If ("@msvid" == "mirocap.drv")
  567.       @SetINI ("drivers", "msvideo",, "system.ini")
  568.       @SetINI ("Userinstallable.drivers", "msvideo",, "control.ini")
  569.     @Else 
  570. DELMSVIDEO:
  571.       @msvid = @GetINI ("drivers", "msvideo@i", "system.ini")
  572.       @If ("@msvid" == "mirocap.drv")
  573.         @SetINI ("drivers", "msvideo@i",, "system.ini")
  574.         @SetINI ("Userinstallable.drivers", "msvideo@i",, "control.ini")
  575.       @Else 
  576.         @i = (@i + 1)
  577.         @If (@i == 10)
  578.         @Else
  579.           @Goto DELMSVIDEO
  580.         @EndIf
  581.       @EndIf
  582.     @EndIf
  583.  
  584.     @If (   "@GetINI ("drivers","DCI","system.ini")" != ""
  585.         &&  "@GetINI ("drivers","DCIDCI","system.ini")" != ""
  586.         )
  587.       @SetINI ("drivers", "DCI", "@GetINI ("drivers","DCIDCI","system.ini")", "system.ini")
  588.       @SetINI ("drivers", "DCIDCI",, "system.ini")
  589.     @Else
  590.       @SetINI ("drivers", "DCI",, "system.ini")
  591.     @EndIf
  592.     @If (   "@GetINI ("drivers","DCI","system.ini")" != ""
  593.         &&  "@GetINI ("drivers","MIRODCI","system.ini")" != ""
  594.         )
  595.       @SetINI ("drivers", "DCI", "@GetINI ("drivers","MIRODCI","system.ini")", "system.ini")
  596.       @SetINI ("drivers", "MIRODCI",, "system.ini")
  597.     @Else
  598.       @SetINI ("drivers", "DCI",, "system.ini")
  599.     @EndIf
  600.     @If (   "@GetINI ("drivers","VIDC.VIXL","system.ini")" != ""
  601.         &&  "@GetINI ("drivers","MIROVIDC.VIXL","system.ini")" != ""
  602.         )
  603.       @SetINI ("drivers", "VIDC.VIXL", "@GetINI ("drivers","MIROVIDC.VIXL","system.ini")", "system.ini")
  604.       @SetINI ("drivers", "MIROVIDC.VIXL",, "system.ini")
  605.     @Else
  606.       @SetINI ("drivers", "VIDC.VIXL",, "system.ini")
  607.     @EndIf
  608.  
  609.     @merke = @GetINI ("MCI", "overlay", "system.ini")
  610.     @If ("@merke" == "MIROMCI.DRV")
  611.       @SetINI ("MCI", "overlay",, "system.ini")
  612.     @EndIf
  613.  
  614.     //del PINBOARD of the SESAM or OCTO installation
  615.     @merke = @GetINI("Windows", "run","win.ini")
  616.     @If (@StrFind("@merke", "@OutDrive:@SubDir\\WSIZER.EXE") > -1)
  617.       @merke = @StrDel("@merke", @StrFind("@merke", "@OutDrive:@SubDir\\WSIZER.EXE"),@StrLen("@OutDrive:@SubDir\\WSIZER.EXE "))
  618.       @SetINI ("Windows", "run", "@merke", "win.ini")
  619.     @EndIf
  620.   @EndIf
  621.  
  622.   @ClearOption (210)
  623.   @UnInstall = @True
  624.   @Goto BOARDSELECT
  625. @EndIf
  626. @EndIf
  627.  
  628.  
  629. //*** files to be copied ******************************************************
  630.  
  631. @If (200 [= @Option    // copy if Windows drivers
  632.     || 201 [= @Option  // 
  633.     || 203 [= @Option  // or miro windows tools
  634.     || 204 [= @Option) // 
  635.   @If ('D' [= @Group)
  636.     @Copy ("@InDrive:\\README.DEU","@OutDrive:@SubDir\\MINFO.TXT")
  637.   @Else
  638.     @Copy ("@InDrive:\\README.ENG","@OutDrive:@SubDir\\MINFO.TXT")
  639.   @EndIf
  640. @EndIf
  641.  
  642. @If (200 [= @Option) // Windows drivers
  643.   @DefineDisk
  644.     @Label = "Install disk # 1/1"
  645.     @BeginLib DRIVERS.RED
  646.       @File OEMC20PV.DEU  @Size 10000  @Out @wSysDir\\*.INF @Option 101 @Group D
  647.       @File OEMC20PV.ENG  @Size 10000  @Out @wSysDir\\*.INF @Option 101 @Group E
  648.       @File OEMC40PV.DEU  @Size 10000  @Out @wSysDir\\*.INF @Option 100 @Group D
  649.       @File OEMC40PV.ENG  @Size 10000  @Out @wSysDir\\*.INF @Option 100 @Group E
  650.  
  651.       @File C20PV.DAT    @Size 30000  @Out P9X00RES.* @Option 101 
  652.       @File P9100_08.DRV @Size 140000 @Out @wSysDir\\C20PV_08.* @Option 101 
  653.       @File P9100_16.DRV @Size 140000 @Out @wSysDir\\C20PV_16.* @Option 101 
  654.       @File P9100_32.DRV @Size 140000 @Out @wSysDir\\C20PV_32.* @Option 101
  655.        
  656.       @File C40PV.DAT    @Size 30000  @Out P9X00RES.* @Option 100
  657.       @File P9100_08.DRV @Size 140000 @Out @wSysDir\\C40PV_08.* @Option 100
  658.       @File P9100_16.DRV @Size 140000 @Out @wSysDir\\C40PV_16.* @Option 100 
  659.       @File P9100_24.DRV @Size 140000 @Out @wSysDir\\C40PV_24.* @Option 100
  660.       @File P9100_32.DRV @Size 140000 @Out @wSysDir\\C40PV_32.* @Option 100
  661.  
  662.       @File VCPDCI.DRV   @Size 33000  @Out @wSysDir\\*.* 
  663.       @File P91INIT.DLL  @Size 23000  @Out @wSysDir\\*.* 
  664.       @File P9100VGA.2GR @Size 5000   @Out @wSysDir\\*.* 
  665.       @File P9100VGA.3GR @Size 17000  @Out @wSysDir\\*.* 
  666.       @File VDDP9100.386 @Size 107000 @Out @wSysDir\\*.* 
  667.       @File VGALOGO.LGO  @Size 10000  @Out @wSysDir\\*.* 
  668.  
  669.       @File 8514FIX.FON  @Size 12000  @Out @wSysDir\\*.* 
  670.       @File 8514OEM.FON  @Size 12000  @Out @wSysDir\\*.* 
  671.       @File 8514SYS.FON  @Size 12000  @Out @wSysDir\\*.* 
  672.       @File CGA40850.FON @Size 6000   @Out @wSysDir\\*.* 
  673.       @File CGA40WOA.FON @Size 6000   @Out @wSysDir\\*.* 
  674.       @File CGA80850.FON @Size 6000   @Out @wSysDir\\*.* 
  675.       @File CGA80WOA.FON @Size 6000   @Out @wSysDir\\*.* 
  676.       @File COURE.FON    @Size 25000  @Out @wSysDir\\*.* 
  677.       @File COURF.FON    @Size 30000  @Out @wSysDir\\*.* 
  678.       @File EGA40850.FON @Size 8000   @Out @wSysDir\\*.* 
  679.       @File EGA40WOA.FON @Size 8000   @Out @wSysDir\\*.* 
  680.       @File EGA80850.FON @Size 9000   @Out @wSysDir\\*.* 
  681.       @File EGA80WOA.FON @Size 9000   @Out @wSysDir\\*.* 
  682.       @File MODERN.FON   @Size 8000   @Out @wSysDir\\*.* 
  683.       @File ROMAN.FON    @Size 15000  @Out @wSysDir\\*.* 
  684.       @File SCRIPT.FON   @Size 12000  @Out @wSysDir\\*.* 
  685.       @File SERIFE.FON   @Size 60000  @Out @wSysDir\\*.* 
  686.       @File SERIFF.FON   @Size 82000  @Out @wSysDir\\*.* 
  687.       @File SMALLE.FON   @Size 26000  @Out @wSysDir\\*.* 
  688.       @File SMALLF.FON   @Size 22000  @Out @wSysDir\\*.* 
  689.       @File SSERIFE.FON  @Size 65000  @Out @wSysDir\\*.* 
  690.       @File SSERIFF.FON  @Size 90000  @Out @wSysDir\\*.* 
  691.       @File SYMBOLE.FON  @Size 60000  @Out @wSysDir\\*.* 
  692.       @File SYMBOLF.FON  @Size 80000  @Out @wSysDir\\*.* 
  693.       @File VGAFIX.FON   @Size 6000   @Out @wSysDir\\*.* 
  694.       @File VGAOEM.FON   @Size 6000   @Out @wSysDir\\*.* 
  695.       @File VGASYS.FON   @Size 6000   @Out @wSysDir\\*.* 
  696.       @File TIMES.FON    @Size 3000   @Out @wSysDir\\*.* 
  697.     @EndLib
  698.   @EndDisk
  699. @EndIf
  700.  
  701. @If (204 [= @Option) // video 
  702.   @DefineDisk
  703.     @Label = "Install disk # 1/1"
  704.     @BeginLib DRIVERS.RED
  705.       @File MDI.DLL      @Size 45000  @Out @wSysDir\\*.*   @Group D
  706.       @File MDI.ENG      @Size 45000  @Out @wSysDir\\*.DLL @Group E
  707.       @File MIROCAP.DRV  @Size 10000  @Out @wSysDir\\*.*   @Group D 
  708.       @File MIROCAP.ENG  @Size 10000  @Out @wSysDir\\*.DRV @Group E
  709.       @File MIROVIXL.DRV @Size 35000  @Out @wSysDir\\*.*   @Group D 
  710.       @File MIROVIXL.ENG @Size 35000  @Out @wSysDir\\*.DRV @Group E
  711.       @File MIROMCI.DRV  @Size 17000  @Out @wSysDir\\*.* 
  712.       @File DRICON.EXE   @Size 22000  @Out *.* 
  713.       @File COPRO.INI    @Size  2000  @Out *.* 
  714.     @EndLib
  715.   @EndDisk
  716. @EndIf
  717.  
  718. @If (202 [= @Option) // miro wallpaper
  719.   @DefineDisk
  720.     @Label = "Install disk # 1/1"
  721.     @BeginLib DRIVERS.RED
  722.       @File CRYSTAL.BMP  @Size 80000  @Out CRYS20PV.* @Option 101
  723.       @File CRYSTAL.BMP  @Size 80000  @Out CRYS40PV.* @Option 100
  724.     @EndLib
  725.   @EndDisk
  726. @EndIf
  727.  
  728.  
  729. @If (200 [= @Option    // copy if Windows drivers
  730.     || 203 [= @Option) // or miro windows tools
  731.   @DefineDisk
  732.     @Label = "Install disk # 1/1"
  733.     @BeginLib MWINTOOL.RED
  734.       @File MWINTOOL.DEU @Size 15000  @Out *.INI @Group D
  735.       @File MWINTOOL.ENG @Size 15000  @Out *.INI @Group E
  736.       @File MONSEL.EXE   @Size 100000 @Out *.*
  737.       @File MONSEL.DEU   @Size 34000  @Out *.HLP @Group D
  738.       @File MONSEL.ENG   @Size 33000  @Out *.HLP @Group E
  739.       @File MSUPSCRN.EXE @Size 90000  @Out *.*
  740.       @File MSUP.DEU     @Size 26000  @Out *.HLP @Group D
  741.       @File MSUP.ENG     @Size 25000  @Out *.HLP @Group E
  742.       @File MTINT.EXE    @Size 93000  @Out *.*
  743.       @File MTINTDEU.INI @Size 2000   @Out MTINT.INI @Group D
  744.       @File MTINTENG.INI @Size 2000   @Out MTINT.INI @Group E
  745.       @File MTINTDEU.HLP @Size 42000  @Out MTINT.HLP @Group D
  746.       @File MTINTENG.HLP @Size 42000  @Out MTINT.HLP @Group E
  747.     @EndLib
  748.   @EndDisk
  749. @EndIf
  750.  
  751. @If (203 [= @Option) // miro windows tools
  752.   @DefineDisk
  753.     @Label = "Install disk # 1/1"
  754.     @BeginLib MWINTOOL.RED
  755.       @File MIROSCOP.EXE @Size 100000 @Out *.*
  756.       @File MIROHOOK.DLL @Size 5000   @Out *.*
  757.       @File MSCOPE.DEU   @Size 55000  @Out *0.HLP @Group D
  758.       @File MSCOPE.ENG   @Size 55000  @Out *0.HLP @Group E
  759.       @File MSIZER.EXE   @Size 35000  @Out *.*
  760.     @EndLib
  761.   @EndDisk
  762. @EndIf
  763.  
  764.  
  765. //*** set variables in .INI files *********************************************
  766.  
  767. @SetINI ("mboot.description", "boardfam","POWER", "system.ini")
  768. @If (200 [= @Option) // Windows drivers
  769.   @SetINI ("mboot.description", "displayinf2",, "system.ini")
  770.   @SetINI ("mboot.description", "mboot","1", "system.ini")
  771.   @SetINI ("mboot.description", "left",, "system.ini")
  772.   @SetINI ("mboot.description", "right",, "system.ini")
  773.  
  774.   @If (100 [= @Option)
  775.     @SetINI ("mboot.description", "displayinf", "OEMC40PV.INF", "system.ini")
  776.     @SetINI ("P9100.drv", "DacType","IBMRGB525", "system.ini")
  777.     @SetINI ("P9100.drv", "MemSize","4", "system.ini")
  778.     @SetINI ("mboot.description", "BoardDesc","@M50", "system.ini")
  779.   @EndIf
  780.   @If (101 [= @Option)
  781.     @SetINI ("mboot.description", "displayinf", "OEMC20PV.INF", "system.ini")
  782.     @SetINI ("P9100.drv", "DacType","BT485", "system.ini")
  783.     @SetINI ("P9100.drv", "MemSize","2", "system.ini")
  784.     @SetINI ("mboot.description", "BoardDesc","miroCRYSTAL 20PV avi", "system.ini")
  785.   @EndIf
  786.  
  787.   @SetINI ("P9100.drv", "TmgFileName","P9X00RES.INI", "system.ini")
  788.   @SetINI ("P9100.drv", "ClockType","ICD2061a", "system.ini")
  789.   @SetINI ("P9100.drv", "MemClkInDecaKHz","4444", "system.ini")
  790.   @SetINI ("P9100.drv", "wBase","80", "system.ini")
  791.   @SetINI ("P9100.drv", "CfgBA","9100", "system.ini")
  792.   @SetINI ("P9100.drv", "Cursors","32", "system.ini")
  793.   @SetINI ("P9100.drv", "Palette","Standard", "system.ini")
  794.   @SetINI ("P9100.drv", "DevBits","Off", "system.ini")
  795.   @SetINI ("P9100.drv", "BoardType","VesaHigh", "system.ini")
  796.   @SetINI ("P9100.drv", "MemAddr","C000", "system.ini")
  797.   @SetINI ("P9100.drv", "CursorUpdate","Off", "system.ini")
  798. //  @SetINI ("P9100.drv", "Cursor","Power", "system.ini")
  799.   @SetINI ("P9100.drv", "Speed","33.00mHz", "system.ini")
  800.   @SetINI ("P9100.drv", "DefMode","640x480x8", "system.ini")
  801.   @SetINI ("P9100.drv", "IBM525PLL","ON", "system.ini")
  802.   @SetINI ("P9100.drv", "BusType","DETECT", "system.ini")
  803.  
  804. @EndIf
  805.  
  806. @If (200 [= @Option    // copy if Windows drivers
  807.     || 203 [= @Option) // or miro windows tools
  808.   @If (100 [= @Option)
  809.     @SetINI ("TintControl", "CLUT", " ", "win.ini")
  810.     @SetINI ("TintControl", "CLUT1", " ", "win.ini")
  811.     @SetINI ("TintControl", "CLUT2",, "win.ini")
  812.   @EndIf
  813.   @If (101 [= @Option)
  814.     @SetINI ("TintControl", "CLUT", " ", "win.ini")
  815.     @SetINI ("TintControl", "CLUT1", " ", "win.ini")
  816.     @SetINI ("TintControl", "CLUT2",, "win.ini")
  817.   @EndIf
  818. @EndIf
  819.  
  820. @If (200 [= @Option || 201 [= @Option)
  821.   @If (   ("@GetINI ("drivers","DCI","system.ini")" != "")
  822.       &&  ("@GetINI ("drivers","DCI","system.ini")" != "VCPDCI")
  823.       &&  ("@GetINI ("drivers","MIRODCI","system.ini")" == "")
  824.       )
  825.     @SetINI ("drivers", "MIRODCI","@GetINI ("drivers","DCI","system.ini")", "system.ini")
  826.   @EndIf
  827.   @SetINI ("drivers", "DCI","VCPDCI", "system.ini")
  828. @EndIf
  829.  
  830. @If (202 [= @Option) // miro wallpaper
  831.   @SetINI ("Desktop", "TileWallpaper", "1", "win.ini")
  832.  
  833.   @If (100 [= @Option)
  834.     @SetINI ("Desktop", "Wallpaper", "crys40pv.bmp", "win.ini")
  835.   @EndIf
  836.   @If (101 [= @Option)
  837.     @SetINI ("Desktop", "Wallpaper", "crys20pv.bmp", "win.ini")
  838.   @EndIf
  839. @EndIf
  840.  
  841. @If (204 [= @Option) // VIDEO
  842.   //set run for driver configuration
  843.   @SetINI ("miro.dricon", "driver", "mirocap.drv", "win.ini")
  844.   @SetINI ("MCI", "overlay","MIROMCI.DRV", "system.ini")
  845.  
  846.   @merke = @GetINI("Windows", "run", "win.ini")
  847.   @If (@StrFind("@merke", "DRICON") < 0)
  848.     @SetINI ("Windows", "run", "@merke DRICON", "win.ini" )
  849.   @EndIf
  850.  
  851.   @If (   ("@GetINI ("drivers","VIDC.VIXL","system.ini")" != "")
  852.       &&  ("@GetINI ("drivers","VIDC.VIXL","system.ini")" != "MIROVIXL.DRV")
  853.       &&  ("@GetINI ("drivers","MIROVIDC.VIXL","system.ini")" == "")
  854.       )
  855.     @SetINI ("drivers", "MIROVIDC.VIXL","@GetINI ("drivers","VIDC.VIXL","system.ini")", "system.ini")
  856.   @EndIf
  857.   @SetINI ("drivers", "VIDC.VIXL","MIROVIXL.DRV", "system.ini")
  858.  
  859.   //set msvideo in the drivers section
  860.   @i = 1
  861.   @msvid = @GetINI ("drivers", "msvideo", "system.ini")
  862.   @If (("@msvid" == "") || ("@msvid" == "mirocap.drv"))
  863.     @SetINI ("drivers", "msvideo","mirocap.drv", "system.ini")
  864.     @SetINI ("Userinstallable.drivers", "msvideo","mirocap.drv", "control.ini")
  865.   @Else
  866.     @If (("@msvid" == "videodc1.drv") || ("@msvid" == "VIDEODC1.DRV"))
  867.       @msvid = @GetINI ("drivers", "msvideo9", "system.ini")
  868.       @SetINI ("drivers", "msvideo9","mirocap.drv", "system.ini")
  869.       @SetINI ("Userinstallable.drivers", "msvideo9","mirocap.drv", "control.ini")
  870.       @SetOption (300)
  871.       @SetINI ("miro.dricon", "driver1", "videodc1.drv", "win.ini")
  872.     @Else
  873.       @SetINI ("drivers", "msvideo","mirocap.drv", "system.ini")
  874.       @SetINI ("Userinstallable.drivers", "msvideo","mirocap.drv", "control.ini")
  875.       @SetOption (301)
  876.     @Endif
  877. MSVIDEOCOUNT:
  878.     @msvidx = @GetINI ("drivers", "msvideo@i", "system.ini")
  879.     @If ("@msvidx" == "")
  880.       @SetINI ("drivers", "msvideo@i","@msvid", "system.ini")
  881.     @ElseIf (("@msvid" == "") || ("@msvid" == "mirocap.drv"))
  882.       //msvideo==VIDEODC1
  883.     @Else 
  884.       @i = (@i + 1)
  885.       @If (@i == 9)
  886.         @i = (8888)
  887.         @Goto MSVIDEOCOUNT
  888.       @ElseIf (@i == 8900)
  889.       @Else
  890.         @Goto MSVIDEOCOUNT
  891.       @EndIf
  892.     @EndIf
  893.   @EndIf
  894.  
  895.  
  896.   @If ('D' [= @Group)
  897.     @SetINI ("drivers.desc", "MIROCAP.DRV","miroMAGIC 40PV video Aufnahme", "control.ini")
  898.     @SetINI ("drivers.desc", "MIROVIXL.DRV","miroVIDEO-XL Codec", "control.ini")
  899.     @SetINI ("drivers.desc", "MIROMCI.DRV","[MCI] miroMAGIC 40PV video! Overlay Driver", "control.ini")
  900.   @ElseIf ('E' [= @Group)
  901.     @SetINI ("drivers.desc", "MIROCAP.DRV","miroCRYSTAL 40PV video capture", "control.ini")
  902.     @SetINI ("drivers.desc", "MIROVIXL.DRV","miroVIDEO-XL Codec", "control.ini")
  903.     @SetINI ("drivers.desc", "MIROMCI.DRV","[MCI] miroCRYSTAL 40PV video! Overlay Driver", "control.ini")
  904.   @EndIf
  905.  
  906. @EndIf
  907.  
  908.   @If (300 [= @Option) // miro windows tools
  909.     @FlushKeyboard
  910.     @Display
  911.   @M300
  912.   @M301
  913.   @M302
  914.     @Pause
  915.     @EndDisplay
  916.   @EndIf
  917.   @If (301 [= @Option) // miro windows tools
  918.     @FlushKeyboard
  919.     @Display
  920.   @M303 @i @M304
  921.   @M305
  922.     @Pause
  923.     @EndDisplay
  924.   @EndIf
  925.  
  926. //*** old software to be deleted **********************************************
  927.  
  928. @If (200 [= @Option || 203 [= @Option)
  929.   @Delete ("@OutDrive:@wSysDir\\MIROLOGO.RLE")
  930.   @Delete ("@OutDrive:@SubDir\\*.MIR")
  931.   @Delete ("@OutDrive:@SubDir\\MSUP?.HLP")
  932.   @Delete ("@OutDrive:@SubDir\\MSUPVIR?.HLP")
  933.   @Delete ("@OutDrive:@SubDir\\MSCOPE1.HLP")
  934.   @Delete ("@OutDrive:@SubDir\\MSCOPE2.HLP")
  935.   @Delete ("@OutDrive:@SubDir\\MSCOPE3.HLP")
  936.   @Delete ("@OutDrive:@SubDir\\MSCOPE4.HLP")
  937. @EndIf
  938.  
  939. @If (200 [= @Option && @DirExists ("@OutDrive:@SubDir\\SYSTEM"))
  940.   @Delete ("@OutDrive:@SubDir\\OEMC40PV.*")
  941.   @Delete ("@OutDrive:@SubDir\\OEMC20PV.*")
  942. @EndIf
  943.  
  944. //del PINBOARD of the SESAM or OCTO installation
  945. @merke = @GetINI("Windows", "run","win.ini")
  946. @If (@StrFind("@merke", "@OutDrive:@SubDir\\WSIZER.EXE") > -1)
  947.   @merke = @StrDel("@merke", @StrFind("@merke", "@OutDrive:@SubDir\\WSIZER.EXE"),@StrLen("@OutDrive:@SubDir\\WSIZER.EXE "))
  948.   @SetINI ("Windows", "run", "@merke", "win.ini")
  949. @EndIf
  950.  
  951. //*** project trailer block ***************************************************
  952.  
  953. @Finish
  954.   @BackGroundMode (3,@Blue, @Blue)
  955.   @WinExec ("PROGMAN.EXE", 1) 
  956.  
  957.   @If (200 [= @Option || 203 [= @Option)
  958.     @ProgramManager ("[CreateGroup (miroWINTOOLS, MWINTOOL.GRP)]")
  959.     @Delay = @SystemDate 
  960. La: @If (@SystemDate - @Delay <= @d) @Goto La @EndIf 
  961.     @ProgramManager ("[ReplaceItem (miro SUPERSCREEN)]")
  962.     @Delay = @SystemDate 
  963. Lb: @If (@SystemDate - @Delay <= @d) @Goto Lb @EndIf 
  964.     @ProgramManager ("[AddItem (@OutDrive:@SubDir\\MSUPSCRN.EXE, miro SUPERSCREEN)]")
  965.     @Delay = @SystemDate 
  966. Lc: @If (@SystemDate - @Delay <= @d) @Goto Lc @EndIf 
  967.     @ProgramManager ("[ReplaceItem (miro MONITOR SELECT)]")
  968.     @Delay = @SystemDate 
  969. Ld: @If (@SystemDate - @Delay <= @d) @Goto Ld @EndIf 
  970.     @ProgramManager ("[AddItem (@OutDrive:@SubDir\\MONSEL.EXE, miro MONITOR SELECT)]")
  971.     @Delay = @SystemDate 
  972. Le: @If (@SystemDate - @Delay <= @d) @Goto Le @EndIf 
  973.     @ProgramManager ("[ReplaceItem (miroTINT CONTROL)]")
  974.     @Delay = @SystemDate 
  975. Lf: @If (@SystemDate - @Delay <= @d) @Goto Lf @EndIf 
  976.     @ProgramManager ("[AddItem (@OutDrive:@SubDir\\MTINT.EXE, miroTINT CONTROL)]")
  977.     @Delay = @SystemDate 
  978. Li: @If (@SystemDate - @Delay <= @d) @Goto Li @EndIf 
  979.  
  980.     @If (203 [= @Option) // miro windows tools
  981.       @ProgramManager ("[ReplaceItem (miroSCOPE)]")
  982.       @Delay = @SystemDate 
  983. Ll: @If (@SystemDate - @Delay <= @d) @Goto Ll @EndIf 
  984.       @ProgramManager ("[AddItem (@OutDrive:@SubDir\\MIROSCOP.EXE, miroSCOPE)]")
  985.       @Delay = @SystemDate 
  986. Lm: @If (@SystemDate - @Delay <= @d) @Goto Lm @EndIf 
  987.       @ProgramManager ("[ReplaceItem (miroSIZE CALIBRATION)]")
  988.       @Delay = @SystemDate 
  989. Ln: @If (@SystemDate - @Delay <= @d) @Goto Ln @EndIf 
  990.       @ProgramManager ("[AddItem (@OutDrive:@SubDir\\MSIZER.EXE, miroSIZE CALIBRATION)]")
  991.       @Delay = @SystemDate 
  992. Lo: @If (@SystemDate - @Delay <= @d) @Goto Lo @EndIf 
  993.     @EndIf
  994.  
  995.     @ProgramManager ("[ReplaceItem (Information)]")
  996.     @Delay = @SystemDate 
  997. Lr: @If (@SystemDate - @Delay <= @d) @Goto Lr @EndIf 
  998.     @ProgramManager ("[AddItem (NOTEPAD minfo.txt, Information, MONSEL.EXE, 1)]")
  999.     @Delay = @SystemDate 
  1000. Ls: @If (@SystemDate - @Delay <= @d) @Goto Ls @EndIf 
  1001.     @ProgramManager ("[ShowGroup (miroWINTOOLS, 1)]")
  1002.     @Delay = @SystemDate 
  1003. Lt: @If (@SystemDate - @Delay <= @d) @Goto Lt @EndIf 
  1004.   @EndIf
  1005.  
  1006.  
  1007.   @ChDrive (@WindowsDrive)
  1008.   @ChDir ("@WindowsDir")
  1009.   @If (200 [= @Option) // Windows drivers
  1010.     @ReturnValue (4711)
  1011.     @WinExec ("@OutDrive:@SubDir\\MONSEL.EXE", 1) 
  1012.   @EndIf
  1013. @EndFinish
  1014.  
  1015.  
  1016. //*** eof *********************************************************************
  1017.  
  1018.