Jump to content

Some*1

Members
  • Posts

    26
  • Joined

  • Last visited

  • Days Won

    1

Everything posted by Some*1

  1. addEventHandler ( 'onResourceStart', root, function ( ) executeSQLQuery("CREATE TABLE IF NOT EXISTS _Name( Name, serial )") end ) addEventHandler ( "onPlayerQuit", root, function ( ) local Info = executeSQLQuery ( 'SELECT * FROM _Name WHERE serial=?' , getPlayerSerial ( source ) ) if Info and type(Info) == 'table' and #Info ~= 0 then executeSQLQuery ( "UPDATE _Name SET Name = ? WHERE serial=?", getPlayerName ( source ), getPlayerSerial( source ) ) else executeSQLQuery( "INSERT INTO _Name ( Name, serial ) VALUES( ?, ? )", getPlayerName ( source ), getPlayerSerial ( source ) ) end end ) addEventHandler("onPlayerJoin", root, function ( ) if isChanged ( source ) then outputChatBox ( "#00EE00"..getPlayerName(source):gsub("#%x%x%x%x%x%x","").."#FF0000 x بالخروج من السرفر وتغير اسمه إلي #aaaaaa"..isC:gsub("#%x%x%x%x%x%x","").."#FF0000 x لقد قام الاعب",root, 255, 0, 0, true ) end end ) function isChanged(player) isC = false local Info = executeSQLQuery ( 'SELECT * FROM _Name WHERE serial=?' ,getPlayerSerial ( player )) if Info and type(Info) == 'table' and #Info ~= 0 then for i,v in ipairs (Info) do if v.Name ~= getPlayerName(player) then isC = v.Name break end end end return isC end
  2. ليه عوار الراس ؟ طريقتي فوق سهله , الي عليك انك توزع له فلوس باليد من لوحه الادمنيه او اي طريقه اخرى واذا بغيت تحط تنبيه له سوي تنبيه بالشات مثل اي تنبيه اخر واذا الاعب خرج من السيرفر راح تنحفظ الفلوس الي عنده , يعني الفلوس الي كانت مع الاعب راح تصير في الداتا واذا سجل دخول الفلوس الي في الداتا ترجع له والسلام عليكم
  3. حولها للأكاونت داتا افضل مثال addEventHandler ( 'onPlayerLogin', getRootElement ( ), function (_,acc) local Money = getAccountData ( acc, "Money" ) or "0" if ( Money ) then setPlayerMoney(source,Money) outputChatBox("You Got : $" .. tonumber(Money)) end end ) addEventHandler ( 'onPlayerQuit', getRootElement ( ), function () local Acc = getPlayerAccount ( source ) if ( Acc ) and not isGuestAccount ( Acc ) then local CurrMoney = getPlayerMoney ( source ) setAccountData ( Acc, "Money", tonumber(CurrMoney) ) end end )
  4. خليها لما الاعب يسجل دخول توصل له داتا الفلوس ولما يسجل خروج تنحفظ الداتا على الفلوس الي عنده
  5. : طريقه الاوله سوي قاعده بيانات sql واربطها بالجريد ليست , لما تبي تحذف شخص احذفه من قاعده بيانات وسوي ريفرش للجريد ليست افضل من الطريقه الي مسويها انت : الطريقه الثانيه انت الحين معطي اي شخص يدخل المنطقه داتا الي عليك لما تفتح اللوحه تمسح الجريد ليست وتسوي لوب للاعبين وتشوف الي معه داتا يسجله بالجريد ليست
  6. guiGridListSetItemData ( element gridList, int rowIndex, int columnIndex, var data ) guiGridListGetItemData ( element gridList, int rowIndex, int columnIndex )
  7. من الصور مبين انه شي متعوب عليه رجعه جيده جداََ , واتمنى لكم التوفيق
  8. local row = guiGridListGetSelectedItem ( gridList ) guiGridListRemoveRow ( gridList, row )
  9. "onClientGUIDoubleClick" local text = guiGridListGetItemText ( GridName, guiGridListGetSelectedItem ( GridName ), 1 ) setClipboard( text ) guiGridListRemoveRow ( GridName, row )
  10. مايحتاج لها شرح الاكاونت داتا يعني الداتا المخزنه بالاكاونت يعني اي شخص يسجل دخول بحساب فيه داتا راح تنتقل له الداتا اما الثانيه الي هي إليمنت داتا هذه داتا للإليمنت فقط يعني ماتقدر تنقلها من شخص لشخص عكس الاكاونت اي شخص يسجل دخول تنقل له الداتا اتمنى انك فهمت (:
  11. Small example -- getAccount جلب الحساب سواء كان صاحب الحساب اونلاين او اوفلاين local Acc = getAccount ("AccountName") -- getAccountData جلب داتا المسجل حاليا بالحساب لكي نضيف عليه او ننقص local Money = getAccountData ( Acc, "Money" ) or "0" -- setAccountData تغير قيمه الداتا setAccountData ( Acc, "Money", Money + Value ) -- + or - العمليه الحسابيه ناقص او جمع -- Value المبلغ الحدد
  12. تقدر في حالات محدده - اذا مسوي قاعده بيانات لفلوس اللعيبه عن طريق (SQL) - او عن طريق الداتا (AccountData)
  13. Some*1

    طلب

    اكتب في محرك بحث قوقل وبيطلع لك تلقائي , مثال 5 min to ms
  14. شكرا على التنويه
  15. شوف ردي فوق وبتعرف كيف تجيب جميع الحسابات ثم تسوي لوب لها بعدين تجيب اسم كل حساب واسم لاعب الحساب وجمع القيم في جدول وسوي لها تريقر
  16. -- هذه الاساسيات اظن واضحه وسهله db = dbConnect("sqlite", "database.db") -- انشاء قاعده بيانات dbExec(db, "CREATE TABLE IF NOT EXISTS Commands (Allow,By)") -- انشاء جدول dbExec(db, "INSERT INTO Commands VALUES(?,?)",Command,By) -- اضافه قيمه للجدول dbExec(db, "DELETE FROM Commands WHERE Command = ?", Command) -- حذف قيمه من الجدول dbQuery(db,"SELECT * FROM Commands") -- جلب جميع محتويات الجدول
  17. it's just a name triggerServerEvent ( "GetAccount:All", resourceRoot , localPlayer )
  18. try this --server function GetAccounts (localplayer) local result = getAccounts () local Accounts = {} if result then if(#result ~= 0) then for id, v in ipairs(result) do local AccountName = getAccountName(v) local thePlayer = getAccountPlayer (v) local PlayerName = getPlayerName(thePlayer) table.insert(Accounts,{AccountName,PlayerName}) end triggerClientEvent (localplayer, "Add:GridList", localplayer, Accounts ) end end end addEvent( "GetAccount:All", true ) addEventHandler( "GetAccount:All", resourceRoot, GetAccounts ) --client function SetGridList (Accounts) guiGridListClear (GUIEditor.gridlist[1]) for id, v in ipairs(Accounts) do local row = guiGridListAddRow(GUIEditor.gridlist[1]) local Name = v[2] or "Offline" guiGridListSetItemText(GUIEditor.gridlist[1], row, 1, v[1], false, false) guiGridListSetItemText(GUIEditor.gridlist[1], row, 2, Name , false, false) if Name == "Offline" then guiGridListSetItemColor ( GUIEditor.gridlist[1], row, 2, 255, 0, 0 ) else guiGridListSetItemColor ( GUIEditor.gridlist[1], row, 2, 14, 246, 6) end end end addEvent( "Add:GridList", true ) addEventHandler( "Add:GridList", localPlayer,SetGridList)
  19. --Server dbConnect -- للإتصال بقاعده البيانات dbExec -- إنشاء جدول (الاوامر المسموحه) واضافه قيم له dbQuery & dbPoll -- جلب محتويات الجدول triggerClientEvent -- نقل محتويات الجدول الي الجريد ليست onPlayerCommand -- عند كتابه امر cancelEvent() -- إلغاء الحدث --Client guiGridListClear -- مسح محتويات الجريد ليست guiGridListAddRow -- إضافه رو للجريد ليست guiGridListSetItemText -- وضع قيمه للرو triggerServerEvent -- نقل الاوامر المسموحه واضافتها للجدول
  20. السلام عليكم ورحمة الله وبركاتة بدون مقدمات كثيره , حاب اطرح لكم برنامج يفيد المبرمجين يجلب لك اسم وصفحه الويكي حقت الفنكشن من اول كم حرف له , مع الصور راح تفهمون اكثر لغه البرمجه : vb.net الصور : 1- واجهة البرنامج 2- طريقه عمل البرنامج اظن الفكره واضحه ومايحتاج لها شرح كثير رابط التحميل Download Qx3 : حقوق البرمجة اذا الموضوع في القسم الخطأ ارجو نقله للقسم الصحيح*
  21. --First function local TeamTerroists = getTeamFromName("Terroists") setPlayerTeam(D1, TeamTerroists) --Second function local TeamMilitary = getTeamFromName("Military") setPlayerTeam(D2, TeamMilitary) or --First setPlayerTeam(D1,Dabl) --Second setPlayerTeam(D2,Dab2)
×
×
  • Create New...