【芝麻GM论坛】传奇私服脚本系列-用元宝诅咒别的玩家红名与解除诅咒的脚本

GM1991

	前提是对方要在线才可使用，然后把下面内容复制到NPC里 脚本里的GMEXECUTE PK2 <$STR(S1)> 10000这段代码 其中 红色的那个命令修改成你版本里给人加PK值的命令 (@@InPutString) [@main] 诅咒说明:听说红名暴装备贼爽赶紧诅咒吧!!! \ <1:>A花1000元宝输入B的名字B会增加1万点PK值.B会立刻红名\ <2:>B也可通过消费1000元宝解除A对自己的红名诅咒\ <3:>玩家输入名字<@诅咒>可以诅咒别人或者解除诅咒\ <施加诅咒/@@InPutString1> <输入别人的名字施加红名诅咒>\ \ <解除诅咒/@@InPutString2> <输入自己的名字解除红名诅咒>\ \ <封闭对话/@EXIT>\ [@InPutString1] #IF CHECKGAMEGOLD > 999 CHECKONLINE <$STR(S1)> #ACT GAMEGOLD - 1000 GMEXECUTE PK2 <$STR(S1)> 10000 K2修改成自己脚本里的加PK值的命令 SENDMSG 1 <$USERNAME>通过诅咒系统给<$STR(S1)>施加红名诅咒成功! SENDMSG 1 <$USERNAME>通过诅咒系统给<$STR(S1)>施加红名诅咒成功! SENDMSG 1 <$USERNAME>通过诅咒系统给<$STR(S1)>施加红名诅咒成功! SENDMSG 1 红名<$STR(S1)>目前所在位置:%m的(%x：%y)大家赶紧去强奸她! SENDMSG 1 红名<$STR(S1)>目前所在位置:%m的(%x：%y)大家赶紧去强奸她! SENDMSG 1 红名<$STR(S1)>目前所在位置:%m的(%x：%y)大家赶紧去强奸她! break [@InPutString2] #IF CHECKONLINE <$STR(S2)> checkpkpoint 50 CHECKGAMEGOLD > 999 #ACT GAMEGOLD - 1000 CHANGEPKPOINT = 0 SENDMSG 1 <$USERNAME>成功解除了别人对他施加的红名诅咒! SENDMSG 1 <$USERNAME>成功解除了别人对他施加的红名诅咒! break #ELSEACT MessageBox 解除诅咒原因\1:身上没有1000个元宝来支付该项服务用度.\ CLOSE