3NAD

Members
  • Content Count

    1,985
  • Joined

  • Last visited

  • Days Won

    2

3NAD last won the day on October 19 2017

3NAD had the most liked content!

Community Reputation

54 Popular

About 3NAD

  • Rank
    Jacker

Details

  • Gang
    [Gta-Ar|6ArH]
  • Location
    Saudi Arabia, Ahsa
  • Occupation
    Private.
  • Interests
    Private.

Recent Profile Visitors

1,682 profile views
  1. 3NAD

    استفسارين بالبرمجة ..

    شرايك اختبرك فالشغلة ذي ؟
  2. 3NAD

    Help Cpy Ctrl+C

    https://wiki.multitheftauto.com/wiki/ConvertGridListToText
  3. 3NAD

    حل لمشكلة تكرار اللوب

    addCommandHandler ( "startMission" , function ( player,cmd,mission ) local playerAccount = getPlayerAccount ( player ) if ( not isGuestAccount ( playerAccount ) ) then if ( isObjectInACLGroup ( "user."..getAccountName(playerAccount),aclGetGroup("Console") ) ) then for k,v in pairs ( positionTable ) do if mission == v[1] then setElementData(resourceRoot,"TheMissions",mission) outputChatBox("yes",root,255,0,0,true) return end end outputChatBox("no",root,255,0,0,true) end end end )
  4. 3NAD

    حل لمشكلة تكرار اللوب

    انت اللي تحدد تبي نو تظهر ولا لا ! مثلاً كان كودك انك تبحث عن قيمة في التيبل , ف مافي حاجة انك تستخدم else
  5. 3NAD

    استفسارين بالبرمجة ..

    local taple = {} getPlayerDor = function ( source ) for i, v in ipairs ( taple ) do if v.player == source then return i end end end addCommandHandler("dor",-- يحط نفسه بالدور function(source) local dor = getPlayerDor ( source ) if not dor then outputChatBox("تم وضعك في الدور , انتظر حتي ياتي دورك لسحبك",source,255,255,0,true) table.insert(taple,{player=source}) outputChatBox(""..#taple.." انت الدور رقم",source,255,255,0,true) else outputChatBox(""..dor.." قمت بأخذ دور مسبقاً, الرقم",source,255,0,0,true) end end ) addCommandHandler("getDor", function(source) local dorNow = taple[1] if dorNow then local player = dorNow.player local x,y,z = getElementPosition(source) setElementPosition(player,x,y,z+2) table.remove(taple,1) else outputChatBox("لايوجد دور",source,255,0,0,true) end end )
  6. 3NAD

    حل لمشكلة تكرار اللوب

    نعم , راح يوقف اللوب بعد اول نو
  7. 3NAD

    حل لمشكلة تكرار اللوب

    تقدر تستخدم break لإيقاف اللوب أو return لإيقاف الوظيفة
  8. 3NAD

    استفسارات عن الجداول ..

    انا قلت لك جرب الكوماندات (اكتب الكلمة بأف8) ء إضافة كلمة للجدول addValue text حذف كلمة من الجدول removeValue text عرض الكلمات اللي بالجدول getValues
  9. 3NAD

    استفسارات عن الجداول ..

    انت اللي تحتاجه هو fromJSON toJSON اقرا الكود وافهم طريقة استخدام الوظيفتين اللي فوق اذا فيه شيء مافهمته, حدد عليه واسأل هنا
  10. 3NAD

    استفسارات عن الجداول ..

    executeSQLQuery ( "CREATE TABLE IF NOT EXISTS `Sql` (`test` TEXT)") addCommandHandler ( "addValue", function ( player, _, value ) local SQL = executeSQLQuery ( "SELECT `test` FROM `Sql`" ) if #SQL == 0 then local testingTable = { value }; local tableToBeStored = toJSON ( testingTable ) executeSQLQuery ( "INSERT INTO `Sql` (`test`) VALUES(?)", tableToBeStored ) outputChatBox ( "* The value has been added.", player ) else local tableToBeUsed = fromJSON ( SQL[1].test ) table.insert ( tableToBeUsed, value ) local tableToBeStored = toJSON ( tableToBeUsed ) executeSQLQuery ( "UPDATE `Sql` SET test=?", tableToBeStored ) outputChatBox ( "* The value has been added.", player ) end end ) addCommandHandler ( "removeValue", function ( player, _, value ) local SQL = executeSQLQuery ( "SELECT `test` FROM `Sql`" ) if #SQL == 0 then outputChatBox ( "* No results.", player ) else local tableToBeUsed = fromJSON ( SQL[1].test ) for i, v in ipairs ( tableToBeUsed ) do if v == value then table.remove ( tableToBeUsed, i ) local tableToBeStored = toJSON ( tableToBeUsed ) executeSQLQuery ( "UPDATE `Sql` SET test=?", tableToBeStored ) outputChatBox ( "* The value has been removed.", player ) return end end outputChatBox ( "* The value isn't exist.", player ) end end ) addCommandHandler ( "getValues", function ( player ) local SQL = executeSQLQuery ( "SELECT `test` FROM `Sql`" ) if #SQL == 0 then outputChatBox ( "* No results.", player ) else local tableToBeUsed = fromJSON ( SQL[1].test ) for i, v in ipairs ( tableToBeUsed ) do outputChatBox ( v, player ) end end end ) جرب الكوماندات
  11. 3NAD

    استفسارات عن الجداول ..

    عطني مثال حي للشيء اللي تبي تسويه في قاعدة البيانات ..
  12. 3NAD

    مساعده كود اختفاء

    هذا الكود راح يعمل ثقل كبير على الكلاينت ( يسبب لاق ) ء
  13. 3NAD

    Server list spam

    Hello, I would like to report about a Fake Server that using 6ArH's name ! Real Server: mtasa://51.255.105.230:22004 Fake Server: mtasa://94.177.197.159:27515 Thank you.