📄 play.asp
字号:
<!-- #include file="setup.asp" -->
<%
if Request.Cookies("username")="" then
error("<li>您还还未<a href=login.asp>登陆</a>社区")
end if
sql="select * from user where username='"&HTMLEncode(Request.Cookies("username"))&"'"
rs.Open sql,Conn,1,3
if Request.Cookies("userpass")<>rs("userpass") then
error2("密码错误！")
end if
top
%>
<table width=97% align="center" border="0">
<tr>
<td vAlign="top" width="30%"><img src="images/logo.gif" border="0"></td>
<td vAlign="center" align="top"> <img src="images/closedfold.gif" border="0"> <a href=Default.asp?menu=listtitle><%=clubname%></a><br>
<img src="images/bar.gif" border="0"><img src="images/openfold.gif" border="0"> <a href="play.asp">社区赌场</a></td>
</tr>
</table>
<%
select case Request("menu")
case ""
play
case "dx"
dx
case "ds"
ds
case "sz"
sz
case "dx1"
checkup
dx1
case "ds1"
checkup
ds1
case "sz1"
checkup
sz1
end select
sub checkup
money=int(request("money"))
if money > rs("money") then
error2("你的钱不够！")
end if
if money<10 or money>100 then
error2("输入错误！赌注范围10-100")
end if
if rs("userlife")<1 then
error2("您没有体力了!")
end if
end sub
sub play%>
<title>社区博彩</title><BODY><br>
<center>
<table width="600" border="0" height="143" cellpadding="1" cellspacing="1" class=a2>
<tr align="center">
<td height="129">
<table border="0" width="100%" cellspacing="0" cellpadding="6"><tr>
<td width="50%" align="center" bgcolor="#FFFFFF">警告：每次赌钱，您的魅力值会扣 1 ！
<p><img src="images/plus/daxiao.gif" width="303" height="237" border="0"></td>
<td width="50%" class=a4>
<ul><li><b><a href="play.asp?menu=sz">赌骰子</a></b></font><p>游戏规则：庄家随机出三个<b>骰子</b>，玩家也随机出三个<b>骰子</b>，谁大，谁赢，赔率１：１</font></p>
<blockquote><p align="right"><a href="play.asp?menu=sz">现在进入>></a></p></blockquote>
<li><b><a href="play.asp?menu=ds">猜点数</a></b><p>游戏规则：电脑随机出一个<b>骰子</b>，您选择骰子的点数，如果<b>骰子</b>的点数和您选的点数一样，您就赢了，赔率１：５</font></p>
<ul>
<blockquote><p align="right"><a href="play.asp?menu=ds">现在进入>></a></p></blockquote>
</li></ul>
<li><b><a href="play.asp?menu=dx">赌围骰</a></b><p>游戏规则：电脑随机出三个<b>骰子</b>，您选择可能会出现的</font>三个<b>骰子</b>，如果<b>骰子</b>和您选的一样，您就赢了，赔率１：１００</font></p>
</li></ul>
<blockquote><p align="right"><a href="play.asp?menu=dx">现在进入>></a></p></blockquote>
</td></tr></table></td></tr></table></center>
<%end sub
sub dx%>
<br>
<form method="POST" action="play.asp?menu=dx1"><input type="hidden" name=menu value=dxover>
<center>
<table class=a2 cellSpacing="1" width="400" border="0" height="54" cellpadding="6">
<tr align="center" class=a1><td width="190" colspan="2">
<b>
赌 场 - 赌 围 骰</b></font></td>
<td width="183" colspan="2"><p>最大下注纹银是 <b><font color="#CC0000">
100</font> NG</b></p>
</td>
</tr>
<tr align="center"><td width="134" bgcolor="#FFFFFF"><img src="images/plus/run.gif" width="38" height="36"></td>
<td width="109" colspan="2" bgcolor="#FFFFFF"><img src="images/plus/run.gif" width="38" height="36"></td>
<td width="117" bgcolor="#FFFFFF"><img src="images/plus/run.gif" width="38" height="36"></td>
</tr><tr><td class=a1 width="386" colspan="4">
<p align="center"><font style=font-size:9pt><b>
请选择</b></font></td>
</tr><tr><td align=center colspan="4" width="386" bgcolor="#FFFFFF" >
<table border="0" cellspacing="0" cellpadding="0" width="386">
<tr align="center"><td width="65">
<p align="center"><img src="images/plus/w1.gif"></td>
<td width="65">
<img src="images/plus/w2.gif"></td>
<td width="64">
<img src="images/plus/w3.gif"></td>
<td width="64">
<img src="images/plus/w4.gif"></td>
<td width="64">
<img src="images/plus/w5.gif"></td>
<td width="64">
<img src="images/plus/w6.gif"></td>
</tr>
<tr align="center"><td width="65">
<input type="radio" name="dddimg" value="1" checked></td>
<td width="65">
<input type="radio" name="dddimg" value="2"></td>
<td width="64">
<input type="radio" name="dddimg" value="3"></td>
<td width="64">
<input type="radio" name="dddimg" value="4"></td>
<td width="64">
<input type="radio" name="dddimg" value="5"></td>
<td width="64">
<input type="radio" name="dddimg" value="6"></td>
</tr></table></td></tr><tr>
<td align=center colspan="4" width="386" class=a3>我要下注：
<input type="text" name="money" size="10" value="10"> <b> NG</b></td></tr><tr>
<td align=center colspan="4" width="386" bgcolor="#FFFFFF"><input type="submit" value="下注啦！！！" name="B1" style="font-size: 12px">
</td>
</tr></table></center>
</form><center>
警告：每次赌钱，您的体力值会扣 <font color="#CC0000">1</font> ！
<br>您现在一共有社区纹银 <b><font color="#CC0000"><%=rs("money")%><NG></font></b> <b>NG</b> 可以作为赌注<br>
<%end sub
sub ds%>
<br>
<form method="POST" action="play.asp?menu=ds1"><input type="hidden" name=menu value=dsover>
<center>
<table border=0 cellspacing=1 cellpadding=3 width="350" class=a2>
<tr align="center" class=a1><td width="33%"><p align="center">
<b>赌 场 - 猜 点 数</b></font></p>
</td></tr>
<tr align="center"><td width="33%" bgcolor="#FFFFFF"><img src="images/plus/run.gif"></td></tr><tr>
<td class=a1 width="960" align="center"><b>请选择</b></font></td>
</tr><tr><td align=center bgcolor="#FFFFFF"><table border="0" cellspacing="0" cellpadding="0"><tr align="center">
<td width="17%"><img src="images/plus/dice1.gif"></td><td width="17%"><img src="images/plus/dice2.gif"></td>
<td width="16%"><img src="images/plus/dice3.gif"></td><td width="17%"><img src="images/plus/dice4.gif"></td>
<td width="17%"><img src="images/plus/dice5.gif"></td><td width="16%"><img src="images/plus/dice6.gif"></td>
</tr><tr align="center"><td width="17%"><input type="radio" name="dddimg" value="1" checked>
</td><td width="17%"><input type="radio" name="dddimg" value="2"></td><td width="16%">
<input type="radio" name="dddimg" value="3"></td><td width="17%"><input type="radio" name="dddimg" value="4">
</td><td width="17%"><input type="radio" name="dddimg" value="5"></td><td width="16%">
<input type="radio" name="dddimg" value="6"></td></tr></table></td></tr><tr><td align=center class=a3>
我要下注：
<input type="text" name="money" size="10" value="10"> <b> NG</b></td></tr><tr>
<td align=center bgColor=#FFFFFF><input type="submit" value="下注啦！！！" name="B1" style="font-size: 12px">
</td>
</tr></table> </form>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -