GowLom2战神引擎升级触发实例

战神引擎GowLom2

[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]角色每次登录聊天框都会显示“欢迎登陆战神传奇”