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过来怀旧小学接触的第一款网游了
页: 55 56 57 58 59 60 61 62 63 64 [65] 66 67 68 69
查看完整版本: [原创]关于侠义道2的一些修改