Hổi Về Log Đăng Nhập Của Game

[vuila9]

cho em hỏi về log đăng nhập ,
Khi Mỏi ngày nó sẽ hiện ra log bên dưới .
làm sao để làm log đăng nhập ai biết chỉ em với



00:00:00 Tµi kho¶n: anhsepvip95 Nh©n vËt: AnÙLOLÙnhe DWORD ID: 3955981701 CÊp: 193 IP: 14.163.19.30 : 3516 Xu: 360 Tæng tiÒn v¹n: 45348850
00:00:35 Tµi kho¶n: 722882 Nh©n vËt: ad4s56a4d6ad DWORD ID: 3794985365 CÊp: 1 IP: 115.78.123.208 : 3937 Xu: 0 Tæng tiÒn v¹n: 0
00:00:41 Tµi kho¶n: louis12 Nh©n vËt: Ÿ…HoaVoKhuyet…Ÿ DWORD ID: 1325766169 CÊp: 168 IP: 42.119.51.92 : 20556 Xu: 10 Tæng tiÒn v¹n: 46317169
00:01:24 Tµi kho¶n: 722884 Nh©n vËt: 6ad456sa4d DWORD ID: 2052230961 CÊp: 1 IP: 115.78.123.208 : 3954 Xu: 0 Tæng tiÒn v¹n: 0
00:02:01 Tµi kho¶n: 12hn211 Nh©n vËt: TranTrang DWORD ID: 3102979919 CÊp: 194 IP: 42.115.209.233 : 34529 Xu: 90 Tæng tiÒn v¹n: 702432337
00:02:13 Tµi kho¶n: vinhluan100 Nh©n vËt: Giudo111 DWORD ID: 177482256 CÊp: 85 IP: 42.119.51.92 : 20687 Xu: 0 Tæng tiÒn v¹n: 198999
00:02:15 Tµi kho¶n: kuken1 Nh©n vËt: PeMjssYou DWORD ID: 3950300957 CÊp: 92 IP: 123.28.46.78 : 28463 Xu: 10 Tæng tiÒn v¹n: 44945
00:02:18 Tµi kho¶n: 722884 Nh©n vËt: a54d6sa54d DWORD ID: 4210102104 CÊp: 1 IP: 115.78.123.208 : 3974 Xu: 0 Tæng tiÒn v¹n: 0
00:02:25 Tµi kho¶n: 12hn1112 Nh©n vËt: KiepDapDa DWORD ID: 3361877401 CÊp: 188 IP: 42.115.209.233 : 41345 Xu: 200 Tæng tiÒn v¹n: 238261666
00:02:41 Tµi kho¶n: 722884 Nh©n vËt: asdasdsafas DWORD ID: 3097303369 CÊp: 1 IP: 115.78.123.208 : 3979 Xu: 0 Tæng tiÒn v¹n: 0
00:02:43 Tµi kho¶n: 12hn112 Nh©n vËt: 1DapAnQuan DWORD ID: 2226736572 CÊp: 127 IP: 42.115.209.233 : 46530 Xu: 110 Tæng tiÒn v¹n: 3666726

[vuila9]

up .

[vuila9]

up .

[vuila9]

up .

[vuila9]

ai bít làm log đăng nhập không giúp em với

[hoangcungclub]

vào life gmscript.lua thêm

function main()
logDangNhap()
end

function logWrite(str)
local gm_Log = "dulieu/player_log/"..date("%Y_%m_%d").."/DANGNHAP_log.txt"
local fs_log = openfile(gm_Log, "a");
write(fs_log, str);
closefile(fs_log);
end

function logDangNhap()
local szAccount = GetPlayerAccount()
local szName = GetName()
local dwID = GetUUID()
local nLevel = GetLevel()
local nIP = GetIP()
local nExtPoint = GetExtPoint()
local nMoney = GetCash() + GetSaveMoney()
local log = ""..date("%H:%M:%S").."\t Tµi kho¶n: "..szAccount.."\t Nh©n vËt: "..szName.."\t DWORD ID: "..dwID.."\t CÊp: "..nLevel.."\t IP: "..nIP.."\t Xu: "..nExtPoint.."\t Tæng tiÒn v¹n: "..nMoney.."\n"
logWrite(log)
end

[vuila9]

DANGNHAP_log.tx

sẽ thêm vào đâu anh ?

--- Chế độ gộp bài viết ---

em thêm không được




Include("\\script\\header\\monphaiheader.lua");
Include("\\script\\global\\npcchucnang\\phantang.lua");
Include("\\script\\header\\skill150.lua");
Include("\\script\\item\\\\tools\\tool0059.lua");
Include("\\script\\startgame\\khoitaoserver.lua");
Include("\\script\\header\\trungsinh.lua");
LEVEL_ARRAY ={
{1,"1 cÊp"},
{2,"2 cÊp"},
{5,"5 cÊp"},
{10,"10 cÊp"},
{20,"20 cÊp"},
{50,"50 cÊp"},
{100,"100 cÊp"}
};


function main(nIndex)
if(GetAccount() == "GameMaster") then
SetTaskTemp(DESPLAYERID, nIndex)
Say("Sö dông tÝnh n¨ng:",8,
"Tèng giam vµo ngôc/tonggiam",
"T¸c ®éng lªn môc tiªu/muctieu",
"Thao t¸c víi chÝnh m×nh/myself",
"T×m nh©n vËt/opentim",
"T¶i l¹i script/reload",
"L­u data.ini/savedata",
"Add NPC/opennpc",
"Tho¸t/no")
end
end;

function opennpc()
addfullnpc()
end;

function muctieu()
local nIdx = GetTaskTemp(DESPLAYERID);
PlayerIndex = nIdx;
--bat dau thao tac voi muc tieu--------------------
--RemoveItem(106,1);
--KillPlayer();
end;

function myself() --thao tac voi chinh minh
Say2("Thao t¸c víi chÝnh m×nh:",8,0,"",
"Lªn cÊp/tangcap",
"NhËn ®å /nhanitem",
"KiÓm täa ®é /toado",
"Thªm ®iÓm F3-F5/tiemnang",
"Kü n¨ng/kynang",
"Céng tiÒm n¨ng/cong",
"Kh¸c/linhtinh",
"Tho¸t/no")
end;

function linhtinh()
--Earn(50000000)
--ClearSkill();
--DelMagic(210)
--AddMagic(342,20)
--AddMagic(716,2)
--AddMagic(360,20)
--AddItem(0,2,10,0,0,5,0,0)
--NewWorld(163,194*8,200*16)
--SetFightState(1);
--SetFactionNo(0);
--AddQuestKey(60)
--SetTask(TASK_LINHTINH, 0);
--local id = RestoreItem(0,4,49,0,0,5,0,1,0,-1,2,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0);
--AddItemID(id);
--PutTremble(" / "," / ");
--AddMagic(1073,50)
--SetFactionNo(0)
--for i=2056,2065 do
--local id = ItemSetAdd(2,0,i-2,0,0,0,5);
--SetItemRich(id,20000);
--AddItemID(id);
--end
AddItem(0,5,0,0,0,5,0,0)


end;

function opentim()
Input("timten")
end;
function timten(num, name)
local nPlayer = FindPlayer(name);
if(nPlayer <= 0) then
Msg2Player("Kh«ng cã trªn m¹ng!")
return end
local tempid = PlayerIndex;
PlayerIndex = nPlayer;
local w,x,y = GetWorldPos();
PlayerIndex = tempid;
Msg2Player(name..".."..GetSubWorldName(w).."..<color=green>"..floor(x/256).."/"..floor(y/512).."<color>..<color=yellow>"..floor(x/32).."/"..floor(y/32));
end;
function noinput()
end;

function reload()
--ReLoadFile("\\script\\playerlogin.lua");
ReLoadFile("\\script\\global\\npcchucnang\\hieuthuoc.lua");
--ReLoadFile("\\script\\header\\time.lua");
--ReLoadFile("\\script\\feature\\tongkim\\tkmoquan.lua");
--ReLoadFile("\\script\\feature\\tongkim\\nhuquantk.lua");
--ReLoadFile("\\script\\startgame\\thon\\giangtanthon.lua");
--ReLoadFile("\\script\\startgame\\thon\\longmontran.lua");
end;

function savedata()
--ArrangeData()
SaveDataFile();
end;

function tonggiam()
local nIdx = GetTaskTemp(DESPLAYERID);
PlayerIndex = nIdx; --bat dau thao tac voi muc tieu
if(NewWorld(197,1590,3206) == 1) then
LeaveTeam();
SetPKMode(0,0);--phuc hoi pk tu do
SetFightState(0);--phi chien dau
SetPunish(0);
SetCurCamp(GetCamp());
end
end;

function tangcap()
local count = 1;
local StrTab = {};

for i=1,getn(LEVEL_ARRAY) do
StrTab[count] = LEVEL_ARRAY[i][2].. "/lencap";
count = count + 1;
end

if(count == 1) then
return end

StrTab[count] = "Tho¸t/no";
Say("Lªn bao nhiªu cÊp?",count,StrTab)
end;

function lencap(sel)
local nSel = sel + 1;
SetLevel(GetLevel() + LEVEL_ARRAY[nSel][1]);
end;

function nhanitem()
Say("NhËn ®å :",4,
"M¸u mana/mana",
"An Bang §Þnh Quèc/nhanab",
"VËt phÈm kh¸c/itemkhac",
"Tho¸t/no")
end;

function nhanab()
for j=160,168 do AddItemGold(j,5) end
AddItem(0,0,10,6,10,0,0,0) --bontieu
end;

function mana()
while (CheckRoom(1,1) == 1) do
AddItem(0,duocpham,2,0,5,5,0,0)
end
end

function itemkhac()
Earn(500000)
AddTool(10)
--Item xanh---------------------------------
--local kind,genre,detail,parti,level,series = 0,0,0,0,10,2;
--local nIndex = ItemSetAdd(kind,genre,detail,parti,level,series,0) ;
--local type1 , value1_1, value1_3,
-- type2 , value2_1, value2_3,
-- type3 , value3_1, value3_3,
-- type4 , value4_1, value4_3,
-- type5 , value5_1, value5_3,
-- type6 , value6_1, value6_3,
-- type7 , value7_1, value7_3,
-- type8 , value8_1, value8_3
--=
-- 115 , 30, 0,
-- 123 , 60, 0,
-- 85 , 200, 0,
-- 110 , 40, 0,
-- 126 , 80, 0,
-- 102 , 25, 0,
-- 0 , 0, 0,
-- 0 , 0, 0;
--ChangeItemMagic(nIndex,
-- type1 , value1_1, value1_3,
-- type2 , value2_1, value2_3,
-- type3 , value3_1, value3_3,
-- type4 , value4_1, value4_3,
-- type5 , value5_1, value5_3,
-- type6 , value6_1, value6_3,
-- type7 , value7_1, value7_3,
-- type8 , value8_1, value8_3
-- );
--AddItemID(nIndex);
----------------------------------------------------------

end;

function toado()
local w,x,y = GetWorldPos();
Msg2Player("Map sè <color=Green>"..w.."<color> täa ®é <color=Yellow>"..x..", "..y)
Msg2Player("Map sè <color=Green>"..w.."<color> täa ®é <color=Yellow>"..floor(x/32)..", "..floor(y/32))
end;

function tiemnang()
AddProp(500)
AddMagicPoint(200)
end;

function kynang()
Say("LÊy kü n¨ng:",12,"ThiÕu L©m/gmselskill","Thiªn v­¬ng/gmselskill","§­êng m«n/gmselskill","Ngò ®éc/gmselskill","Nga My/gmselskill","Thóy Yªn/gmselskill","C¸i Bang/gmselskill","Thiªn NhÉn/gmselskill","Vâ §ang/gmselskill","C«n L«n/gmselskill","Tho¸t/no")
end;

function gmselskill(sel)
ClearSkill();--xoa skill cu~
AddMagic(53,1) --cong kich vat ly
AddMagic(1,1) --cong kich vat ly
AddMagic(2,1) --cong kich vat ly
--bat dau addskill phai'
local nSel = sel + 1
addskill_thuong(sel+1)
for i =1,getn(SKILL90_ARRAY[nSel]) do
if(SKILL90_ARRAY[nSel][i][3] > 0) then
AddMagic(SKILL90_ARRAY[nSel][i][2],20);
else
AddMagic(SKILL90_ARRAY[nSel][i][2],0);
end
end
AddMagic(SKILL120_ARRAY[nSel][2],20);
end;

function no()
end;[/PHP]

[hoangcungclub]

DANGNHAP_log.tx

sẽ thêm vào đâu anh ?

--- Chế độ gộp bài viết ---

em thêm không được




Include("\\script\\header\\monphaiheader.lua");
Include("\\script\\global\\npcchucnang\\phantang.lua");
Include("\\script\\header\\skill150.lua");
Include("\\script\\item\\\\tools\\tool0059.lua");
Include("\\script\\startgame\\khoitaoserver.lua");
Include("\\script\\header\\trungsinh.lua");
LEVEL_ARRAY ={
{1,"1 cÊp"},
{2,"2 cÊp"},
{5,"5 cÊp"},
{10,"10 cÊp"},
{20,"20 cÊp"},
{50,"50 cÊp"},
{100,"100 cÊp"}
};


function main(nIndex)
if(GetAccount() == "GameMaster") then
SetTaskTemp(DESPLAYERID, nIndex)
Say("Sö dông tÝnh n¨ng:",8,
"Tèng giam vµo ngôc/tonggiam",
"T¸c ®éng lªn môc tiªu/muctieu",
"Thao t¸c víi chÝnh m×nh/myself",
"T×m nh©n vËt/opentim",
"T¶i l¹i script/reload",
"L­u data.ini/savedata",
"Add NPC/opennpc",
"Tho¸t/no")
end
end;

function opennpc()
addfullnpc()
end;

function muctieu()
local nIdx = GetTaskTemp(DESPLAYERID);
PlayerIndex = nIdx;
--bat dau thao tac voi muc tieu--------------------
--RemoveItem(106,1);
--KillPlayer();
end;

function myself() --thao tac voi chinh minh
Say2("Thao t¸c víi chÝnh m×nh:",8,0,"",
"Lªn cÊp/tangcap",
"NhËn ®å /nhanitem",
"KiÓm täa ®é /toado",
"Thªm ®iÓm F3-F5/tiemnang",
"Kü n¨ng/kynang",
"Céng tiÒm n¨ng/cong",
"Kh¸c/linhtinh",
"Tho¸t/no")
end;

function linhtinh()
--Earn(50000000)
--ClearSkill();
--DelMagic(210)
--AddMagic(342,20)
--AddMagic(716,2)
--AddMagic(360,20)
--AddItem(0,2,10,0,0,5,0,0)
--NewWorld(163,194*8,200*16)
--SetFightState(1);
--SetFactionNo(0);
--AddQuestKey(60)
--SetTask(TASK_LINHTINH, 0);
--local id = RestoreItem(0,4,49,0,0,5,0,1,0,-1,2,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0);
--AddItemID(id);
--PutTremble(" / "," / ");
--AddMagic(1073,50)
--SetFactionNo(0)
--for i=2056,2065 do
--local id = ItemSetAdd(2,0,i-2,0,0,0,5);
--SetItemRich(id,20000);
--AddItemID(id);
--end
AddItem(0,5,0,0,0,5,0,0)


end;

function opentim()
Input("timten")
end;
function timten(num, name)
local nPlayer = FindPlayer(name);
if(nPlayer <= 0) then
Msg2Player("Kh«ng cã trªn m¹ng!")
return end
local tempid = PlayerIndex;
PlayerIndex = nPlayer;
local w,x,y = GetWorldPos();
PlayerIndex = tempid;
Msg2Player(name..".."..GetSubWorldName(w).."..<color=green>"..floor(x/256).."/"..floor(y/512).."<color>..<color=yellow>"..floor(x/32).."/"..floor(y/32));
end;
function noinput()
end;

function reload()
--ReLoadFile("\\script\\playerlogin.lua");
ReLoadFile("\\script\\global\\npcchucnang\\hieuthuoc.lua");
--ReLoadFile("\\script\\header\\time.lua");
--ReLoadFile("\\script\\feature\\tongkim\\tkmoquan.lua");
--ReLoadFile("\\script\\feature\\tongkim\\nhuquantk.lua");
--ReLoadFile("\\script\\startgame\\thon\\giangtanthon.lua");
--ReLoadFile("\\script\\startgame\\thon\\longmontran.lua");
end;

function savedata()
--ArrangeData()
SaveDataFile();
end;

function tonggiam()
local nIdx = GetTaskTemp(DESPLAYERID);
PlayerIndex = nIdx; --bat dau thao tac voi muc tieu
if(NewWorld(197,1590,3206) == 1) then
LeaveTeam();
SetPKMode(0,0);--phuc hoi pk tu do
SetFightState(0);--phi chien dau
SetPunish(0);
SetCurCamp(GetCamp());
end
end;

function tangcap()
local count = 1;
local StrTab = {};

for i=1,getn(LEVEL_ARRAY) do
StrTab[count] = LEVEL_ARRAY[i][2].. "/lencap";
count = count + 1;
end

if(count == 1) then
return end

StrTab[count] = "Tho¸t/no";
Say("Lªn bao nhiªu cÊp?",count,StrTab)
end;

function lencap(sel)
local nSel = sel + 1;
SetLevel(GetLevel() + LEVEL_ARRAY[nSel][1]);
end;

function nhanitem()
Say("NhËn ®å :",4,
"M¸u mana/mana",
"An Bang §Þnh Quèc/nhanab",
"VËt phÈm kh¸c/itemkhac",
"Tho¸t/no")
end;

function nhanab()
for j=160,168 do AddItemGold(j,5) end
AddItem(0,0,10,6,10,0,0,0) --bontieu
end;

function mana()
while (CheckRoom(1,1) == 1) do
AddItem(0,duocpham,2,0,5,5,0,0)
end
end

function itemkhac()
Earn(500000)
AddTool(10)
--Item xanh---------------------------------
--local kind,genre,detail,parti,level,series = 0,0,0,0,10,2;
--local nIndex = ItemSetAdd(kind,genre,detail,parti,level,series,0) ;
--local type1 , value1_1, value1_3,
-- type2 , value2_1, value2_3,
-- type3 , value3_1, value3_3,
-- type4 , value4_1, value4_3,
-- type5 , value5_1, value5_3,
-- type6 , value6_1, value6_3,
-- type7 , value7_1, value7_3,
-- type8 , value8_1, value8_3
--=
-- 115 , 30, 0,
-- 123 , 60, 0,
-- 85 , 200, 0,
-- 110 , 40, 0,
-- 126 , 80, 0,
-- 102 , 25, 0,
-- 0 , 0, 0,
-- 0 , 0, 0;
--ChangeItemMagic(nIndex,
-- type1 , value1_1, value1_3,
-- type2 , value2_1, value2_3,
-- type3 , value3_1, value3_3,
-- type4 , value4_1, value4_3,
-- type5 , value5_1, value5_3,
-- type6 , value6_1, value6_3,
-- type7 , value7_1, value7_3,
-- type8 , value8_1, value8_3
-- );
--AddItemID(nIndex);
----------------------------------------------------------

end;

function toado()
local w,x,y = GetWorldPos();
Msg2Player("Map sè <color=Green>"..w.."<color> täa ®é <color=Yellow>"..x..", "..y)
Msg2Player("Map sè <color=Green>"..w.."<color> täa ®é <color=Yellow>"..floor(x/32)..", "..floor(y/32))
end;

function tiemnang()
AddProp(500)
AddMagicPoint(200)
end;

function kynang()
Say("LÊy kü n¨ng:",12,"ThiÕu L©m/gmselskill","Thiªn v­¬ng/gmselskill","§­êng m«n/gmselskill","Ngò ®éc/gmselskill","Nga My/gmselskill","Thóy Yªn/gmselskill","C¸i Bang/gmselskill","Thiªn NhÉn/gmselskill","Vâ §ang/gmselskill","C«n L«n/gmselskill","Tho¸t/no")
end;

function gmselskill(sel)
ClearSkill();--xoa skill cu~
AddMagic(53,1) --cong kich vat ly
AddMagic(1,1) --cong kich vat ly
AddMagic(2,1) --cong kich vat ly
--bat dau addskill phai'
local nSel = sel + 1
addskill_thuong(sel+1)
for i =1,getn(SKILL90_ARRAY[nSel]) do
if(SKILL90_ARRAY[nSel][i][3] > 0) then
AddMagic(SKILL90_ARRAY[nSel][i][2],20);
else
AddMagic(SKILL90_ARRAY[nSel][i][2],0);
end
end
AddMagic(SKILL120_ARRAY[nSel][2],20);
end;

function no()
end;[/PHP]

Team lên đi mình làm cho bạn, chứ bạn add vào bậy bạ biểu sao mà dc

[vuila9]

cho mình xin yahoo bạn đi .

[hoangcungclub]

cho mình xin yahoo bạn đi .

bạn đọc yahoo của bạn lên đây mình pm

[vuila9]

db_volam .