<!--#include file="connection.asp"-->
<!--#include file="inc/const.asp"-->
<!--#include file="inc/plus_check.asp"-->
<!-- #include file=pet_conn.asp -->
<%

dim menu,savem,rsbank,rssql,chentitle,chenbackasp,stats,errmsg,founderr

chentitle="我的宠物"
Dv_plus.name="petcenter"
Dv_plus.checklogin()
Dvbbs.LoadTemplates("")
Dvbbs.Stats="我的宠物"
Dvbbs.Nav()
Dvbbs.Head_var 0,"","宠物中心","petmypet.asp"

if DvBBS.UserId = 0 then
	AlarmErrmsg
else
    dim money,smoney,saveday,allmoney,time1,time2,daikuang,dkdu,daiday,sucmsg
    dim Form_userphoto,Form_FaceUrl,Form_FaceWidth,Form_FaceHeight
    
    Dim Rs,SQL

	set rs=Dvbbs.execute("select jamonery from [jauser] where jauid="&DvBBS.UserId)
      	
    money=rs("jamonery")

	    

    rs.close
    

    
    sql = "SELECT * FROM mypetdata WHERE username='"& Dvbbs.MemberName &"' "
    rs.open sql,conn,1,3
    if rs.eof then
        call showmessage("你还没有宠物啊，快攒钱去买吧~","petshop.asp")
        else

dim t,today,petdiff,pett,petlevel,petep,petshowlevel,levelpic,intval,level1,petpic,pethp,petmaxhp
dim petatk,petdef,updat,newpettoday,petsp,petsex,petpk
dim hpf,spf,mypetdead,petdead,mypetsex
dim item1,item2,item3,item4,item5,mypet,mypetsx,hpitem,atkitem,spitem,defitem,expitem,liveitem        

t=now()
today = date()
petdiff = DateDiff("d", rs("petregdate"), today)

pett= DateDiff("d", rs("petregdate"), today)

petlevel = (Log(rs("mypetexp")) / Log(10)) * (Log(rs("mypetexp")) / Log(10)) * (Log(rs("mypetexp")) / Log(10))
petep = int (100 * (petlevel - int (petlevel)))
petshowlevel = int (petlevel + 1)
levelpic=int(petshowlevel/10)
if levelpic>10 then levelpic=11 end if
level1=int(petshowlevel/2)
petpic=rs("mypetname")
pethp=rs("mypethp")
petmaxhp=rs("mypetmaxhp")
petatk=rs("mypetatk")+rs("item1")+rs("item2")+2+level1
petdef=rs("mypetdef")+rs("item3")+rs("item4")+rs("item5")+3+level1
updat=0
newpettoday = Now()
if petshowlevel<2 then 
    petmaxhp = DEF_PET_basichp
else 
    petmaxhp=DEF_PET_basichp + petshowlevel*5
end if

if pethp > petmaxhp then
    pethp = petmaxhp
end if

petsp=rs("mypetsp")-pett*DEF_PET_basicsp2
if petsp>DEF_PET_basicsp then
    petsp=DEF_PET_basicsp
end if    
if pett>0 then
    updat=1
end if
hpf= int(100 * (pethp / petmaxhp)) - 1
spf= int(100 * (petsp / DEF_PET_basicsp)) - 1
if pethp<1 then
    pethp=0
    mypetdead=1
    updat=1
elseif petsp<1 then
    petsp=0
    mypetdead=1
    updat=1
else 
    mypetdead=0
    updat=1
end if

if pethp<1 or petsp<1 then
    petdead="死亡"
else
    petdead="生存"
end if
if rs("mypetsex")<2 then 
    petsex="雄"
    else 
    petsex="雌"
end if
if rs("openpk")<2 then 
    petpk="等待挑战"
else 
    petpk="拒绝挑战"
end if
if hpf >= 98 then hpf = hpf - 2 end if
if spf >= 98 then spf = spf - 2 end if

if updat=1 then
    sql = "UPDATE mypetdata SET mypetlevel="& petshowlevel &",mypethp="& pethp &",mypetsp="&petsp&",mypetmaxhp="&petmaxhp&",mypetdead="&mypetdead&",petregdate='"&newpettoday&"' WHERE username='"& Dvbbs.MemberName &"'"
    conn.ExeCute(sql)
    updat=0
end if

item1 = rs("item1")
item2 = rs("item2")
item3 = rs("item3")
item4 = rs("item4")
item5 = rs("item5")
mypet = rs("mypet")
mypetsx = rs("mypetsx")
hpitem = rs("hpitem")
atkitem = rs("atkitem")
spitem = rs("spitem")
defitem = rs("defitem")
expitem = rs("expitem")
liveitem = rs("liveitem")

    end if
    
rs.close    
%>
<table border="0" align="center" cellpadding="3" cellspacing="1" class="TableBorder1">
  <tr> 
    <th height="25">&nbsp;</th>
  </tr>
  <tr> 
    <td height="200" valign="top" class=TableBody1>
      <table width="100%" border="0" cellspacing="1" cellpadding="5" align="center" class=TBone>
        <tr> 
          <td height=27 align="center" class=tbhead2><b><font class=HeadFont><%=stats%></font></b></td>
        </tr>
        <tr> 
          <td class=tbbg1> 
            <table width="100%"  border="0" align="center" cellpadding="3" cellspacing="3">
              <tr>
                <td width="24%" rowspan="3">
                  <div align="center"> 
                    <table width="79%"  border="0" align="center" cellpadding="3" cellspacing="3">
                      <tr>
                        <td width="100%">
                          <div align="center">我的资料</div>
                        </td>
                      </tr>
                      <tr>
                        <td>
                          <div align="center"> 
                            <script src=z_visual_const2.asp?n=1></script>
                            <br>
                            <img src=../images/blank.gif width=2 height=5><br>
                          </div>
                        </td>
                      </tr>
                      <tr> 
                        <td> 
                          <div align="center"> <nobr>现金货币: <%=money%></nobr> </div>
                        </td>
                      </tr>
                    </table>
                    <br>
                    <table width="90%"  border="0" align="center" cellpadding="3" cellspacing="3">
                      <tr>
                        <td>
                          <div align="center"></div>
                          <!-- #include file=petnav.asp -->
                        </td>
                      </tr>
                    </table>
                    <br>
                    <br>
                    <table width="79%" border="0" align="center" cellpadding="3" cellspacing="3">
                      <tr>
                        <td width="100%">
                          <div align="center"><img src="images/pet/25.gif"></div>
                        </td>
                      </tr>
                    </table>
                  </div>
                  <div align="center"></div>
                </td>
                <td width="76%">
                  <table width="100%" border="0" cellspacing="2" cellpadding="2">
                    <tr> 
                      <td width="35%">&nbsp;</td>
                      <td width="20%"> 
                        <div align="center"><img src="images/pet/head/<%=item3%>.gif" alt="宠物头盔"></div>
                      </td>
                      <td width="35%">&nbsp;</td>
                    </tr>
                    <tr> 
                      <td>
                        <div align="right"><img height=30 src="images/pet/sword/<%=item1%>.gif" alt="宠物武器"></div>
                      </td>
                      <td rowspan="2">
                        <div align="center"><img src='images/pet/<%=petpic%>/<%=petpic%><%=levelpic%>.gif'></div>
                      </td>
                      <td><img src="images/pet/body/<%=item4%>.gif" alt="我的盔甲"></td>
                    </tr>
                    <tr> 
                      <td>
                        <div align="right"><img src="images/pet/necklace/<%=item2%>.gif" alt="宠物项链" ></div>
                      </td>
                      <td><img src="images/pet/foot/<%=item5%>.gif" alt="宠物手套"></td>
                    </tr>
                  </table>
                  <br>
                  <table width='100%' border='0' cellpadding='1' cellspacing='1'>
                    <tr>
                      <td width='33%'>
                        <div align="left">宠物名称：<%=mypet%> <br>
                          宠物性别：<%=petsex%><br>
                          攻击力：<%=petatk%><br>
                          防御力：<%=petdef%></div>
                      </td>
                      <td width='33%'> 宠物状态：<%=petdead%><br>
                        宠物级别：<%=petshowlevel%><br>
                        宠物属性：<%=mypetsx%><br>
                        宠物PK：<%=petpk%></td>
                      <td width='33%'> HP : <%=pethp%> / <%=petmaxhp%><br>
                        <table width='120' border='0' cellspacing='0' cellpadding='0' bordercolor='#000000'>
                          <tr>
                            <td width=3 height=13><img height=13 src='images/rpg/img_left.gif' width=3></td>
                            <td width=114 background=images/rpg/img_backing.gif height=13><img src='images/rpg/orange.gif' width='<%=hpf%>%' height='9'><img src='images/rpg/hp.gif' height='9'></td>
                            <td width=3 height=13><img height=13 src='images/rpg/img_right.gif' width=3></td>
                          </tr>
                        </table>
                        SP : <%=petsp%> / <%=DEF_PET_basicsp%><br>
                        <table width='120' border='0' cellspacing='0' cellpadding='0' bordercolor='#000000'>
                          <tr>
                            <td width=3 height=13><img height=13 src='images/rpg/img_left.gif' width=3></td>
                            <td width=114 background=images/rpg/img_backing.gif height=13><img src='images/rpg/green.gif' width='<%=spf%>%' height='9'><img src='images/rpg/mp.gif' height='9'></td>
                            <td width=3 height=13><img height=13 src='images/rpg/img_right.gif' width=3></td>
                          </tr>
                        </table>
                        EXP : <%=petep%>%<br>
                        <table width='120' border='0' cellspacing='0' cellpadding='0' bordercolor='#000000'>
                          <tr>
                            <td width=3 height=13><img height=13 src='images/rpg/img_left.gif' width=3></td>
                            <td width=114 background=images/rpg/img_backing.gif height=13><img src='images/rpg/blue.gif' width='<%=petep%>%' height='9'><img src='images/rpg/exp.gif' height='9'></td>
                            <td width=3 height=13><img height=13 src='images/rpg/img_right.gif' width=3></td>
                          </tr>
                        </table>
                      </td>
                    </tr>
                  </table>
                </td>
              </tr>
              <tr>
                <td>
                  <table cellspacing=3 cellpadding=3 width="100%" align=center border=0>
                    <tr> 
                      <td width="25%"> 
                        <div align=center><img height=35 src="images/pet/hp.gif" width=34><br>
                          HP药水</div>
                      </td>
                      <td width="25%"> 
                        <div align=center>拥有数量：<%=hpitem%> <br>
                          [<a href="petitemuse.asp?action=usehp">使用</a>]</div>
                      </td>
                      <td width="25%">
                        <div align="center"> <img height=35 src="images/pet/hp.gif" width=34><br>
                          攻击力药水</div>
                      </td>
                      <td width="25%">
                        <div align="center">拥有数量：<%=atkitem%><br>
                          [<a href="petitemuse.asp?action=useatk">使用</a>]</div>
                      </td>
                    </tr>
                    <tr> 
                      <td>
                        <div align=center><img height=35 src="images/pet/sp.gif" width=35><br>
                          SP药水</div>
                      </td>
                      <td>
                        <div align=center>拥有数量：<%=spitem%><br>
                          [<a href="petitemuse.asp?action=usesp">使用</a>]</div>
                      </td>
                      <td>
                        <div align="center"><img height=35 src="images/pet/hp.gif" width=34><br>
                          防御力药水</div>
                      </td>
                      <td>
                        <div align="center">拥有数量：<%=defitem%><br>
                          [<a href="petitemuse.asp?action=usedef">使用</a>]</div>
                      </td>
                    </tr>
                    <tr> 
                      <td>
                        <div align=center><img height=35 src="images/pet/exp.gif" width=35><br>
                          EXP药水</div>
                      </td>
                      <td width="25%"> 
                        <div align="center">拥有数量：<%=expitem%><br>
                          [<a href="petitemuse.asp?action=useexp">使用</a>]</div>
                      </td>
                      <td>
                        <div align="center"><br>
                          <img height=35 src="images/pet/hp.gif" width=34><br>
                          <font color="#000000">复活药水</font></div>
                      </td>
                      <td>
                        <div align="center">拥有数量：<%=liveitem%><br>
                          [<a href="petitemuse.asp?action=uselive">使用</a>]</div>
                      </td>
                    </tr>
                  </table>
                </td>
              </tr>
            </table>
          </td>
        </tr>
      </table>
    </td>
  </tr>
</table>
<% End If :  Set Dv_plus=Nothing : Dvbbs.Footer%>