admin 发表于 2015-12-15 21:45:47

男女衣服互换脚本(保留原有属性)

[@衣服互换]
{
#IF
#SAY
我的技术能让你的衣服{FCOLOR/14}保留所有的附加属性{FCOLOR/12}，
却能让男的衣服换成女的衣服，或者把女的衣服换成男的衣服。
请输入你这个账号里的需要{FCOLOR/14}男女衣服互换{FCOLOR/12}的人物名字！
注意，要男女衣服互换的{FCOLOR/10}衣服{FCOLOR/12}一定要放在人物的{FCOLOR/14}包里{FCOLOR/12}!
{FCOLOR/1}而且包里不能同时有两件相同名称的衣服,不然会失败!{FCOLOR/12}\

[@@衣服互换名字]
#ACT
   mov A0 %INPUTSTR
#IF
   equal A0 ""
#SAY
_{FCOLOR/10}名字不可以为空！{FCOLOR/12}\
_
#ELSEACT
goto @衣服互换可以
[@衣服互换可以]
#IF
equal A0 %USERNAME
#SAY
_{FCOLOR/1}我不能给当前人物换衣服！{FCOLOR/12}
_请用这个帐号的其他人物来进行操作！

#ACT
break
#IF   
#ACT
   FormatStr "FLD_CHARACTER='%s'" %A0
   ReadValueSql"TBL_CHARACTER" %A9 "FLD_CHARACTER,FLD_USERID"[@衣服互换帐号]
[@衣服互换帐号()]
#ACT
      MovA1%ARG(1)
      MovA2%ARG(2)
#IF
   !EqualA2%USERID
#SAY
{FCOLOR/1}你确定和你是在一同一个帐号里？！\

#ACT
break
;;----开始-----------------------------------------
#IF
#SAY
{FCOLOR/14}价格：{FCOLOR/12}
{FCOLOR/10}男女衣服互换{FCOLOR/12}需要 200积分\
请选择你要换的衣服类型:

\

\

\

\

\

[@要衣服互换()]
#ACT
MOV D5 %ARG(1)
MOV D6 %ARG(2)
MOV A5 %ARG(3)
FormatStr "FLD_CHARACTER='%s' AND FLD_TYPE='%s' AND FLD_INDEX='%s'" %A0 77 %D5
ReadValueSql "TBL_ITEM" %A9 "FLD_INDEX,FLD_CHARACTER" [@衣服互换值]
[@衣服互换值()]
#IF
#ACT
MOV D3 %ARG(1)
MOV A3 %ARG(2)
#IF
EQUAL A3 ""
#SAY
{FCOLOR/14}{FCOLOR/12}必须放在{FCOLOR/10}{FCOLOR/12}的{FCOLOR/10}包里{FCOLOR/12}！\

#ACT
Break
#IF
!EQUAL D3 %D5
#SAY
{FCOLOR/10}{FCOLOR/12}包里放的不是{FCOLOR/10}{FCOLOR/12}哦！\

#ACT
Break
#IF
!EQUAL A3 ""
EQUAL D3 %D5
#ACT
   FormatStr "FLD_CHARACTER='%s'" %A0
   ReadValueSql"TBL_QUEST"%A9"FLD_CHARACTER,FLD_JIFEN" [@衣服互换积分]
   movS13

[@衣服互换积分()]
#ACT
      MovA4%ARG(1)
      MovD2%ARG(2)
#IF
      Esmall D2200
#SAY
需要{FCOLOR/1}200{FCOLOR/12}点积分，你没满足条件！\

#ACT
Break
#IF
equalS13
#ACT
   FormatStr "FLD_CHARACTER='%s' AND FLD_TYPE='%s' AND FLD_INDEX='%s'" %A0 77 %D5
   MovA8%A9
   FormatStr "FLD_INDEX='%s'" %D6
   UpDateValueSql "TBL_ITEM" %A8 %A9
      
   FormatStr "FLD_CHARACTER='%s'" %A0
   MovA8%A9
   DecD2200
   FormatStr "FLD_JIFEN='%s'" %D2
   UpDateValueSql "TBL_QUEST" %A8 %A9
      
   movS10
   Break
#SAY
_人物 {FCOLOR/14}{FCOLOR/12}的{FCOLOR/10}{FCOLOR/12}已经成功转换，属性不变!

_您花费{FCOLOR/1}200{FCOLOR/12}点积分，剩余{FCOLOR/10}{FCOLOR/12}点积分
_怎么样，我的技术还不错吧~欢迎下次光临\
_
}

jjxylisc 发表于 2015-12-16 00:06:34

论坛有你更精彩！！！

lhy001 发表于 2015-12-16 09:03:44

管理员是开服装专卖店的吧？:lol:lol:lol:lol:lol

rdsmsszy 发表于 2015-12-16 09:32:35

[@要衣服互换()] 这前是不是少了语句,
#ACT
MOV D5 %ARG(1)
MOV D6 %ARG(2)
MOV A5 %ARG(3)
是从哪里接收的变量没有说明清楚啊

rdsmsszy 发表于 2015-12-18 20:04:45

请问：
[@要衣服互换()]
的前一步是什么（也就是说，是哪个步骤来调用当前的语句），上述脚本没有说明，请明示一下可否；

yangjie 发表于 2016-1-12 13:11:52

刚刚找到传奇3的专业论坛，，，找到大家庭了

蓝天飞翔 发表于 2016-1-12 22:16:25

这个观点我很赞同！大家庭！

345382682 发表于 2016-2-6 15:44:15

极品属性也能留住不错

rdsmsszy 发表于 2016-2-6 16:57:35

谁都无法阻止我进步的脚步！

战神 发表于 2016-5-16 00:46:16

谁都无法阻止我进步的脚步！
页: [1] 2
查看完整版本: 男女衣服互换脚本(保留原有属性)