120 lines
3.7 KiB
Batchfile
120 lines
3.7 KiB
Batchfile
|
@echo off
|
|||
|
|
|||
|
|
|||
|
Rem #########################################################################
|
|||
|
|
|||
|
Rem
|
|||
|
Rem <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> Ȩ <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><CDB8><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD>α<CEB1> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD>
|
|||
|
Rem <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><CDB8><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>ϴ<EFBFBD>.
|
|||
|
Rem
|
|||
|
|
|||
|
call TsMkUDir "%RootDrive%\Office95"
|
|||
|
|
|||
|
Rem #########################################################################
|
|||
|
|
|||
|
Rem <20><> <20><>ũ<EFBFBD><C5A9>Ʈ<EFBFBD><C6AE> Alpha<68><61><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>ǰ<EFBFBD> <20>ִ<EFBFBD><D6B4><EFBFBD> Ȯ<><C8AE><EFBFBD>մϴ<D5B4>. <20><EFBFBD><D7B7>ٸ<EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>մϴ<D5B4>.
|
|||
|
rem
|
|||
|
rem
|
|||
|
Set __SharedTools=Shared Tools
|
|||
|
If Not "%PROCESSOR_ARCHITECTURE%"=="ALPHA" goto acsrCont1
|
|||
|
If Not Exist "%ProgramFiles(x86)%" goto acsrCont1
|
|||
|
Set __SharedTools=Shared Tools (x86)
|
|||
|
:acsrCont1
|
|||
|
|
|||
|
|
|||
|
Rem #########################################################################
|
|||
|
|
|||
|
Rem
|
|||
|
Rem Custom.dic <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><CDB8><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>ϴ<EFBFBD>.
|
|||
|
Rem
|
|||
|
|
|||
|
If Not Exist "%RootDrive%\Office95\Custom.Dic" Copy Nul: "%RootDrive%\Office95\Custom.Dic" >Nul: 2>&1
|
|||
|
|
|||
|
Rem #########################################################################
|
|||
|
|
|||
|
REM
|
|||
|
REM <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20≯<EFBFBD> <20><> <20><><EFBFBD>θ<EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>ϴ<EFBFBD>.
|
|||
|
REM
|
|||
|
|
|||
|
|
|||
|
..\ACRegL "%Temp%\Proj95_1.Cmd" DictPath "HKLM\Software\Microsoft\%__SharedTools%\Proofing Tools\Spelling\1033\Normal" "Dictionary" "StripChar\1"
|
|||
|
If ErrorLevel 1 Goto Done
|
|||
|
Call %Temp%\Proj95_1.Cmd
|
|||
|
Del %Temp%\Proj95_1.Cmd >Nul: 2>&1
|
|||
|
|
|||
|
..\ACRegL "%Temp%\Proj95_3.Cmd" DictName "HKLM\Software\Microsoft\%__SharedTools%\Proofing Tools\Spelling\1033\Normal" "Dictionary" "StripPath"
|
|||
|
If ErrorLevel 1 Goto Done
|
|||
|
Call %Temp%\Proj95_3.Cmd
|
|||
|
Del %Temp%\Proj95_3.Cmd >Nul: 2>&1
|
|||
|
|
|||
|
Rem #########################################################################
|
|||
|
|
|||
|
REM
|
|||
|
REM <20><><EFBFBD>ο<EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ʈ<EFBFBD><C6AE> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>Ǿ<EFBFBD><C7BE><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>մϴ<D5B4>.
|
|||
|
REM <20>̰<EFBFBD><CCB0><EFBFBD> <20>ٸ<EFBFBD> MS Office <20><><EFBFBD><EFBFBD> <20><><EFBFBD>α<CEB1><D7B7><EFBFBD> <20><>ġ<EFBFBD>Ǿ<EFBFBD><C7BE><EFBFBD><EFBFBD><EFBFBD> <20><EFBFBD><DFBB><EFBFBD> <20><> <20>ֽ<EFBFBD><D6BD>ϴ<EFBFBD>.
|
|||
|
REM
|
|||
|
|
|||
|
If "%DictPath%"=="%RootDrive%\Office95" Goto GetDictionary
|
|||
|
|
|||
|
..\ACRegL "%Temp%\Proj95_2.Cmd" Dictionary "HKLM\Software\Microsoft\%__SharedTools%\Proofing Tools\Spelling\1033\Normal" "Dictionary" ""
|
|||
|
If ErrorLevel 1 Goto Done
|
|||
|
Call %Temp%\Proj95_2.Cmd
|
|||
|
Del %Temp%\Proj95_2.Cmd >Nul: 2>&1
|
|||
|
|
|||
|
REM <20><> <20>ڵ带 <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><> <20><><EFBFBD><EFBFBD><EFBFBD>ڿ<EFBFBD> <20><><EFBFBD><EFBFBD> <20><>ȣ<EFBFBD>մϴ<D5B4>.
|
|||
|
REM <20>̰<EFBFBD><CCB0><EFBFBD> A <20><><EFBFBD><EFBFBD><EFBFBD>ڰ<EFBFBD>, DictPath<74><68> B <20><><EFBFBD><EFBFBD><EFBFBD>ڰ<EFBFBD> <20>˻<EFBFBD><CBBB><EFBFBD> <20>Ŀ<EFBFBD>
|
|||
|
REM <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD>ϰ<EFBFBD> <20>մϴ<D5B4>.
|
|||
|
..\ACRegL "%Temp%\Proj95_7.Cmd" OrigDictPath "HKLM\Software\Microsoft\%__SharedTools%\Proofing Tools\Spelling\1033\Normal" "Dictionary" "StripChar\1"
|
|||
|
If ErrorLevel 1 Goto Done
|
|||
|
Call %Temp%\Proj95_7.Cmd
|
|||
|
Del %Temp%\Proj95_7.Cmd >Nul: 2>&1
|
|||
|
if "%OrigDictPath%"=="%RootDrive%\Office95" Goto GetDictionary
|
|||
|
|
|||
|
..\acsr "#DICTNAME#" "%DictName%" Template\prj95Usr.key %Temp%\Proj95_4.tmp
|
|||
|
..\acsr "#ROOTDRIVE#" "%RootDrive%" %Temp%\Proj95_4.tmp %Temp%\Proj95_5.tmp
|
|||
|
..\acsr "#DICTIONARY#" "%Dictionary%" %Temp%\Proj95_5.tmp %Temp%\Proj95_6.tmp
|
|||
|
..\acsr "#__SharedTools#" "%__SharedTools%" %Temp%\Proj95_6.tmp %Temp%\Prj95Usr.Key
|
|||
|
|
|||
|
Rem <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ʈ<EFBFBD><C6AE> Ű<><C5B0> <20><><EFBFBD><EFBFBD><EFBFBD>Ͽ<EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD>ΰ<EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><CDB8><EFBFBD> <20><><EFBFBD><EFBFBD>Ű<EFBFBD><C5B0><EFBFBD><EFBFBD> <20>մϴ<D5B4>.
|
|||
|
regini %Temp%\prj95Usr.key > Nul:
|
|||
|
|
|||
|
Del %Temp%\Proj95_4.tmp >Nul: 2>&1
|
|||
|
Del %Temp%\Proj95_5.tmp >Nul: 2>&1
|
|||
|
Del %Temp%\Proj95_6.tmp >Nul: 2>&1
|
|||
|
Del %Temp%\prj95Usr.key >Nul: 2>&1
|
|||
|
|
|||
|
goto CopyDictionary
|
|||
|
|
|||
|
|
|||
|
Rem #########################################################################
|
|||
|
|
|||
|
REM
|
|||
|
REM <20><><EFBFBD><EFBFBD> <20><><EFBFBD>ΰ<EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20>ʾ<EFBFBD><CABE><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ʈ<EFBFBD><C6AE><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20≯<EFBFBD> <20><>
|
|||
|
REM <20><><EFBFBD>θ<EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>ɴϴ<C9B4>.
|
|||
|
REM
|
|||
|
|
|||
|
:GetDictionary
|
|||
|
|
|||
|
..\ACRegL "%Temp%\Proj95_6.Cmd" Dictionary "HKLM\Software\Microsoft\%__SharedTools%\Proofing Tools\Spelling\1033\Normal" "OrigDictionary" ""
|
|||
|
If ErrorLevel 1 Goto SpellError
|
|||
|
|
|||
|
Call %Temp%\Proj95_6.Cmd
|
|||
|
Del %Temp%\Proj95_6.Cmd >Nul: 2>&1
|
|||
|
|
|||
|
Rem #########################################################################
|
|||
|
|
|||
|
REM
|
|||
|
REM <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><CDB8><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>մϴ<D5B4>.
|
|||
|
REM
|
|||
|
|
|||
|
:CopyDictionary
|
|||
|
|
|||
|
If Exist "%RootDrive%\Office95\%DictName%" goto Cont1
|
|||
|
If Not Exist "%Dictionary%" goto Cont1
|
|||
|
Copy "%Dictionary%" "%RootDrive%\Office95\%DictName%" >Nul: 2>&1
|
|||
|
|
|||
|
:Cont1
|
|||
|
|
|||
|
|
|||
|
:Done
|