【更多今日新开奇迹私服点这里查看．．．】

先在muonline数据库Character表中建立新的数据列

具体方法：企业管理器->....->数据库->muonline->表->鼠标右键->设计表
在最下面加入列：

列名 类型 长度 允许空
zs_count smallint 2 √
zs_getpoint smallint 2 √
zs_time datetime 8 √
同样在MEMB_INFO表里加入：（会员密码，这里的密码要你手动添加，如果不想要这个功能，就在转生文件里找到这个密码的定义，和检验位置，输入位置删掉）
列名 类型 长度 允许空
sz_password nvarchar 10 √




<%
lifeneedlevel=220 需要多少级，最好不要小于220级


lifepercent=0 变身获得点数百分比，即每次变身获得前次所有点数的2%，不想给的话就改成0


lifedonelevel=10变身后多少级


lifedoneexp=1 变身后经验多少


lifemoney=10000000 变身需要多少钱


accountname=request.form("username")
password=request.form("password")
character=request.form("userchr")
newtype=request.form("new_type")
userpd=request.form("userpd")


if instr(accountname,"")<>0 then response.end
if instr(accountname,"=")<>0 then response.end
if instr(accountname,"%")<>0 then response.end
if instr(password,"")<>0 then response.end
if instr(password,"=")<>0 then response.end
if instr(password,"%")<>0 then response.end
if instr(userpd,"")<>0 then response.end
if instr(userpd,"=")<>0 then response.end
if instr(userpd,"%")<>0 then response.end



if accountname<>"" and password<>"" then


set rs = Server.CreateObject("ADODB.Recordset")


sql="select * from MEMB_INFO where memb___id = "&accountname&" and memb__pwd="&password&" and sz_password="&userpd&""


rs.open sql,conn,1,1


if rs.eof or rs.bof then


response.write ""


response.end


else


set rs1 = Server.CreateObject("ADODB.Recordset")


sql1="select * from Character where AccountID="&accountname&" and Name="&character&" and cLevel>="&lifeneedlevel


rs1.open sql1,conn,1,3


if rs1.eof or rs1.bof then


%>



<%
response.end


end if


if rs1("money")

response.write ""


response.end


end if


set rs3 = Server.CreateObject("ADODB.Recordset")


sql3="select * from AccountCharacter where id = "&accountname&""


rs3.open sql3,conn,1,3


if rs3("gameidc")=rs1("name") then


response.write ""


response.end


end if



if newtype<>0 and newtype<>1 and newtype<>16 and newtype<>17 and newtype<>32 and newtype<>33 and newtype<>48 then
response.write ""
response.end
end if



if newtype=0 then newname="法师"
if newtype=1 then newname="魔导师"
if newtype=16 then newname="剑士"
if newtype=17 then newname="骑士"
if newtype=32 then newname="弓箭手"
if newtype=33 then newname="圣射手"
if newtype=48 then newname="魔剑士"



if rs1("class")=0 then


判断变身是否合理
if newtype=0 then
response.write ""
response.end
end if


if newtype=32 or newtype=33 then
resword="~变性~"
resword2="手术"
else
resword="变身"
resword2="变身"
end if


计算公式
getpoint=rs1("Strength")+rs1("Dexterity")+rs1("Vitality")+rs1("Energy")+rs1("LevelUpPoint")
if getpointgetpoint=getpoint-rs1("cLevel")*5-50+lifedonelevel*5+getpoint*lifepercent/100


rs1("class")=newtype
rs1("money")=rs1("money")-lifemoney
rs1("cLevel")=lifedonelevel
rs1("Experience")=lifedoneexp
rs1("LevelUpPoint")=getpoint
rs1("Strength")=18
rs1("Dexterity")=18
rs1("Vitality")=15
rs1("Energy")=30
rs1("Inventory")=null
rs1("MagicList")=null
rs1("Life")=60
rs1("MaxLife")=60
rs1("Mana")=60
rs1("MaxMana")=60
rs1("MapNumber")=0
rs1("MapPosX")=140
rs1("MapPosY")=120
rs1("Pklevel")=3
rs1("Mapdir")=1
rs1.update
response.write ""
response.end
end if



if rs1("class")=1 then


判断变身是否合理
if newtype=1 then
response.write ""
response.end
end if


if newtype=32 or newtype=33 then
resword="~变性~"
resword2="手术"
else
resword="变身"
resword2="变身"
end if


计算公式
getpoint=rs1("Strength")+rs1("Dexterity")+rs1("Vitality")+rs1("Energy")+rs1("LevelUpPoint")
if getpointgetpoint=getpoint-rs1("cLevel")*5-50+lifedonelevel*5+getpoint*lifepercent/100


rs1("class")=newtype
rs1("money")=rs1("money")-lifemoney
rs1("cLevel")=lifedonelevel
rs1("Experience")=lifedoneexp
rs1("LevelUpPoint")=getpoint


rs1("Strength")=18
rs1("Dexterity")=18
rs1("Vitality")=15
rs1("Energy")=30
rs1("Inventory")=null
rs1("MagicList")=null
rs1("Life")=60
rs1("MaxLife")=60
rs1("Mana")=60
rs1("MaxMana")=60
rs1("MapNumber")=0
rs1("MapPosX")=140
rs1("MapPosY")=120
rs1("Pklevel")=3
rs1("Mapdir")=1
rs1.update
response.write ""
response.end
end if




限制发贴长度，下面是文件的后半段
if rs1("class")=16 then


判断变身是否合理
if newtype=16 then
response.write ""
response.end
end if


if newtype=32 or newtype=33 then
resword="~变性~"
resword2="手术"
else
resword="变身"
resword2="变身"
end if


计算公式
getpoint=rs1("Strength")+rs1("Dexterity")+rs1("Vitality")+rs1("Energy")+rs1("LevelUpPoint")
if getpointgetpoint=getpoint-rs1("cLevel")*5-50+lifedonelevel*5+getpoint*lifepercent/100


rs1("class")=newtype
rs1("money")=rs1("money")-lifemoney
rs1("cLevel")=lifedonelevel
rs1("Experience")=lifedoneexp
rs1("LevelUpPoint")=getpoint
rs1("Strength")=28
rs1("Dexterity")=20
rs1("Vitality")=25
rs1("Energy")=10
rs1("Inventory")=null
rs1("MagicList")=null
rs1("Life")=110
rs1("MaxLife")=110
rs1("Mana")=20
rs1("MaxMana")=20
rs1("MapNumber")=0
rs1("MapPosX")=140
rs1("MapPosY")=120
rs1("Pklevel")=3
rs1("Mapdir")=1
rs1.update
response.write ""
response.end
end if



if rs1("class")=17 then


判断变身是否合理
if newtype=17 then
response.write ""
response.end
end if


if newtype=32 or newtype=33 then
resword="~变性~"
resword2="手术"
else
resword="变身"
resword2="变身"
end if


计算公式
getpoint=rs1("Strength")+rs1("Dexterity")+rs1("Vitality")+rs1("Energy")+rs1("LevelUpPoint")
if getpointgetpoint=getpoint-rs1("cLevel")*5-50+lifedonelevel*5+getpoint*lifepercent/100


rs1("class")=newtype
rs1("money")=rs1("money")-lifemoney
rs1("cLevel")=lifedonelevel
rs1("Experience")=lifedoneexp
rs1("LevelUpPoint")=getpoint
rs1("Strength")=28
rs1("Dexterity")=20
rs1("Vitality")=25
rs1("Energy")=10
rs1("Inventory")=null
rs1("MagicList")=null
rs1("Life")=110
rs1("MaxLife")=110
rs1("Mana")=20
rs1("MaxMana")=20
rs1("MapNumber")=0
rs1("MapPosX")=140
rs1("MapPosY")=120
rs1("Pklevel")=3
rs1("Mapdir")=1
rs1.update
response.write ""
response.end
end if



if rs1("class")=32 then


判断变身是否合理
if newtype=32 then
response.write ""
response.end
end if


if newtype<>33 then
resword="~变性~"
resword2="手术"
else
resword="变身"
resword2="变身"
end if


计算公式
getpoint=rs1("Strength")+rs1("Dexterity")+rs1("Vitality")+rs1("Energy")+rs1("LevelUpPoint")
if getpointgetpoint=getpoint-rs1("cLevel")*5-50+lifedonelevel*5+getpoint*lifepercent/100


rs1("class")=newtype
rs1("money")=rs1("money")-lifemoney
rs1("cLevel")=lifedonelevel
rs1("Experience")=lifedoneexp
rs1("LevelUpPoint")=getpoint
rs1("Strength")=22
rs1("Dexterity")=25
rs1("Vitality")=20
rs1("Energy")=15
rs1("Inventory")=null
rs1("MagicList")=null
rs1("Life")=80
rs1("MaxLife")=80
rs1("Mana")=30
rs1("MaxMana")=30
rs1("MapNumber")=3
rs1("MapPosX")=175
rs1("MapPosY")=100
rs1("Pklevel")=3
rs1("Mapdir")=4
rs1.update
response.write ""
response.end
end if



if rs1("class")=33 then


判断变身是否合理
if newtype=33 then
response.write ""
response.end
end if


if newtype<>32 then
resword="~变性~"
resword2="手术"
else
resword="变身"
resword2="变身"
end if


计算公式
getpoint=rs1("Strength")+rs1("Dexterity")+rs1("Vitality")+rs1("Energy")+rs1("LevelUpPoint")
if getpointgetpoint=getpoint-rs1("cLevel")*5-50+lifedonelevel*5+getpoint*lifepercent/100


rs1("class")=newtype
rs1("money")=rs1("money")-lifemoney
rs1("cLevel")=lifedonelevel
rs1("Experience")=lifedoneexp
rs1("LevelUpPoint")=getpoint
rs1("Strength")=22
rs1("Dexterity")=25
rs1("Vitality")=20
rs1("Energy")=15
rs1("Inventory")=null
rs1("MagicList")=null
rs1("Life")=80
rs1("MaxLife")=80
rs1("Mana")=30
rs1("MaxMana")=30
rs1("MapNumber")=3
rs1("MapPosX")=175
rs1("MapPosY")=100
rs1("Pklevel")=3
rs1("Mapdir")=4
rs1.update
response.write ""
response.end
end if



if rs1("class")=48 then


判断变身是否合理
if newtype=48 then
response.write ""
response.end
end if


if newtype=32 or newtype=33 then
resword="~变性~"
resword2="手术"
else
resword="变身"
resword2="变身"
end if


计算公式
getpoint=rs1("Strength")+rs1("Dexterity")+rs1("Vitality")+rs1("Energy")+rs1("LevelUpPoint")
if getpointgetpoint=getpoint-rs1("cLevel")*7-80+lifedonelevel*7+getpoint*lifepercent/100


rs1("class")=newtype
rs1("money")=rs1("money")-lifemoney
rs1("cLevel")=lifedonelevel
rs1("Experience")=lifedoneexp
rs1("LevelUpPoint")=getpoint
rs1("Strength")=26
rs1("Dexterity")=26
rs1("Vitality")=26
rs1("Energy")=26
rs1("Inventory")=null
rs1("MagicList")=null
rs1("Life")=110
rs1("MaxLife")=110
rs1("Mana")=60
rs1("MaxMana")=60
rs1("MapNumber")=0
rs1("MapPosX")=140
rs1("MapPosY")=120
rs1("Pklevel")=3
rs1("Mapdir")=1
rs1.update
response.write ""
response.end
end if
end if
else
%>

会员人物变身 color=#FF0000>请仔细阅读以下注意事项color=#cc3300>color=#cc3300> ① 变身的人物不能最后退出游戏或在游戏中，否则会变身失败(变身之前，退到选择角色界面，选择任意一个不是变身要用的人物进入游戏，然后退出，就可以正常变身了) ② 变身人物身上和包裹中的各种装备，物品，都要存放在仓库里，否则会被没收 ③ 变身需要<%=lifeneedlevel%>级，变身后人物变成<%=lifedonelevel%>级，各项属性点数保持该职业初始状态不变。奖励变身点数留在升级点数中供玩家自行分配！ ④ 变身系统保留人物转生所获得的转生点数，并且加在升级点数中！ color=#cc3300>⑤ 变身点数计算公式：变身点数＝属性点数总和×<%=lifepercent%>％ color=#cc3300>⑥ 变身收取手续费 <%=lifemoney%> MU币，变身人物必须携带足够的MU币 ⑦ 请严格按照变身要求操作，否则不规范的操作将会视为尝试利用变身BUG而受到封停帐号的惩罚，如果有BUG请及时到论坛提出，否则利用BUG或知情不报的行为将会受到惩罚。 角色名称 用户帐号 用户密码 会员密码 请选择您想变成的职业： 剑士 法师 弓箭手 骑士 魔导师 圣射手 魔剑士

<%
end if
rs1.close
set rs1=nothing
connlife.close
set connlife=nothing
%>