기존 0.1의 버그해결및 작업창을 넣어봤습니다.

-- 버그해결 : loop명령어의 사용으로 인한 CPU사용률및 페이징 파일 증가

소스 같이 공개합니다. 사용후 버그발견시 꼭 글을 남겨 주시면 대단히~~ 감사하겠습니다.

개발툴은 AutoHotkey입니다.

=========== 스크립트 ============

#NoTrayIcon ;트레이 아이콘을 없에버림
RegRead, NowStartPage, REG_SZ, HKEY_CURRENT_USER, Software\Microsoft\Internet Explorer\Main, Start Page
;레지스트리로부터 시작페이지값을 읽어서 NowStartPage변수에 저장
Gui, Add, Picture, x5 y5 W30 H30 icon5 , %A_WinDir%\system32\user32.dll ;user32로부터 Icon5에 해당하는 아이콘을 읽어드림
Gui, Add, Text, Cblue x40 y10 section, 현재시작페이지는 %NowStartPage% 입니다.
Gui, Add, Text, x40 y30 section, 바뀔 시작페이지를 아래박스에 적어주세요
Gui, Add, Text, Cpink x40 y110 section, Make by : http://blog.daum.net/blueeyepc/
Gui, Add, Edit, x40 y50 section w400 vNewStartPage,Http://
Gui, Add, Button, x40 y75 gStartPageChange,바꾸기
Gui, Add, Button, x90 y75 gUninstall,초기화
Gui, Add, Button, x140 y75 gCancle,나가기
Gui, Show, Center AutoSize, 시작페이지 변경 ;실행되는 Gui의 창크기,위치등 타이틀지정
return

GuiClose: ;Gui창을 닫을때 실행하는 레이블
ExitApp  

StartPageChange:
Gui, Submit ;NewStartPage에 입력된 변수값을 가져옴
 If NowStartPage <> %NewStartPage% ;각 변수의 비교
    {
     ;SplashTextOn, 200, 60, Start Page,시작페이지 적용중입니다`n잠시만 기다려주세요`n^_________^ ;안내메세지
 Loop,20000
    { 
     RegWrite, REG_SZ, HKEY_CURRENT_USER, Software\Microsoft\Internet Explorer\Main, Start Page, %NewStartPage%
     RegWrite, REG_DWORD, HKEY_LOCAL_MACHINE, SOFTWARE\Policies\Microsoft\Internet Explorer\Control Panel, HomePage, 1
     RegWrite, REG_DWORD, HKEY_CURRENT_USER, Software\Policies\Microsoft\Internet Explorer\Control Panel, HomePage, 1
     RegWrite, REG_DWORD, HKEY_CURRENT_USER, Software\Microsoft\Windows\CurrentVersion\Policies\Explorer, NoSaveSettings, 0
  ;RegWrite, REG_DWORD, HKEY_CURRENT_USER, Software\Microsoft\Windows\CurrentVersion\Group Policy Objects\LocalUser\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer, NoSaveSettings, 1

    }
   }
   Else
   {
    Sleep, 2000
 GoTo Cancle
   }
GoTo Check
return

Cancle:
 SplashTextOff
 SplashTextOn, 220, 25, Bye~Bye, 사용해주셔서 감사합니다
 Sleep, 3000
EXitApp

Check:
 Sleep, 2000
 RegRead, CheckStartPage, REG_SZ, HKEY_CURRENT_USER, Software\Microsoft\Internet Explorer\Main, Start Page
  If CheckStartPage = %NewStartPage%
      {
    SplashTextOff
    Goto Check
   }
   Else
   {
    Goto StartPageChange
   }
Return 

Uninstall:
RegWrite, REG_DWORD, HKEY_LOCAL_MACHINE, SOFTWARE\Policies\Microsoft\Internet Explorer\Control Panel, HomePage, dword:00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER, Software\Policies\Microsoft\Internet Explorer\Control Panel, HomePage, dword:00000000
RegDelete, HKEY_CURRENT_USER, Software\Microsoft\Windows\CurrentVersion\Group Policy Objects\LocalUser\Software\Policies\Microsoft\Internet Explorer\Control Panel, HomePage, dword:00000001
RegWrite, REG_DWORD, HKEY_CURRENT_USER, Software\Microsoft\Windows\CurrentVersion\Policies\Explorer, NoSaveSettings, dword:00000000
RegWrite, REG_DWORD, HKEY_CURRENT_USER, Software\Microsoft\Windows\CurrentVersion\Group Policy Objects\LocalUser\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer, NoSaveSettings, dword:00000000
Return

===== 스크립트 끝 ===============

중간 중간 주석을 달아 봤습니다. 공부해보실분들에게 참고가 되었으면 합니다.

사용방법은 시작프로그램에 등록하시면 됩니다. 몇칠이내에 버전업! 시켜서 올리겠습니다.

어디까지나 베타... 테스트용입니다.

more : 개그이야기-http://ezstock.kr 우린친구닷컴-http://urin79.com