#
# 3GChanger.mscr for SCH-M620(Windows Mobile 5.0) - Made by 산소통(imjuny@hotmail.com)
#							       
#	 		     		저작권 보호 받고싶지만 출처만 밝혀주세요 ^^;;
#


If(RegValueExists( "HKCU", "COMM\Rasbook\SKT IE GPRS", "DevCfg"))
	Message("현재 SCH-M620의 3G Internet Service는 사용 가능한 상태입니다.")
	else
		Message("현재 SCH-M620의 3G Internet Service는 사용 불가능한 상태입니다.")
Endif
	
Choice( "3G Internet Changer-Made by 산소통","3G Internet Service 설정을 선택 하세요","3G INTERNET SERVICE ENABLE","3G INTERNET SERVICE DISABLE","3GChanger Exit" )

	case( 1 )
		if(RegValueExists("HKCU", "COMM\Rasbook\SKT IE GPRS", "NoDevCfg"))
				
			x = RegRead( "HKCU", "COMM\Rasbook\SKT IE GPRS", "NoDevCfg" )
			y = RegRead( "HKCU", "COMM\Rasbook\SKT IE GPRS", "NoEntry" )
			RegWriteBinary( "HKCU", "COMM\Rasbook\SKT IE GPRS", "DevCfg", x )
			RegWriteBinary( "HKCU", "COMM\Rasbook\SKT IE GPRS", "Entry", y )
			RegDelete( "HKCU", "COMM\Rasbook\SKT IE GPRS", "NoDevCfg" )
			RegDelete( "HKCU", "COMM\Rasbook\SKT IE GPRS", "NoEntry" )
			Message("현재 SCH-M620의 3G Internet Service는 사용 가능한 상태로 설정되었습니다.")
			
			else
				Message("잘못된 선택 혹은 NoDevCfg/NoEntry 설정오류 입니다. 현재 3G Internet Service는 사용 가능한 상태입니다. 만약 3G Internet Service가 사용 불가능한 상태라면 레지스트리 작업으로 3G Internet Service를 사용 가능한 상태(DevCfg/Entry)로 만들어 주신 후 다시 실행 하세요.")
		Endif		

	case( 2 ) 
		if(RegValueExists("HKCU", "COMM\Rasbook\SKT IE GPRS", "DevCfg"))
			
			x = RegRead( "HKCU", "COMM\Rasbook\SKT IE GPRS", "DevCfg" )
			y = RegRead( "HKCU", "COMM\Rasbook\SKT IE GPRS", "Entry" )
			RegWriteBinary( "HKCU", "COMM\Rasbook\SKT IE GPRS", "NoDevCfg", x )
			RegWriteBinary( "HKCU", "COMM\Rasbook\SKT IE GPRS", "NoEntry", y )
			RegDelete( "HKCU", "COMM\Rasbook\SKT IE GPRS", "DevCfg" )
			RegDelete( "HKCU", "COMM\Rasbook\SKT IE GPRS", "Entry" )
			Message("현재 SCH-M620의 3G Internet Service는 사용 불가능한 상태로 설정되었습니다.")				
			
			else
				Message("잘못된 선택 입니다. 현재 3G Internet Service는 사용 불가능한 상태입니다.")
		Endif				
			
		
	Case( 0 )
		
		EXIT
		
EndChoice