Đăng nhập

View Full Version : Anh huuduyen_05 hướng dẫn em về code chuyển sinh



rikudo
29-08-11, 01:55 PM
Ai cho em xin cái script giới hạn chuyển sinh 1 ngày được bao nhiêu lần.
Thank !!!

huuduyen_05
29-08-11, 07:52 PM
Dựa vào đoạn script nhận tâm pháp mỗi lần 1 ngày để viết theo tựa tựa là ok/

rikudo
29-08-11, 08:29 PM
Dựa vào đoạn script nhận tâm pháp mỗi lần 1 ngày để viết theo tựa tựa là ok/
Vâng ,em cảm ơn anh nhiều :)

rikudo
04-09-11, 05:14 PM
Code trong server đây, muốn fix lại 1 ngày giới hạn chuyển sinh bao nhiêu lần ? :

function x002094_ZhuanSheng( sceneId, selfId, targetId )
local zhuanshengTimes = GetMissionData(sceneId, selfId, MD_ZHUANSHENG)
if zhuanshengTimes >100 then
x002094_NotifyTip( sceneId, selfId, "HÕn chª 100 l¥n chuy¬n sinh." )
x002094_MsgBox( sceneId, selfId, targetId, "HÕn chª 100 l¥n chuy¬n sinh." )
return
end
local mppoint = GetHumanMenpaiPoint(sceneId, humanObjId)
local lev = GetLevel( sceneId, selfId )
if lev < 150 then
BeginEvent( sceneId )
AddText( sceneId, "ÐÆng c¤p nhö h½n #G150#W. Hãy quay lÕi khi ðÕt c¤p ðµ #G150#W. " )
EndEvent( sceneId )
DispatchEventList( sceneId, selfId, targetId )
return -1
end

SetLevel( sceneId, selfId, 1)
--YuanBao(sceneId,selfId,targetId,1,10000)
ZengDian(sceneId,selfId,targetId,1,10000)
SetMissionData(sceneId, selfId, MD_ZHUANSHENG, zhuanshengTimes+1 )
local nCS = GetMissionData(sceneId, selfId, MD_ZHUANSHENG )
BeginEvent(sceneId)
AddText(sceneId,"Chúc m×ng, chuy¬n sinh l¥n "..nCS.." thành công!!!")
EndEvent(sceneId)
DispatchMissionTips(sceneId,selfId)
BeginEvent( sceneId )
AddText( sceneId, "#WChú ý, sau khi chuy¬n sinh không ðßþc t¦y ði¬m ho£c ð±i môn phái, s¨ m¤t hªt point!" )
EndEvent( sceneId )
DispatchEventList( sceneId, selfId, targetId )
local nam = LuaFnGetName( sceneId, selfId )
BroadMsgByChatPipe( sceneId, selfId, "#48#gFFFF00Chúc m×ng "..nam.." ðã chuy¬n sinh thành công l¥n thÑ "..nCS.."! #4", 4 )
end

function x002094_Shengji (sceneId, selfId, targetId)
local lev = GetLevel( sceneId, selfId )
if lev < 149 then
BeginEvent( sceneId )
AddText( sceneId, "C¤p ðµ chßa ðü #G149#W. Hãy quay lÕi khi ðÕt c¤p ðµ #G149#W." )
EndEvent( sceneId )
DispatchEventList( sceneId, selfId, targetId )
return -1
end
SetLevel( sceneId, selfId, 150)
BeginEvent(sceneId)
AddText(sceneId,"Chúc m×ng, thành công.!")
EndEvent(sceneId)
DispatchMissionTips(sceneId,selfId)
BeginEvent( sceneId )
AddText( sceneId, "Thång c¤p 150 thành công." )
EndEvent( sceneId )
DispatchEventList( sceneId, selfId, targetId )
local nam = LuaFnGetName( sceneId, selfId )
BroadMsgByChatPipe( sceneId, selfId, "#48#gFFFF00Chúc m×ng "..nam.." ðã thång lên 150 c¤p !!#48", 4 )
end

minhtien_2010
04-09-11, 06:33 PM
Code trong server đây, muốn fix lại 1 ngày giới hạn chuyển sinh bao nhiêu lần ? : Em nghĩ bác có thể kết hợp code nhận tâm pháp với code chuyển sinh. Lấy hàm check nhận tp mỗi ngày thêm vào làm điều kiện để chuyển sinh. Nếu ngày đó đã chuyển sinh bằng mức giới hạn chuyển sinh thì không cho chuyển sinh nữa và đưa ra thông báo "Hôm nay [you] đã sử dụng hết số lần chuyển sinh, hẹn vào ngày mai". Em chưa thử nhưng theo em trên lí thuyết là vậy.

rikudo
04-09-11, 08:02 PM
Mình biết lý thuyết là vậy, nhưng trong này nhiều code quá , chạy rồi không được .
Chắc do không biết edit phù hợp với script . Ai giúp em với .

rikudo
05-09-11, 03:55 AM
Up ... ai hướng dẫn lấy code nào và chèn như thế nào, làm demo cho em .
Thank !!!

minhtien_2010
05-09-11, 12:35 PM
local day = GetDayTime();
local lastDay = GetMissionData(sceneId, selfId, MF_LINGQUYUANBAOMP1);
if lastDay == 5 day then
BeginEvent( sceneId )
AddText( sceneId, "Chào bÕn, hôm nay bÕn ðã sØ døng chÑc nång này. M²i ngày chï ðßþc dùng chÑc nång này mµt l¥n. #rHãy quay lÕi vào hôm sau." )
EndEvent( sceneId )
DispatchEventList( sceneId, selfId, targetId )
return
end
function x002094_ZhuanSheng( sceneId, selfId, targetId )
local zhuanshengTimes = GetMissionData(sceneId, selfId, MD_ZHUANSHENG)
if zhuanshengTimes >100 then
x002094_NotifyTip( sceneId, selfId, "HÕn chª 100 l¥n chuy¬n sinh." )
x002094_MsgBox( sceneId, selfId, targetId, "HÕn chª 100 l¥n chuy¬n sinh." )
return
end
local mppoint = GetHumanMenpaiPoint(sceneId, humanObjId)
local lev = GetLevel( sceneId, selfId )
if lev < 150 then
BeginEvent( sceneId )
AddText( sceneId, "ÐÆng c¤p nhö h½n #G150#W. Hãy quay lÕi khi ðÕt c¤p ðµ #G150#W. " )
EndEvent( sceneId )
DispatchEventList( sceneId, selfId, targetId )
return -1
end

SetLevel( sceneId, selfId, 1)
--YuanBao(sceneId,selfId,targetId,1,10000)
ZengDian(sceneId,selfId,targetId,1,10000)
SetMissionData(sceneId, selfId, MD_ZHUANSHENG, zhuanshengTimes+1 )
local nCS = GetMissionData(sceneId, selfId, MD_ZHUANSHENG )
BeginEvent(sceneId)
AddText(sceneId,"Chúc m×ng, chuy¬n sinh l¥n "..nCS.." thành công!!!")
EndEvent(sceneId)
DispatchMissionTips(sceneId,selfId)
BeginEvent( sceneId )
AddText( sceneId, "#WChú ý, sau khi chuy¬n sinh không ðßþc t¦y ði¬m ho£c ð±i môn phái, s¨ m¤t hªt point!" )
EndEvent( sceneId )
DispatchEventList( sceneId, selfId, targetId )
local nam = LuaFnGetName( sceneId, selfId )
BroadMsgByChatPipe( sceneId, selfId, "#48#gFFFF00Chúc m×ng "..nam.." ðã chuy¬n sinh thành công l¥n thÑ "..nCS.."! #4", 4 )
end

function x002094_Shengji (sceneId, selfId, targetId)
local lev = GetLevel( sceneId, selfId )
if lev < 149 then
BeginEvent( sceneId )
AddText( sceneId, "C¤p ðµ chßa ðü #G149#W. Hãy quay lÕi khi ðÕt c¤p ðµ #G149#W." )
EndEvent( sceneId )
DispatchEventList( sceneId, selfId, targetId )
return -1
end
SetLevel( sceneId, selfId, 150)
BeginEvent(sceneId)
AddText(sceneId,"Chúc m×ng, thành công.!")
EndEvent(sceneId)
DispatchMissionTips(sceneId,selfId)
BeginEvent( sceneId )
AddText( sceneId, "Thång c¤p 150 thành công." )
EndEvent( sceneId )
DispatchEventList( sceneId, selfId, targetId )
local nam = LuaFnGetName( sceneId, selfId )
BroadMsgByChatPipe( sceneId, selfId, "#48#gFFFF00Chúc m×ng "..nam.." ðã thång lên 150 c¤p !!#48", 4 )
end
Bác tham khảo code này thử nhé. Lỡ không đc thì cũng đừng nói lời cay đắng...[-O

rikudo
06-09-11, 12:12 AM
Ai giúp em với . Help
Chỉ hướng dẫn chỉ đường cho em cũng quý lắm rồi .

forgetpain
06-09-11, 09:05 PM
Giờ mình muốn add % của đồ vào game như sau máu tăng 120% giới hạn 20k
Mana tăng 120% GH 20k
Nội công 120% GH 20k
Nội thủ 120% GH 20k
Ngoại công 120% GH 20k
Ngoại thủ 120% GH 20k
Thì chỉnh các dòng P10 P11 của như sao . ai pro chỉ giúp!!! Sorri nha lập topic mới bị lỗi nên post nhờ

rikudo
07-09-11, 10:52 AM
Ai vào giúp em với ...
Up ...

rikudo
08-09-11, 12:36 PM
Up ...
Lên cho mọi người thấy

minhtien_2010
08-09-11, 01:26 PM
Giải nén không được sever ai giúp với.UPPPPPPPPPPP

rikudo
09-09-11, 04:00 PM
Up ...
Lên nào :)
The message you have entered is too short. Please lengthen your message to at least 30 characters.

legend1250
13-01-12, 10:12 PM
<b><font color=red>[Chỉ có thành viên mới xem link được. <a href="register.php"> Nhấp đây để đăng ký thành viên......</a>]</font></b>

rikudo
13-01-12, 11:07 PM
<b><font color=red>[Chỉ có thành viên mới xem link được. <a href="register.php"> Nhấp đây để đăng ký thành viên......</a>]</font></b>
Thấy thiếu thì bạn phải share cho mình chứ ???
Sao lại bảo mình share cho bạn :|

legend1250
14-01-12, 06:30 AM
Thấy thiếu thì bạn phải share cho mình chứ ???
Sao lại bảo mình share cho bạn :|


function x002094_ZhuanSheng( sceneId, selfId, targetId )
local zhuanshengTimes = GetMissionData(sceneId, selfId, MD_ZHUANSHENG)
if zhuanshengTimes >100 then
x002094_NotifyTip( sceneId, selfId, "HÕn chª 100 l¥n chuy¬n sinh." )
x002094_MsgBox( sceneId, selfId, targetId, "HÕn chª 100 l¥n chuy¬n sinh." )
return
end
local mppoint = GetHumanMenpaiPoint(sceneId, humanObjId)
local lev = GetLevel( sceneId, selfId )
if lev < 150 then
BeginEvent( sceneId )
AddText( sceneId, "ÐÆng c¤p nhö h½n #G150#W. Hãy quay lÕi khi ðÕt c¤p ðµ #G150#W. " )
EndEvent( sceneId )
DispatchEventList( sceneId, selfId, targetId )
return -1
end

SetLevel( sceneId, selfId, 1)
--YuanBao(sceneId,selfId,targetId,1,10000)
ZengDian(sceneId,selfId,targetId,1,10000)
SetMissionData(sceneId, selfId, MD_ZHUANSHENG, zhuanshengTimes+1 )
local nCS = GetMissionData(sceneId, selfId, MD_ZHUANSHENG )
BeginEvent(sceneId)
AddText(sceneId,"Chúc m×ng, chuy¬n sinh l¥n "..nCS.." thành công!!!")
EndEvent(sceneId)
DispatchMissionTips(sceneId,selfId)
BeginEvent( sceneId )
AddText( sceneId, "#WChú ý, sau khi chuy¬n sinh không ðßþc t¦y ði¬m ho£c ð±i môn phái, s¨ m¤t hªt point!" )
EndEvent( sceneId )
DispatchEventList( sceneId, selfId, targetId )
local nam = LuaFnGetName( sceneId, selfId )
BroadMsgByChatPipe( sceneId, selfId, "#48#gFFFF00Chúc m×ng "..nam.." ðã chuy¬n sinh thành công l¥n thÑ "..nCS.."! #4", 4 )
end

function x002094_Shengji (sceneId, selfId, targetId)
local lev = GetLevel( sceneId, selfId )
if lev < 149 then
BeginEvent( sceneId )
AddText( sceneId, "C¤p ðµ chßa ðü #G149#W. Hãy quay lÕi khi ðÕt c¤p ðµ #G149#W." )
EndEvent( sceneId )
DispatchEventList( sceneId, selfId, targetId )
return -1
end
SetLevel( sceneId, selfId, 150)
BeginEvent(sceneId)
AddText(sceneId,"Chúc m×ng, thành công.!")
EndEvent(sceneId)
DispatchMissionTips(sceneId,selfId)
BeginEvent( sceneId )
AddText( sceneId, "Thång c¤p 150 thành công." )
EndEvent( sceneId )
DispatchEventList( sceneId, selfId, targetId )
local nam = LuaFnGetName( sceneId, selfId )
BroadMsgByChatPipe( sceneId, selfId, "#48#gFFFF00Chúc m×ng "..nam.." ðã thång lên 150 c¤p !!#48", 4 )
end

<b><font color=red>[Chỉ có thành viên mới xem link được. <a href="register.php"> Nhấp đây để đăng ký thành viên......</a>]</font></b>

Phamhuys
14-01-12, 09:13 AM
Thật ra Code Chuyển Sinh Server 3 lỗ vần CS được nhưng bất tiện cái là phải xóa cái trắng Table mdata trong navicat đi lúc đó vào Games CS bình thường