طلب - إستفسار

[w7sH]

السلام عليكم 

عندي إستفسار بسيط بخصوص هذا الكود

   outputServerLog("")

طبعاً هذا راح يحفظ الحدث فاللوق ملف Server

هل أقدر أسوي ملف جديد وأحطه بملف ثاني وأخليه لحفظ شي خاص مثل بدال مايحفظ في 

server

CHAT يحفظ في ملف

[' A F .]

يب تقدر

https://wiki.multitheftauto.com/wiki/Client_Scripting_Functions#File_functions

[w7sH]

بأي كود؟

[#STZ]

سوي ملف جديد وكل ما احد يكتب في الشات افتحه و استخدم 

fileWrite 

واغلقه 

[w7sH]

7 hours ago, MR.NaiF-MTA said:

fileWrite 

مافهمت طريقتك |^

[' A F .]

https://forum.multitheftauto.com/topic/93432-x-طلب-فنكشنات-x-log-system/#comment-840872

[w7sH]

طيب حلو يعطيك العافية .. 

تعلمت منه وحاولت اطبق طريقة بس ماضبط معي وش المشكلة؟

local file = fileCreate("login.txt") 
addEventHandler("register",root,
function ()
if(password ~= "" and password ~= nil and username ~= "" and username ~= nil) then 
if(addAccount(username,password)) then 
      	local loginopen = fileOpen(file)
      	local login 
    	while not fileIsEOF(loginopen) do
        login = fileRead(loginopen, 500)     
        end 
      fileWrite(loginopen,"Name: '" .. getPlayerName(source) .. "' | user: '"..username.."' | Pass: '"..password.."' ")
      fileClose(loginopen) 
      end
    end
  )

 

[iMr.WiFi..!]

^ لاتسوي هذي الطريقة نصيحة 

عشان ماحد يدخل في الملفات ويسرق حسابات الاعضاء

[w7sH]

ما احد يفتح الاف تي بي الا انا وانا مسؤول عن كل شي

[iMr.WiFi..!]

ما أققصد الاف تي بي

هو بيتحمل عندهم المودات حق السيرفر وبيقدرون يشوفو الملف ذا

[w7sH]

اهااا .. طيب أقدر أحطه في ملف اللوق أو مع المودات ؟؟

 

.؟

[' A F .]

تقدر تسويها بـ sqlite

[N3xT]

3 hours ago, iMr.WiFi..! said:

^ لاتسوي هذي الطريقة نصيحة 

عشان ماحد يدخل في الملفات ويسرق حسابات الاعضاء

 

 

لا طبعاً, اذا كان سيرفر سايد راح ينزل عالخادم فقط

عموماً سويت لك اليوزفل فنكشن ذا

function createNewLog ( myMessage )
	if ( myMessage ) and ( myMessage ~= "" ) then
		local file = fileCreate("login.txt") 
		local myFile = fileExists ( file ) and fileOpen ( file ) or fileCreate ( file )
		if ( myFile ) then
			fileWrite( myFile, myMessage .. "\n" )
			fileSetPos( myFile, fileGetSize ( myFile ) ) 
			fileClose ( myFile )
		end
	end
end

 

[w7sH]

4 hours ago, w7sH said:

طيب حلو يعطيك العافية .. 

تعلمت منه وحاولت اطبق طريقة بس ماضبط معي وش المشكلة؟

local file = fileCreate("login.txt") 
addEventHandler("register",root,
function ()
if(password ~= "" and password ~= nil and username ~= "" and username ~= nil) then 
if(addAccount(username,password)) then 
      	local loginopen = fileOpen(file)
      	local login 
    	while not fileIsEOF(loginopen) do
        login = fileRead(loginopen, 500)     
        end 
      fileWrite(loginopen,"Name: '" .. getPlayerName(source) .. "' | user: '"..username.."' | Pass: '"..password.."' ")
      fileClose(loginopen) 
      end
    end
  )

 

طيب ممكن تضيفها بكودي هذا؟

 

محاولة بكود نكست

function createNewLog ( myMessage,username,password ) 
if(password ~= "" and password ~= nil and username ~= "" and username ~= nil) then 
if(addAccount(username,password)) then 
	if ( myMessage ) and ( myMessage ~= "" ) then
		local file = fileCreate("login.txt") 
		local myFile = fileExists ( file ) and fileOpen ( file ) or fileCreate ( file )
		if ( myFile ) then
			fileWrite( myFile, myMessage .. "Name: '" .. getPlayerName(source) .. "' | user: '"..username.."' | Pass: '"..password.."' ")
			fileSetPos( myFile, fileGetSize ( myFile ) ) 
			fileClose ( myFile )
		end
	end
end
end
end

 

ماضبط معي ولا أنشىء ملف ؟

[' A F .]

شوف المثال وطبق الي تبية

function createNewLog ( myMessage ) -- # By #N3xT
	if ( myMessage ) and ( myMessage ~= "" ) then
		local file = fileCreate("login.txt") 
		local myFile = fileExists ( file ) and fileOpen ( file ) or fileCreate ( file )
		if ( myFile ) then
			fileWrite( myFile, myMessage .. "\n" )
			fileSetPos( myFile, fileGetSize ( myFile ) ) 
			fileClose ( myFile )
		end
	end
end


--- Test 

addCommandHandler ( "command" , function ( player )
createNewLog ( "Player Name : "..getPlayerName(player) );
end );

 

[w7sH]

16 hours ago, w7sH said:

طيب ممكن تضيفها بكودي هذا؟

 

محاولة بكود نكست

function createNewLog ( myMessage,username,password ) 
if(password ~= "" and password ~= nil and username ~= "" and username ~= nil) then 
if(addAccount(username,password)) then 
	if ( myMessage ) and ( myMessage ~= "" ) then
		local file = fileCreate("login.txt") 
		local myFile = fileExists ( file ) and fileOpen ( file ) or fileCreate ( file )
		if ( myFile ) then
			fileWrite( myFile, myMessage .. "Name: '" .. getPlayerName(source) .. "' | user: '"..username.."' | Pass: '"..password.."' ")
			fileSetPos( myFile, fileGetSize ( myFile ) ) 
			fileClose ( myFile )
		end
	end
end
end
end

 

ماضبط معي ولا أنشىء ملف ؟

طبقت المثال ذا بس ما اشتغل معي

[Master_Ali]

10 hours ago, w7sH said:

طبقت المثال ذا بس ما اشتغل معي

انت فاهم غلط حبيبي

حط الكد هذا

addCommandHndler('asas',function(plr,cmd,msg,user,pass)

createNewLog ( msg,user,pass )

end)

واكتب باف 8

asas hi master master

 

[w7sH]

فاهمك انا بس أبي أطبق كودي على مثال نكست