| [种族值]
<% dim hp,atk,def,spd,spatk,spdef,allzz
dim p,q,r
p=1
for p=1 to 7
select case p
case 1
q=PMInfo(28)
case 2
q=PMInfo(29)
case 3
q=PMInfo(30)
case 4
q=PMInfo(31)
case 5
q=PMInfo(32)
case 6
q=PMInfo(33)
case 7
q=PMInfo(34)
end select
if p<>7 then
if q>=0 and q<30 then
r=20
elseif q>=30 and q<60 then
r=40
elseif q>=60 and q<80 then 'case 60 to 79
r=60
elseif q>=80 and q<100 then 'case 80 to 99
r=80
elseif q>=100 and q<=110 then 'case 100 to 110
r=105
elseif q>110 and q<=135 then 'case 110 to 135
r=130
elseif q>135 and q<=200 then 'case 135 to 199
r=165
elseif q>200 and q<=255 then 'case 200 to 255
r=200
end if
else '总和
if q>=0 and q<220 then
r=20
elseif q>=220 and q<300 then
r=35
elseif q>=300 and q<340 then
r=50
elseif q>=340 and q<400 then
r=65
elseif q>=400 and q<475 then
r=90
elseif q>=475 and q<500 then
r=115
elseif q>=500 and q<540 then
r=140
elseif q>=540 and q<580 then
r=160
elseif q>=580 and q<670 then
r=180
elseif q>=670 and q<=720 then
r=200
end if
end if
select case p
case 1
hp=r
case 2
atk=r
case 3
def=r
case 4
spd=r
case 5
spatk=r
case 6
spdef=r
case 7
allzz=r
end select
next
%> |
| |
种族 |
比例 |
无努力 |
满努力 |
极限 |
>>计算能力 |
| ＨＰ |
<%if PMInfo(28)>=130 then response.Write("")%><%=PMInfo(28)%><%if PMInfo(28)>=130 then response.Write("")%>（<%=PMInfo(35)%>） |
 |
<% response.Write(fix((cint(PMInfo(28))*2+31+0/4)*100/100+100+10)) %> |
<% response.Write(fix((cint(PMInfo(28))*2+31+252/4)*100/100+100+10)) %> |
- |
|
| 攻击 |
<%if PMInfo(29)>=130 then response.Write("")%><%=PMInfo(29)%><%if PMInfo(29)>=130 then response.Write("")%>（<%=PMInfo(36)%>） |
|
<% response.Write(fix(((cint(PMInfo(29))*2+31+0/4)*100/100+5)*1.0)) %> |
<% response.Write(fix(((cint(PMInfo(29))*2+31+252/4)*100/100+5)*1.0)) %> |
<% response.Write(fix(((cint(PMInfo(29))*2+31+252/4)*100/100+5)*1.1)) %> |
|
| 防御 |
<%if PMInfo(30)>=130 then response.Write("")%><%=PMInfo(30)%><%if PMInfo(30)>=130 then response.Write("")%>（<%=PMInfo(37)%>） |
|
<% response.Write(fix(((cint(PMInfo(30))*2+31+0/4)*100/100+5)*1.0)) %> |
<% response.Write(fix(((cint(PMInfo(30))*2+31+252/4)*100/100+5)*1.0)) %> |
<% response.Write(fix(((cint(PMInfo(30))*2+31+252/4)*100/100+5)*1.1)) %> |
|
| 速度 |
<%if PMInfo(31)>=130 then response.Write("")%><%=PMInfo(31)%><%if PMInfo(31)>=130 then response.Write("")%>（<%=PMInfo(38)%>） |
|
<% response.Write(fix(((cint(PMInfo(31))*2+31+0/4)*100/100+5)*1.0)) %> |
<% response.Write(fix(((cint(PMInfo(31))*2+31+252/4)*100/100+5)*1.0)) %> |
<% response.Write(fix(((cint(PMInfo(31))*2+31+252/4)*100/100+5)*1.1)) %> |
|
| 特攻 |
<%if PMInfo(32)>=130 then response.Write("")%><%=PMInfo(32)%><%if PMInfo(32)>=130 then response.Write("")%>（<%=PMInfo(39)%>） |
|
<% response.Write(fix(((cint(PMInfo(32))*2+31+0/4)*100/100+5)*1.0)) %> |
<% response.Write(fix(((cint(PMInfo(32))*2+31+252/4)*100/100+5)*1.0)) %> |
<% response.Write(fix(((cint(PMInfo(32))*2+31+252/4)*100/100+5)*1.1)) %> |
|
| 特防 |
<%if PMInfo(33)>=130 then response.Write("")%><%=PMInfo(33)%><%if PMInfo(33)>=130 then response.Write("")%>（<%=PMInfo(40)%>） |
|
<% response.Write(fix(((cint(PMInfo(33))*2+31+0/4)*100/100+5)*1.0)) %> |
<% response.Write(fix(((cint(PMInfo(33))*2+31+252/4)*100/100+5)*1.0)) %> |
<% response.Write(fix(((cint(PMInfo(33))*2+31+252/4)*100/100+5)*1.1)) %> |
|
| 总和 |
<%if PMInfo(34)>500 then response.Write("")%><%=PMInfo(34)%><%if PMInfo(34)>500 then response.Write("")%> |
|
|
|
|
|
)%>.gif)
)%>.png)
)%>.png)
)%>_1.png)
)%>.png)