SAM!!

MR_Mahmoud يب صحيح تصدق نسيت ض

+Source|> مشكور ض

Rakan# @Rakan# لم تظبط معنا سيرفر addEvent("Ranks:Buy1", true) addEventHandler("Ranks:Buy1", root, function() local Le3bA = getPlayerMoney(source) if Le3bA >= 250000 then local account = getPlayerAccount(source) if account and not isGuestAccount(account) then local accountName = getAccountName(account) if not isObjectInACLGroup("user."..accountName, aclGetGroup("VIP")) then takePlayerMoney(source, 250000) aclGroupAddObject(aclGetGroup("VIP"), "user."..accountName) outputChatBox "Account '"..accountName.."' succesfully added to the VIP group", source) outputChatBox("You're in VIP group Now.", source, 255, 0, 0, true) else outputChatBox("You're already in VIP group.", source, 255, 0, 0, true) end else outputChatBox("You're not logged in.", source, 255, 0, 0, true) end else outputChatBox("You don't have $250000 to buy VIP", source, 255, 0, 0, true) end end) -------------------------- كلنت addEventHandler('onClientGUIClick', root, function ( ) if source == btn.buyvip then guiSetVisible( wnd1, false ) showCursor( false ) triggerServerEvent ( "Ranks:Buy1", localPlayer ) end end )

TAPL للأسف الكود مو شغال الديبق يقولي اني سويت ترايقر لbuyvip للسيرفر ومافي ايفنت بالاسم ذا

TAPL تابل ساعدني بموضوعي التاني ماحدا عارف يساعدني https://forum.multitheftauto.com/topic/106035-طلب-مساعدة-بكود/ SAM!! انت الي بتعرف تساعدني

سيرفر addEvent ( "VIP20", true ) addEventHandler ( "VIP20", root, function ( ) executeCommandHandler("VIP") end end ) كلنت addEventHandler('onClientGUIClick', root, function ( ) if source == btn.vip then guiSetVisible( wnd1, false ) showCursor( false ) triggerServerEvent("VIP20", localPlayer) end end ) ماحطيت executeCommandHandler("VIP") في الكلنت لان الكوماند للمود الثاني موجودة في السيرفر ياريت احد يصحح لي الاكواد الي فوق

UP

+Source|> بي اضيف الاكونت حق الشخص بالاسل لما يضغط علي الزر اس مساعدة ياشباب تروة تصحيح لكود بسيط؟

اي مساااااااااعدة Rakan#

السلام عليكم ورحمة الله وبركاتة ابي اذا ضغطت زر يسوي تحقق مثلا اني معي 1000 فلوس وياخد مني 1000 فلوس ويضيفني في الاسل مثلا كونسل لمدة معينة مثلا ساعة وبعدين يسحبها مني ولو انا في الجروب اصلا من قبل يقولي عذرا انت كونسل وشكرآآآ محاولتي ككلنت addEventHandler('onClientGUIClick', root, function ( ) if source == btn.buyvip then guiSetVisible( wnd1, false ) showCursor( false ) triggerServerEvent ( "buyvip", localPlayer ) end end ) سيرفر addEvent ( "buyvip", true ) addEventHandler ( "buyvip", root, function ( ) local Le3bA = getPlayerMoney ( source ) if Le3bA > 250000 then takePlayerMoney ( source, 250000 ) local name = getPlayerName(source) if accountName then aclGroupAddObject (aclGetGroup("Admin"), "user."..accountName) outputChatBox ("Account '"..accountName.."' succesfully added to the admin group", playerSource) else outputChatBox("You don't have $250000 to buy Super Jump", source, 255, 0, 0, true) end end )

+Source|> لا مافهمت شكرا لكم

addCommandHandler('samshop511106', function() guiSetVisible(GUIEditor.window[1],true) showCursor( true ) end ) N3xT

addEventHandler('onClientGUIClick', root, function ( ) if source == btn.shop then guiSetVisible( wnd1, false ) showCursor(false) executeCommandHandler("samshop511106") end end ) معلش استحملني شوي الحين لما اضغط يفتح نافذة من مود ثاني كلة تمام ابي لو يضغط تاني يقفلها تاني وشككرا N3xT اي مساعدة؟

addEventHandler("onPlayerWasted", root, function ( ) triggerClientEvent("unjump", root) end end ) N3xT وهنا؟

وش الخطأ هون addEvent("jump",true) function( setWorldSpecialPropertyEnabled ( "extrajump", false ) end ) مع العلم اني بسويلة ترايقر من السيرفر للكلنت وبسوي بصير هيك لما يضغط علي زر

MR.TOUNSI bad argument #1 to 'ipairs' (table expected, got string) Database query faild: no such column: serial Database query faild: no such column: serial

MR.TOUNSI ابي لما ادخل السيرفر واكتب f8 auto لما ادخل تاني يسجل تلقائي مايجيبلي لوحة لو ابي الغي هالخاصية ويرجعلي اللوحة تاني اكتب unauto

MR.TOUNSI محاولتي؟ خذ executeSQLQuery("CREATE TABLE IF NOT EXISTS players_auto( serialx TEXT, userx TEXT, passx TEXT)") executeSQLQuery("CREATE TABLE IF NOT EXISTS players_save( serial TEXT, user TEXT, pass TEXT)") function AddPlayer(serial,user,pass) executeSQLQuery("INSERT INTO players_save(serial,user,pass) VALUES(?,?,?)",serial,user,pass) end function addPlayerxz(serial,user,pass) executeSQLQuery("INSERT INTO players_auto(serialx,userx,passx) VALUES(?,?,?)",serial,user,pass) end function isPlayerSave(serial) local sel = executeSQLQuery("SELECT serial FROM players_save WHERE serial=?",serial) if sel == 0 then return false else return true end end function isPlayerSavedAuto(serial) local sel = executeSQLQuery("SELECT serial FROM players_auto WHERE serialx=?",serial) if sel == 0 then return false else return true end end function getUserAndPass(serial) local user,pass = "","" if isPlayerSave(serial) then local sel = executeSQLQuery("SELECT * FROM players_save WHERE serial=?",serial) for i,player in ipairs(sel) do if i == 1 then user = player.user pass = player.pass end end return user,pass end return false end function getUsernameAndPassword(serial) local user,pass = "","" if isPlayerSavedAuto(serial) then local sel = executeSQLQuery("SELECT * FROM players_auto WHERE serial=?",serial) for i,player in ipairs(sel) do if i == 1 then userx = player.userx passx = player.passx end end return userx,passx end return false end addEvent("onGetSave",true) addEventHandler("onGetSave",root, function () local serial = getPlayerSerial(source) if isPlayerSave(serial) then local user,pass = getUserAndPass(serial) triggerClientEvent(source,"onPutSave",source,user,pass) end if isPlayerSavedAuto(serial) then local user,pass = getUsernameAndPassword(serial) logIn(source,user,pass) triggerClientEvent(source,"onCl",source) end end ) addEvent("onLoginWith",true) addEventHandler("onLoginWith",root, function (user,pass) local acc = getAccount(user,pass) local serial = getPlayerSerial(source) if acc then logIn(source,acc,pass) outputChatBox("* تم بنجاح تسجيل دخول",source,0,255,0) AddPlayer(serial,user,pass) triggerClientEvent(source,"onCl",source) else outputChatBox("* الحساب او كلمة المرور خطأ",source,255,0,0) end end ) addEvent("onLogin",true) addEventHandler("onLogin",root, function (user,pass) local acc = getAccount(user,pass) if acc then logIn(source,acc,pass) outputChatBox("* تم بنجاح تسجيل دخول",source,0,255,0) triggerClientEvent(source,"onCl",source) setElementData(source,"Password",""..pass.."") else outputChatBox("* الحساب او كلمة مرور خطأ",source,255,0,0) end end ) addEvent("onReg",true) addEventHandler("onReg",root, function (user,pass) local acc = getAccount(user,pass) if acc then outputChatBox("* هذا الحساب مستخدم من قبل",source,255,0,0) else addAccount(user,pass) outputChatBox("* Username = " .. user .. "",source,0,255,0) outputChatBox("* Password = " .. pass .. "",source,0,255,0) end end ) addCommandHandler("auto",function(p) local acc = getPlayerAccount(p) if ( not isGuestAccount(acc) ) then local serial = getPlayerSerial(p) if ( not isPlayerSavedAuto(serial) ) then local Data = getElementData(p,"Password") local user = tostring(acc) addPlayerxz(serial,user,Data) outputChatBox("* تم تفعيل الميزة",p,0,255,0) else ouputChatBox("* لقد قمت بتفعيل الميزة من قبل",p,255,0,0) end else outputChatBox("* عليك ان تسجل دخولك أولاً",p,255,0,0) end end ) addCommandHandler("unauto",function(p) local acc = getPlayerAccount(p) if ( not isGuestAccount(acc) ) then local serial = getPlayerSerial(p) if ( isPlayerSavedAuto(serial) ) then executeSQLQuery("DELETE FROM players_auto WHERE serialx=?", serial) outputChatBox("* تم إلغاء تفعيل الميزة",p,0,255,0) else outputChatBox("* هذه الميزة غير مفعلة",p,255,0,0) end else outputChatBox("* عليك ان تسجل دخولك أولاً",p,255,0,0) end end ) وريني؟

Rakan# ساعدني انت بلــيز

AbU - W6N اخي لا الاول ولا الثاني ظبط لما ادخل يجي لوحة التسجيل من تاني + لو ضغطت علي auto يقول تم تفعيل الميزة من قبل unauto يلغي الميزة اضغط auto تاني يقولي مفعلة من قبل وانا مافعلتها! --------------------------------------------------------- الكود الاول يخلي اللوحة ماتيجي اصلا دي بق 69:Bad argument @ 'login' [Expected account at argument 2, got nill] Database query faild: no such column: serial ------------------------------------------------------------------------------------------------------ الكود الثاني اللوحة تيجي بس مافي auto دي بق bad argument #1 to 'ipairs' (table expected, got string) Database query faild: no such column: serial Database query faild: no such column: serial

وش يعني بتبلي عليك انا ؟؟ الكود جربتة وماشتغل عرفتك وبالنسبة لlogIn مسويها الحين هيك والمود كلة وقف والحمد للة وانتظرتك تصلحة وماصلحتة مع العلم اني رسلتلك الدي بق

اصلا الكود الي طرحة الاخ مايشتغل !!

#DesTroeyR الرجال مسويلك اهداء ومارحمتة

AbU - W6N وش ياخي انا ماعرف وش يععني مو فاهم والله؟ AbU - W6N والله رجعتها logIn بس المود كلة وقت ذا الديبق سويتها مثل مانت تبي 69:Bad argument @ 'login' [Expected account at argument 2, got nill] Database query faild: no such column: serial ماتيجي اللوحة اصلا الحين