Jump to content

+Source|>

Members
  • Posts

    1,388
  • Joined

  • Last visited

  • Days Won

    14

Everything posted by +Source|>

  1. local sH, sW = guiGetScreenSize() wndnk = guiCreateWindow( ( sH - 554 ) / 2, ( sW - 569 ) / 2, 554, 569, "Tag Up Head | تاق فوق الرأس", false) guiWindowSetSizable(wndnk, false) guiSetAlpha(wndnk, 0.99) guiSetVisible( wndnk, false ) nk = guiCreateStaticImage(10, 41, 207, 509, "nk.png", false, wndnk) lbl11 = guiCreateLabel(289, 51, 143, 15, "خــاصية التاق فوق الرأس ...", false, wndnk) guiLabelSetColor(lbl11, 254, 0, 0) lbl22 = guiCreateLabel(236, 76, 251, 16, "خاصية لكتابة اي اسم وبأي لون فوق رأس اللاعب.", false, wndnk) guiLabelSetColor(lbl22, 41, 253, 0) lbl33 = guiCreateLabel(236, 114, 251, 19, "يتم شراء الخاصية عن طريق دفع 10 مليون لشرائها", false, wndnk) guiLabelSetColor(lbl33, 41, 253, 0) lbl44 = guiCreateLabel(241, 157, 241, 19, "إذا كنت تملك 10 مليون وترغب في شراء تاق ..", false, wndnk) guiLabelSetColor(lbl44, 41, 253, 0) lbl55 = guiCreateLabel(236, 195, 251, 19, "الرجاء كتابة إسم التاج الذي تريده في هذا المربع .", false, wndnk) guiLabelSetColor(lbl55, 41, 253, 0) lbl66 = guiCreateLabel(287, 239, 149, 18, "وقم بالضغط على زر متابعة....", false, wndnk) guiLabelSetColor(lbl66, 41, 253, 0) nkedit1 = guiCreateEdit(226, 286, 275, 31, "إسم التاج ؟", false, wndnk) nkedit2 = guiCreateEdit(226, 333, 275, 31, "كود اللون ؟", false, wndnk) lbl77 = guiCreateLabel(226, 374, 318, 19, "ملاحظة : في حال عدم كتابة كود لون سيتم وضعه للون الأبيض", false, wndnk) guiLabelSetColor(lbl77, 252, 0, 0) con = guiCreateButton(284, 403, 160, 34, "مـتـابـعـة", false, wndnk) guiSetProperty(con, "NormalTextColour", "FF17FD00") closenk = guiCreateButton(284, 447, 160, 34, "إلــغــاء", false, wndnk) guiSetProperty(closenk, "NormalTextColour", "FFFB0000") اكواد اللوحه اللي يروح لها الكود local sH2, sW2 = guiGetScreenSize() wndman = guiCreateWindow( ( sH2 - 558 ) / 2, ( sW2 - 442 ) / 2, 558, 442, "Tag Manager", false) guiWindowSetSizable(wndman, false) guiSetAlpha(wndman, 1.00) guiSetVisible( wndman, false ) done = guiCreateButton(355, 191, 167, 38, "Done", false, wndman) guiSetProperty(done, "NormalTextColour", "FF35FA00") grdnk = guiCreateGridList(9, 24, 313, 408, false, wndman) guiGridListAddColumn(grdnk, "Players", 0.3) guiGridListAddColumn(grdnk, "Tag", 0.3) guiGridListAddColumn(grdnk, "Color", 0.3) guiGridListSetSortingEnabled( grdnk, false ) Cancel = guiCreateButton(355, 239, 167, 38, "Delete", false, wndman) guiSetProperty(Cancel, "NormalTextColour", "FFF90000")
  2. addEvent ( 'AddInGrid' , true ) addEventHandler ( 'AddInGrid' , root , function( Table ) guiGridListClear( grdnk ) for i, v in ipairs( Table ) do local Row = guiGridListAddRow( grdnk ) guiGridListSetItemText( grdnk, Row, 2, v [ 'NK1' ] , false, false ) end end ) addEventHandler("onClientGUIClick", root, function( ) local NK1 = guiGetText( nkedit1 ) local NKC = guiGetText( nkedit2 ) if source == con then triggerServerEvent ( 'add' , localPlayer , NK1 ) end end ) addEvent("openM", true) addEventHandler("openM", root, function() if guiGetVisible( wndman ) then guiSetVisible( wndman, false ) showCursor( false ) guiSetInputEnabled( false ) else guiSetVisible( wndman, true ) showCursor( true ) guiSetInputEnabled( true ) triggerServerEvent ( 'Refresh_' , localPlayer ) end end )
  3. طيب ما يطلع شي بالجريد ليست addEvent ( 'AddInGrid' , true ) addEventHandler ( 'AddInGrid' , root , function( Table ) guiGridListClear( grdnk ) for i, v in ipairs( Table ) do local Row = guiGridListAddRow( grdnk ) guiGridListSetItemText( grdnk, Row, 2, v [ 'NK1' ] , false, false ) end end )
  4. سيبكم من اللي فوقق كلهههههه خلكم هنا شوفو الاكواد addEventHandler("onResourceStart", root, function() executeSQLQuery( "CREATE TABLE IF NOT EXISTS `save` ( NK, Serial )" ) end ) addEvent("add", true) addEventHandler("add", root, function( NK1 ) local ssr = getPlayerSerial( source ) if NK1 then executeSQLQuery( "INSERT INTO `save` ( NK, Serial ) VALUES( ? , ? )", NK1, ssr ) triggerEvent ( 'Refresh_' , source ) end end ) addEvent ( 'Refresh_' , true ) addEventHandler ( 'Refresh_' , root , function () local aSQL2 = executeSQLQuery ( 'SELECT * FROM `save` WHERE Serial=?' , getPlayerSerial ( source ) ) if ( type ( aSQL2 ) == 'table' and #aSQL2 == 0 or not aSQL2 ) then triggerClientEvent ( source, 'AddInGrid' , source , aSQL2 ) end end ) وصورة المشكله
  5. addEventHandler("onResourceStart", root, function() executeSQLQuery( "CREATE TABLE IF NOT EXISTS save ( NK, NKC, Serial )" ) end ) addEvent("add", true) addEventHandler("add", root, function( NK, NKC ) local aSerial = getPlayerSerial( source ) if NK and NKC then executeSQLQuery( "INSERT INTO save ( NK, NKC, Serial ) VALUES( ? , ?, ? )", NK, NKC, aSerial ) triggerEvent ( 'Refresh_' , source ) end end ) addEvent ( 'Refresh_' , true ) addEventHandler ( 'Refresh_' , root , function () local aSQL2 = executeSQLQuery ( 'SELECT * FROM save WHERE Serial=?' , getPlayerSerial ( source ) ) if #aSQL2 ~= 0 then triggerClientEvent ( source, 'AddInGrid' , source , aSQL2 ) end end ) addEvent ( 'AddInGrid' , true ) addEventHandler ( 'AddInGrid' , root , function( Table ) local NK = guiGetText( nkedit1 ) local NKC = guiGetText( nkedit2 ) guiGridListClear( grdnk ) for i, v in ipairs( Table ) do local Row = guiGridListAddRow( grdnk ) guiGridListSetItemText( grdnk, Row, 2, v [ 'NK' ] , false, false ) guiGridListSetItemText( grdnk, Row, 3, v [ 'NKC' ], false, false ) end end ) وش المشكلة ؟؟؟
  6. الجريد ليست ما ينحفظ --server addEvent("sql", true) addEventHandler("sql", root, function() executeSQLQuery( "CREATE TABLE IF NOT EXISTS save (Players TEXT, Tag TEXT, Color TEXT)" ) end ) -- client addEventHandler( "onClientGUIClick", root, function() local NK = guiGetText( nkedit1 ) local NKC = guiGetText( nkedit2 ) if source == con then guiGridListClear( grdnk ) for i, v in ipairs( getElementsByType( 'player' ) ) do local Row = guiGridListAddRow( grdnk ) guiGridListSetItemText( grdnk, Row, 1, tostring( getPlayerName( v ) ):gsub( "%x%x%x%x%x%x", "" )..",", false, false ) guiGridListSetItemText( grdnk, Row, 2, NK..",", false, false ) guiGridListSetItemText( grdnk, Row, 3, NKC..",", false, false ) triggerServerEvent( "sql", localPlayer ) end end end ) هل صحيح ؟
  7. والله هالمشكلة كانت معي وغيرت الفريروم وظبط
  8. هذا منتدى للتعلم والتعليم ومافي ذل هنا حن نبيك تتعلم اي خطأ او مساعده معك ضعها في هذا المنتدى
  9. يعني انا لو ابي احفظ جريد ليست وش اكتب
  10. اول طلب --Client guiSetEnabled addEvent addEventHandler --Server isObjectInACLGroup aclGetGroup getAccountName getPlayerAccount triggerClientEvent اعتقد بس الطلب الثاني اعتقد تحتاج السكل
  11. صدقة يب الله شوف كم ب في موضوعه ههههه
  12. هات اللكود اللي فيه الغلط والديبق
  13. يب يب عطني اكواد فتح اللوحه جيب اكواد فتح اللوحه
  14. الطلب الأول --client onClientGUIClick guiGridListGetItemText guiGridListGetSelectedItem triggerServerEvent --server destroyElement أعتقد بس الطلب الثالث gridList = grid -- اسم القريد ليست حقك addEventHandler ( 'onClientResourceStart', resourceRoot, function ( ) Refresh ( ) end ) function Refresh ( ) guiGridListClear ( grid ) for i, v in ipairs ( getElementsByType ( 'player' ) ) do local Row = guiGridListAddRow ( grid ) guiGridListSetItemText ( grid, Row, 1, tostring ( getPlayerName ( v ) ), false, false ) guiGridListSetItemColor ( grid, Row, 1, 0, 255, 0 ) end end والله مدري تأكد من اسم الجريد ليست
  15. +Source|>

    سأل

    local bl = { {"22","5"}, } addEventHandler ( 'onClientGUIClick', root, function ( ) if ( source == b1 ) then for i, v in ipairs ( bl ) do if ( guiGridListGetItemText ( g1, guiGridListGetSelectedItem ( g1 ), 1 ) ) then setPlayerMoney ( 111 ) end end end end ) اعتقد شغال غير مجرب
×
×
  • Create New...