Simpan sebagai goji.hta, jalankan untuk melihat efeknya
<html> <title> antarmuka catur gozi- zh159 </title> <hrad> <meta http-equiv = "tipe konten" content = "text/html; charset = gb2312"> <hta: applicationID = "myhyliapp" applicationName = "Gozi Pantaran- zh159 "border =" thin "borderstyle =" "version =" 1.0 "scroll =" no "icon =" c: /windows/system32/wuaucclt.exe "innerborder =" tidak "contextMenu =" no "caption =" yes "m AximizeButton = "Tidak" MinimizeButton = "Ya" showInkBar = "yes" singleInstance = "yes" sysmenu = "yes" windowstate = "normal" navigable = "yes"/> </hrad> <script language = "javascript"> </script> <script language = "vbscript"> </script> script> {width:24;height:24;cursor:hand;}</style><body background="bg.gif" scroll="no" style="background: SteelBlue ;color:#ffffff;"><table align="center" cellpacing="0" cellpading="10" borderColor="#ffffff" style="font: 13px 简;border-collapse:collapse;"> <tr align = "center"> <td> <Table cellpacing = "0" cellPadding = "0" bordercolor = " #ffffff" style = "font: 21px 简体; border: 2px solid #ffffff;"> <script language = "vbscript"> stror = "abcdefghijkl." align='center'>" For n = 1 To Len(str) str = MID(str,i,1) strn = MID(str,n,1) tdstr = "<td id='GUI_" & strn & strn & "' class='GUIwh'><span onclick='Test(this)' onMouseOver='innerText=""●"";style.color=""blue""' onmouseout = 'Innertext = "" ┼ ""; style.color = "" "" "'> ┼ </span> </td>" s = "┼" if (stri = "a" dan strn = "a") Lalu penulisan ganti (tdr, s, "┌") if strn = "A" lalu jika tidak (strn = "or") jika strn = "s strn =" or ") jika tidak. Ganti (tdstr, s, "┬") if (stri = "a" dan strn = "s") kemudian. Tulis ganti (tdr, s, "┐") jika tidak (stri = "a" atau str = "s") maka jika strn = "a" lalu or = "or". "A" atau str = "s") maka jika strn = "s" lalu. Tuliskan ganti (tdstr, s, "┤") if (stri = "s" dan strn = "a") lalu. Tuliskan ganti (tdr, s, "└") jika str = "s ganti, tidr, tdrn =" a atau strn = "st" strn = "s") Kemudian .write ganti (tdrtr, s, "┘") selanjutnya .write "</tr>" diakhiri dengan </script> </able> </td> <td> <span id = "pc"> <butt> </tdrip> </tap </Tabel> <br> Klik langsung untuk mengunduh pemain pertama </span> </Tdrip <" Lebar = 660 Tinggi = 550 Window.Resizeto Lebar, Tinggi ILEFT = (Window.Screen.Width-Width)/2 ITOP = (Window.Screen.Height-Height)/2 window.moveto ileft, ITOP Sub uji (this) this.parentnode.style.cursor = " "●" pc.style.display = "none" end sub sub judul judul.