价超变奇迹私服发布网值100元的GEE物品来源修改脚本

[@物品来源]
{
#act
#say
1.物品来源设置（请选择下列之一）\
NPC制造/@NPC　商店购买/@商店 杀怪掉落/@杀久游战歌网怪 系统给予/@给予 挖矿获取/@挖矿 \
宝箱获取/@宝箱 挖肉获取/@挖肉 捕捉获取/@捕捉 清除来源/@清除 GM制造/@GM \
2.物品地图设置设置地图名/@@InputString22\
3.杀死怪物设置设置怪物名/@@InputString23\
4.经手人名设置设置人物名/@@InputString24\
5.日期时间设置点击设置/@@InputString25　格式例如:2017-01-01\
IT最新开传奇私服EMBOX: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！

}