<!--#include file="../inc.asp"-->
<!--#include file="../ydzq1.asp"-->
<%Call head()
Call cardgame("休闲中心",yanse10)


dim lx,sl,msg

lx=request.form("lx")
sl=request.form("sl")
if myjb<100 then
response.write"你的钱也太少了吧`~"
else
	select case lx
	     case "rou"	                        
            if myjb<sl*500 then response.redirect"/bbs/cw/1.asp?sid="&sid&""
                sql="update users set myjb=myjb-"& sl*500 &",mytl=mytl+"& sl*65 &" where [id] ="&myid 
			conn.execute sql
	msg="您的选择了普通洗澡,洗了"& sl &"次,体力增加了"& sl*65 &","&getcent&"-"& sl*500 &"" 
                   
            case "gt"
            if myjb<sl*1500 then response.redirect"/bbs/cw/1.asp?sid="&sid&""  
           	      sql="update users set myjb=myjb-"& sl*1500 &", mytl= mytl+"& sl*80 &",mych=mych+"& sl*80 &",myml=myml+"& sl*80 &"  where [id] ="&myid
			conn.execute sql
		msg="您的选择了游泳，游了"& sl &"次,体力.才华.魅力各增加了"& sl*80 &","&getcent&"-"& sl*1500 &""


		case "xnj"
            	 if myjb<sl*2000 then response.redirect"/bbs/cw/1.asp?sid="&sid&""   
                      sql="update users set myjb=myjb-"& sl*2000 &", mytl= mytl+"& sl*100 &",mych=mych+"& sl*100 &",myml=myml+"& sl*100 &"  where [id] ="&myid
			conn.execute sql
		msg="您的选择了桑拿服务，桑拿了"& sl &"次，体力.才华.魅力增加了"& sl*100 &","&getcent&"-"& sl*2000 &""
		
		
		case "lhr"               
               if myjb<sl*3000 then response.redirect"/bbs/cw/1.asp?sid="&sid&""
			sql="update users set myjb=myjb-"& sl*3000 &", mytl= mytl+"& sl*170 &",mych=mych+"& sl*170 &",myml=myml+"& sl*170 &"  where [id] ="&myid
			conn.execute sql
		msg="您的选择了蒸汽服务，蒸了"& sl &"次，体力.才华.魅力增加了"& sl*170 &","&getcent&"-"& sl*3000 &""
	
		case "hzj"               
                  if myjb<sl*5000 then response.redirect"/bbs/cw/1.asp?sid="&sid&""
			sql="update users set myjb=myjb-"& sl*5000 &", mytl= mytl+"& sl*300 &",mych=mych+"& sl*300 &",myml=myml+"& sl*300 &"  where [id] ="&myid
			conn.execute sql
		msg="您的选择了按摩服务，按了"& sl &"次，体力.才华.魅力增加了"& sl*300 &","&getcent&"-"& sl*5000 &""
	
		end select
response.write msg
end if
	conn.close
	set rs=nothing
	set conn=nothing
%>
<br/>--------<br/>
<a href='xy.asp?sid=<%=sid%>&amp;saytk=<%=saytk%>'>继续享受洗澡>></a><br/>
<a href='index.asp?sid=<%=sid%>&amp;saytk=<%=saytk%>'>酒店</a>-<a href='/bbs/index.asp?sid=<%=sid%>&amp;saytk=<%=saytk%>'>社区</a>-<a href='/index.asp?sid=<%=sid%>&amp;saytk=<%=saytk%>'>首页</a>


<%
call headsay()

%>









