GEEM2命令脚本,如用于其他引擎请自己检查替换相应命令!
(@@InPutInteger @@InPutString)
[@main]
\ \ <GM专用给玩家物品的功能/FCOLOR=250> <注意:物品数量为空时默认为1./FCOLOR=242>\
<----------------------------------------------------------/FCOLOR=68>\
<请输入玩家的角色名字/@@InPutString22(请输入玩家的角色名字)> <录入的玩家名/FCOLOR=250>:{【<$STR(S22)>】/FCOLOR=254}\
<请输入玩家需要的东西/@@InPutString23(请输入玩家需要的东西)> <录入的物品名/FCOLOR=250>:{【<$STR(S23)>】/FCOLOR=254}\
<请输入给予物品的数量/@@InPutInteger22(请输入给予物品的数量)> <录入的数量为/FCOLOR=250>:{【<$STR(N22)>】/FCOLOR=254}\
<----------------------------------------------------------/FCOLOR=68>\
<执行右侧操作/@开始给物品> 给予{【<$STR(S22)>】/FCOLOR=254}装备{【<$STR(S23)>】/FCOLOR=254}x{<$STR(N22)>/FCOLOR=254}个 \
[@InPutInteger22]
#if
CheckContainsText N22 @
#act
MESSAGEBOX 请输入正确的物品数量。
goto @main
break
close
#if
CheckContainsText N22 \
#act
MESSAGEBOX 请输入正确的物品数量。
goto @main
BREAK
close
#if
CheckContainsText N22 /
#act
MESSAGEBOX 请输入正确的物品数量。
goto @main
BREAK
close
#if
EQUAL N22
#act
MESSAGEBOX 请输入正确的物品数量。
goto @main
BREAK
close
#if
#act
GOTO @MAIN
BREAK
[@InPutString22]
#if
CheckContainsText S22 @
#act
MESSAGEBOX 您输入的玩家的角色名字不存在或错误。
goto @main
break
close
#if
CheckContainsText S22 \
#act
MESSAGEBOX 您输入的玩家的角色名字不存在或错误。
goto @main
BREAK
close
#if
CheckContainsText S22 /
#act
MESSAGEBOX 您输入的玩家的角色名字不存在或错误。
goto @main
BREAK
close
#if
EQUAL S22
#act
MESSAGEBOX 您输入的玩家的角色名字或错误。
goto @main
BREAK
close
#if
#act
GOTO @MAIN
BREAK
[@InPutString23]
#if
CheckContainsText S23 @
#act
MESSAGEBOX 您输入的物品名字不存在或错误。
goto @main
break
close
#if
CheckContainsText S23 \
#act
MESSAGEBOX 您输入的物品名字不存在或错误。
goto @main
BREAK
close
#if
CheckContainsText S23 /
#act
MESSAGEBOX 您输入的物品名字不存在或错误。
goto @main
BREAK
close
#if
EQUAL S23
#act
MESSAGEBOX 您输入的物品名字不存在或错误。
goto @main
BREAK
close
#if
#act
GOTO @MAIN
BREAK
[@开始给物品]
#if
NOT CheckOnline <$STR(S22)>
#act
MESSAGEBOX <$STR(S22)>不在线,无法发放。
goto @main
BREAK
close
#if
CheckHumBag <$STR(S22)> < <$STR(N22)>
#act
MESSAGEBOX <$STR(S22)>背包不足<$STR(N22)>。
goto @main
BREAK
close
#if
EQUAL S23
#act
MESSAGEBOX 物品名未录入,请重新检查。
goto @main
BREAK
close
#if
EQUAL S22
#act
MESSAGEBOX 玩家名未录入,请重新检查。
goto @main
BREAK
close
#if
EQUAL N22
#act
MOV N22 1
S22.give <$STR(S23)> <$STR(N22)>
S22.SENDMSG 5 你收到系统的奖励:<$STR(S23)>x<$STR(N22)>
SENDMSG 7 发放成功,具体为:<$STR(S22)>:<$STR(S23)>x<$STR(N22)>
goto @main
BREAK
close
#if
EQUAL N22 0
#act
MOV N22 1
S22.give <$STR(S23)> <$STR(N22)>
S22.SENDMSG 5 你收到系统的奖励:<$STR(S23)>x<$STR(N22)>
SENDMSG 7 发放成功,具体为:<$STR(S22)>:<$STR(S23)>x<$STR(N22)>
goto @main
BREAK
close
#if
#act
SetHumVar S22 S23 <$STR(S23)>
SetHumVar S22 N22 <$STR(N22)>
S22.give <$STR(S23)> <$STR(N22)>
S22.SENDMSG 5 你收到系统的奖励:<$STR(S23)>x<$STR(N22)>
SENDMSG 7 发放成功,具体为:<$STR(S22)>:<$STR(S23)>x<$STR(N22)>
goto @main
BREAK
close
;by 9299f.com Q83759725
(责任编辑:找搜服传奇发布网) |