仓库密码的修改脚本

  现在在玩网游的朋友,特别是传奇3的朋友估计最痛恨盗号的人了,把装备都放在仓库并且锁起来,无疑大大增加了装备的安全性,这里提供一个仓库密码修改的脚本,这样你就可以随时修改你的仓库密码来保证你的装备安全性.

[@Clearance]
{
#IF
#ACT
   FormatStr "FLD_CHARACTER=%s" %USERNAME
   ReadValueSql  "TBL_QUEST"  %A9  "FLD_CHARACTER,FLD_JIFEN"  [@cangjifen]

[@cangjifen()]
#IF
#ACT
   mov    A0      %ARG(1)
   mov    D1      %ARG(2)

#IF
#SAY
您当前积分为{FCOLOR/1}<$OUTPUT(D1)>{FCOLOR/12}点.\
忘记仓库密码了?我可以帮您重新设置密码。\
{FCOLOR/1}但是需要花费100点积分.{FCOLOR/12}\
<重设仓库密码/@@*10_confirm_passwdxx>{FCOLOR/10}(请输入英文或者数字10位以下){FCOLOR/12}\
<返 回/@main>\

[@@*10_confirm_passwdxx]
#ACT
mov A4 %INPUTSTR

#IF
large  D1 99
#ACT
FormatStr "FLD_CHARACTER=%s" %USERNAME
   mov   A8       %A9
   DEC    D1  100
   FormatStr "FLD_JIFEN=%s" %D1
   UPDATEVALUESQL "TBL_QUEST" %A8 %A9
SavePasswd  %A4
#SAY
已经把您的仓库密码更改为: {FCOLOR/10}<$OUTPUT(A4)>{FCOLOR/12}\
您的目前的剩余积分为：{FCOLOR/1}<$OUTPUT(D1)>{FCOLOR/12} 点.\
<返 回/@main>\

#ELSESAY
你的剩余积分为{FCOLOR/1}<$OUTPUT(D1)>{FCOLOR/12}.要有100点积分才能重新设置密码。\
<如何获得积分/@helpjf>\
<返 回/@main>\

本文出自:搜传奇3

转载请注明来处：http://www.so373.com/showarticle.asp?id=182