<HTA:APPLICATION ID="oHTA"
WINDOWSTATE="normal"
BORDER="none"
INNERBORDER="no"
SHOWINTASKBAR="no"
SCROLL="no"
APPLICATIONNAME="InstallationSplashScreen"
NAVIGABLE="yes">


<script type="text/javascript" language="javascript">

function closedocument() {
	this.close();
}

</script> 
<script language="VBSCRIPT"> 
<!-- 
Dim WshShell
Set WshShell = CreateObject("WScript.Shell")

sub BTValidate(selected)
	CloseDocument
end sub

Sub DisplayText
	On Error Resume Next
	CurrentDisplayText=WshShell.Regread("HKCU\SOFTWARE\SplashMsg\CurrentDisplayText")
	document.forms(0).DisplayText.size=len(CurrentDisplayText)
	document.forms(0).DisplayText.value=CurrentDisplayText
	On Error GoTo 0

End Sub

sub RefreshTimer
	On Error Resume Next

	PercentCurrentValue=WshShell.Regread("HKCU\SOFTWARE\SplashMsg\PercentCurrentValue")
	PercentMaxValue=WshShell.Regread("HKCU\SOFTWARE\SplashMsg\PercentMaxValue")

	CurrentDisplayInfo=WshShell.Regread("HKCU\SOFTWARE\SplashMsg\CurrentDisplayInfo")
	CurrentDisplayInfo2=WshShell.Regread("HKCU\SOFTWARE\SplashMsg\CurrentDisplayInfo2")

	On Error GoTo 0

	If  CurrentDisplayInfo ="EXIT" Then
		BTValidate("")
	Else
		if PercentMaxValue>0 then
			pgdone=(PercentCurrentValue *200)/PercentMaxValue
			pgtodo=200 - pgdone

			document.forms(0).pgdone.width=pgdone
			document.forms(0).pgtodo.width=pgtodo
		end if


		If len(CurrentDisplayInfo) Then document.forms(0).DisplayInfo.size=len(CurrentDisplayInfo)
		document.forms(0).DisplayInfo.value=CurrentDisplayInfo
		If len(CurrentDisplayInfo2) Then document.forms(0).DisplayInfo2.size=len(CurrentDisplayInfo2)
		document.forms(0).DisplayInfo2.value=CurrentDisplayInfo2
	End If
End sub

sub Window_OnLoad()
    DisplayText
    RefreshTimer
    iTimerID = window.setInterval("RefreshTimer()", 100)
	  centerform  400,150
	  'document.forms(0).DisplayInfo.value="Initializing"
end sub

sub CenterForm(width,height)
	self.resizeTo width, height
	self.moveTo self.screen.width/2-width/2 , self.screen.height/2-height/2
end sub


--> 
</script>

<HTML>
<Head>
<style type="text/css">
.BG {background-color: #FFFFFF;color: #000000;font-family:verdana;  font-size: 12px; font-weight: normal;}
.COUNTER {background-color: #FFFFFF;color: #000000;font-family:verdana;  font-size: 10px; font-weight: normal;border-style:none}
.TRSP {font-family:verdana; background-color: #FFFFFF; color: #000000;border-style:none ; font-size: 12px; font-weight: normal}
.BTN  {
        font-family : verdana;
        font-size : 10pt;
        font-weight : thin;
        line-height : 11pt;
        color : #000000;
        background-color : #FFFFFF;
        padding-top : 3px;
        padding: 3px;
        margin : 8px;
}


</style> 


<title>INSTALL</title>
</head>
<body >
<form name=form>
<table align=center cellspacing=0px cellpadding=1px border=0>
	<tr>
		<td align=Center valign=Center>
		<Input CLASS=TRSP type="Text" style="font-size:17;font-weight:bold" name="DisplayText" value="" style="text-align:center">
		</td>
	</tr>
	<tr>

	<td><img width=2 height=15 src=pgbar_left.jpg><img name=pgdone width=200 height=15 src=pgbar_point.jpg><img name=pgtodo width=0 height=15 src=pgbar_none.jpg><img width=2 height=15 src=pgbar_right.jpg>
	</td>

	</tr>

	<tr>
		<td align=Center valign=Center>
		<Input CLASS=TRSP type="Text" name="DisplayInfo" value="" style="text-align:center">
		</td>
	</tr>

	<tr>
		<td align=Center valign=right>
	        <Input CLASS=TRSP type="Text" name="DisplayInfo2" value="" style="text-align:center">
		</td>
	</tr>
</table>
</FORM>
</body>
</html>