main.lua

架设关键部分开始了。点击开始——程序

API=GetApi();
Time=GetTheTime().Time;

if Time.Hour==13 and Time.Minute>=0 and Time.Minute<=5 then
   if API:GetBIPK()==0 and API:GetSTPK()==0 then
        cot=API:RND(1,19);
     if cot>=1 and cot<=4 then
        API:SetPKMAPID(1505,200,200);
     elseif cot>=5 and cot<=9 then
        API:SetPKMAPID(1506,100,100);
     elseif cot>=10 and cot<=14 then
        API:SetPKMAPID(1507,96,112);     
     elseif cot>=15 and cot<=19 then
        API:SetPKMAPID(1508,126,145); 
     end;
   end;

   API:StartBIPK();  
   API:SendMessAll("PK赛已经开始报名。需要10个参赛令就可以参加了。请大家来双龙城市踊跃参加哦，获得胜利者奖励1.5WTS");
end;


if Time.Hour==13 and Time.Minute>=30 and Time.Minute<=35 then
 if API:GetBIPK()==1 then 
     API:EndBIPK();
     API:StartSTPK();
     API:SendMessAll("PK赛已经开始!没有进场的玩家,我们表示遗憾。最终获胜的玩家将得到1.5W TS奖励");
 else
    if API:GetSTPK() == 1 then
      API:SendMessAll("PK赛已经开始!没有进场的玩家,我们表示遗憾。最终获胜的玩家将得到1.5W TS奖励");
    end;
 end;
end;


if API:GetSTPK() == 1 and Time.Minute>=36 then
   if API:GetPKMAPOPOP(API:GetPKMAPID()) == 1 then
	client=API:GetMapPopo(API:GetPKMAPID());
        if client ~= nil then
           API:SendMessAll("今天的PK大赛的获胜者是:"..client.Char.Name.." 他将获得1.5W TS");
           client.Char.Cp= client.Char.Cp+15000;
           API:UpdateCp(client);
           API:EndSTPK();  
        else
           API:SendMessAll("今天的PK大赛没有获胜者555");
           API:EndSTPK();
        end;

   elseif API:GetPKMAPOPOP(API:GetPKMAPID()) == 0 then
           API:SendMessAll("今天的PK大赛没有获胜者555");
           API:EndSTPK();
   end;
end;