物品来源修改脚本

[@物品来源]
{
#act
#say
1.物品来源设置（请选择下列之一）\
<NPC制造/@NPC>　<商店购买/@商店> <杀怪掉落/@杀怪> <系统给予/@给予> <挖矿获取/@挖矿>  \
<宝箱获取/@宝箱> <挖肉获取/@挖肉> <捕捉获取/@捕捉> <清除来源/@清除> <GM制造/@GM> \
2.物品地图设置<设置地图名/@@InputString22>\
3.杀死怪物设置<设置怪物名/@@InputString23>\
4.经手人名设置<设置人物名/@@InputString24>\
5.日期时间设置<点击设置/@@InputString25>　格式例如:2017-01-01\
<ITEMBOX:0:0:251:300:90:15:15:*:放入需要更改的装备>\
<请准确的按照1-2-3-4-5的顺序来设置你的物品来源>\
<日期请按照准确的输入格式输入.>\
[@InputString22]
#act
SetUpgradeItem 0
SetItemFrom boxitem0 1 <$Str(S22)>
UpdateItem boxitem0
sendmsg 6 <$BOXITEM[0].NAME>的来源地图已经修改为<$Str(S22)>！
[@InputString23]
#act
SetUpgradeItem 0
SetItemFrom boxitem0 2 <$Str(S23)>
UpdateItem boxitem0
sendmsg 6 <$BOXITEM[0].NAME>的来源怪名已经修改为<$Str(S23)>！
[@InputString24]
#act
SetUpgradeItem 0
SetItemFrom boxitem0 3 <$Str(S24)>
UpdateItem boxitem0
sendmsg 6 <$BOXITEM[0].NAME>的来源经手人已经修改为<$Str(S24)>！
[@InputString25]
#act
SetUpgradeItem 0
movr        N$时        0        24
movr        N$分        0        60
movr        N$秒        0        60
SetItemFrom boxitem0 4 <$Str(S25)> <$Str(N$时)>:<$Str(N$分)>:<$Str(N$秒)>
UpdateItem boxitem0
sendmsg 6 <$BOXITEM[0].NAME>的来源日期时间已经设置为<$Str(S25)>的（<$Str(N$时)>:<$Str(N$分)>:<$Str(N$秒)>）随机时间！
[@NPC]
#if
#act
SetUpgradeItem 0
SetItemFrom boxitem0 0 2
UpdateItem boxitem0
sendmsg 6 <$BOXITEM[0].NAME>已经修改为NPC制造！
[@商店]
#if
#act
SetUpgradeItem 0
SetItemFrom boxitem0 0 3
UpdateItem boxitem0
sendmsg 6 <$BOXITEM[0].NAME>已经修改为商店购买！
[@杀怪]
#if
#act
SetUpgradeItem 0
SetItemFrom boxitem0 0 4
UpdateItem boxitem0
sendmsg 6 <$BOXITEM[0].NAME>已经修改为杀怪掉落！

[@给予]
#if
#act
SetUpgradeItem 0
SetItemFrom boxitem0 0 5
UpdateItem boxitem0
sendmsg 6 <$BOXITEM[0].NAME>已经修改为系统给予！
[@挖矿]
#if
#act
SetUpgradeItem 0
SetItemFrom boxitem0 0 6
UpdateItem boxitem0
sendmsg 6 <$BOXITEM[0].NAME>已经修改为挖矿获取！
[@宝箱]
#if
#act
SetUpgradeItem 0
SetItemFrom boxitem0 0 7
UpdateItem boxitem0
sendmsg 6 <$BOXITEM[0].NAME>已经修改为宝箱获取！
[@挖肉]
#if
#act
SetUpgradeItem 0
SetItemFrom boxitem0 0 8
UpdateItem boxitem0
sendmsg 6 <$BOXITEM[0].NAME>已经修改为挖肉获取！
[@捕捉]
#if
#act
SetUpgradeItem 0
SetItemFrom boxitem0 0 9
UpdateItem boxitem0
sendmsg 6 <$BOXITEM[0].NAME>已经修改为捕捉获取！
[@清除]
#if
#act
SetUpgradeItem 0
SetItemFrom boxitem0 0 0
UpdateItem boxitem0
sendmsg 6 <$BOXITEM[0].NAME>已经修改为清除！
[@GM]
#if
#act
SetUpgradeItem 0
SetItemFrom boxitem0 0 1
UpdateItem boxitem0
sendmsg 6 <$BOXITEM[0].NAME>已经修改为GM！


}