论坛首页 › 手游传奇私服技术交流 › 脚本变量初始化思路

haoda 发表于 2019-9-3 07:36:42

脚本变量初始化思路

procedure TempExpBylv();
var tempLv , tempExp : integer;
begin
    tempExp := 0;
    tempLv := This_Player.Level;
    if (tempLv >= 1) and (tempLv <= 30) then tempExp := 10
    else if (tempLv >= 31) and (tempLv <= 35) then tempExp := 7
    else if (tempLv >= 36) and (tempLv <= 40) then tempExp := 4
    else if (tempLv >= 41) then tempExp := 2;

    if tempExp > 0 then
    begin
      This_Player.MultiTempExpRate := tempExp;
      This_Player.PlayerNotice('当前经验倍数：' + inttostr(tempExp) + '倍',2);

    end;
    {该代码旨在初始化本人写的几个脚本的代码一次，方便GM开区，可以通过修改GETV（99，99）的赋值继续初始化，
    代码可以加在logonQuest.pas的合适位置 ，需要初始化哪个脚本代码去掉大括号即可
    }
    ifThis_Player.GetV(99,99)<99 then   //上线触发一次初始化后不再触发
       begin
       This_Player.setV(99,99,99) ;   //再次上线不会触发，

      { SetG(51,7,0) ;   //******冲级奖励代码初始化
         setG(51,8,0) ;
         SetG(51,9,0) ;   
This_Player.setV(50,1,0) ;       
This_Player.setV(50,2,0) ;       
This_Player.setV(50,3,0) ;       
This_Player.setV(50,4,0) ;       
This_Player.setV(50,5,0) ;       
This_Player.setV(50,6,0) ;       
This_Player.setV(50,7,0) ;       
This_Player.setV(50,8,0) ;
This_Player.setV(50,9,0) ; //******冲级奖励代码初始化 }

{SetG(71,11,0) ;// ******boss首曝脚本代码初始化
   SetG(71,12,0) ;
   SetG(71,13,0) ;
   SetG(71,14,0) ;
   SetG(71,15,0) ;
   SetG(71,16,0) ;
   SetG(71,17,0) ;
   SetG(71,18,0) ;
This_Player.setV(72,11,0) ;       
This_Player.setV(72,12,0) ;       
This_Player.setV(72,13,0) ;       
This_Player.setV(72,14,0) ;       
This_Player.setV(72,15,0) ;       
This_Player.setV(72,16,0) ;       
This_Player.setV(72,17,0) ;       
This_Player.setV(72,18,0) ; //****boss首曝脚本代码初始化}

{This_Player.SetV(63,3,today); //******元宝抽奖代码初始化
       This_Player.SetV(63,4,0);
         SetG(65,1,today);
       SetG(65,2,0); //******元宝抽奖代码初始化}


end;
end;

以上内容位于服务端的LogonQuest.pas脚本里，可自行添加修改所需的变量初始化。

查看完整版本: 脚本变量初始化思路