@echo off

Rem
Rem #########################################################################

Rem
Rem ·¹Áö½ºÆ®¸®¿¡¼­ Lotus Wordpro 9 ¼³Ä¡ À§Ä¡¸¦ ¾ò½À´Ï´Ù.
Rem

..\ACRegL "%Temp%\wordpro.Cmd" WP "HKLM\Software\Lotus\Wordpro\98.0" "Path" ""

Call "%Temp%\wordpro.Cmd"
Del "%Temp%\wordpro.Cmd" >Nul: 2>&1

Call "%SystemRoot%\Application Compatibility Scripts\RootDrv.cmd"

if Exist "%RootDrive%\Lotus" Goto Done

cd "%SystemRoot%\Application Compatibility Scripts\Logon"
call TsMkUDir "%RootDrive%\Lotus\Work\123\Auto"
call TsMkUDir "%RootDrive%\Lotus\work\approach"
call TsMkUDir "%RootDrive%\Lotus\work\flg"
call TsMkUDir "%RootDrive%\Lotus\backup\flg"
call TsMkUDir "%RootDrive%\Lotus\work\organize"
call TsMkUDir "%RootDrive%\Lotus\backup\organize"
call TsMkUDir "%RootDrive%\Lotus\work\smartctr"
call TsMkUDir "%RootDrive%\Lotus\work\wordpro"
call TsMkUDir "%RootDrive%\Lotus\backup\wordpro"

Rem Lotus WordproÀÌ ¼³Ä¡µÇÁö ¾Ê¾ÒÀ¸¸é ÀÌ ´Ü°è¸¦ °Ç³Ê ¶Ý´Ï´Ù.
If "%WP%A" == "A" Goto Skip1

Rem ¾î¶² ÀÌÀ¯ ¶§¹®¿¡ ´ÙÀ½ ÆÄÀÏ¿¡ Á¤ÀÇµÈ ·¹Áö½ºÆ®¸® Å°¸¦ ¼³Á¤ÇÕ´Ï´Ù. wordpro°¡ ÀÌ Å°¸¦ ¼³Á¤ÇÏÁö ¾Ê½À´Ï´Ù.
set List1="%WP%\expcntx.reg" "%WP%\ltsfills.reg" "%WP%\ltscorrt.reg" "%WP%\lwp4wp.reg" "%WP%\lwp4wpex.reg"
set List2="%WP%\lwpdca.reg" "%WP%\lwphtml.reg" "%WP%\lwpimage.reg" "%WP%\lwptools.reg"

regedit /s %List1% %List2%

:Skip1

regedit /s ss9usr.reg

:Done