夜游神论坛,传奇一条龙,GM论坛,GM部落

 找回密码
 立即注册

QQ登录

只需一步,快速开始

安全 WRIDC 996 php 88A
查看: 1476|回复: 0

[手游教程] GowLom2战神引擎升级触发实例

[复制链接]

签到天数: 1 天

[LV.1]初来乍到

47

主题

47

帖子

2

钻石

Rank: 1

积分
94
发表于 2019-8-22 20:20:01 | 显示全部楼层 |阅读模式
[size=18.018px]说明:
角色每次升级将会触发 D:\mud2.0\Mir200\Envir\PsMapQuest\RunQuest.pas 文件中的 PlayerExpLevelUp()方法
[size=18.018px]procedure PlayerExpLevelUp();
var
  iLev : integer;
begin
   iLev := This_Player.Level;
   
   case iLev of
       7:
       begin
[size=18.018px]           case This_Player.Job of
               0 :
               begin
                   This_Player.Give('基本剑术',1);                  
               end;
               1 :
               begin
                   This_Player.Give('火球术',1);
                   This_Player.GiveBindItem('魔血石(小)',1);                 
               end;
               2 :
               begin
                  
                   This_Player.Give('治愈术',1);
                   This_Player.Give('精神力战法',1);
               end;
           end;
       end;
       15:
       begin
           case This_Player.Job of
               0 :
               begin
                   This_Player.Give('八荒',1);
                   This_Player.Give('攻杀剑术',1);
                   if This_Player.Gender = 0 then
                   This_Player.Give('中型盔甲(男)',1)
                   else
                   This_Player.Give('中型盔甲(女)',1);
               end;
               1 :
               begin
                   This_Player.Give('海魂',1);
                   This_Player.Give('雷电术',1);
                   if This_Player.Gender = 0 then
                   This_Player.Give('中型盔甲(男)',1)
                   else
                   This_Player.Give('中型盔甲(女)',1);
               end;
               2 :
               begin
                   This_Player.Give('半月',1);
                   This_Player.Give('灵魂火符',1);
                   if This_Player.Gender = 0 then
                   This_Player.Give('中型盔甲(男)',1)
                   else
                   This_Player.Give('中型盔甲(女)',1);
               end;
           end;
       end;
   end;
end;

[size=18.018px]begin

[size=18.018px]end.


[size=18.018px]改文件入口函数为空,对应方法程序会直接调用
[size=18.018px]该文件中不可以使用This_NPC对象调用接口,只能使用This_Player对象调用


[size=18.018px]角色每次登录聊天框都会显示“欢迎登陆战神传奇”





上一篇:GowLom2战神引擎杀怪触发条件说明
下一篇:GowLom2战神引擎登录脚本触发实例
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

传奇广告代理|传奇脚本|微变传奇|单职业传奇|热血传奇|传奇私服|GM论坛|英雄合击|小黑屋|百度统计|夜游神论坛 |网站地图

Powered by Discuz! X3.4© 2001-2013 Comsenz Inc.