function OnUseItem251()
local name = GetPlayerData(3)
local year = GetCurTime(0)
local month = GetCurTime(1)
local day = GetCurTime(2)
local hour = GetCurTime(4)
local min = GetCurTime(5)
local lv = GetPlayerData(1)
local sec = GetCurTime(6)
local SID = GetPlayerData(17)
local day1 = GetCurTime(7)
local record = DocumentNoteOut("记录文件\\侠义经验道具卡\\201210"..SID.."is"..day1..".txt")
local record = rint(record)
if((record == nil) or (record <= 49))then
if(CheckGoods(7590,1) == 1)then
if( lv < 300)then
if(lv <= 60)then
x = lv*lv*100
else
x = lv*lv*100*(lv/100)+lv*lv*100
end
local xx = x*4
PayThePlayer(1,xx) --高奖励
TalkToPlayer(0,"恭喜您获得了"..(xx).."点经验!")
DocumentNoteIN("记录文件\\活动\\侠义道具卡\\经验奖励记录.txt",name.."\t"..year.."\t"..month.."\t"..day.."\t"..hour.."\t"..min.."\t"..sec.."\t"..(xx).."点经验","a")
DocumentNoteIN("记录文件\\侠义经验道具卡\\201210"..SID.."is"..day1..".txt",record+1,"w")
else
if(lv <= 60)then
x = lv*lv*100
else
x = lv*lv*100*(lv/100)+lv*lv*100
end
local xx = x*2
PayThePlayer(1,xx) --奖励
TalkToPlayer(0,"恭喜您获得了"..(xx).."点经验!")
DocumentNoteIN("记录文件\\活动\\侠义道具卡\\经验奖励记录.txt",name.."\t"..year.."\t"..month.."\t"..day.."\t"..hour.."\t"..min.."\t"..sec.."\t"..(xx).."\t".."点经验","a")
DocumentNoteIN("记录文件\\侠义经验道具卡\\201210"..SID.."is"..day1..".txt",record+1,"w")
end
end
else
SetMessage(0,"本经验卡每天最多只能使用50次。#确定#",0,0)
end
end
上面 改成999次.也不能用.需要改哪里? |