原创开发用于战神引擎玩家无条件,免费领取等级+元宝+装备+灵符+充值点脚本,脚本是单文件,直接添加到版本里面即可使用,里面领取的等级数、元宝、装备、灵符和充值点都可以任意修改,这个脚本并不是用于开区,而是做好的独家版本,邀请玩家前来测试,但玩家不会平白无故的来帮你测试版本,得给点好处。为了让所有玩家都可以一视同仁,领取到对应的福利,直接点击NPC上的就行了。GM也不要去给玩家刷什么等级,装备元宝充值点灵符啥的。
脚本部分代码
program mir2; procedure domain; begin This_NPC.NpcDialog(This_Player, +'|{cmd}<升级/@s><领元宝/@y><领装备/@z><领充值点/@c><领灵符/@l>' +'|{cmd}' ); end; procedure _c; begin This_Player.SetV(88,88,10000); This_Player.SetV(99,99,10000); end; procedure _s; begin if This_Player.Level < 80 then begin This_Player.SetPlayerLevel(80); end else This_Player.PlayerNotice('只能升到80级',0); end; procedure _y; begin This_Player.ScriptRequestAddYBNum(50000); end; procedure _z; begin if This_Player.GetV(35,21) <> 1 then begin case This_Player.Job of 0: begin This_Player.BindGive('王者之刃',1); This_Player.BindGive('王者战甲(男)',1); This_Player.BindGive('王者战甲(女)',1); This_Player.BindGive('王者战戒',2); This_Player.BindGive('王者护腕(战)',2); This_Player.BindGive('王者项链(战)',1); This_Player.BindGive('王者战靴',1); This_Player.BindGive('王者腰带(战)',1); This_Player.BindGive('王者战盔',1); This_Player.SetV(35,21,1); This_Player.PlayerNotice('领取成功,获得战士王者首饰一套',2); end; 1: begin This_Player.BindGive('王者之杖',1); This_Player.BindGive('王者魔衣(男)',1); This_Player.BindGive('王者魔衣(女)',1); This_Player.BindGive('王者魔戒',2); This_Player.BindGive('王者护腕(法)',2); This_Player.BindGive('王者项链(法)',1); This_Player.BindGive('王者战靴',1); This_Player.BindGive('王者腰带(法)',1); This_Player.BindGive('王者法冠',1); This_Player.SetV(35,21,1); This_Player.PlayerNotice('领取成功,获得法师王者首饰一套',2); end; 2: begin This_Player.BindGive('王者之剑',1); This_Player.BindGive('王者道袍(男)',1); This_Player.BindGive('王者道袍(女)',1); This_Player.BindGive('王者道戒',2); This_Player.BindGive('王者护腕(道)',2); This_Player.BindGive('王者项链(道)',1); This_Player.BindGive('王者道靴',1); This_Player.BindGive('王者腰带(道)',1); This_Player.BindGive('王者道盔',1); This_Player.SetV(35,21,1); This_Player.PlayerNotice('领取成功,获得道士王者首饰一套',2); end; end; end else This_Player.PlayerNotice('领不了了',0); end;