18821909955
发表于 2020-9-2 14:16:26
ZXCSASDASDASD
18821909955
发表于 2020-9-2 14:21:09
564564564SDASDASDAS
a774229444
发表于 2020-9-9 13:50:19
谢谢楼主的分享
Thor3500
发表于 2021-1-21 21:28:54
正愁找不到这个代码名单,楼主666
w111
发表于 2021-2-13 08:30:18
听说是很经典的游戏
nnn555
发表于 2021-3-13 16:35:01
5555555555555555555
hqy975479
发表于 2021-4-4 16:53:42
改成999次.也不能用.需要改哪里?
hqy975479
发表于 2021-4-4 16:54:40
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次.也不能用.需要改哪里?
宏杰
发表于 2021-4-26 13:28:04
谢谢分享
AdamJ
发表于 2021-7-26 22:16:49
顶,2021过来怀旧小学接触的第一款网游了