现在盗号很猖獗，传奇3私服里也是经常发生的事情，这个脚本可以很好的防止装备被盗。
用这个装备防盗脚本，可以锁定你身上的装备，有人要下你的装备，必须输入你设置的特定的装备密码，只有得到这个密码，你的恶装备才能从你身上拿下来。
[@装备防盗]
#ACT
LOADVALUE D0 "QuestDiary\资料库\参数控制\积分系统控制.txt" 参数控制 装备防盗
#SAY
{FCOLOR/1}说明:{FCOLOR/12} 为了彻底防范盗号者,本私服特别为大家设计了装备防盗系统!\
此防盗系统并非真的别人盗不了你的,但是可以轻易找回属于你的装备.\
本私服对于盗号者的号一律永久删除ID,数据!\
{FCOLOR/1}要求:{FCOLOR/12} 小号操作进行\
列入防盗行列的装备,必须穿在身上\
消耗{FCOLOR/10}<$OUTPUT(D0)>{FCOLOR/12}点积分,终身受保护\
<[请输入你要进行防盗设置的玩家名字]/@@防盗名字>\
[@@防盗名字]
#ACT
MOV A0 %INPUTSTR
#IF
EQUAL A0 %USERNAME
#ACT
SYSMSG "对不起,不能给你当前角色加装备防盗!"
#ELSEACT
FormatStr "FLD_CHARACTER=%s" %A0
ReadValueSql "TBL_CHARACTER" %A9 "FLD_CHARACTER" @exist14_1
[@exist14_1()]
#ACT
MOV A1 %ARG(1)
#IF
EQUAL A1 ""
#ACT
SYSMSG "对不起,没有该号人物!"
BREAK
#ELSESAY
<[请输入该号人物积分银行密码]/@@*银行密码12_1>\
[@@*银行密码12_1]
#ACT
MOV B1 %INPUTSTR
FormatStr "FLD_CHARACTER=%s" %A0
ReadValueSql "TBL_BOBUJIFEN" %A9 "FLD_PASSWORD" @BOBUPASSWORD12_1
[@BOBUPASSWORD12_1()]
#ACT
MOV B2 %ARG(1)
#IF
EQUAL B1 ""
#ACT
SYSMSG "对不起,不能输入空密码!"
break
#IF
EQUAL B1 %B2
#say
请选择你要加入防盗的装备(必须佩戴在身上的!)需要消耗<$OUTPUT(D0)>点积分\
<[头盔]/@装备防盗(4)> <[衣服]/@装备防盗(0)> <[武器]/@装备防盗(1)>\
<[左手镯]/@装备防盗(5)> <[右手镯]/@装备防盗(6)>\
<[左戒指]/@装备防盗(7)> <[左戒指]/@装备防盗(8)>
<[鞋子]/@装备防盗(10)> <[项链]/@装备防盗(3)>\
[@装备防盗()]
#ACT
MOV D9 %ARG(1)
FormatStr "FLD_CHARACTER=%s AND FLD_TYPE=%s" %A0 %D9
ReadValueSql "TBL_ITEM" %A9 "FLD_CHARACTER,FLD_FD" @装备防盗A
[@装备防盗A()]
#ACT
MOV A1 %ARG(1)
MOV A3 %ARG(2)
#IF
EQUAL A1 ""
#ACT
SYSMSG "对不起,该人物的装备必须拿在身上!"
BREAK
#IF
!EQUAL A3 ""
#ACT
SYSMSG "对不起,该装备已经有口令!"
BREAK
#ELSEACT
FormatStr "FLD_CHARACTER=%s" %A0
ReadValueSql "TBL_BOBUJIFEN" %A9 "FLD_JIFEN" @BOBUJIFEN35
[@BOBUJIFEN35()]
#ACT
MOV D2 %ARG(1)
#IF
ELARGE D2 %D0
#SAY
{FCOLOR/10}此口令请你必须记住!若装备被盗,可通过此口令找回{FCOLOR/12}\
{FCOLOR/10}不要超过6个中文字{FCOLOR/12}\
<[请输入你的装备口令]/@@武器口令>
#ELSEACT
SYSMSG "该人物积分不足支付口令费用!"
BREAK
[@@武器口令]
#ACT
MOV A2 %INPUTSTR
DEC D2 %D0
FormatStr "FLD_CHARACTER=%s" %A0
mov A5 %A9
FormatStr "FLD_JIFEN=%s" %D2
UPDATEVALUESQL "TBL_BOBUJIFEN" %A5 %A9
FormatStr "FLD_CHARACTER=%s AND FLD_TYPE=%s" %A0 %D9
MOV A8 %A9
FormatStr "FLD_FD=%s" %A2
UPDATEVALUESQL "TBL_ITEM" %A8 %A9
SYSMSG "装备口令录入成功,请牢记 <$OUTPUT(A2)>"
DELAYGOTO [LOCAL] 3 @有帐号
BREAK
#SAY
系统处理中...........
}
本文出自:
搜传奇3转载请注明来处：http://www.so373.com/showarticle.asp?id=94
