แบ็คแกมมอนเป็นเกมไขปริศนาที่ทุกคนคุ้นเคยดี และมีซอฟต์แวร์เกมที่เกี่ยวข้องมากมาย ที่นี่ฉันขอแนะนำเกมแบ็คแกมมอนเวอร์ชันออนไลน์ใหม่ให้คุณโดยเฉพาะ โดยจะใช้ ASP เป็นสภาพแวดล้อมการพัฒนา ดังนั้นจึงเป็นที่นิยมอย่างมากบนอินเทอร์เน็ต ไม่จำเป็นต้องดาวน์โหลดซอฟต์แวร์ไคลเอนต์เมื่อเล่นการต่อสู้ตราบใดที่คุณมีเบราว์เซอร์ คุณยังสามารถเล่นเกมนี้บนเครือข่ายท้องถิ่นได้
สำหรับ ASP ฉันไม่อยากอธิบายมากเกินไป ฉันได้พูดไปแล้วมากมายในบทความที่แล้ว
ขั้นตอนของเกมจะเป็นดังนี้ ก่อนอื่น เราจึงจะสามารถเลือกสนามรบได้ เช่น ดาวศุกร์ ดาวพฤหัสบดี ดาวพุธ ดาวเสาร์ และดาวเสาร์ หากคุณคิดว่าคุณเป็นผู้เชี่ยวชาญ ดาวศุกร์ ไม่เช่นนั้นคุณสามารถเลือกดวงอื่นตามลำดับได้ หากไม่มีผู้ท้าชิงบนโลกใบนี้ คุณควรเข้ามาเป็นผู้ท้าชิง แล้วคนอื่นๆ ก็สามารถแข่งขันกับคุณได้ แน่นอนว่าหากสงครามได้เริ่มต้นขึ้นบนดาวเคราะห์ทุกดวง คุณจะต้องรอสักครู่
หากคุณเข้าสู่ระบบในฐานะผู้ท้าชิง คุณสามารถรอให้ผู้อื่นมาต่อสู้กับคุณได้ หากคุณเข้าสู่ระบบในฐานะผู้โจมตี คุณสามารถเริ่มการต่อสู้กับผู้ท้าชิงได้อย่างรวดเร็ว หลังจากการต่อสู้เริ่มต้นขึ้น หัวหน้าวงจะเป็นผู้นำด้วยสีดำ จากนั้นผู้โจมตีก็ลงมือต่อไปเรื่อยๆ เมื่อตัดสินใจขั้นสุดท้ายแล้ว จะมีการแจ้งที่เกี่ยวข้อง
ไซต์นี้มีไฟล์หลักหลายไฟล์:
ไฟล์เข้าสู่ระบบ Index.asp:
ไฟล์ระดับกลาง Index0.asp:
ไฟล์จับคู่ Match.asp:
Back0.jpg white0.jpg black0.jpg ไฟล์กราฟิกที่ใช้ตรงกลางหมายถึงกระดานหมากรุก หินสีขาว และหินสีดำ ตามลำดับ ดังที่แสดงด้านล่าง:
ในระหว่างการเริ่มต้นโปรแกรม ให้แบ่งกระดานหมากรุกออกเป็นหลายตาราง ใส่ภาพพื้นหลังลงไปเพื่อสร้างกระดานหมากรุก จากนั้นหลังจากวางตัวหมากรุกแล้ว ให้แทนที่รูปภาพด้วยตัวหมากรุกสีขาวหรือสีดำที่เกี่ยวข้อง
มาดูไฟล์ล็อกอินกันก่อน:
＜%@ ภาษา=VBScript %><
<HTML>
＜หัว><
＜ชื่อเมตา=เนื้อหาเครื่องกำเนิด=Microsoft Visual Studio 6.0>
<หัวข้อ>Star Wars: Five Sons Contest! ＜/หัวเรื่อง><
＜/หัว><
<ร่างกาย>
＜p align=center></font size=6>สตาร์ วอร์ส＜/font>＜/P>
＜เส้นขอบตาราง=1 ความกว้าง=80% align=center>
＜tr><＜td><ดาวเคราะห์</td>＜td>ความท้าทาย</td>＜td>การต่อสู้＜/td><＜td>โจมตี＜/td><＜/tr>
<tr>
<td>ดาวศุกร์</td>
<ทีดี>
-
ถ้า application(first1)= แล้ว
-
<การกระทำของแบบฟอร์ม=index0.asp?flag=วิธีการ First1=โพสต์>
＜INPUT id=text1 name=txtFirst1 size=10＞＜INPUT id=submit1 ชื่อ=submit1
ประเภท=ส่งค่า=ป้อน>
＜/แบบฟอร์ม＞
-
อื่น
แอปพลิเคชัน response.write (first1)
สิ้นสุดถ้า
-
</td>
<td>สงคราม</td>
<ทีดี>
-
ถ้า application(second1)= แล้ว
-
<การกระทำของฟอร์ม=index0.asp?flag=second1 method=post>
＜INPUT id=text1 name=txtSecond1 size=10＞＜INPUT id=submit1
ชื่อ=submit1 ประเภท=ส่งค่า=Enter>
＜/แบบฟอร์ม＞
-
อื่น
แอปพลิเคชัน response.write (Second1)
สิ้นสุดถ้า
-
</td>
</tr>
<tr>
<td>ดาวพฤหัสบดี</td>
<ทีดี>
-
ถ้า application(first2)= แล้ว
-
<การกระทำของแบบฟอร์ม=index0.asp?flag=วิธีการ First2=โพสต์>
＜INPUT id=text1 name=txtFirst2 size=10＞＜INPUT id=submit1 ชื่อ=submit1
ประเภท=ส่งค่า=ป้อน>
＜/แบบฟอร์ม＞
-
อื่น
แอปพลิเคชัน response.write (first2)
สิ้นสุดถ้า
-
</td>
<td>สงคราม</td>
<ทีดี>
-
ถ้า application(second2)= แล้ว
-
<การกระทำของฟอร์ม=index0.asp?flag=วินาที2วิธี=โพสต์>
＜INPUT id=text1 name=txtSecond2 size=10＞＜INPUT id=submit1
ชื่อ=submit1 ประเภท=ส่งค่า=Enter>
＜/แบบฟอร์ม＞
-
อื่น
แอปพลิเคชัน response.write (Second2)
สิ้นสุดถ้า
-
</td>
</tr>
<tr>
<td>ดาวศุกร์</td>
<ทีดี>
-
ถ้า application(first3)= แล้ว
-
<การกระทำของแบบฟอร์ม=index0.asp?flag=วิธีการ First3=โพสต์>
＜INPUT id=text1 name=txtFirst3 size=10＞＜INPUT id=submit1 ชื่อ=submit1
ประเภท=ส่งค่า=ป้อน>
＜/แบบฟอร์ม＞
-
อื่น
แอปพลิเคชัน response.write (first3)
สิ้นสุดถ้า
-
</td>
<td>สงคราม</td>
<ทีดี>
-
ถ้า application(second3)= แล้ว
-
<การกระทำของฟอร์ม=index0.asp?flag=second3 method=post>
＜INPUT id=text1 name=txtSecond3 size=10＞＜INPUT id=submit1
ชื่อ=submit1 ประเภท=ส่งค่า=Enter>
＜/แบบฟอร์ม＞
-
อื่น
แอปพลิเคชัน response.write (Second3)
สิ้นสุดถ้า
-
</td>
</tr>
<tr>
<td>ดาวศุกร์</td>
<ทีดี>
-
ถ้า application(first4)= แล้ว
-
<การกระทำของฟอร์ม=index0.asp?flag=วิธีการ First4=โพสต์>
＜INPUT id=text1 name=txtFirst4 size=10＞＜INPUT id=submit1 ชื่อ=submit1
ประเภท=ส่งค่า=ป้อน>
＜/แบบฟอร์ม＞
-
อื่น
แอปพลิเคชัน response.write (first4)
สิ้นสุดถ้า
-
</td>
<td>สงคราม</td>
<ทีดี>
-
ถ้า application(second4)= แล้ว
-
<การกระทำของฟอร์ม=index0.asp?flag=second4 method=post>
＜INPUT id=text1 name=txtSecond4 size=10＞＜INPUT id=submit1
ชื่อ=submit1 ประเภท=ส่งค่า=Enter>
＜/แบบฟอร์ม＞
-
อื่น
แอปพลิเคชัน response.write (Second4)
สิ้นสุดถ้า
-
</td>
</tr>
<tr>
<td>ดาวศุกร์</td>
<ทีดี>
-
ถ้า application(first5)= แล้ว
-
<การกระทำของแบบฟอร์ม=index0.asp?flag=วิธีการ First5=โพสต์>
＜INPUT id=text1 name=txtFirst5 size=10＞＜INPUT id=submit1 ชื่อ=submit1
ประเภท=ส่งค่า=ป้อน>
＜/แบบฟอร์ม＞
-
อื่น
แอปพลิเคชัน response.write (first5)
สิ้นสุดถ้า
-
</td>
<td>สงคราม</td>
<ทีดี>
-
ถ้า application(second5)= แล้ว
-
<การกระทำของฟอร์ม=index0.asp?flag=วินาที5วิธี=โพสต์>
＜INPUT id=text1 name=txtSecond5 size=10＞＜INPUT id=submit1
ชื่อ=submit1 ประเภท=ส่งค่า=Enter>
＜/แบบฟอร์ม＞
-
อื่น
แอปพลิเคชัน response.write (Second5)
สิ้นสุดถ้า
-
</td>
</tr>
＜/โต๊ะ><
＜/ร่างกาย><
＜/HTML><
ไฟล์นี้ไม่จำเป็นต้องอธิบายมากเกินไป เป็นเพียงตารางขนาดใหญ่ที่ทุกคนสามารถเข้าไปได้จากที่นั่น หากมีการใช้ตำแหน่งใดตำแหน่งหนึ่ง ก็จะกลายเป็นชื่อของฮีโร่ และไม่อนุญาตให้เข้าสู่ระบบซ้ำ เข้ามาหลังจากเข้าสู่ระบบแล้ว
index0.asp นี่คือไฟล์แลกเปลี่ยนระดับกลาง ซึ่งมีการประมวลผลและกำหนดตัวแปรบางตัว จากนั้นจึงป้อน match.asp สำหรับการจับคู่อย่างเป็นทางการ มาดูเนื้อหาของ index0.asp กัน:
＜%@ ภาษา=VBScript %><
-
ถ้า Request.Form(txt & request.querystring(flag))＜> แล้วก็
'response.เขียนเข้ามา! &
เซสชั่น (ดี) = คำขอแบบฟอร์ม (txt & request.querystring (แฟล็ก))
'เซสชันการตอบกลับเขียน (ดี) &
'แอปพลิเคชันresponse.write (request.querystring (แฟล็ก))
ถ้า application(request.querystring(flag))= แล้ว
แอปพลิเคชัน (request.querystring (แฟล็ก)) = เซสชัน (ดี)
เซสชั่น (คลาส) = ขวา (request.querystring (แฟล็ก), 1)
ถ้า left(request.querystring(flag),1)=f แล้ว
แอปพลิเคชัน (เซสชัน (ดี)) = false
elseif left(request.querystring(flag),1)=s แล้ว
แอปพลิเคชัน (เซสชัน (ดี)) = false
แอปพลิเคชัน (แอปพลิเคชัน (ครั้งแรก & เซสชัน (คลาส)))=true
สิ้นสุดถ้า
Response.Redirect match.asp
สิ้นสุดถ้า
สิ้นสุดถ้า
-
<HTML>
＜/HTML><
ในโปรแกรมนี้ เซสชัน (ดี) ใช้เพื่อบันทึกชื่อเข้าสู่ระบบของคุณ โดยจะใช้ในกระบวนการต่างๆ ในอนาคตเพื่อแยกแยะผู้ใช้จำนวนมาก หากคุณเข้ามาจากตำแหน่งหัวหน้าวง สิทธิ์ของคุณก็คือ
อย่างแรก หรืออย่างที่สอง ให้ใช้เซสชัน (คลาส) เพื่อบันทึกว่าสนามรบนั้นอยู่ในสนามรบใด Jinmu
น้ำ ไฟ และดินแสดงเป็น 1, 2, 3, 4 และ 5 ตามลำดับ เนื่องจากมีสนามรบหลายแห่งที่อาจต่อสู้กันพร้อมๆ กัน หากไม่สามารถแยกแยะได้อย่างถูกต้อง อาจนำไปสู่ความสับสนวุ่นวายได้ application(session(nice)) เป็นตัวแปรตรรกะที่ใช้จริงหรือเท็จเพื่อระบุว่าคุณสามารถเล่นหมากรุกได้หรือไม่ หากเป็นเท็จ คุณต้องรอตัวแปรหนึ่ง หากเป็นจริง คุณก็เล่นหมากรุกได้ หลังจากที่คนสองคนในสนามรบเข้ามาในสนามรบแล้วเท่านั้น ผู้ท้าชิงจึงสามารถเล่นหมากรุกได้ และหลังจากที่ผู้ท้าชิงได้หมากแล้วเท่านั้น ผู้โจมตีจึงสามารถเล่นหมากรุกได้ เมื่อพร้อมแล้วให้เข้าสู่สนามแข่งขัน โปรดดูไฟล์ match.asp
<html>
＜หัว＞
＜meta http-equiv=เนื้อหาประเภทเนื้อหา=ข้อความ/html; charset=gb2312>
<ชื่อเมตา=เนื้อหาเครื่องกำเนิดไฟฟ้า=Microsoft FrontPage 4.0>
<ชื่อเมตา=เนื้อหา ProgId=FrontPage.Editor.Document>
＜META http-equiv=รีเฟรชเนื้อหา=3>
＜title><การประกวดเรนจู...＜/title>
＜/หัว><
-
Response.Write Challenger: & แอปพลิเคชัน (ครั้งแรก & เซสชัน (คลาส))
& โจมตี: & แอปพลิเคชัน (วินาที & เซสชัน
(ระดับ))
ถ้า Request.QueryString(pos)＜> แล้ว
แอปพลิเคชัน (pos & เซสชัน (คลาส) & Request.QueryString (pos))
=จริง
สิ้นสุดถ้า
-
<ร่างกาย>
-
'การตอบกลับเขียนแอปพลิเคชัน (aaa)
ถ้า application(first & session(class))=session(nice) แล้ว
สี=สีดำ
ถ้า Request.QueryString(pos)＜> แล้ว
ถ้า session(last)= แล้วก็ session(last)=abc
ถ้า session(last)＜> Request.QueryString(pos) แล้ว
แอปพลิเคชัน (แอปพลิเคชัน (ครั้งแรก & เซสชัน (คลาส)))=false
ถ้าแอปพลิเคชัน(วินาที & เซสชัน(คลาส))＜> จากนั้นแอปพลิเคชัน
(แอปพลิเคชัน (วินาที & เซสชัน (คลาส)))=true
เซสชัน (สุดท้าย) = คำขอ QueryString (pos)
สิ้นสุด ถ้า
สิ้นสุดถ้า
อื่น
ถ้า application(second & session(class))=session(nice) แล้ว
สี=สีขาว
ถ้า Request.QueryString(pos)＜> แล้ว
'ถ้า session(last)= แล้วก็ session(last)=abc
ถ้า session(last)＜> Request.QueryString(pos) แล้ว
แอปพลิเคชัน (แอปพลิเคชัน (ครั้งแรก & เซสชัน (คลาส)))=true
แอปพลิเคชัน (แอปพลิเคชัน (วินาที & เซสชัน (คลาส)))=false
เซสชัน (สุดท้าย) = คำขอ QueryString (pos)
สิ้นสุด ถ้า
สิ้นสุดถ้า
อื่น
ถ้า application(second & session(class))= แล้ว
แอปพลิเคชัน (วินาที & เซสชัน (คลาส)) = เซสชัน (ดี)
สี=สีขาว
ถ้า Request.QueryString(pos)＜> แล้ว
ถ้า session(last)= แล้วก็ session(last)=abc
ถ้า session(last)＜> Request.QueryString(pos) แล้ว
แอปพลิเคชัน (แอปพลิเคชัน (ครั้งแรก & เซสชัน (คลาส)))=true
แอปพลิเคชัน (แอปพลิเคชัน (วินาที & เซสชัน (คลาส)))=false
เซสชัน (สุดท้าย) = คำขอ QueryString (pos)
สิ้นสุด ถ้า
สิ้นสุดถ้า
อื่น
สี=
สิ้นสุดถ้า
สิ้นสุดถ้า
สิ้นสุดถ้า
การตอบสนอง เขียน <table width=400 height=400 border=0 cellspacing=0
เซลล์แพ็ด=0>
สำหรับ i=1 ถึง 16
การตอบสนองเขียน <tr>
สำหรับ j=1 ถึง 16
ถ้าแอปพลิเคชัน (pos & เซสชัน (คลาส) & cstr (i) & _ & cstr (j))=
แล้ว
แอปพลิเคชัน (สี & เซสชัน (คลาส) & _ & Request.QueryString
(pos))=สี
การตอบสนองเขียน <td width=25 height=25>
'แอปพลิเคชัน response.write (แอปพลิเคชัน (ครั้งแรก & เซสชัน (คลาส)))
ถ้า application(session(nice))=true แล้ว
response.write <a href=match.asp?pos= & cstr(i) & _ & cstr(j)
& >＜img เส้นขอบ=0 src=back0.jpg ความกว้าง=25 ความสูง=25>＜/a>
อื่น
response.write <img border=0 src=back0.jpg width=25 height=25>
สิ้นสุดถ้า
การตอบกลับเขียน ＜/td>
อื่น
การตอบสนองเขียน ＜td width=25 height=25＞＜img border=0 src= &
แอปพลิเคชัน (สี & เซสชัน (คลาส) & _ & cstr (i) & _ & cstr
(ญ)) & 0.jpg ความกว้าง=25 ความสูง=25>＜/td> & chr(13)
สิ้นสุดถ้า
ต่อไป
การตอบกลับเขียน ＜/tr>
ต่อไป
การตอบกลับเขียน ＜/ตาราง><
'ตัดสินว่าชนะหรือแพ้'
ถ้า application(first & session(class))=session(nice) แล้ว
ม.=สีดำ
h=สีขาว
อื่น
h=สีดำ
ม.=สีขาว
สิ้นสุดถ้า
'การตัดสินแนวนอน-
สำหรับ i=1 ถึง 15
ชนะ=เท็จ
การสูญเสีย=เท็จ
five_me=0
ห้า_เขา=0
สำหรับ j=1 ถึง 15
ถ้าแอปพลิเคชัน (สี & เซสชัน (คลาส) & _ & cstr (i) & _ & cstr
(j))=m แล้ว
ห้า_me=ห้า_me+1
ห้า_เขา=0
แอปพลิเคชัน elseif (สี & เซสชัน (คลาส) & _ & cstr (i) & _ &
cstr(j))=h แล้ว
five_me=0
ห้า_เขา=ห้า_เขา+1
อื่น
five_me=0
ห้า_เขา=0
สิ้นสุดถ้า
ถ้า five_me=5 แล้ว
ชนะ = จริง
การสูญเสีย=เท็จ
ออกเพื่อ
มิฉะนั้นถ้า five_he=5 แล้ว
ชนะ=เท็จ
ขาดทุน = จริง
ออกเพื่อ
สิ้นสุดถ้า
ต่อไป
ถ้าชนะหรือแพ้ก็ให้ออก
ต่อไป
ถ้าชนะแล้ว
ตอบกลับเขียน คุณชนะ!
แอปพลิเคชัน (แอปพลิเคชัน (ครั้งแรก & เซสชัน (คลาส)))=false
แอปพลิเคชัน (แอปพลิเคชัน (วินาที & เซสชัน (คลาส)))=false
สิ้นสุดถ้า
ถ้าขาดทุนแล้ว
response.write ขออภัย คุณแพ้แล้ว!
แอปพลิเคชัน (แอปพลิเคชัน (ครั้งแรก & เซสชัน (คลาส)))=false
แอปพลิเคชัน (แอปพลิเคชัน (วินาที & เซสชัน (คลาส)))=false
สิ้นสุดถ้า
'การตัดสินทิศทางคอลัมน์|
สำหรับ j=1 ถึง 15
ชนะ=เท็จ
การสูญเสีย=เท็จ
five_me=0
ห้า_เขา=0
สำหรับ i=1 ถึง 15
ถ้าแอปพลิเคชัน (สี & เซสชัน (คลาส) & _ & cstr (i) & _ & cstr
(j))=m แล้ว
ห้า_me=ห้า_me+1
ห้า_เขา=0
แอปพลิเคชัน elseif (สี & เซสชัน (คลาส) & _ & cstr (i) & _ &
cstr(j))=h แล้ว
five_me=0
ห้า_เขา=ห้า_เขา+1
อื่น
five_me=0
ห้า_เขา=0
สิ้นสุดถ้า
ถ้า five_me=5 แล้ว
ชนะ = จริง
การสูญเสีย=เท็จ
ออกเพื่อ
มิฉะนั้นถ้า five_he=5 แล้ว
ชนะ=เท็จ
ขาดทุน = จริง
ออกเพื่อ
สิ้นสุดถ้า
ต่อไป
ถ้าชนะหรือแพ้ก็ให้ออก
ต่อไป
ถ้าชนะแล้ว
ตอบกลับเขียน คุณชนะ!
แอปพลิเคชัน (แอปพลิเคชัน (ครั้งแรก & เซสชัน (คลาส)))=false
แอปพลิเคชัน (แอปพลิเคชัน (วินาที & เซสชัน (คลาส)))=false
สิ้นสุดถ้า
ถ้าขาดทุนแล้ว
response.write ขออภัย คุณแพ้แล้ว!
แอปพลิเคชัน (แอปพลิเคชัน (ครั้งแรก & เซสชัน (คลาส)))=false
แอปพลิเคชัน (แอปพลิเคชัน (วินาที & เซสชัน (คลาส)))=false
สิ้นสุดถ้า
'การตัดสินเฉียง /
สำหรับ i=1 ถึง 11
ชนะ=เท็จ
การสูญเสีย=เท็จ
five_me=0
ห้า_เขา=0
สำหรับ j=i+4 ถึง 1 ขั้นตอน -1
ถ้าแอปพลิเคชัน (สี & เซสชัน (คลาส) & _ & cstr (j) & _ & cstr
(i+5-j))=m แล้ว
ห้า_me=ห้า_me+1
ห้า_เขา=0
แอปพลิเคชัน elseif (สี & เซสชัน (คลาส) & _ & cstr (j) & _ &
cstr(i+5-j))=h แล้ว
five_me=0
ห้า_เขา=ห้า_เขา+1
อื่น
five_me=0
ห้า_เขา=0
สิ้นสุดถ้า
ถ้า five_me=5 แล้ว
ชนะ = จริง
การสูญเสีย=เท็จ
ออกเพื่อ
มิฉะนั้นถ้า five_he=5 แล้ว
ชนะ=เท็จ
ขาดทุน = จริง
ออกเพื่อ
สิ้นสุดถ้า
ต่อไป
ถ้าชนะหรือแพ้ก็ให้ออก
ต่อไป
ถ้าชนะแล้ว
ตอบกลับเขียน คุณชนะ!
แอปพลิเคชัน (แอปพลิเคชัน (ครั้งแรก & เซสชัน (คลาส)))=false
แอปพลิเคชัน (แอปพลิเคชัน (วินาที & เซสชัน (คลาส)))=false
สิ้นสุดถ้า
ถ้าขาดทุนแล้ว
response.write ขออภัย คุณแพ้แล้ว!
แอปพลิเคชัน (แอปพลิเคชัน (ครั้งแรก & เซสชัน (คลาส)))=false
แอปพลิเคชัน (แอปพลิเคชัน (วินาที & เซสชัน (คลาส)))=false
สิ้นสุดถ้า
'การตัดสินเฉียง /
สำหรับ i=1 ถึง 11
ชนะ=เท็จ
การสูญเสีย=เท็จ
five_me=0
ห้า_เขา=0
สำหรับ j=12-i ถึง 15
ถ้าแอปพลิเคชัน (สี & เซสชัน (คลาส) & _ & cstr (13-ij) & _
& cstr(j))=m แล้ว
ห้า_me=ห้า_me+1
ห้า_เขา=0
แอปพลิเคชัน elseif (สี & เซสชัน (คลาส) & _ & cstr (13-ij)
& _ & cstr(j))=h แล้ว
ห้า_me=0
ห้า_เขา=ห้า_เขา+1
อื่น
ห้า_me=0
ห้า_เขา=0
สิ้นสุดถ้า
ถ้า five_me=5 แล้ว
ชนะ = จริง
การสูญเสีย=เท็จ
ออกเพื่อ
มิฉะนั้นถ้า five_he=5 แล้ว
ชนะ=เท็จ
ขาดทุน = จริง
ออกเพื่อ
สิ้นสุดถ้า
ต่อไป
ถ้าชนะหรือแพ้ก็ให้ออก
ต่อไป
ถ้าชนะแล้ว
ตอบกลับเขียน คุณชนะ!
แอปพลิเคชัน (แอปพลิเคชัน (ครั้งแรก & เซสชัน (คลาส)))=false
แอปพลิเคชัน (แอปพลิเคชัน (วินาที & เซสชัน (คลาส)))=false
สิ้นสุดถ้า
ถ้าขาดทุนแล้ว
response.write ขออภัย คุณแพ้แล้ว!
แอปพลิเคชัน (แอปพลิเคชัน (ครั้งแรก & เซสชัน (คลาส)))=false
แอปพลิเคชัน (แอปพลิเคชัน (วินาที & เซสชัน (คลาส)))=false
สิ้นสุดถ้า
-
＜/ตัว＞
＜/html>
หากไม่มีตัวหมากรุก ณ จุดใดจุดหนึ่ง ให้เพิ่มการเชื่อมต่อแบบไฮเปอร์และวางตัวหมากรุกที่มีสีต่างกันตามความแตกต่างระหว่างผู้ท้าชิงและผู้โจมตี ย่อหน้าสุดท้ายใช้ในการตัดสินการชนะและการแพ้ และแบ่งออกเป็นทิศทางแนวนอน คอลัมน์ และแนวทแยงสองทิศทาง คุณสามารถเข้าใจได้โดยดูที่เนื้อหาเฉพาะ
สิ่งสุดท้ายที่ฉันอยากจะพูดถึงคือ global.asa ซึ่งเป็นไฟล์หลักบนไซต์ หากต้องการออกจากตำแหน่งให้ผู้อื่นหลังจากออกจากเกมหมากรุก คุณต้องเพิ่มโค้ดลงใน sesison_onend เพื่อประมวลผลดังนี้:
<ภาษาสคริปต์=vbscript runat=เซิร์ฟเวอร์>
application_onstart ย่อย
เซสชั่น.หมดเวลา=1
จบย่อย
session_onstart ย่อย
ถ้า application(num)= แล้ว
ใบสมัคร(หมายเลข)=0
สิ้นสุดถ้า
แอปพลิเคชัน (หมายเลข) = แอปพลิเคชัน (หมายเลข) +1
จบย่อย
＜/สคริปต์><
<ภาษาสคริปต์=vbscript runat=เซิร์ฟเวอร์>
session_onend ย่อย
ถ้า application(num)= แล้ว
ใบสมัคร(หมายเลข)=0
สิ้นสุดถ้า
แอปพลิเคชัน (หมายเลข) = แอปพลิเคชัน (หมายเลข) -1
ถ้า application(first1)=session(nice) แล้ว
แอปพลิเคชัน (first1)=
elseif application(second1)=session(nice) แล้ว
แอปพลิเคชัน (second1)=
elseif application(first2)=session(nice) แล้ว
แอปพลิเคชัน (first2)=
elseif application(second2)=session(nice) แล้ว
แอปพลิเคชัน (second2)=
elseif application(first3)=session(nice) แล้ว
แอปพลิเคชัน (first3)=
elseif application(second3)=session(nice) แล้ว
แอปพลิเคชัน (second3)=
elseif application(first4)=session(nice) แล้ว
แอปพลิเคชัน (first4)=
elseif application(second4)=session(nice) แล้ว
แอปพลิเคชัน (second4)=
elseif application(first5)=session(nice) แล้ว
แอปพลิเคชัน (first5)=
elseif application(second5)=session(nice) แล้ว
แอปพลิเคชัน (second5)=
สิ้นสุดถ้า
สำหรับ i=1 ถึง 15
สำหรับ j=1 ถึง 15
แอปพลิเคชัน (สี & เซสชัน (คลาส) & _ & cstr (i) & _ & cstr
(ญ))=
แอปพลิเคชัน (pos & เซสชัน (คลาส) & cstr (i) & _ & cstr (j))=
ต่อไป
ต่อไป
แอปพลิเคชัน (เซสชัน (ดี))=
จบย่อย
＜/สคริปต์><
ข้างต้นเป็นเพียงไฟล์หลักบางส่วน คุณสามารถทดลองใช้งานได้ อะไรอยากเล่น Go? เพียงแค่เปลี่ยนกระดานหมากรุก