...
sTextFont = "<FONT face=""Verdana,Arial,Helvetica,sans-serif"" color=""yellow"" size=""4"">"
' define input box to be used by javascript functions defined in the header (see GlobalScripts MiniBrowserFunctions
sInputBox = "<form><input type=""text"" name=""code"" value="""" maxlength=""4"" class=""display"" readonly=""readonly"" size=""8"" style=""border: 0px; color: white; font-size: 30px; background-color: dimgray;"" /></form>"
sHTML = sHTML & ("<BR><CENTER><TABLE border=""0"" cellpadding=""0"" cellspacing=""5"" margin=""0"">")
sHTML = sHTML & ("<TR><TD colspan=6 align=center bgcolor=gray>" & sTextFont & "Status: " & sSecurityReady & ", " & sSecurityState & "</FONT></TD></TR>")
sHTML = sHTML & ("<TR><TD align=""center"" colspan=""3"">" & sInputBox & "</TD>")
sHTML = sHTML& ("<TD align=center><a href=""#""><IMG SRC=""/Plugins/Images/One.gif"" onclick=""addKeyPress(1)"" border=""0""></a></TD>")
sHTML = sHTML& ("<TD align=center><a href=""#""><IMG SRC=""/Plugins/Images/Two.gif"" onclick=""addKeyPress(2)"" border=""0""></a></TD>")
sHTML = sHTML& ("<TD align=center><a href=""#""><IMG SRC=""/Plugins/Images/Three.gif"" onclick=""addKeyPress(3)"" border=""0""></a></TD></TR>")
' javascript is used for these functions to pass code from form input named code
' if code is not at least 4 in length, the associated mb method will ignore the code parameter
sHTML = sHTML & ("<TR><TD align=center><a href=""#""><IMG SRC=""/Plugins/Images/Stay.gif"" onclick=""doStay()"" border=""0""></a></TD>")
sHTML = sHTML& ("<TD align=center><a href=""#""><IMG SRC=""/Plugins/Images/Disarm.gif"" onclick=""doDisarm()"" border=""0""></a></TD>")
sHTML = sHTML& ("<TD align=center><a href=""#""><IMG SRC=""/Plugins/Images/Exit.gif"" onclick=""doAway()"" border=""0""></a></TD>")
sHTML = sHTML& ("<TD align=center><a href=""#""><IMG SRC=""/Plugins/Images/Four.gif"" onclick=""addKeyPress(4)"" border=""0""></a></TD>")
sHTML = sHTML& ("<TD align=center><a href=""#""><IMG SRC=""/Plugins/Images/Five.gif"" onclick=""addKeyPress(5)"" border=""0""></a></TD>")
sHTML = sHTML& ("<TD align=center><a href=""#""><IMG SRC=""/Plugins/Images/Six.gif"" onclick=""addKeyPress(6)"" border=""0""></a></TD></TR>")
' CAUTION! if you're security system requires a code for panic buttons to work, you'll need to modify mini browser
sHTML = sHTML & ("<TR><TD align=center>" & this.mbGetAnchor("mbFire", "Fire.gif") & "</TD>")
sHTML = sHTML & ("<TD align=center>" & this.mbGetAnchor("mbPolice", "Police.gif") & "</TD>")
sHTML = sHTML & ("<TD align=center>" & this.mbGetAnchor("mbMedical", "Medical.gif") & "</TD>")
sHTML = sHTML& ("<TD align=center><a href=""#""><IMG SRC=""/Plugins/Images/Seven.gif"" onclick=""addKeyPress(7)"" border=""0""></a></TD>")
sHTML = sHTML& ("<TD align=center><a href=""#""><IMG SRC=""/Plugins/Images/Eight.gif"" onclick=""addKeyPress(8)"" border=""0""></a></TD>")
sHTML = sHTML& ("<TD align=center><a href=""#""><IMG SRC=""/Plugins/Images/Nine.gif"" onclick=""addKeyPress(9)"" border=""0""></a></TD></TR>")
' make a transparent spacer so table looks correct
sHTML = sHTML & "<TR><TD colspan=3 rowspan=1></TD>"
' if cancel is pressed, clear the form data by called the javascript clearKeyPresses(), but also clear the SYS DisarmCode usind doKeypadEnter
sHTML = sHTML& ("<TD align=center><INPUT TYPE=""image"" SRC=""/Plugins/Images/Cancel.gif"" onClick=""clearKeyPresses();doKeypadEnter()""></TD>")
sHTML = sHTML& ("<TD align=center><a href=""#""><IMG SRC=""/Plugins/Images/Zero.gif"" onclick=""addKeyPress(0)"" border=""0""></a>" & sCellEnd)
' doKeypadEnter will get keypad value from form input called code, then pass it to SYS method mbKeypadEnter
sHTML = sHTML& ("<TD align=center><INPUT TYPE=""image"" SRC=""/Plugins/Images/Enter.gif"" onClick=""doKeypadEnter()""></TD></TR>")
sHTML = sHTML & "</TABLE></CENTER>"