#,+( _xiRoc[K]; >

Members
  • Content count

    1,405
  • Joined

  • Last visited

  • Days Won

    1

#,+( _xiRoc[K]; > last won the day on July 13

#,+( _xiRoc[K]; > had the most liked content!

Community Reputation

118 Excellent

4 Followers

About #,+( _xiRoc[K]; >

Details

  • Gang
    Straw Hat Crew
  • Location
    Bahrain

Recent Profile Visitors

1,710 profile views
  1. تحت التطوير :كود - Useful Arab functions

    @Abdul KariM صحيح كلامك لكن ماتوقع انك تقدر تستخدمها ع التيبلات الي كذا : { [2] = 1 ,[21] =2 , [23] =3 ,[12] = 4 }
  2. تحت التطوير :كود - Useful Arab functions

    بسم الله الرحمن الرحيم string.toTable or itemsToTable الوضيفة واضحة من الأسم تحويل السترنق الى تيبل الفنكشن عكس الفنكشن الي فوق _________________________________ string.toTable Syntax : string.toTable ( string textString, string separatingChar ) _________________________________ itemsToTable Syntax : itemsToTable ( mixed arguments... ) _________________________________ string.toTable Source Code : function string.toTable ( str, char ) assert ( type ( str ) == 'string', 'expected table at argument 1 got ' .. type ( str ) ) assert ( type ( char ) == 'string', 'expected string at argument 2 got ' .. type ( char ) ) assert ( char:len ( ) <= 2, 'expected charcter at argument 2 got ' .. char ) local s = { }; local charSplit = split ( str, char ) for k, v in pairs ( charSplit ) do table [ 'insert' ] ( s, v ) end return s; end _________________________________ itemsToTable Source Code : function itemstoTable ( ... ) if ( ... ) then local s = { }; for k, v in pairs ( { ... } ) do table [ 'insert' ] ( s, v ) end return s; end return false end _________________________________ Example ( string.toTable Source Code ) : function string.toTable ( str, char ) assert ( type ( str ) == 'string', 'expected table at argument 1 got ' .. type ( str ) ) assert ( type ( char ) == 'string', 'expected string at argument 2 got ' .. type ( char ) ) assert ( char:len ( ) <= 2, 'expected charcter at argument 2 got ' .. char ) local s = { }; local charSplit = split ( str, char ) for k, v in ipairs ( charSplit ) do table [ 'insert' ] ( s, v ) end return s; end local tablee = string.toTable ( 'FIRST, a, b, c, LAST', ', ' ) -- { 'FIRST', 'a', 'b', 'c', 'LAST' } for _,v in ipairs(tablee)do if(_==1)then print(v..':') elseif(_~=#tablee and _~=1)then print(v..', ') elseif(_==#tablee)then print(v..'.') end end--[[ FIRST: a, b, c, LAST. ]] _________________________________ Example ( itemsToTable Source Code ) : function itemsToTable ( ... ) if ( ... ) then local s = { }; for k, v in pairs ( { ... } ) do table [ 'insert' ] ( s, v ) end return s; end return false end local tablee1 = itemsToTable ( 'a', 'b', 'c' ) -- { 'a', 'b', 'c' } for k, v in ipairs ( tablee1 ) do print ( v ) --[[ a b c ]] end _________________________________ طريقة الأستخدام بسيطة مثلا عندي هذا السترنق ( السورس كود الأول )ء '1;2;3' ابيه يكون على شكل تيبل كذا : table1 = { '1', '2', '3' } نسوي كذا table1 = string.toTable ( '1;2;3', ';' ) -- { '1', '2', '3' } _________________________________ او تقدر تسوي كذا بالسورس كود الثاني : table1 = itemsToTable ( '1', '2', '3' ) -- { '1', '2', '3' }
  3. المود ابداع واصل وحاول تضيف مميزات اكثر وشكرا ع الاهداء
  4. مشكلة في مود تاب

    فيه خطأ في المود يمكن في الميتا او يمكن المود مو موجود مود ( scoreboard )
  5. تحت التطوير :كود - Useful Arab functions

    بسم الله الرحمن الرحيم table.toString وضيفة تحويل الجدول الى سترنق Syntax : table.toString ( table theTable, string separatingChar ) source Code : function table.toString ( theTable, char ) assert ( type ( theTable ) == 'table', 'expected table at argument 1 got ' .. type ( theTable ) ) assert ( type ( char ) == 'string', 'expected string at argument 2 got ' .. type ( char ) ) assert ( char:len ( ) <= 2 and char:len ( ) >= 1, 'expected charcter at argument 3 got ' .. char ) local m = ''; for k, v in pairs ( theTable ) do if ( k == #theTable ) then m = m .. v else m = m .. v .. char end end return m; end Example : function table.toString ( theTable, char ) assert ( type ( theTable ) == 'table', 'expected table at argument 1 got ' .. type ( theTable ) ) assert ( type ( char ) == 'string', 'expected string at argument 2 got ' .. type ( char ) ) assert ( char:len ( ) <= 2 and char:len ( ) >= 1, 'expected charcter at argument 3 got ' .. char ) local m = ''; for k, v in pairs ( theTable ) do if ( k == #theTable ) then m = m .. v else m = m .. v .. char end end return m; end local example1 = { 'a', 'b', 'c' }; print ( table.toString ( example1, ', ' ) ) -- a, b, c
  6. مشكلة غريبة فالجريد ليست

    قلت لك مايحتاج اكثر من صورة بس استخدم صورة واحدة ليش مسوي im2 im2 im3 im4 بس استخدم صورة واحدة لاتستخدم اكثر من واحدة واحدة تكفي
  7. مشكلة غريبة فالجريد ليست

    ليش مسوي هالزحمة تقدر تسوي صورة واحدة وتستخدم guiStaticImageLoadImage بدل انك تستخدم guiSetVisible بشكل متكرر ماشوف انك غيرت شي في كوده
  8. مشكلة غريبة فالجريد ليست

    وش تبي تسوي بالضبط ؟
  9. x[ مساعدة ]x دي اكس

    هذا مثال + متأكد انك غيرت احداثيات الشاشة ؟
  10. هيلب في كود

    تعديل بسيط : addEventHandler ( 'onPlayerDamage', root, function ( atk, atkwp, bodypart, loss ) if ( atkwp == 34 ) then if ( bodypart == 9 ) outputChatBox ( 'Head Shot', source, 255, 0, 0, true ) setElementHealth ( source, 0 ) end else if ( bodypart == 9 ) then setElementHealth ( source, getElementHealth ( source ) + loss ) end end end )
  11. هيلب في كود

  12. هيلب في كود

    getIDFromName = ? جرب كذا : addEventHandler ( 'onPlayerDamage', root, function ( atk, atkwp, bodypart, attacker ) if ( atkwp == 34 and bodypart == 9 ) outputChatBox ( 'Head Shot', source, 255, 0, 0, true ) setElementHealth ( source, 0 ) end end )
  13. حصريا mta notepad++

    عندي اضافة بسيطة بس الي يبي الأخطاء دقيقة في الديبق يستبدل فنكشن addDebug بهذا function addDebug(msg,lv,file,line) if ( lv == 0 or lv == 3 ) then lv = 'INFO : ' elseif ( lv == 1 ) then lv = 'ERROR : ' elseif ( lv == 2 ) then lv = 'WARNING : ' end guiSetText(GUIEditor.memo[2],guiGetText(GUIEditor.memo[2])..lv..msg..' at line '..line..'\n') guiMemoSetCaretIndex(GUIEditor.memo[2],#guiGetText(GUIEditor.memo[2])) end
  14. مساعده

    الطلب الثاني : 'onClientGUIAccepted'
  15. تعديل كود فتح البوابه لرتبة معينة *

    قرأت ردي فوق ؟ https://forum.mtasa.com/topic/33407-list-of-predefined-variables/ http://prntscr.com/gogxjn