#AL-J7EEEM

السلام عليكم ورحمه الله وبركاته الحين انا مسوي قريد ليست فيها 2 كلومن واحده ابيها تجيب اسم الحساب والثانيه داتا معينه مثلا داتا الفلوس وابي انه مايجيب اسم الحساب والا لم يكون الحساب فيه مثلا 500 الف ابي فنكشات + امثاله لها لو سمحتم

ممكن توضيح للاثنين؟ + مثال لاهنتم

السلام عليكم ورحمه الله وبركاته انا مسوي قريد ليست ابيها تجيب اسماء الحسابات وعدد داتا انا بحطها مثلا اسم الحساب وجانبه الفلوس وانا بحط اسم الداتا الي بتيجي جانب اسم الحساب مثلا aMoney اظن فهمتوني

تم الافاده الرجاء اقفال الموضوع

الحين انا سويت لوحه ... لسا مابرمجتها المهم , انا الحين مسوي انها تفتح من لوحه اخري من زر تمام؟ سويت الزر وكل شي تمام والوحه تفتح بس لم اجي اقفلها تنقفل والمؤشر حق الماوس مايروح الاكواد addEventHandler( "onClientGUIClick", root, function( ) if ( source == close_ ) then guiSetVisible( wnd_manager , false) showCursor( false ) end end ) --------------------------- addEventHandler("onClientResourceStart", resourceRoot, function() wnd_manager = guiCreateWindow(171, 190, 406, 328, "Management System", false) guiWindowSetSizable(wnd_manager, false) guiSetAlpha(wnd_manager, 1.00) guiSetVisible(wnd_manager,false) gridlist2 = guiCreateGridList(9, 20, 155, 300, false, wnd_manager) guiGridListAddColumn(gridlist2, "Account", 0.5) guiGridListAddColumn(gridlist2, "Diamond", 0.5) guiGridListAddRow(gridlist2) guiGridListSetItemText(gridlist2, 0, 1, "", false, false) guiGridListSetItemText(gridlist2, 0, 2, "", false, false) delete = guiCreateButton(170, 40, 222, 30, "Delete Diamond Player", false, wnd_manager) guiSetProperty(delete, "NormalTextColour", "FFFB4903") show = guiCreateButton(170, 76, 222, 30, "Show All Diamond And Account Chat", false, wnd_manager) guiSetProperty(show, "NormalTextColour", "FFFB4903") close_ = guiCreateButton(323, 271, 73, 47, "Close", false, wnd_manager) guiSetFont(close_, "sa-header") guiSetProperty(close_, "NormalTextColour", "FFFF0000") end )

addEventHandler("onClientGUIClick",root, function () if source == system then if ( guiGetVisible(wnd_manager) == false ) then guiSetVisible(wnd,false) showCursor(false) guiSetInputEnabled(false) end guiSetVisible(wnd_manager,not guiGetVisible(wnd_manager)) showCursor(guiGetVisible(wnd_manager)) guiSetInputEnabled(guiGetVisible(wnd_manager)) end end ) المحاوله حقتي كذا تمام؟ الحين في مشكله لم اضعط الزر الوحه تفتح تمام بس مايجي الازرار او شي

مثال لو سمحت

ابي فنكشن اني لم اسوي زر ابيه يفتح لوحه اخري ,,,,

السلام عليكم ورحمه الله وبركاته النجوم ماتظهر هي والفلوس في سيررفر الحرب العصابات ممكن حل؟

يا اخوان انا صاحب السيرفر بس النجوم والفلوس ماتظهر واوزع فلوس ماتظهر اجي احط بل بنك تظهر في البنك فقط وش الحل؟

السلام عليكم ورحمه الله وبركاته النجوم ماتظهر هي والفلوس في سيررفر الحرب العصابات ممكن حل؟

ممكن تجيب رابط الموضوع او تساعدني

السلام عليكم ممكن حد يحطلي ليبل في مود يعني ابي اليبل يجيب اسم الحساب الشخص الي رسل والمود هو مود شراء المود حق مستر جراند انا ماعرفت احط تصميمه اليبل فا اسف بتعبكم معي Photo = {} WND = {} Close = {} local screenW, screenH = guiGetScreenSize() WND.ShowWindow = guiCreateWindow((screenW - 746) / 2, (screenH - 519) / 2, 746, 519, "", false) guiWindowSetSizable(WND.ShowWindow, false) guiSetAlpha(WND.ShowWindow, 1.00) guiSetProperty(WND.ShowWindow, "CaptionColour", "FFFE00E9") guiSetVisible(WND.ShowWindow, false) Photo.ShowWindow = guiCreateStaticImage(10, 22, 726, 455, "ShowPhoto.png", false, WND.ShowWindow) guiSetAlpha(Photo.ShowWindow, 0.75) Close.ShowWindow = guiCreateButton(635, 483, 101, 26, "X", false, WND.ShowWindow) guiSetFont(Close.ShowWindow, "default-bold-small") guiSetProperty(Close.ShowWindow, "NormalTextColour", "FFFE0000") Players = { GridList = {} } cardType = { Label = {} } DeleteAll = { Button = {} } CardsNumbers = { GridList = {} } X = { Button = {} } BuyingManager = {} CopySerial = { Button = {} } TotalPrice = { Label = {} } PlayerSerial = { Label = {} } CardNumber = { Edit4 = {}, Edit5 = {}, Edit1 = {}, Edit6 = {}, Edit3 = {}, Edit2 = {} } CardNumbers = { Label = {} } CARTSNote = { Label = {} } Mobily = { Selection = {} } GUIEditor = { button = {}, label = {} } BuyType = { Label = {} } ShowBuyWindow = { Button = {} } STC = { Selection = {} } EnteredPasswordStatus = { Label = {} } Items = { GridList = {} } X = { Button = {} } StatusNote = { Label = {} } cashU = { Selection = {} } TypeToBuy = { Label = {} } Password = { Label = {}, Edit = {} } SentMyInfo = { Button = {} } Buy = {} local screenW, screenH = guiGetScreenSize() Buy.BuyWND = guiCreateWindow((screenW - 740) / 2, (screenH - 460) / 2, 740, 460, "[System Buy]", false) guiWindowSetSizable(Buy.BuyWND, false) guiSetAlpha(Buy.BuyWND, 1.00) guiSetProperty(Buy.BuyWND, "CaptionColour", "FFE400CC") guiSetVisible(Buy.BuyWND, false) GUIEditor.label[1] = guiCreateLabel(603, 30, 127, 22, "", false, Buy.BuyWND) guiSetFont(GUIEditor.label[1], "default-bold-small") guiLabelSetColor(GUIEditor.label[1], 56, 255, 35) guiLabelSetHorizontalAlign(GUIEditor.label[1], "center", false) guiLabelSetVerticalAlign(GUIEditor.label[1], "center") GUIEditor.label[2] = guiCreateLabel(26, 67, 704, 72, "الاداره غير مسؤوله عن اي تعاملات ماديه خارج هذي الوحه", false, Buy.BuyWND) guiSetFont(GUIEditor.label[2], "default-bold-small") guiLabelSetColor(GUIEditor.label[2], 0, 27, 233) guiLabelSetHorizontalAlign(GUIEditor.label[2], "right", false) GUIEditor.label[3] = guiCreateLabel(668, 149, 62, 23, "حالة البيع :", false, Buy.BuyWND) guiSetFont(GUIEditor.label[3], "default-bold-small") guiLabelSetColor(GUIEditor.label[3], 247, 244, 0) guiLabelSetHorizontalAlign(GUIEditor.label[3], "right", false) guiLabelSetVerticalAlign(GUIEditor.label[3], "center") StatusNote.Label.BuyWND = guiCreateLabel(593, 149, 72, 23, "مفتوح الان .!", false, Buy.BuyWND) guiSetFont(StatusNote.Label.BuyWND, "default-bold-small") guiLabelSetHorizontalAlign(StatusNote.Label.BuyWND, "right", false) guiLabelSetVerticalAlign(StatusNote.Label.BuyWND, "center") Password.Label.BuyWND = guiCreateLabel(356, 149, 235, 23, "| قم بأدخال كلمة السر لدخول لوحة الشراء :", false, Buy.BuyWND) guiSetFont(Password.Label.BuyWND, "default-bold-small") guiLabelSetColor(Password.Label.BuyWND, 0, 247, 29) guiLabelSetHorizontalAlign(Password.Label.BuyWND, "center", false) guiLabelSetVerticalAlign(Password.Label.BuyWND, "center") Password.Edit.BuyWND = guiCreateEdit(234, 149, 122, 23, "", false, Buy.BuyWND) GUIEditor.button[1] = guiCreateButton(94, 149, 138, 23, "الدخول للوحة الشراء", false, Buy.BuyWND) guiSetFont(GUIEditor.button[1], "default-bold-small") guiSetProperty(GUIEditor.button[1], "NormalTextColour", "FF00F71D") EnteredPasswordStatus.Label.BuyWND = guiCreateLabel(10, 178, 222, 21, "* خطأ : كلمة السر التي ادخلتها خاطئة .!", false, Buy.BuyWND) guiSetFont(EnteredPasswordStatus.Label.BuyWND, "default-bold-small") guiLabelSetColor(EnteredPasswordStatus.Label.BuyWND, 247, 0, 0) guiLabelSetHorizontalAlign(EnteredPasswordStatus.Label.BuyWND, "center", false) guiLabelSetVerticalAlign(EnteredPasswordStatus.Label.BuyWND, "center") TypeToBuy.Label.BuyWND = guiCreateLabel(601, 209, 129, 24, "- الشيء المراد شرائه :", false, Buy.BuyWND) guiSetFont(TypeToBuy.Label.BuyWND, "default-bold-small") guiLabelSetColor(TypeToBuy.Label.BuyWND, 211, 194, 43) guiLabelSetHorizontalAlign(TypeToBuy.Label.BuyWND, "right", false) guiLabelSetVerticalAlign(TypeToBuy.Label.BuyWND, "center") Items.GridList.BuyWND = guiCreateGridList(416, 243, 314, 197, false, Buy.BuyWND) guiGridListAddColumn(Items.GridList.BuyWND, "# النوع", 0.3) guiGridListAddColumn(Items.GridList.BuyWND, "# الخطة", 0.3) guiGridListAddColumn(Items.GridList.BuyWND, "# السعر", 0.3) CardNumbers.Label.BuyWND = guiCreateLabel(277, 243, 129, 24, "- ارقام بطائق الشحن :", false, Buy.BuyWND) guiSetFont(CardNumbers.Label.BuyWND, "default-bold-small") guiLabelSetColor(CardNumbers.Label.BuyWND, 211, 194, 43) guiLabelSetHorizontalAlign(CardNumbers.Label.BuyWND, "right", false) guiLabelSetVerticalAlign(CardNumbers.Label.BuyWND, "center") CardNumber.Edit1.BuyWND = guiCreateEdit(10, 273, 188, 26, "", false, Buy.BuyWND) guiSetFont(ShowBuyWindow.Button.BuyWND, "default-bold-small") guiSetProperty(ShowBuyWindow.Button.BuyWND, "NormalTextColour", "FFE700DA") guiSetFont(GUIEditor.label[4], "default-bold-small") guiLabelSetColor(GUIEditor.label[4], 56, 255, 35) guiLabelSetHorizontalAlign(GUIEditor.label[4], "right", false) guiLabelSetVerticalAlign(GUIEditor.label[4], "center") SentMyInfo.Button.BuyWND = guiCreateButton(227, 415, 179, 25, "إرسال المعلومات", false, Buy.BuyWND) guiSetFont(SentMyInfo.Button.BuyWND, "default-bold-small") guiSetProperty(SentMyInfo.Button.BuyWND, "NormalTextColour", "FF0AE600") X.Button.BuyWND = guiCreateButton(10, 415, 86, 25, "X", false, Buy.BuyWND) guiSetFont(X.Button.BuyWND, "default-bold-small") guiSetProperty(X.Button.BuyWND, "NormalTextColour", "FFE50000") BuyType.Label.BuyWND = guiCreateLabel(325, 210, 81, 23, "- طريقة الدفع : ", false, Buy.BuyWND) guiSetFont(BuyType.Label.BuyWND, "default-bold-small") guiLabelSetColor(BuyType.Label.BuyWND, 211, 194, 43) guiLabelSetHorizontalAlign(BuyType.Label.BuyWND, "right", false) guiLabelSetVerticalAlign(BuyType.Label.BuyWND, "center") STC.Selection.BuyWND = guiCreateCheckBox(247, 210, 78, 23, "سوا | STC", false, false, Buy.BuyWND) guiSetFont(STC.Selection.BuyWND, "default-bold-small") cashU.Selection.BuyWND = guiCreateCheckBox(131, 210, 111, 23, "اتصالات مصر| Etisalat", false, false, Buy.BuyWND) guiSetFont(cashU.Selection.BuyWND, "default-bold-small") Mobily.Selection.BuyWND = guiCreateCheckBox(10, 210, 111, 23, "موبايلي | Mobily", false, false, Buy.BuyWND) guiSetFont(Mobily.Selection.BuyWND, "default-bold-small") CardNumber.Edit2.BuyWND = guiCreateEdit(218, 273, 188, 26, "", false, Buy.BuyWND) CardNumber.Edit3.BuyWND = guiCreateEdit(10, 305, 188, 26, "", false, Buy.BuyWND) CardNumber.Edit4.BuyWND = guiCreateEdit(218, 305, 188, 26, "", false, Buy.BuyWND) CardNumber.Edit5.BuyWND = guiCreateEdit(10, 336, 188, 26, "", false, Buy.BuyWND) CardNumber.Edit6.BuyWND = guiCreateEdit(218, 336, 188, 26, "", false, Buy.BuyWND) CARTSNote.Label.BuyWND = guiCreateLabel(20, 367, 386, 27, "ملاحظة : في حال وجود بطاقة واحدة فقط قم بأدخال مربع واحد فقط !", false, Buy.BuyWND) guiSetFont(CARTSNote.Label.BuyWND, "default-bold-small") guiLabelSetColor(CARTSNote.Label.BuyWND, 255, 0, 0) guiLabelSetHorizontalAlign(CARTSNote.Label.BuyWND, "right", false) guiLabelSetVerticalAlign(CARTSNote.Label.BuyWND, "center") addEventHandler( 'onClientMouseEnter', root, function() if (source == Photo.ShowWindow) then guiSetAlpha(Photo.ShowWindow, 1.00) end end ) addEventHandler( 'onClientMouseLeave', root, function() if (source == Photo.ShowWindow) then guiSetAlpha(Photo.ShowWindow, 0.75) end end ) addEventHandler( 'onClientGUIClick', root, function() if (source == ShowBuyWindow.Button.BuyWND) then guiSetVisible(WND.ShowWindow, true) guiSetVisible(Buy.BuyWND, false) elseif (source == Close.ShowWindow) then guiSetVisible(WND.ShowWindow, false) guiSetVisible(Buy.BuyWND, true) end end ) function showTotalWND() guiSetVisible(TypeToBuy.Label.BuyWND, true) guiSetVisible(Items.GridList.BuyWND, true) guiSetVisible(CardNumbers.Label.BuyWND, true) guiSetVisible(SentMyInfo.Button.BuyWND, true) guiSetVisible(BuyType.Label.BuyWND , true) guiSetVisible(STC.Selection.BuyWND, true) guiSetVisible(cashU.Selection.BuyWND, true) guiSetVisible(Mobily.Selection.BuyWND, true) guiSetVisible(CardNumber.Edit1.BuyWND, true) guiSetVisible(CardNumber.Edit2.BuyWND, true) guiSetVisible(CardNumber.Edit3.BuyWND, true) guiSetVisible(CardNumber.Edit4.BuyWND, true) guiSetVisible(CardNumber.Edit5.BuyWND, true) guiSetVisible(CardNumber.Edit6.BuyWND, true) guiSetVisible(CARTSNote.Label.BuyWND, true) end function hideTotalWND() guiSetText(StatusNote.Label.BuyWND, "مغلق الان .!") guiSetVisible(Password.Label.BuyWND, true) guiSetVisible(Password.Edit.BuyWND, true) guiSetVisible(GUIEditor.button[1], true) guiSetVisible(EnteredPasswordStatus.Label.BuyWND, false) guiSetVisible(TypeToBuy.Label.BuyWND, false) guiSetVisible(Items.GridList.BuyWND, false) guiSetVisible(CardNumbers.Label.BuyWND, false) guiSetVisible(SentMyInfo.Button.BuyWND, false) guiSetVisible(BuyType.Label.BuyWND , false) guiSetVisible(STC.Selection.BuyWND, false) guiSetVisible(cashU.Selection.BuyWND, false) guiSetVisible(Mobily.Selection.BuyWND, false) guiSetVisible(CardNumber.Edit1.BuyWND, false) guiSetVisible(CardNumber.Edit2.BuyWND, false) guiSetVisible(CardNumber.Edit3.BuyWND, false) guiSetVisible(CardNumber.Edit4.BuyWND, false) guiSetVisible(CardNumber.Edit5.BuyWND, false) guiSetVisible(CardNumber.Edit6.BuyWND, false) guiSetVisible(CARTSNote.Label.BuyWND, false) end addEventHandler( 'onClientGUIClick', root, function() if (source == SentMyInfo.Button.BuyWND) then if (guiCheckBoxGetSelected(STC.Selection.BuyWND) == false and guiCheckBoxGetSelected(cashU.Selection.BuyWND) == false and guiCheckBoxGetSelected(Mobily.Selection.BuyWND) == false) then outputChatBox('* خطأ : #FFFFFF يجب ان تقوم بتحديد طريقة الدفع لأكمال عملية الشراء بنجاح !', 255, 0, 0, true) return end local getItemSelected = guiGridListGetItemText(Items.GridList.BuyWND, guiGridListGetSelectedItem(Items.GridList.BuyWND), 1) if (not getItemSelected or getItemSelected == "") then outputChatBox('* خطأ : #FFFFFF يجب ان تقوم بتحديد نوع وخطة الشيء المراد شرائه !', 255, 0, 0, true) return end local getitemsfromSELECTED = guiGridListGetSelectedItem(Items.GridList.BuyWND) local BoutghType = guiGridListGetItemText(Items.GridList.BuyWND, getitemsfromSELECTED, 1) local BoutghPlan = guiGridListGetItemText(Items.GridList.BuyWND, getitemsfromSELECTED, 2) local BoutghPrice = guiGridListGetItemText(Items.GridList.BuyWND, getitemsfromSELECTED, 3) local CARDnumber1 = guiGetText(CardNumber.Edit1.BuyWND) local CARDnumber2 = guiGetText(CardNumber.Edit2.BuyWND) local CARDnumber3 = guiGetText(CardNumber.Edit3.BuyWND) local CARDnumber4 = guiGetText(CardNumber.Edit4.BuyWND) local CARDnumber5 = guiGetText(CardNumber.Edit5.BuyWND) local CARDnumber6 = guiGetText(CardNumber.Edit6.BuyWND) local getID1 = guiEditGetCaretIndex (CardNumber.Edit1.BuyWND) local getID2 = guiEditGetCaretIndex (CardNumber.Edit2.BuyWND) local getID3 = guiEditGetCaretIndex (CardNumber.Edit3.BuyWND) local getID4 = guiEditGetCaretIndex (CardNumber.Edit4.BuyWND) local getID5 = guiEditGetCaretIndex (CardNumber.Edit5.BuyWND) local getID6 = guiEditGetCaretIndex (CardNumber.Edit6.BuyWND) local getID = getID1 + getID2 + getID3 + getID4 + getID5 + getID6 if (not tonumber(CARDnumber1) and not tonumber(CARDnumber2) and not tonumber(CARDnumber3) and not tonumber(CARDnumber4) and not tonumber(CARDnumber5) and not tonumber(CARDnumber6)) then outputChatBox('* خطأ : #FFFFFF يرجى كتابة رقم بطاقة صحيح لتتم عملية ارسال المعلومات بنجاح !', 255, 0, 0, true) return end if ((CARDnumber1 ~= "") and not tonumber(CARDnumber1) or (CARDnumber2 ~= "") and not tonumber(CARDnumber2) or (CARDnumber3 ~= "") and not tonumber(CARDnumber3) or (CARDnumber4 ~= "") and not tonumber(CARDnumber4) or (CARDnumber5 ~= "") and not tonumber(CARDnumber5) or (CARDnumber6 ~= "") and not tonumber(CARDnumber6)) then outputChatBox('* خطأ : #FFFFFF يرجى كتابة رقم بطاقة صحيح لتتم عملية ارسال المعلومات بنجاح !', 255, 0, 0, true) return end if (guiCheckBoxGetSelected(STC.Selection.BuyWND) == true) then local cardType = "سوا | STC" triggerServerEvent( 'NewPlayerBought', localPlayer, getID, BoutghType, BoutghPlan, BoutghPrice, cardType, CARDnumber1, CARDnumber2, CARDnumber3, CARDnumber4, CARDnumber5, CARDnumber6) else if (guiCheckBoxGetSelected(cashU.Selection.BuyWND) == true) then local cardType = "اتصالات مصر| Etisalat" triggerServerEvent( 'NewPlayerBought', localPlayer, getID, BoutghType, BoutghPlan, BoutghPrice, cardType, CARDnumber1, CARDnumber2, CARDnumber3, CARDnumber4, CARDnumber5, CARDnumber6) else if (guiCheckBoxGetSelected(Mobily.Selection.BuyWND) == true) then local cardType = "Vodafone Egypt | فودافون مصر" triggerServerEvent( 'NewPlayerBought', localPlayer, getID, BoutghType, BoutghPlan, BoutghPrice, cardType, CARDnumber1, CARDnumber2, CARDnumber3, CARDnumber4, CARDnumber5, CARDnumber6) end end end end end ) addEvent( 'SeccessfullySent', true ) addEventHandler( 'SeccessfullySent', root, function() guiSetEnabled(SentMyInfo.Button.BuyWND, false) guiSetText(SentMyInfo.Button.BuyWND, "تم ارسال المعلومات بنجاح") setTimer(guiSetEnabled, 10000, 1, SentMyInfo.Button.BuyWND, true) setTimer(guiSetText, 10000, 1, SentMyInfo.Button.BuyWND, "إرسال المعلومات") end ) addEvent( 'ERRORselectedBUY', true ) addEventHandler( 'ERRORselectedBUY', root, function() guiSetEnabled(SentMyInfo.Button.BuyWND, false) guiSetText(SentMyInfo.Button.BuyWND, "خطأ : لقد قمت بشراءه مسبقا") setTimer(guiSetEnabled, 10000, 1, SentMyInfo.Button.BuyWND, true) setTimer(guiSetText, 10000, 1, SentMyInfo.Button.BuyWND, "إرسال المعلومات") end ) addEventHandler( 'onClientResourceStart', resourceRoot, function() showTotalWND() guiSetVisible(Password.Label.BuyWND, false) guiSetVisible(Password.Edit.BuyWND, false) guiSetVisible(GUIEditor.button[1], false) guiSetVisible(EnteredPasswordStatus.Label.BuyWND, false) guiSetEnabled(GUIEditor.button[1], false) guiEditSetReadOnly(Password.Edit.BuyWND, true) end ) addEventHandler( 'onClientGUIClick', root, function() if (source == X.Button.BuyWND) then guiSetVisible(Buy.BuyWND, false) showCursor(false) elseif (source == GUIEditor.button[1]) then local getPassword = guiGetText(Password.Edit.BuyWND) if (getPassword == getElementData(localPlayer, "Password")) then guiSetVisible(EnteredPasswordStatus.Label.BuyWND, true) showTotalWND() guiSetEnabled(GUIEditor.button[1], false) guiEditSetReadOnly(Password.Edit.BuyWND, true) guiSetText(EnteredPasswordStatus.Label.BuyWND, 'تهانينا : كلمة المرور صحيحة, تم فتح اللوحة .!') guiLabelSetColor(EnteredPasswordStatus.Label.BuyWND, 0, 255, 0) guiSetVisible(EnteredPasswordStatus.Label.BuyWND, true) setTimer(guiSetVisible, 5000, 1, EnteredPasswordStatus.Label.BuyWND, false) else guiSetText(EnteredPasswordStatus.Label.BuyWND, '* خطأ : كلمة السر التي ادخلتها غير صالحة .!') guiLabelSetColor(EnteredPasswordStatus.Label.BuyWND, 255, 0, 0) guiSetVisible(EnteredPasswordStatus.Label.BuyWND, true) setTimer(guiSetVisible, 5000, 1, EnteredPasswordStatus.Label.BuyWND, false) end elseif (source == STC.Selection.BuyWND) then guiCheckBoxSetSelected(cashU.Selection.BuyWND, false) guiCheckBoxSetSelected(Mobily.Selection.BuyWND, false) elseif (source == cashU.Selection.BuyWND) then guiCheckBoxSetSelected(STC.Selection.BuyWND, false) guiCheckBoxSetSelected(Mobily.Selection.BuyWND, false) elseif (source == Mobily.Selection.BuyWND) then guiCheckBoxSetSelected(STC.Selection.BuyWND, false) guiCheckBoxSetSelected(cashU.Selection.BuyWND, false) end end ) function openBuyWND() if (guiGetVisible(Buy.BuyWND) == false) then guiSetVisible(Buy.BuyWND, true) showCursor(true) else guiSetVisible(Buy.BuyWND, false) showCursor(false) end end bindKey( 'F10', 'down', openBuyWND) local screenW, screenH = guiGetScreenSize() BuyingManager.BuyingWNDManager = guiCreateWindow((screenW - 713) / 2, (screenH - 492) / 2, 713, 492, ".:[إدارة المشتريات]:.", false) guiWindowSetSizable(BuyingManager.BuyingWNDManager, false) guiSetAlpha(BuyingManager.BuyingWNDManager, 1.00) guiSetProperty(BuyingManager.BuyingWNDManager, "CaptionColour", "FFFE00D8") guiSetVisible(BuyingManager.BuyingWNDManager, false) Label1 = guiCreateLabel(554, 25, 151, 21, "* الاعبين الذين قاموا بالدفع :", false, BuyingManager.BuyingWNDManager) guiSetFont(Label1, "default-bold-small") guiLabelSetColor(Label1, 0, 254, 239) guiLabelSetHorizontalAlign(Label1, "right", false) guiLabelSetVerticalAlign(Label1, "center") Players.GridList.BuyingWNDManager = guiCreateGridList(12, 63, 692, 165, false, BuyingManager.BuyingWNDManager) guiGridListAddColumn(Players.GridList.BuyingWNDManager, "اسم الاعب", 0.3) guiGridListAddColumn(Players.GridList.BuyingWNDManager, "نوع الشيء", 0.3) guiGridListAddColumn(Players.GridList.BuyingWNDManager, "الخطة", 0.3) Label2 = guiCreateLabel(616, 240, 89, 23, "- السعر الكلي :", false, BuyingManager.BuyingWNDManager) guiSetFont(Label2, "default-bold-small") guiLabelSetColor(Label2, 219, 177, 34) guiLabelSetHorizontalAlign(Label2, "right", false) guiLabelSetVerticalAlign(Label2, "center") TotalPrice.Label.BuyingWNDManager = guiCreateLabel(496, 240, 116, 23, "", false, BuyingManager.BuyingWNDManager) guiSetFont(TotalPrice.Label.BuyingWNDManager, "default-bold-small") guiLabelSetHorizontalAlign(TotalPrice.Label.BuyingWNDManager, "right", false) guiLabelSetVerticalAlign(TotalPrice.Label.BuyingWNDManager, "center") Label3 = guiCreateLabel(583, 273, 122, 23, "- ارقام بطائق الشحن : ", false, BuyingManager.BuyingWNDManager) guiSetFont(Label3, "default-bold-small") guiLabelSetColor(Label3, 219, 177, 34) guiLabelSetHorizontalAlign(Label3, "right", false) guiLabelSetVerticalAlign(Label3, "center") CardsNumbers.GridList.BuyingWNDManager = guiCreateGridList(426, 306, 278, 176, false, BuyingManager.BuyingWNDManager) guiGridListAddColumn(CardsNumbers.GridList.BuyingWNDManager, "#", 0.1) guiGridListAddColumn(CardsNumbers.GridList.BuyingWNDManager, "ارقام بطائق الشحن", 0.8) Label5 = guiCreateLabel(317, 376, 98, 22, "- سيريال الاعب :", false, BuyingManager.BuyingWNDManager) guiSetFont(Label5, "default-bold-small") guiLabelSetColor(Label5, 219, 177, 34) guiLabelSetHorizontalAlign(Label5, "right", false) guiLabelSetVerticalAlign(Label5, "center") PlayerSerial.Label.BuyingWNDManager = guiCreateLabel(70, 377, 243, 21, "", false, BuyingManager.BuyingWNDManager) guiSetFont(PlayerSerial.Label.BuyingWNDManager, "default-bold-small") guiLabelSetHorizontalAlign(PlayerSerial.Label.BuyingWNDManager, "right", false) guiLabelSetVerticalAlign(PlayerSerial.Label.BuyingWNDManager, "center") CopySerial.Button.BuyingWNDManager = guiCreateButton(20, 404, 99, 21, "نسخ", false, BuyingManager.BuyingWNDManager) guiSetFont(CopySerial.Button.BuyingWNDManager, "default-bold-small") guiSetProperty(CopySerial.Button.BuyingWNDManager, "NormalTextColour", "FF22FF0B") X.Button.BuyingWNDManager = guiCreateButton(10, 459, 38, 23, "X", false, BuyingManager.BuyingWNDManager) guiSetFont(X.Button.BuyingWNDManager, "default-bold-small") guiSetProperty(X.Button.BuyingWNDManager, "NormalTextColour", "FFF10000") DeleteAll.Button.BuyingWNDManager = guiCreateButton(111, 240, 124, 23, "حذف الاعب المحدد", false, BuyingManager.BuyingWNDManager) guiSetFont(DeleteAll.Button.BuyingWNDManager, "default-bold-small") guiSetProperty(DeleteAll.Button.BuyingWNDManager, "NormalTextColour", "FFF100C0") Label4 = guiCreateLabel(238, 240, 178, 23, "- حذف الاعب المحدد من القائمة :", false, BuyingManager.BuyingWNDManager) guiSetFont(Label4, "default-bold-small") guiLabelSetColor(Label4, 219, 177, 34) guiLabelSetHorizontalAlign(Label4, "right", false) guiLabelSetVerticalAlign(Label4, "center") Label10 = guiCreateLabel(301, 306, 114, 23, "- نوع بطائق الشحن :", false, BuyingManager.BuyingWNDManager) guiSetFont(Label10, "default-bold-small") guiLabelSetColor(Label10, 219, 177, 34) guiLabelSetHorizontalAlign(Label10, "right", false) guiLabelSetVerticalAlign(Label10, "center") cardType.Label.ManagerBuyWND = guiCreateLabel(128, 306, 173, 23, "", false, BuyingManager.BuyingWNDManager) guiSetFont(cardType.Label.ManagerBuyWND, "default-bold-small") guiLabelSetHorizontalAlign(cardType.Label.ManagerBuyWND, "right", false) guiLabelSetVerticalAlign(cardType.Label.ManagerBuyWND, "center") addEventHandler( 'onClientGUIClick', root, function() if (source == DeleteAll.Button.BuyingWNDManager) then local getItemSelected = guiGridListGetSelectedItem(Players.GridList.BuyingWNDManager) if (getItemSelected == -1) then outputChatBox( '* خطأ : #FFFFFF لم تقم بتحديد مشتري من القائمة !', 255, 0, 0, true) return end local SERIAL_ = guiGridListGetItemData(Players.GridList.BuyingWNDManager, getItemSelected, 1) local ID = guiGridListGetItemData(Players.GridList.BuyingWNDManager, getItemSelected, 2) triggerServerEvent( 'removeUSERfromBuyWindow', localPlayer, SERIAL_, ID) guiGridListClear(CardsNumbers.GridList.BuyingWNDManager) guiSetText(TotalPrice.Label.BuyingWNDManager, "") guiSetText(PlayerSerial.Label.BuyingWNDManager, "") guiSetText(cardType.Label.ManagerBuyWND, "") guiSetEnabled(DeleteAll.Button.BuyingWNDManager, false) setTimer(guiSetEnabled, 5000, 1, DeleteAll.Button.BuyingWNDManager, true) elseif (source == CopySerial.Button.BuyingWNDManager) then local PlayerSerial = guiGetText(PlayerSerial.Label.BuyingWNDManager) if (PlayerSerial == "") then outputChatBox( '* خطأ : #FFFFFF لا يوجد سيريال لتقوم بنسخه !', 255, 0, 0, true) return end setClipboard(PlayerSerial) guiSetEnabled(CopySerial.Button.BuyingWNDManager, false) setTimer(guiSetEnabled, 5000, 1, CopySerial.Button.BuyingWNDManager, true) outputChatBox('* إدارة المشتريات : #FFFFFF تم نسخ سيريال المشتري بنجاح !', 0, 255, 0, true) end end ) addEvent( 'UPDATEGRIDLIST', true ) addEventHandler( 'UPDATEGRIDLIST', root, function() guiGridListClear(Players.GridList.BuyingWNDManager) triggerServerEvent( 'putPlayers', localPlayer ) end ) function putPlayersBought(SQL) guiGridListClear(Players.GridList.BuyingWNDManager) for i, _ in ipairs(SQL) do local player_ = guiGridListAddRow(Players.GridList.BuyingWNDManager) local text1 = guiGridListSetItemText(Players.GridList.BuyingWNDManager, player_, 1, SQL[i].userName, false, false) local text2 = guiGridListSetItemText(Players.GridList.BuyingWNDManager, player_, 2, SQL[i].boughtType, false, false) local text4 = guiGridListSetItemText(Players.GridList.BuyingWNDManager, player_, 3, SQL[i].boughtPlan, false, false) local Data1 = guiGridListSetItemData(Players.GridList.BuyingWNDManager, player_, 1, SQL[i].userSerial) local data3 = guiGridListSetItemData(Players.GridList.BuyingWNDManager, player_, 3, SQL[i].boughtPrice) local id = guiGridListSetItemData(Players.GridList.BuyingWNDManager, player_, 2, SQL[i].userID) guiGridListSetItemColor(Players.GridList.BuyingWNDManager, player_, 1, 255, 0, 0) guiGridListSetItemColor(Players.GridList.BuyingWNDManager, player_, 2, 255, 255, 0) guiGridListSetItemColor(Players.GridList.BuyingWNDManager, player_, 3, 0, 255, 0) end end addEvent( 'PutPlayersInList', true ) addEventHandler( 'PutPlayersInList', root, putPlayersBought) addEventHandler( 'onClientResourceStart', resourceRoot, function() triggerServerEvent( 'putPlayers', localPlayer ) end ) addEvent( 'putNUMBERS', true ) addEventHandler( 'putNUMBERS', root, function(CARDtype_, CARD1_, CARD2_, CARD3_, CARD4_, CARD5_, CARD6_) guiGridListClear(CardsNumbers.GridList.BuyingWNDManager) Row1 = guiGridListAddRow(CardsNumbers.GridList.BuyingWNDManager) Row2 = guiGridListAddRow(CardsNumbers.GridList.BuyingWNDManager) Row3 = guiGridListAddRow(CardsNumbers.GridList.BuyingWNDManager) Row4 = guiGridListAddRow(CardsNumbers.GridList.BuyingWNDManager) Row5 = guiGridListAddRow(CardsNumbers.GridList.BuyingWNDManager) Row6 = guiGridListAddRow(CardsNumbers.GridList.BuyingWNDManager) if (Row1) and (CARD1_ ~= "") then local text1 = guiGridListSetItemText(CardsNumbers.GridList.BuyingWNDManager, Row1, 2, CARD1_, false, false) guiGridListSetItemColor(CardsNumbers.GridList.BuyingWNDManager, Row1, 2, 0, 255, 0) end if (Row2) and (CARD2_ ~= "") then local text2 = guiGridListSetItemText(CardsNumbers.GridList.BuyingWNDManager, Row2, 2, CARD2_, false, false) guiGridListSetItemColor(CardsNumbers.GridList.BuyingWNDManager, Row2, 2, 0, 255, 0) end if (Row3) and (CARD3_ ~= "") then local text3 = guiGridListSetItemText(CardsNumbers.GridList.BuyingWNDManager, Row3, 2, CARD3_, false, false) guiGridListSetItemColor(CardsNumbers.GridList.BuyingWNDManager, Row3, 2, 0, 255, 0) end if (Row4) and (CARD4_ ~= "") then local text4 = guiGridListSetItemText(CardsNumbers.GridList.BuyingWNDManager, Row4, 2, CARD4_, false, false) guiGridListSetItemColor(CardsNumbers.GridList.BuyingWNDManager, Row4, 2, 0, 255, 0) end if (Row5) and (CARD5_ ~= "") then local text5 = guiGridListSetItemText(CardsNumbers.GridList.BuyingWNDManager, Row5, 2, CARD5_, false, false) guiGridListSetItemColor(CardsNumbers.GridList.BuyingWNDManager, Row5, 2, 0, 255, 0) end if (Row6) and (CARD6_ ~= "") then local text6 = guiGridListSetItemText(CardsNumbers.GridList.BuyingWNDManager, Row6, 2, CARD6_, false, false) guiGridListSetItemColor(CardsNumbers.GridList.BuyingWNDManager, Row6, 2, 0, 255, 0) end if (Row1) and (CARD1_ ~= "") then local text1C1 = guiGridListSetItemText(CardsNumbers.GridList.BuyingWNDManager, Row1, 1, "-", false, false) guiGridListSetItemColor(CardsNumbers.GridList.BuyingWNDManager, Row1, 1, 255, 0, 0) end if (Row2) and (CARD2_ ~= "") then local text2C1 = guiGridListSetItemText(CardsNumbers.GridList.BuyingWNDManager, Row2, 1, "-", false, false) guiGridListSetItemColor(CardsNumbers.GridList.BuyingWNDManager, Row2, 1, 255, 0, 0) end if (Row3) and (CARD3_ ~= "") then local text3C1 = guiGridListSetItemText(CardsNumbers.GridList.BuyingWNDManager, Row3, 1, "-", false, false) guiGridListSetItemColor(CardsNumbers.GridList.BuyingWNDManager, Row3, 1, 255, 0, 0) end if (Row4) and (CARD4_ ~= "") then local text4C1 = guiGridListSetItemText(CardsNumbers.GridList.BuyingWNDManager, Row4, 1, "-", false, false) guiGridListSetItemColor(CardsNumbers.GridList.BuyingWNDManager, Row4, 1, 255, 0, 0) end if (Row5) and (CARD5_ ~= "") then local text5C1 = guiGridListSetItemText(CardsNumbers.GridList.BuyingWNDManager, Row5, 1, "-", false, false) guiGridListSetItemColor(CardsNumbers.GridList.BuyingWNDManager, Row5, 1, 255, 0, 0) end if (Row6) and (CARD6_ ~= "") then local text6C1 = guiGridListSetItemText(CardsNumbers.GridList.BuyingWNDManager, Row6, 1, "-", false, false) guiGridListSetItemColor(CardsNumbers.GridList.BuyingWNDManager, Row6, 1, 255, 0, 0) end guiSetText(cardType.Label.ManagerBuyWND, CARDtype_) end ) addEventHandler( 'onClientGUIClick', root, function() if (source == Players.GridList.BuyingWNDManager) then local getItemSelected = guiGridListGetSelectedItem(Players.GridList.BuyingWNDManager) if (getItemSelected == -1) then guiSetText(TotalPrice.Label.BuyingWNDManager, "") guiSetText(PlayerSerial.Label.BuyingWNDManager, "") guiSetText(cardType.Label.ManagerBuyWND, "") guiGridListClear(CardsNumbers.GridList.BuyingWNDManager) end end end ) addEventHandler( 'onClientGUIClick', root, function() if (source == Players.GridList.BuyingWNDManager) then local getItemSelected = guiGridListGetSelectedItem(Players.GridList.BuyingWNDManager) if (getItemSelected ~= -1) then local SERIAL_ = guiGridListGetItemData(Players.GridList.BuyingWNDManager, getItemSelected, 1) local PRICE_ = guiGridListGetItemData(Players.GridList.BuyingWNDManager, getItemSelected, 3) guiSetText(TotalPrice.Label.BuyingWNDManager, PRICE_) guiSetText(PlayerSerial.Label.BuyingWNDManager, SERIAL_) guiGridListClear(CardsNumbers.GridList.BuyingWNDManager) local ID = guiGridListGetItemData(Players.GridList.BuyingWNDManager, getItemSelected, 2) triggerServerEvent( 'getCARDS', localPlayer, SERIAL_, ID) end elseif (source == X.Button.BuyingWNDManager) then guiSetVisible(BuyingManager.BuyingWNDManager, false) showCursor(false) end end ) function openBuyWNDmanager() if (not Access[getPlayerSerial(source)]) then outputChatBox("* ERROR : #FFFFFF Access denied !", 255, 0, 0, true) return end if (guiGetVisible(BuyingManager.BuyingWNDManager) == false) then guiSetVisible(BuyingManager.BuyingWNDManager, true) showCursor(true) else guiSetVisible(BuyingManager.BuyingWNDManager, false) showCursor(false) end end ملف سيرفر executeSQLQuery( ' CREATE TABLE IF NOT EXISTS `BoughtUSERSsystem` (userSerial,userID,userName,boughtType,boughtPlan,boughtPrice,typeCard,CARD1,CARD2,CARD3,CARD4,CARD5,CARD6) ' ) --executeSQLQuery( ' DROP TABLE `BoughtUSERSsystem` ' ) addEvent( 'removeUSERfromBuyWindow', true ) addEventHandler( 'removeUSERfromBuyWindow', root, function(SERIAL_, ID) local checkPlayer = executeSQLQuery( ' SELECT * FROM `BoughtUSERSsystem` WHERE userSerial=?', SERIAL_ ) if (checkPlayer) then end executeSQLQuery( ' DELETE FROM `BoughtUSERSsystem` WHERE userID=? ', ID ) outputChatBox('* إدارة المشتريات : #FFFFFF تم حذف المشتري من القائمة بنجاح !', source, 0, 255, 0, true) triggerClientEvent( 'UPDATEGRIDLIST', source) end ) addEvent( 'getCARDS', true ) addEventHandler( 'getCARDS', root, function(SERIAL_, ID) local checkPlayer = executeSQLQuery( ' SELECT * FROM `BoughtUSERSsystem` WHERE userSerial=?', SERIAL_ ) if (checkPlayer) then end local checkID = executeSQLQuery( ' SELECT * FROM `BoughtUSERSsystem` WHERE userID=?', ID ) local CARD1_ = checkID[1]['CARD1'] local CARD2_ = checkID[1]['CARD2'] local CARD3_ = checkID[1]['CARD3'] local CARD4_ = checkID[1]['CARD4'] local CARD5_ = checkID[1]['CARD5'] local CARD6_ = checkID[1]['CARD6'] local CARDtype_ = checkID[1]['typeCard'] triggerClientEvent(source, 'putNUMBERS', source, CARDtype_, CARD1_, CARD2_, CARD3_, CARD4_, CARD5_, CARD6_) end ) addEvent( 'NewPlayerBought', true ) addEventHandler( 'NewPlayerBought', root, function(getID, BoutghType, BoutghPlan, BoutghPrice, cardType, CARDnumber1, CARDnumber2, CARDnumber3, CARDnumber4, CARDnumber5, CARDnumber6) local check = executeSQLQuery('SELECT * FROM `BoughtUSERSsystem` WHERE userSerial=?', getPlayerSerial(source)) if (type(check) == 'table' and #check ~= 0 and check) then local oldItemPlan = check[1]['boughtPlan'] if (oldItemPlan == BoutghPlan) then outputChatBox('* خطأ : #FFFFFF لقد قمت بشراء النوع والخطة التي حددتها مسبقا !', source, 255, 0, 0, true) triggerClientEvent( source, "ERRORselectedBUY", source ) return end local ID = 1 + getID - math.random(10, 100) + math.random(10,100) * getPlayerPing(source) executeSQLQuery('INSERT INTO `BoughtUSERSsystem` (userSerial,userID,userName,boughtType,boughtPlan,boughtPrice,typeCard,CARD1,CARD2,CARD3,CARD4,CARD5,CARD6) VALUES(?,?,?,?,?,?,?,?,?,?,?,?,?)', getPlayerSerial(source), ID, getPlayerName(source), BoutghType, BoutghPlan, BoutghPrice, cardType, CARDnumber1, CARDnumber2, CARDnumber3, CARDnumber4, CARDnumber5, CARDnumber6) triggerClientEvent( 'UPDATEGRIDLIST', source) triggerClientEvent( source, 'SeccessfullySent', source) else local ID = getPlayerSerial(source) executeSQLQuery('INSERT INTO `BoughtUSERSsystem` (userSerial,userID,userName,boughtType,boughtPlan,boughtPrice,typeCard,CARD1,CARD2,CARD3,CARD4,CARD5,CARD6) VALUES(?,?,?,?,?,?,?,?,?,?,?,?,?)', getPlayerSerial(source), ID, getPlayerName(source), BoutghType, BoutghPlan, BoutghPrice, cardType, CARDnumber1, CARDnumber2, CARDnumber3, CARDnumber4, CARDnumber5, CARDnumber6) triggerClientEvent( 'UPDATEGRIDLIST', source) triggerClientEvent( source, 'SeccessfullySent', source) end end ) addEvent( 'putPlayers', true ) addEventHandler( 'putPlayers', root, function() local TABLE = executeSQLQuery( ' SELECT * FROM `BoughtUSERSsystem` ' ) triggerClientEvent( 'PutPlayersInList', source, TABLE) end )

السلام عليكم ابي اسوي مود تاخد هيدرا وبزوكا و اكس بي وفلوس ويكون في داتا باسم معين يتاكد اذا كان معاك منها او لا ويخصم منك عدد معين ويعطيك الشي الي اخذته ممكن فنكشات؟

نفس المشكله + الدي بق Loading script failed:vip_\client.lua7:'<eof>'expected near 'end'

لاهنت الوحه ماتبي تفتح + ممكن تضيفو لزر الهنتر انه الزر ينقفل 5 دقايق مايقدر ينزل هنتر فيهم ؟ يعني ابي الهنتر تنزل كل 5 دقايق الكود كلينت # triggerServerEvent ( "onServerIsRG", getLocalPlayer(),getLocalPlayer(), grp) if getElementData(getLocalPlayer(),"IsRG") == tostring(grp) then return true end return false guiAntiFlood(element, timer) if getElementType ( element ) == "gui-button" then local atimer = tonumber(timer) if atimer == nil or atimer == '' or not tonumber(atimer) then error("Bad Argument the Argument 2 must number") else end guiSetEnabled(element,false) setTimer(function() guiSetEnabled(element,true) end,tonumber(atimer),1) else error("Bad Argument 1 the element must button") end end GUIEditor = { button = {}, progressbar = {}, label = {} } addEventHandler("onClientResourceStart", resourceRoot, function() vip_system = guiCreateWindow(67, 29, 671, 394, "VIP System", false) guiWindowSetSizable(vip_system, false) guiSetAlpha(vip_system, 1.00) guiSetVisible(vip_system,false) sb = guiCreateButton(10, 56, 159, 33, "Spawn BodyGard", false, vip_system,false)--lv 1 guiSetProperty(sb, "NormalTextColour", "FF7DFD00") hunter = guiCreateButton(178, 271, 159, 33, "Hunter", false, vip_system,false)--lv 3 guiSetProperty(hunter, "NormalTextColour", "FF04F7CC") maske = guiCreateButton(9, 271, 159, 33, "VIP Maske", false, vip_system,false)--lv 2 guiSetProperty(maske, "NormalTextColour", "FF04F7CC") gm = guiCreateButton(178, 228, 159, 33, "+120 Minigun", false, vip_system,false)--lv 2 guiSetProperty(gm, "NormalTextColour", "FF00FCE8") vs = guiCreateButton(9, 228, 159, 33, "VIP Style", false, vip_system)--lv 0 guiSetProperty(vs, "NormalTextColour", "FF04F7CC") hc = guiCreateButton(179, 185, 159, 33, "Hover Car", false, vip_system,false)--lv 2 guiSetProperty(hc, "NormalTextColour", "FF00FCE8") fc = guiCreateButton(9, 185, 159, 33, "Fly Car", false, vip_system,false)--lv 3 guiSetProperty(fc, "NormalTextColour", "FF00FCE8") gl = guiCreateButton(178, 142, 159, 33, "+5 Launcher", false, vip_system,false)--lv 2 guiSetProperty(gl, "NormalTextColour", "FF7DFD00") skin = guiCreateButton(10, 142, 159, 33, "VIP Skin", false, vip_system,false)--lv 1 guiSetProperty(skin, "NormalTextColour", "FF7DFD00") hp = guiCreateButton(178, 99, 159, 33, "Heatlh +200", false, vip_system)--lv 0 guiSetProperty(hp, "NormalTextColour", "FF7DFD00") armor = guiCreateButton(9, 99, 159, 33, "Armor +100", false, vip_system)--lv 0 guiSetProperty(armor, "NormalTextColour", "FF7DFD00") rb = guiCreateButton(178, 56, 159, 33, "Remove BodyGard", false, vip_system,false)--lv 1 guiSetProperty(rb, "NormalTextColour", "FF7DFD00") GUIEditor.label[1] = guiCreateLabel(8, 23, 658, 17, "==========================================================================================", false, vip_system) guiLabelSetColor(GUIEditor.label[1], 17, 64, 237) cl = guiCreateButton(575, 349, 86, 35, "X|Close|X", false, vip_system) --lv 0 guiSetProperty(cl, "NormalTextColour", "FFFA0000") GUIEditor.progressbar[1] = guiCreateProgressBar(347, 40, 15, 344, false, vip_system) fc2 = guiCreateButton(393, 105, 114, 33, "Fix Car ", false, vip_system) --lv 0 guiSetProperty(fc2, "NormalTextColour", "FF0808F1") sc = guiCreateButton(393, 62, 114, 33, "Spawn Car", false, vip_system,false)--lv 1 guiSetProperty(sc, "NormalTextColour", "FF0808F1") end ) show = false addCommandHandler("vip",function() if isPlayerGroupName("VIP") then if show == false then guiSetVisible(vip_system,true) showCursor(true) show = true else guiSetVisible(vip_system,false) showCursor(false) show = false end VipFix() else outputChatBox("You Dont Have VIP",255,0,0) end end) addEventHandler("onClientGUIClick",root,function() if (source == cl) then guiSetVisible(vip_system,false) showCursor(false) show = false end end) addEventHandler("onClientGUIClick",root,function() if (source == armor) then triggerServerEvent("armorg",localPlayer) guiAntiFlood(armor,5*10000) elseif (source == hp) then triggerServerEvent("helathg",localPlayer) guiAntiFlood(hp,5*10000) elseif (source == hc) then hoverc() elseif (source == fc) then flyc() elseif (source == gl) then setElementData(localPlayer,"Launcher",(getElementData(localPlayer,"Launcher") or 0) + 7) outputChatBox("You Get +5 Launcher",0,255,0) guiAntiFlood(gl,10*10000) elseif (source == skin) then triggerServerEvent("Sking",localPlayer) elseif (source == gm) then triggerServerEvent("waepong",localPlayer) guiAntiFlood(gm,15*10000) elseif (source == sb) then triggerServerEvent ( "ss", localPlayer) guiAntiFlood(sb,5*10000) elseif (source == rb) then triggerServerEvent("onClinetSpawnMonture",localPlayer) guiAntiFlood(rb,5*10000) elseif (source == sc) then local row, col = guiGridListGetSelectedItem (gc) if ( row and col and row ~= -1 and col ~= -1 ) then local CarsName = guiGridListGetItemText (gc, guiGridListGetSelectedItem (gc), 1 ) triggerServerEvent("VIPsetPedCars",localPlayer,CarsName) elseif (source == fc2) then cc() end elseif (source == hunter) then triggerServerEvent("hunterg",localPlayer) guiAntiFlood(hunter,10*10000) elseif (source == maske) then executeCommandHandler("maske") end end) function VipFix() guiGridListClear ( gc ) for i=1,#CarsList do local row = guiGridListAddRow ( gc ) guiGridListSetItemText ( gc, row, 1, tostring ( CarsList[i][1] ), false, false ) end end addCommandHandler("bb",function() triggerServerEvent("ss",localPlayer) end) function hoverc() if isWorldSpecialPropertyEnabled("hovercars") then setWorldSpecialPropertyEnabled("hovercars",false) outputChatBox("Hover Cras Stop",255,0,0) else setWorldSpecialPropertyEnabled("hovercars",true) outputChatBox("Hover Cras Started",0,255,0) end end function flyc() if isWorldSpecialPropertyEnabled("aircars") then setWorldSpecialPropertyEnabled("aircars",false) outputChatBox("Fly Cras Stop",255,0,0) else setWorldSpecialPropertyEnabled("aircars",true) outputChatBox("Fly Cras Started",0,255,0) end end function cc() local veh = getPedOccupiedVehicle(localPlayer) if getElementHealth(veh) < 800 then triggerServerEvent("VIPfixVehicle",localPlayer) guiSetEnabled( fc2,false) setTimer(guiSetEnabled,60000,1, fc2,true) else exports["guimessages"]:outputClient("#3399FF[VIP System] : #FF0000The Cars Must Be Broken !",0,255,255) end end ---BodyGard--- local pedTarget = {} local pedTimer = {} local pedShooting = {} local AnimalFollowing = {} addEvent( "onSyncPlayerAnimals", true ) addEventHandler( "onSyncPlayerAnimals", root, function ( theTable ) animalTable = theTable --addEventHandler( "onClientPreRender", root, setAnimalFollowing) AnimalFollowing[localPlayer] = true end ) local function doPedAttackOtherPlayer(ped) if(isTimer(pedTimer[ped])) or (isPedInVehicle(ped)) then killTimer(pedTimer[ped]) end if(isElement(ped)) then pedTimer[ped] = setTimer(function() if(isElement(ped)) then local target = pedTarget[ped] if (target) then local x, y, z = getElementPosition(ped) local x2, y2, z2 = getElementPosition(target) if(isLineOfSightClear(x, y, z, x2, y2, z2, true, false, false, false, false, false)) then if (getElementType(target) == "player") and getElementData(target, "LegalStatus") == "Jailed" then local theOwner = getElementData( ped, "animalOwner" ) killTimer(pedTimer[ped]) pedShooting[ped] = false setPedControlState(ped, "fire", false) if (isEventHandel == false) then --addEventHandler( "onClientPreRender", root, setAnimalFollowing) AnimalFollowing[localPlayer] = true end end if(getElementHealth(target) >= 1) and target ~= getElementData( ped, "animalOwner" ) then AnimalFollowing[localPlayer] = false --removeEventHandler( "onClientPreRender", root, setAnimalFollowing) isEventHandel = false if(pedShooting[ped] ~= true) then setPedAimTarget(ped, x2, y2, z2+0.3) setPedControlState(ped, "fire", true) setPedControlState ( ped, "jump", false ) setPedControlState ( ped, "sprint", false ) setPedControlState ( ped, "walk", false ) setPedControlState ( ped, "forwards", false ) pedShooting[ped] = true else local x1, y1, z1 = getElementPosition(ped) local x2, y2, z2 = getElementPosition(target) local rot = math.atan2(y2 - y1, x2 - x1) * 180 / math.pi rot = rot-90 setPedRotation(ped, rot) setPedAimTarget(ped, x2, y2, z2+0.3) setPedControlState(ped, "fire", true) end else local theOwner = getElementData( ped, "animalOwner" ) killTimer(pedTimer[ped]) pedShooting[ped] = false setPedControlState(ped, "fire", false) if (isEventHandel == false) then AnimalFollowing[localPlayer] = true --addEventHandler( "onClientPreRender", root, setAnimalFollowing) end end else local theOwner = getElementData( ped, "animalOwner" ) killTimer(pedTimer[ped]) pedShooting[ped] = false setPedControlState(ped, "fire", false) if (isEventHandel == false) then --addEventHandler( "onClientPreRender", root, setAnimalFollowing) AnimalFollowing[localPlayer] = true end end end else killTimer(pedTimer[ped]) end end, 100, -1) else killTimer(pedTimer[ped]) end end function setAnimalFollowing() if AnimalFollowing[localPlayer] then if (isEventHandel == false) then isEventHandel = true end if ( animalTable ) then for theOwner, k in pairs ( animalTable ) do local theAnimal = animalTable[theOwner][1] local thePlayer = animalTable[theOwner][3] if ( isElement( thePlayer ) ) and ( isElement( theAnimal ) ) and ( getElementHealth( theAnimal ) > 0 ) then local playerX, playerY, playerZ = getElementPosition ( thePlayer ) local playerInt, playerDim = getElementInterior( thePlayer ), getElementDimension( thePlayer ) local dogX, dogY, dogZ = getElementPosition ( theAnimal ) local distance = getDistanceBetweenPoints2D ( playerX, playerY, dogX, dogY ) setElementInterior( theAnimal, playerInt ) setElementDimension( theAnimal, playerDim ) local x1, y1, z1 = getElementPosition(theAnimal) local x2, y2, z2 = getElementPosition(thePlayer) local playerRotation = math.atan2(y2 - y1, x2 - x1) * 180 / math.pi playerRotation = playerRotation-90 setPedRotation(theAnimal, playerRotation) setPedAimTarget(theAnimal, x2, y2, z2) if ( isElementInWater ( thePlayer ) ) then setElementDimension( theAnimal, 0 ) else setElementDimension( theAnimal, 0 ) end if ( isPedInVehicle( thePlayer ) ) then setElementDimension( theAnimal, 0 ) else setElementDimension( theAnimal, 0 ) end if ( playerZ > dogZ + 0.5 ) and not getPedControlState (theAnimal, "fire") then setPedControlState ( theAnimal, "jump", true ) setTimer(function() if isElement(theAnimal) then setPedControlState ( theAnimal, "jump", false ) end end ,500,1) end if ( playerZ < dogZ - 0.5 ) and not getPedControlState (theAnimal, "fire") then setPedControlState ( theAnimal, "jump", true ) setTimer(function() if isElement(theAnimal) then setPedControlState ( theAnimal, "jump", false ) end end ,500,1) end if ( distance >= 25 ) and not getPedControlState (theAnimal, "fire") then setPedWeaponSlot(theAnimal, 5) setElementPosition ( theAnimal, playerX + 0.5, playerY , playerZ ) setElementDimension( theAnimal, playerDim ) setElementInterior ( theAnimal, playerInt ) end if ( distance >= 6 ) and ( distance < 25 ) and not getPedControlState (theAnimal, "fire") then setPedWeaponSlot(theAnimal, 0) setPedControlState ( theAnimal, "sprint", true ) setPedControlState ( theAnimal, "walk", false ) setPedControlState ( theAnimal, "forwards", true ) end if ( distance >= 4 ) and ( distance < 6 ) and not getPedControlState (theAnimal, "fire") then setPedWeaponSlot(theAnimal, 5) setPedControlState ( theAnimal, "sprint", false ) setPedControlState ( theAnimal, "walk", false ) setPedControlState ( theAnimal, "forwards", true ) end if ( distance >= 2 ) and ( distance < 4 ) and not getPedControlState (theAnimal, "fire") then setPedWeaponSlot(theAnimal, 5) setPedControlState ( theAnimal, "sprint", false ) setPedControlState ( theAnimal, "walk", true ) setPedControlState ( theAnimal, "forwards", true ) end if ( distance < 2 ) and not getPedControlState (theAnimal, "fire") then setPedWeaponSlot(theAnimal, 5) setPedControlState ( theAnimal, "sprint", false ) setPedControlState ( theAnimal, "walk", false ) setPedControlState ( theAnimal, "forwards", false ) end if ( isPedInVehicle ( thePlayer ) ) then if not ( isPedInVehicle( theAnimal ) ) then triggerServerEvent("warpAnimalIntoVehicle", theAnimal, thePlayer) end end if ( isPedInVehicle ( theAnimal ) ) and not ( isPedInVehicle( thePlayer ) ) then triggerServerEvent("removeAnimalOutVehicle", theAnimal, thePlayer) end end end end end end addEventHandler( "onClientPreRender", root, setAnimalFollowing) addEventHandler("onClientPedDamage", getRootElement(), function(attacker) if getElementData(source, "bodyguard") then if(attacker) and (isElement(attacker)) then if ( animalTable ) then for theOwner, k in pairs ( animalTable ) do local theAnimal = animalTable[theOwner][1] local thePlayer = animalTable[theOwner][3] if source == theAnimal and attacker ~= thePlayer then if (getElementType(attacker) == "player") then local AttackerTeam = getPlayerTeam(attacker) local thePlayerTeam = getPlayerTeam(thePlayer) local AttackerGroup = getElementData(attacker, "Group") local thePlayerGroup = getElementData(thePlayer, "Group") if getTeamName(AttackerTeam) ~= "No Team" and getTeamName(AttackerTeam) == getTeamName(thePlayerTeam) or AttackerGroup == thePlayerGroup then cancelEvent() else pedTarget[source] = attacker doPedAttackOtherPlayer(source) end end end if (getElementType(attacker) == "vehicle") or (getElementType(attacker) == "ped") then pedTarget[source] = attacker doPedAttackOtherPlayer(source) end end end end end end) addEventHandler("onClientPlayerDamage", getRootElement(), function(attacker) if(attacker) and (isElement(attacker)) then if (getElementType(attacker) == "ped") and getElementData( attacker, "bodyguard" ) and getElementData( attacker, "animalOwner" ) == source then cancelEvent() end if ( animalTable ) then for theOwner, k in pairs ( animalTable ) do local theAnimal = animalTable[theOwner][1] local thePlayer = animalTable[theOwner][3] if (getElementType(attacker) == "player") then if theAnimal and getElementData( theAnimal, "animalOwner" ) == thePlayer and thePlayer == source then local AttackerTeam = getPlayerTeam(attacker) local sourceTeam = getPlayerTeam(source) local thePlayerTeam = getPlayerTeam(thePlayer) local AttackerGroup = getElementData(attacker, "Group") local sourceGroup = getElementData(source, "Group") local thePlayerGroup = getElementData(thePlayer, "Group") if getTeamName(AttackerTeam) ~= "No Team" and getTeamName(AttackerTeam) ~= getTeamName(thePlayerTeam) or AttackerGroup ~= thePlayerGroup then if theAnimal and attacker then pedTarget[theAnimal] = attacker doPedAttackOtherPlayer(theAnimal) end end end if (getElementType(attacker) == "vehicle") or (getElementType(attacker) == "ped") and attacker ~= theAnimal then if theAnimal and attacker then pedTarget[theAnimal] = attacker doPedAttackOtherPlayer(theAnimal) end end end if (attacker) == thePlayer and source ~= theAnimal and getElementData( theAnimal, "animalOwner" ) == attacker then if (getElementType(source) == "player") then local AttackerTeam = getPlayerTeam(attacker) local sourceTeam = getPlayerTeam(source) local thePlayerTeam = getPlayerTeam(thePlayer) local AttackerGroup = getElementData(attacker, "Group") local sourceGroup = getElementData(source, "Group") local thePlayerGroup = getElementData(thePlayer, "Group") if getTeamName(sourceTeam) ~= "No Team" and getTeamName(sourceTeam) ~= getTeamName(thePlayerTeam) or sourceGroup ~= thePlayerGroup then local AttackerStars = getElementData(attacker, "WantLvl") local sourceStars = getElementData(source, "WantLvl") local thePlayerStars = getElementData(thePlayer, "WantLvl") if getTeamName(AttackerTeam) == "Police" and sourceStars "Jailed" then cancelEvent() else if theAnimal and source then pedTarget[theAnimal] = source doPedAttackOtherPlayer(theAnimal) end end end end end end end end end) ------Bodyguards--------- local pedTarget = {} local pedTimer = {} local pedShooting = {} local AnimalFollowing = {} addEvent( "onSyncPlayerAnimals", true ) addEventHandler( "onSyncPlayerAnimals", root, function ( theTable ) animalTable = theTable --addEventHandler( "onClientPreRender", root, setAnimalFollowing) AnimalFollowing[localPlayer] = true end ) local function doPedAttackOtherPlayer(ped) if(isTimer(pedTimer[ped])) or (isPedInVehicle(ped)) then killTimer(pedTimer[ped]) end if(isElement(ped)) then pedTimer[ped] = setTimer(function() if(isElement(ped)) then local target = pedTarget[ped] if (target) then local x, y, z = getElementPosition(ped) local x2, y2, z2 = getElementPosition(target) if(isLineOfSightClear(x, y, z, x2, y2, z2, true, false, false, false, false, false)) then if (getElementType(target) == "player") and getElementData(target, "Stats") >= 2 then local theOwner = getElementData( ped, "animalOwner" ) killTimer(pedTimer[ped]) pedShooting[ped] = false setPedControlState(ped, "fire", false) if (isEventHandel == false) then --addEventHandler( "onClientPreRender", root, setAnimalFollowing) AnimalFollowing[localPlayer] = true end end if(getElementHealth(target) >= 1) and target ~= getElementData( ped, "animalOwner" ) then AnimalFollowing[localPlayer] = false --removeEventHandler( "onClientPreRender", root, setAnimalFollowing) isEventHandel = false if(pedShooting[ped] ~= true) then setPedAimTarget(ped, x2, y2, z2+0.3) setPedControlState(ped, "fire", true) setPedControlState ( ped, "jump", false ) setPedControlState ( ped, "sprint", false ) setPedControlState ( ped, "walk", false ) setPedControlState ( ped, "forwards", false ) pedShooting[ped] = true else local x1, y1, z1 = getElementPosition(ped) local x2, y2, z2 = getElementPosition(target) local rot = math.atan2(y2 - y1, x2 - x1) * 180 / math.pi rot = rot-90 setPedRotation(ped, rot) setPedAimTarget(ped, x2, y2, z2+0.3) setPedControlState(ped, "fire", true) end else local theOwner = getElementData( ped, "animalOwner" ) killTimer(pedTimer[ped]) pedShooting[ped] = false setPedControlState(ped, "fire", false) if (isEventHandel == false) then AnimalFollowing[localPlayer] = true --addEventHandler( "onClientPreRender", root, setAnimalFollowing) end end else local theOwner = getElementData( ped, "animalOwner" ) killTimer(pedTimer[ped]) pedShooting[ped] = false setPedControlState(ped, "fire", false) if (isEventHandel == false) then --addEventHandler( "onClientPreRender", root, setAnimalFollowing) AnimalFollowing[localPlayer] = true end end end else killTimer(pedTimer[ped]) end end, 100, -1) else killTimer(pedTimer[ped]) end end function setAnimalFollowing() if AnimalFollowing[localPlayer] then if (isEventHandel == false) then isEventHandel = true end if ( animalTable ) then for theOwner, k in pairs ( animalTable ) do local theAnimal = animalTable[theOwner][1] local thePlayer = animalTable[theOwner][3] if ( isElement( thePlayer ) ) and ( isElement( theAnimal ) ) and ( getElementHealth( theAnimal ) > 0 ) then local playerX, playerY, playerZ = getElementPosition ( thePlayer ) local playerInt, playerDim = getElementInterior( thePlayer ), getElementDimension( thePlayer ) local dogX, dogY, dogZ = getElementPosition ( theAnimal ) local distance = getDistanceBetweenPoints2D ( playerX, playerY, dogX, dogY ) setElementInterior( theAnimal, playerInt ) setElementDimension( theAnimal, playerDim ) local x1, y1, z1 = getElementPosition(theAnimal) local x2, y2, z2 = getElementPosition(thePlayer) local playerRotation = math.atan2(y2 - y1, x2 - x1) * 180 / math.pi playerRotation = playerRotation-90 setPedRotation(theAnimal, playerRotation) setPedAimTarget(theAnimal, x2, y2, z2) if ( isElementInWater ( thePlayer ) ) then setElementDimension( theAnimal, 0 ) else setElementDimension( theAnimal, 0 ) end if ( isPedInVehicle( thePlayer ) ) then setElementDimension( theAnimal, 0 ) else setElementDimension( theAnimal, 0 ) end if ( playerZ > dogZ + 0.5 ) and not getPedControlState (theAnimal, "fire") then setPedControlState ( theAnimal, "jump", true ) setTimer(function() if isElement(theAnimal) then setPedControlState ( theAnimal, "jump", false ) end end ,500,1) end if ( playerZ < dogZ - 0.5 ) and not getPedControlState (theAnimal, "fire") then setPedControlState ( theAnimal, "jump", true ) setTimer(function() if isElement(theAnimal) then setPedControlState ( theAnimal, "jump", false ) end end ,500,1) end if ( distance >= 25 ) and not getPedControlState (theAnimal, "fire") then setPedWeaponSlot(theAnimal, 5) setElementPosition ( theAnimal, playerX + 0.5, playerY , playerZ ) setElementDimension( theAnimal, playerDim ) setElementInterior ( theAnimal, playerInt ) end if ( distance >= 6 ) and ( distance < 25 ) and not getPedControlState (theAnimal, "fire") then setPedWeaponSlot(theAnimal, 0) setPedControlState ( theAnimal, "sprint", true ) setPedControlState ( theAnimal, "walk", false ) setPedControlState ( theAnimal, "forwards", true ) end if ( distance >= 4 ) and ( distance < 6 ) and not getPedControlState (theAnimal, "fire") then setPedWeaponSlot(theAnimal, 5) setPedControlState ( theAnimal, "sprint", false ) setPedControlState ( theAnimal, "walk", false ) setPedControlState ( theAnimal, "forwards", true ) end if ( distance >= 2 ) and ( distance < 4 ) and not getPedControlState (theAnimal, "fire") then setPedWeaponSlot(theAnimal, 5) setPedControlState ( theAnimal, "sprint", false ) setPedControlState ( theAnimal, "walk", true ) setPedControlState ( theAnimal, "forwards", true ) end if ( distance < 2 ) and not getPedControlState (theAnimal, "fire") then setPedWeaponSlot(theAnimal, 5) setPedControlState ( theAnimal, "sprint", false ) setPedControlState ( theAnimal, "walk", false ) setPedControlState ( theAnimal, "forwards", false ) end if ( isPedInVehicle ( thePlayer ) ) then if not ( isPedInVehicle( theAnimal ) ) then triggerServerEvent("warpAnimalIntoVehicle", theAnimal, thePlayer) end end if ( isPedInVehicle ( theAnimal ) ) and not ( isPedInVehicle( thePlayer ) ) then triggerServerEvent("removeAnimalOutVehicle", theAnimal, thePlayer) end end end end end end addEventHandler( "onClientPreRender", root, setAnimalFollowing)

triggerServerEvent ( "onServerIsRG", getLocalPlayer(),getLocalPlayer(), grp) if getElementData(getLocalPlayer(),"IsRG") == tostring(grp) then return true end return false guiAntiFlood(element, timer) if getElementType ( element ) == "gui-button" then local atimer = tonumber(timer) if atimer == nil or atimer == '' or not tonumber(atimer) then error("Bad Argument the Argument 2 must number") else end guiSetEnabled(element,false) setTimer(function() guiSetEnabled(element,true) end,tonumber(atimer),1) else error("Bad Argument 1 the element must button") end end GUIEditor = { button = {}, progressbar = {}, label = {} } addEventHandler("onClientResourceStart", resourceRoot, function() vip_system = guiCreateWindow(67, 29, 671, 394, "VIP System", false) guiWindowSetSizable(vip_system, false) guiSetAlpha(vip_system, 1.00) guiSetVisible(vip_system,false) sb = guiCreateButton(10, 56, 159, 33, "Spawn BodyGard", false, vip_system,false)--lv 1 guiSetProperty(sb, "NormalTextColour", "FF7DFD00") hunter = guiCreateButton(178, 271, 159, 33, "Hunter", false, vip_system,false)--lv 3 guiSetProperty(hunter, "NormalTextColour", "FF04F7CC") maske = guiCreateButton(9, 271, 159, 33, "VIP Maske", false, vip_system,false)--lv 2 guiSetProperty(maske, "NormalTextColour", "FF04F7CC") gm = guiCreateButton(178, 228, 159, 33, "+120 Minigun", false, vip_system,false)--lv 2 guiSetProperty(gm, "NormalTextColour", "FF00FCE8") vs = guiCreateButton(9, 228, 159, 33, "VIP Style", false, vip_system)--lv 0 guiSetProperty(vs, "NormalTextColour", "FF04F7CC") hc = guiCreateButton(179, 185, 159, 33, "Hover Car", false, vip_system,false)--lv 2 guiSetProperty(hc, "NormalTextColour", "FF00FCE8") fc = guiCreateButton(9, 185, 159, 33, "Fly Car", false, vip_system,false)--lv 3 guiSetProperty(fc, "NormalTextColour", "FF00FCE8") gl = guiCreateButton(178, 142, 159, 33, "+5 Launcher", false, vip_system,false)--lv 2 guiSetProperty(gl, "NormalTextColour", "FF7DFD00") skin = guiCreateButton(10, 142, 159, 33, "VIP Skin", false, vip_system,false)--lv 1 guiSetProperty(skin, "NormalTextColour", "FF7DFD00") hp = guiCreateButton(178, 99, 159, 33, "Heatlh +200", false, vip_system)--lv 0 guiSetProperty(hp, "NormalTextColour", "FF7DFD00") armor = guiCreateButton(9, 99, 159, 33, "Armor +100", false, vip_system)--lv 0 guiSetProperty(armor, "NormalTextColour", "FF7DFD00") rb = guiCreateButton(178, 56, 159, 33, "Remove BodyGard", false, vip_system,false)--lv 1 guiSetProperty(rb, "NormalTextColour", "FF7DFD00") GUIEditor.label[1] = guiCreateLabel(8, 23, 658, 17, "==========================================================================================", false, vip_system) guiLabelSetColor(GUIEditor.label[1], 17, 64, 237) cl = guiCreateButton(575, 349, 86, 35, "X|Close|X", false, vip_system) --lv 0 guiSetProperty(cl, "NormalTextColour", "FFFA0000") GUIEditor.progressbar[1] = guiCreateProgressBar(347, 40, 15, 344, false, vip_system) fc2 = guiCreateButton(393, 105, 114, 33, "Fix Car ", false, vip_system) --lv 0 guiSetProperty(fc2, "NormalTextColour", "FF0808F1") sc = guiCreateButton(393, 62, 114, 33, "Spawn Car", false, vip_system,false)--lv 1 guiSetProperty(sc, "NormalTextColour", "FF0808F1") end ) show = false addCommandHandler("vip",function() if isPlayerGroupName("VIP") then if show == false then guiSetVisible(vip_system,true) showCursor(true) show = true else guiSetVisible(vip_system,false) showCursor(false) show = false end VipFix() else outputChatBox("You Dont Have VIP",255,0,0) end end) addEventHandler("onClientGUIClick",root,function() if (source == cl) then guiSetVisible(vip_system,false) showCursor(false) show = false end end) addEventHandler("onClientGUIClick",root,function() if (source == armor) then triggerServerEvent("armorg",localPlayer) guiAntiFlood(armor,5*10000) elseif (source == hp) then triggerServerEvent("helathg",localPlayer) guiAntiFlood(hp,5*10000) elseif (source == hc) then hoverc() elseif (source == fc) then flyc() elseif (source == gl) then setElementData(localPlayer,"Launcher",(getElementData(localPlayer,"Launcher") or 0) + 7) outputChatBox("You Get +5 Launcher",0,255,0) guiAntiFlood(gl,10*10000) elseif (source == skin) then triggerServerEvent("Sking",localPlayer) elseif (source == gm) then triggerServerEvent("waepong",localPlayer) guiAntiFlood(gm,15*10000) elseif (source == sb) then triggerServerEvent ( "ss", localPlayer) guiAntiFlood(sb,5*10000) elseif (source == rb) then triggerServerEvent("onClinetSpawnMonture",localPlayer) guiAntiFlood(rb,5*10000) elseif (source == sc) then local row, col = guiGridListGetSelectedItem (gc) if ( row and col and row ~= -1 and col ~= -1 ) then local CarsName = guiGridListGetItemText (gc, guiGridListGetSelectedItem (gc), 1 ) triggerServerEvent("VIPsetPedCars",localPlayer,CarsName) elseif (source == fc2) then cc() end elseif (source == hunter) then triggerServerEvent("hunterg",localPlayer) guiAntiFlood(hunter,10*10000) elseif (source == maske) then executeCommandHandler("maske") end end) function VipFix() guiGridListClear ( gc ) for i=1,#CarsList do local row = guiGridListAddRow ( gc ) guiGridListSetItemText ( gc, row, 1, tostring ( CarsList[i][1] ), false, false ) end end addCommandHandler("bb",function() triggerServerEvent("ss",localPlayer) end) function hoverc() if isWorldSpecialPropertyEnabled("hovercars") then setWorldSpecialPropertyEnabled("hovercars",false) outputChatBox("Hover Cras Stop",255,0,0) else setWorldSpecialPropertyEnabled("hovercars",true) outputChatBox("Hover Cras Started",0,255,0) end end function flyc() if isWorldSpecialPropertyEnabled("aircars") then setWorldSpecialPropertyEnabled("aircars",false) outputChatBox("Fly Cras Stop",255,0,0) else setWorldSpecialPropertyEnabled("aircars",true) outputChatBox("Fly Cras Started",0,255,0) end end function cc() local veh = getPedOccupiedVehicle(localPlayer) if getElementHealth(veh) < 800 then triggerServerEvent("VIPfixVehicle",localPlayer) guiSetEnabled( fc2,false) setTimer(guiSetEnabled,60000,1, fc2,true) else exports["guimessages"]:outputClient("#3399FF[VIP System] : #FF0000The Cars Must Be Broken !",0,255,255) end end ---BodyGard--- local pedTarget = {} local pedTimer = {} local pedShooting = {} local AnimalFollowing = {} addEvent( "onSyncPlayerAnimals", true ) addEventHandler( "onSyncPlayerAnimals", root, function ( theTable ) animalTable = theTable --addEventHandler( "onClientPreRender", root, setAnimalFollowing) AnimalFollowing[localPlayer] = true end ) local function doPedAttackOtherPlayer(ped) if(isTimer(pedTimer[ped])) or (isPedInVehicle(ped)) then killTimer(pedTimer[ped]) end if(isElement(ped)) then pedTimer[ped] = setTimer(function() if(isElement(ped)) then local target = pedTarget[ped] if (target) then local x, y, z = getElementPosition(ped) local x2, y2, z2 = getElementPosition(target) if(isLineOfSightClear(x, y, z, x2, y2, z2, true, false, false, false, false, false)) then if (getElementType(target) == "player") and getElementData(target, "LegalStatus") == "Jailed" then local theOwner = getElementData( ped, "animalOwner" ) killTimer(pedTimer[ped]) pedShooting[ped] = false setPedControlState(ped, "fire", false) if (isEventHandel == false) then --addEventHandler( "onClientPreRender", root, setAnimalFollowing) AnimalFollowing[localPlayer] = true end end if(getElementHealth(target) >= 1) and target ~= getElementData( ped, "animalOwner" ) then AnimalFollowing[localPlayer] = false --removeEventHandler( "onClientPreRender", root, setAnimalFollowing) isEventHandel = false if(pedShooting[ped] ~= true) then setPedAimTarget(ped, x2, y2, z2+0.3) setPedControlState(ped, "fire", true) setPedControlState ( ped, "jump", false ) setPedControlState ( ped, "sprint", false ) setPedControlState ( ped, "walk", false ) setPedControlState ( ped, "forwards", false ) pedShooting[ped] = true else local x1, y1, z1 = getElementPosition(ped) local x2, y2, z2 = getElementPosition(target) local rot = math.atan2(y2 - y1, x2 - x1) * 180 / math.pi rot = rot-90 setPedRotation(ped, rot) setPedAimTarget(ped, x2, y2, z2+0.3) setPedControlState(ped, "fire", true) end else local theOwner = getElementData( ped, "animalOwner" ) killTimer(pedTimer[ped]) pedShooting[ped] = false setPedControlState(ped, "fire", false) if (isEventHandel == false) then AnimalFollowing[localPlayer] = true --addEventHandler( "onClientPreRender", root, setAnimalFollowing) end end else local theOwner = getElementData( ped, "animalOwner" ) killTimer(pedTimer[ped]) pedShooting[ped] = false setPedControlState(ped, "fire", false) if (isEventHandel == false) then --addEventHandler( "onClientPreRender", root, setAnimalFollowing) AnimalFollowing[localPlayer] = true end end end else killTimer(pedTimer[ped]) end end, 100, -1) else killTimer(pedTimer[ped]) end end function setAnimalFollowing() if AnimalFollowing[localPlayer] then if (isEventHandel == false) then isEventHandel = true end if ( animalTable ) then for theOwner, k in pairs ( animalTable ) do local theAnimal = animalTable[theOwner][1] local thePlayer = animalTable[theOwner][3] if ( isElement( thePlayer ) ) and ( isElement( theAnimal ) ) and ( getElementHealth( theAnimal ) > 0 ) then local playerX, playerY, playerZ = getElementPosition ( thePlayer ) local playerInt, playerDim = getElementInterior( thePlayer ), getElementDimension( thePlayer ) local dogX, dogY, dogZ = getElementPosition ( theAnimal ) local distance = getDistanceBetweenPoints2D ( playerX, playerY, dogX, dogY ) setElementInterior( theAnimal, playerInt ) setElementDimension( theAnimal, playerDim ) local x1, y1, z1 = getElementPosition(theAnimal) local x2, y2, z2 = getElementPosition(thePlayer) local playerRotation = math.atan2(y2 - y1, x2 - x1) * 180 / math.pi playerRotation = playerRotation-90 setPedRotation(theAnimal, playerRotation) setPedAimTarget(theAnimal, x2, y2, z2) if ( isElementInWater ( thePlayer ) ) then setElementDimension( theAnimal, 0 ) else setElementDimension( theAnimal, 0 ) end if ( isPedInVehicle( thePlayer ) ) then setElementDimension( theAnimal, 0 ) else setElementDimension( theAnimal, 0 ) end if ( playerZ > dogZ + 0.5 ) and not getPedControlState (theAnimal, "fire") then setPedControlState ( theAnimal, "jump", true ) setTimer(function() if isElement(theAnimal) then setPedControlState ( theAnimal, "jump", false ) end end ,500,1) end if ( playerZ < dogZ - 0.5 ) and not getPedControlState (theAnimal, "fire") then setPedControlState ( theAnimal, "jump", true ) setTimer(function() if isElement(theAnimal) then setPedControlState ( theAnimal, "jump", false ) end end ,500,1) end if ( distance >= 25 ) and not getPedControlState (theAnimal, "fire") then setPedWeaponSlot(theAnimal, 5) setElementPosition ( theAnimal, playerX + 0.5, playerY , playerZ ) setElementDimension( theAnimal, playerDim ) setElementInterior ( theAnimal, playerInt ) end if ( distance >= 6 ) and ( distance < 25 ) and not getPedControlState (theAnimal, "fire") then setPedWeaponSlot(theAnimal, 0) setPedControlState ( theAnimal, "sprint", true ) setPedControlState ( theAnimal, "walk", false ) setPedControlState ( theAnimal, "forwards", true ) end if ( distance >= 4 ) and ( distance < 6 ) and not getPedControlState (theAnimal, "fire") then setPedWeaponSlot(theAnimal, 5) setPedControlState ( theAnimal, "sprint", false ) setPedControlState ( theAnimal, "walk", false ) setPedControlState ( theAnimal, "forwards", true ) end if ( distance >= 2 ) and ( distance < 4 ) and not getPedControlState (theAnimal, "fire") then setPedWeaponSlot(theAnimal, 5) setPedControlState ( theAnimal, "sprint", false ) setPedControlState ( theAnimal, "walk", true ) setPedControlState ( theAnimal, "forwards", true ) end if ( distance < 2 ) and not getPedControlState (theAnimal, "fire") then setPedWeaponSlot(theAnimal, 5) setPedControlState ( theAnimal, "sprint", false ) setPedControlState ( theAnimal, "walk", false ) setPedControlState ( theAnimal, "forwards", false ) end if ( isPedInVehicle ( thePlayer ) ) then if not ( isPedInVehicle( theAnimal ) ) then triggerServerEvent("warpAnimalIntoVehicle", theAnimal, thePlayer) end end if ( isPedInVehicle ( theAnimal ) ) and not ( isPedInVehicle( thePlayer ) ) then triggerServerEvent("removeAnimalOutVehicle", theAnimal, thePlayer) end end end end end end addEventHandler( "onClientPreRender", root, setAnimalFollowing) addEventHandler("onClientPedDamage", getRootElement(), function(attacker) if getElementData(source, "bodyguard") then if(attacker) and (isElement(attacker)) then if ( animalTable ) then for theOwner, k in pairs ( animalTable ) do local theAnimal = animalTable[theOwner][1] local thePlayer = animalTable[theOwner][3] if source == theAnimal and attacker ~= thePlayer then if (getElementType(attacker) == "player") then local AttackerTeam = getPlayerTeam(attacker) local thePlayerTeam = getPlayerTeam(thePlayer) local AttackerGroup = getElementData(attacker, "Group") local thePlayerGroup = getElementData(thePlayer, "Group") if getTeamName(AttackerTeam) ~= "No Team" and getTeamName(AttackerTeam) == getTeamName(thePlayerTeam) or AttackerGroup == thePlayerGroup then cancelEvent() else pedTarget[source] = attacker doPedAttackOtherPlayer(source) end end end if (getElementType(attacker) == "vehicle") or (getElementType(attacker) == "ped") then pedTarget[source] = attacker doPedAttackOtherPlayer(source) end end end end end end) addEventHandler("onClientPlayerDamage", getRootElement(), function(attacker) if(attacker) and (isElement(attacker)) then if (getElementType(attacker) == "ped") and getElementData( attacker, "bodyguard" ) and getElementData( attacker, "animalOwner" ) == source then cancelEvent() end if ( animalTable ) then for theOwner, k in pairs ( animalTable ) do local theAnimal = animalTable[theOwner][1] local thePlayer = animalTable[theOwner][3] if (getElementType(attacker) == "player") then if theAnimal and getElementData( theAnimal, "animalOwner" ) == thePlayer and thePlayer == source then local AttackerTeam = getPlayerTeam(attacker) local sourceTeam = getPlayerTeam(source) local thePlayerTeam = getPlayerTeam(thePlayer) local AttackerGroup = getElementData(attacker, "Group") local sourceGroup = getElementData(source, "Group") local thePlayerGroup = getElementData(thePlayer, "Group") if getTeamName(AttackerTeam) ~= "No Team" and getTeamName(AttackerTeam) ~= getTeamName(thePlayerTeam) or AttackerGroup ~= thePlayerGroup then if theAnimal and attacker then pedTarget[theAnimal] = attacker doPedAttackOtherPlayer(theAnimal) end end end if (getElementType(attacker) == "vehicle") or (getElementType(attacker) == "ped") and attacker ~= theAnimal then if theAnimal and attacker then pedTarget[theAnimal] = attacker doPedAttackOtherPlayer(theAnimal) end end end if (attacker) == thePlayer and source ~= theAnimal and getElementData( theAnimal, "animalOwner" ) == attacker then if (getElementType(source) == "player") then local AttackerTeam = getPlayerTeam(attacker) local sourceTeam = getPlayerTeam(source) local thePlayerTeam = getPlayerTeam(thePlayer) local AttackerGroup = getElementData(attacker, "Group") local sourceGroup = getElementData(source, "Group") local thePlayerGroup = getElementData(thePlayer, "Group") if getTeamName(sourceTeam) ~= "No Team" and getTeamName(sourceTeam) ~= getTeamName(thePlayerTeam) or sourceGroup ~= thePlayerGroup then local AttackerStars = getElementData(attacker, "WantLvl") local sourceStars = getElementData(source, "WantLvl") local thePlayerStars = getElementData(thePlayer, "WantLvl") if getTeamName(AttackerTeam) == "Police" and sourceStars "Jailed" then cancelEvent() else if theAnimal and source then pedTarget[theAnimal] = source doPedAttackOtherPlayer(theAnimal) end end end end end end end end end) ------Bodyguards--------- local pedTarget = {} local pedTimer = {} local pedShooting = {} local AnimalFollowing = {} addEvent( "onSyncPlayerAnimals", true ) addEventHandler( "onSyncPlayerAnimals", root, function ( theTable ) animalTable = theTable --addEventHandler( "onClientPreRender", root, setAnimalFollowing) AnimalFollowing[localPlayer] = true end ) local function doPedAttackOtherPlayer(ped) if(isTimer(pedTimer[ped])) or (isPedInVehicle(ped)) then killTimer(pedTimer[ped]) end if(isElement(ped)) then pedTimer[ped] = setTimer(function() if(isElement(ped)) then local target = pedTarget[ped] if (target) then local x, y, z = getElementPosition(ped) local x2, y2, z2 = getElementPosition(target) if(isLineOfSightClear(x, y, z, x2, y2, z2, true, false, false, false, false, false)) then if (getElementType(target) == "player") and getElementData(target, "Stats") >= 2 then local theOwner = getElementData( ped, "animalOwner" ) killTimer(pedTimer[ped]) pedShooting[ped] = false setPedControlState(ped, "fire", false) if (isEventHandel == false) then --addEventHandler( "onClientPreRender", root, setAnimalFollowing) AnimalFollowing[localPlayer] = true end end if(getElementHealth(target) >= 1) and target ~= getElementData( ped, "animalOwner" ) then AnimalFollowing[localPlayer] = false --removeEventHandler( "onClientPreRender", root, setAnimalFollowing) isEventHandel = false if(pedShooting[ped] ~= true) then setPedAimTarget(ped, x2, y2, z2+0.3) setPedControlState(ped, "fire", true) setPedControlState ( ped, "jump", false ) setPedControlState ( ped, "sprint", false ) setPedControlState ( ped, "walk", false ) setPedControlState ( ped, "forwards", false ) pedShooting[ped] = true else local x1, y1, z1 = getElementPosition(ped) local x2, y2, z2 = getElementPosition(target) local rot = math.atan2(y2 - y1, x2 - x1) * 180 / math.pi rot = rot-90 setPedRotation(ped, rot) setPedAimTarget(ped, x2, y2, z2+0.3) setPedControlState(ped, "fire", true) end else local theOwner = getElementData( ped, "animalOwner" ) killTimer(pedTimer[ped]) pedShooting[ped] = false setPedControlState(ped, "fire", false) if (isEventHandel == false) then AnimalFollowing[localPlayer] = true --addEventHandler( "onClientPreRender", root, setAnimalFollowing) end end else local theOwner = getElementData( ped, "animalOwner" ) killTimer(pedTimer[ped]) pedShooting[ped] = false setPedControlState(ped, "fire", false) if (isEventHandel == false) then --addEventHandler( "onClientPreRender", root, setAnimalFollowing) AnimalFollowing[localPlayer] = true end end end else killTimer(pedTimer[ped]) end end, 100, -1) else killTimer(pedTimer[ped]) end end function setAnimalFollowing() if AnimalFollowing[localPlayer] then if (isEventHandel == false) then isEventHandel = true end if ( animalTable ) then for theOwner, k in pairs ( animalTable ) do local theAnimal = animalTable[theOwner][1] local thePlayer = animalTable[theOwner][3] if ( isElement( thePlayer ) ) and ( isElement( theAnimal ) ) and ( getElementHealth( theAnimal ) > 0 ) then local playerX, playerY, playerZ = getElementPosition ( thePlayer ) local playerInt, playerDim = getElementInterior( thePlayer ), getElementDimension( thePlayer ) local dogX, dogY, dogZ = getElementPosition ( theAnimal ) local distance = getDistanceBetweenPoints2D ( playerX, playerY, dogX, dogY ) setElementInterior( theAnimal, playerInt ) setElementDimension( theAnimal, playerDim ) local x1, y1, z1 = getElementPosition(theAnimal) local x2, y2, z2 = getElementPosition(thePlayer) local playerRotation = math.atan2(y2 - y1, x2 - x1) * 180 / math.pi playerRotation = playerRotation-90 setPedRotation(theAnimal, playerRotation) setPedAimTarget(theAnimal, x2, y2, z2) if ( isElementInWater ( thePlayer ) ) then setElementDimension( theAnimal, 0 ) else setElementDimension( theAnimal, 0 ) end if ( isPedInVehicle( thePlayer ) ) then setElementDimension( theAnimal, 0 ) else setElementDimension( theAnimal, 0 ) end if ( playerZ > dogZ + 0.5 ) and not getPedControlState (theAnimal, "fire") then setPedControlState ( theAnimal, "jump", true ) setTimer(function() if isElement(theAnimal) then setPedControlState ( theAnimal, "jump", false ) end end ,500,1) end if ( playerZ < dogZ - 0.5 ) and not getPedControlState (theAnimal, "fire") then setPedControlState ( theAnimal, "jump", true ) setTimer(function() if isElement(theAnimal) then setPedControlState ( theAnimal, "jump", false ) end end ,500,1) end if ( distance >= 25 ) and not getPedControlState (theAnimal, "fire") then setPedWeaponSlot(theAnimal, 5) setElementPosition ( theAnimal, playerX + 0.5, playerY , playerZ ) setElementDimension( theAnimal, playerDim ) setElementInterior ( theAnimal, playerInt ) end if ( distance >= 6 ) and ( distance < 25 ) and not getPedControlState (theAnimal, "fire") then setPedWeaponSlot(theAnimal, 0) setPedControlState ( theAnimal, "sprint", true ) setPedControlState ( theAnimal, "walk", false ) setPedControlState ( theAnimal, "forwards", true ) end if ( distance >= 4 ) and ( distance < 6 ) and not getPedControlState (theAnimal, "fire") then setPedWeaponSlot(theAnimal, 5) setPedControlState ( theAnimal, "sprint", false ) setPedControlState ( theAnimal, "walk", false ) setPedControlState ( theAnimal, "forwards", true ) end if ( distance >= 2 ) and ( distance < 4 ) and not getPedControlState (theAnimal, "fire") then setPedWeaponSlot(theAnimal, 5) setPedControlState ( theAnimal, "sprint", false ) setPedControlState ( theAnimal, "walk", true ) setPedControlState ( theAnimal, "forwards", true ) end if ( distance < 2 ) and not getPedControlState (theAnimal, "fire") then setPedWeaponSlot(theAnimal, 5) setPedControlState ( theAnimal, "sprint", false ) setPedControlState ( theAnimal, "walk", false ) setPedControlState ( theAnimal, "forwards", false ) end if ( isPedInVehicle ( thePlayer ) ) then if not ( isPedInVehicle( theAnimal ) ) then triggerServerEvent("warpAnimalIntoVehicle", theAnimal, thePlayer) end end if ( isPedInVehicle ( theAnimal ) ) and not ( isPedInVehicle( thePlayer ) ) then triggerServerEvent("removeAnimalOutVehicle", theAnimal, thePlayer) end end end end end end addEventHandler( "onClientPreRender", root, setAnimalFollowing) تصحيح لاهنتم الوحه ماتبي تفتح + ياليت تضيفو لي لزر الهنتر انه يعطي هنتر ومايقدر ينزلها الا كل 5 دقايق

الحين المود فيه خطا ابي الكلمه الي تخليني اعرف الخطا وين مشكورين وكمان ياشباب ابي اسوي زر يعطي هنتر ممكن الفنكشات او الكود؟

local MinerStuff = { "Iron", "Copper", "Gunpowder", "Diamond", "Uranuim", } local minerW = { 31, 24, 27, 28, 34 } addEvent("TakeJobFashier",true) addEventHandler("TakeJobFashier",root, function (skin) setElementModel(source,tonumber(skin)) setElementData ( source,'Occupation','Miner-Jop' ) triggerClientEvent(source,"createMinerMarkers",source) end ) addEvent("giveW",true) addEventHandler("giveW",root, function () local Data = MinerStuff[math.random(#MinerStuff)] if Data == "Iron" then Reward = math.random( 1000 ) elseif Data == "Sand" then Reward = math.random( 5000 ) elseif Data == "Yellow Sand" then Reward = math.random( 3000 ) elseif Data == "Diamond" then Reward = math.random( 1 ) elseif Data == "Uranuim" then Reward = math.random( 1 ) elseif Data == "Gold" then Reward = math.random( 10 ) elseif Data == "Silver" then Reward = math.random( 30 ) elseif Data == "Gunpowder" then Reward = math.random( 200 ) elseif Data == "Copper" then Reward = math.random( 300 ) elseif Data == "Baroud Ore" then Reward = math.random ( 50 ) elseif Data == "Pig Iron" then Reward = math.random ( 500 ) elseif Data == "Copper Ore" then Reward = math.random ( 100 ) end setElementData(source, Data, (getElementData (source,Data) or 0) + Reward) setElementData(source, "Point",getElementData(source,"Point") +2) exports["guimessages"]:outputServer(source," Miner Jop : You Get "..Data.." #"..Reward ,255,0,0) exports["guimessages"]:outputServer(source," You Was Get 2 Point",0,255,0) end ) addEvent('remveMiner', true) addEventHandler('remveMiner', root, function ( ) removeElementData(source,'Occupation') end ) function playerLoginSavingData (thePreviousAccount, theCurrentAccount, autoLogin) if (isGuestAccount (getPlayerAccount(source))) then return end local T1 = getAccountData (theCurrentAccount, "Data") setElementData(source,"Data", T1 ) end addEventHandler("onPlayerLogin", getRootElement(), playerLoginSavingData) function quitPlayerSavingData ( quitType ) if (isGuestAccount (getPlayerAccount(source))) then return end local T1 = getElementData (source, "Data") setAccountData(getPlayerAccount(source),"Data", T1) end addEventHandler ( "onPlayerQuit", getRootElement(), quitPlayerSavingData ) الحين هو مايبي ينقب ابي تحلو لي المشكله لو سمحتم ملف كلينت local minerMarkers = { {758.51599121094,753.36242675781,-4.0033869743347}, {740.45263671875,951.43524169922,-7.4548559188843}, {719.60821533203,970.32391357422,-7.4544372558594}, {627.25408935547,1008.5667114258,5.8102149963379}, {517.28771972656,1000.5893554688,-9.9594945907593}, {615.06231689453,774.80004882813,-32.110679626465}, {706.62518310547,792.21044921875,-30.262800216675}, {530.48461914063,916.84991455078,-42.655982971191}, {464.3349609375,865.015625,-27.464292526245}, {477.39825439453,807.1201171875,-18.829044342041}, {495.00930786133,778.30975341797,-21.634286880493}, {664.21527099609,719.94189453125,-3.996431350708}, {764.72650146484,827.23968505859,-7.4562559127808}, {740.41015625,951.22607421875,-7.4522466659546}, {687.07775878906,988.03552246094,-12.809737205505}, {696.51965332031,1005.3439941406,5.8082227706909}, {609.52349853516,985.73626708984,-7.4645547866821}, {534.44323730469,774.56799316406,-20.002136230469}, {510.88034057617,819.73706054688,-23.856391906738}, {491.29666137695,849.36956787109,-29.565511703491}, {537.17266845703,969.67395019531,-21.359622955322}, {498.93463134766,928.39727783203,-29.017789840698}, {483.15072631836,906.6708984375,-30.92096328735} } Taxi1 = createMarker(602.177734375,868.09375,-42.9609375,"cylinder",2,0,0,0,0) skin1 = createPed(27,602.177734375,868.09375,-42.9609375,90) blip = createBlip(602.177734375,868.09375,-42.9609375,56) setBlipVisibleDistance(blip,400) setElementFrozen(skin1,true) addEventHandler("onClientPedDamage",root, function () if source == skin1 then cancelEvent() end end) local x,y = guiGetScreenSize() addEventHandler("onClientMarkerHit",root, function (hit) if source == Taxi1 then if ( getElementData( hit, 'Occupation' ) ~= "Miner-Jop" ) and not isPedInVehicle(hit) then if localPlayer == hit then guiSetVisible(GUIEditor.window[1],true) showCursor(true) end end end end) GUIEditor = { gridlist = {}, window = {}, button = {} } local x = x - 332 local y = y - 333 GUIEditor.window[1] = guiCreateWindow(x/2,y/2,332,333, "[JopSystem]Iron Miner Jop", false) guiWindowSetSizable(GUIEditor.window[1], false) guiSetVisible(GUIEditor.window[1],false) GUIEditor.button[1] = guiCreateButton(9, 272, 94, 41, "Take Job", false, GUIEditor.window[1]) guiSetProperty(GUIEditor.button[1], "NormalTextColour", "FFAAAAAA") GUIEditor.button[2] = guiCreateButton(233, 272, 89, 41, "Close", false, GUIEditor.window[1]) guiSetProperty(GUIEditor.button[2], "NormalTextColour", "FFAAAAAA") Memo1 = guiCreateMemo(13, 30, 318, 70, "الذهاب الي الصخور وقم بالضغط علي زر تاب وسيتم \nتكسيرها والحصول على النقود\n \nGo To The Rocks, And Press Tab to\nStart Breaking it and Get Money.", false, GUIEditor.window[1]) guiMemoSetReadOnly(Memo1, true) GUIEditor.gridlist[1] = guiCreateGridList(12, 120, 310, 140, false, GUIEditor.window[1]) guiGridListAddColumn(GUIEditor.gridlist[1], "#", 0.3) guiGridListAddColumn(GUIEditor.gridlist[1], "Skin Number", 0.3) guiGridListAddColumn(GUIEditor.gridlist[1], "Skin Name", 0.3) for i = 1, 3 do guiGridListAddRow(GUIEditor.gridlist[1]) end guiGridListSetItemText(GUIEditor.gridlist[1], 0, 1, "1", false, false) guiGridListSetItemText(GUIEditor.gridlist[1], 0, 2, "27", false, false) guiGridListSetItemText(GUIEditor.gridlist[1], 0, 3, "Miner 1", false, false) guiGridListSetItemText(GUIEditor.gridlist[1], 1, 1, "2", false, false) guiGridListSetItemText(GUIEditor.gridlist[1], 1, 2, "260", false, false) guiGridListSetItemText(GUIEditor.gridlist[1], 1, 3, "Miner 2", false, false) addEventHandler("onClientGUIClick",root, function () if source == GUIEditor.button[1] then local skin = guiGridListGetItemText( GUIEditor.gridlist[1],guiGridListGetSelectedItem(GUIEditor.gridlist[1]),2) if skin ~= "" then triggerServerEvent("TakeJobFashier",localPlayer,skin) guiSetVisible(GUIEditor.window[1],false) showCursor(false) end elseif source == GUIEditor.button[2] then guiSetVisible(GUIEditor.window[1],false) showCursor(false) end end) addEventHandler("onClientRender", getRootElement(), function() local x, y, z = getElementPosition(skin1) local x2, y2, z2 = getElementPosition(localPlayer) if(isLineOfSightClear(x, y, z, x2, y2, z2, true, true, false, true)) then local sx, sy = getScreenFromWorldPosition(x, y, z+1.3) if(sx) and (sy) then local distance = getDistanceBetweenPoints3D(x, y, z, x2, y2, z2) if(distance < 30) then dxDrawText("Miner Job", sx+2, sy+2, sx, sy, tocolor(0,0,0), 2-(distance/20), "arial", "center", "center") dxDrawText("Miner Job", sx, sy, sx, sy, tocolor(255,255,0), 2-(distance/20), "arial", "center", "center") end end end end) addEvent("createMinerMarkers",true) addEventHandler("createMinerMarkers",root, function () local num = math.random (#minerMarkers) local x = minerMarkers [num][1] local y = minerMarkers [num][2] local z = minerMarkers [num][3] minerMark = createMarker(x,y,z,"cylinder",2.0,0,0,0,0) minerMarkk = createMarker(x,y,z+2.0,"arrow",1.0,255,0,0,255) minerObj = createObject(3931,x,y,z) minerBlip = createBlip(x,y,z,41) end ) local x,y = guiGetScreenSize() local x = x - 355 local y = y - -356 window = guiCreateWindow(x/2, y/2, 403, 82, "[JopSystem]Iron Miner", false) guiWindowSetSizable(window, false) guiSetVisible(window,false) progressbar = guiCreateProgressBar(14, 31, 372, 36, false, window) label = guiCreateLabel(172, 10, 329, 15, "0%", false, progressbar) guiLabelSetColor(label, 1, 0, 0) function startJob() if ( guiGetVisible ( window ) == true) then return end setElementFrozen(localPlayer,true) setPedAnimation(localPlayer,"BSKTBALL","BBALL_react_miss") setTimer(setPedAnimation,10000,1,localPlayer) setTimer(setElementFrozen,10000,1,localPlayer,false) showCursor(true) guiSetVisible(window,true) local lol = guiProgressBarGetProgress(progressbar) setTimer( guiProgressBarSetProgress, 1000, 1,progressbar,lol+10 ) setTimer( guiSetText, 1000, 1,label,"10%") setTimer( guiProgressBarSetProgress, 2000, 1,progressbar,lol+20 ) setTimer( guiSetText, 2000, 1,label,"20%") setTimer( guiProgressBarSetProgress, 3000, 1,progressbar,lol+30 ) setTimer( guiSetText, 3000, 1,label,"30%") setTimer( guiProgressBarSetProgress, 4000, 1,progressbar,lol+40 ) setTimer( guiSetText, 4000, 1,label,"40%") setTimer( guiProgressBarSetProgress, 5000, 1,progressbar,lol+50 ) setTimer( guiSetText, 5000, 1,label,"50%") setTimer( guiProgressBarSetProgress, 6000, 1,progressbar,lol+60 ) setTimer( guiSetText, 6000, 1,label,"60%") setTimer( guiProgressBarSetProgress, 7000, 1,progressbar,lol+70 ) setTimer( guiSetText, 7000, 1,label,"70%") setTimer( guiProgressBarSetProgress, 8000, 1,progressbar,lol+80 ) setTimer( guiSetText, 8000, 1,label,"80%") setTimer( guiProgressBarSetProgress, 9000, 1,progressbar,lol+90 ) setTimer( guiSetText, 9000, 1,label,"90%") setTimer( guiProgressBarSetProgress, 10000, 1,progressbar,lol+100 ) setTimer( guiSetText, 10000, 1,label,"100%") timer = setTimer(function () guiSetVisible(window, false) showCursor(false) guiProgressBarSetProgress(progressbar, 0) unbindKey("tab","down",startN9) local num = math.random (#minerMarkers) local x = minerMarkers [num][1] local y = minerMarkers [num][2] local z = minerMarkers [num][3] setElementPosition(minerMark,x,y,z) setElementPosition(minerMarkk,x,y,z+2.0) setElementPosition(minerBlip,x,y,z) setElementPosition(minerObj,x,y,z) triggerServerEvent("giveW",localPlayer) end, 10000,1) end addEventHandler("onClientMarkerHit",root, function (hitting) if source == minerMark then if ( getElementData( hitting, 'Occupation' ) == "Miner-Jop" ) and ( getTeamName ( getPlayerTeam ( hitting ) ) == "No Team" ) and not isPedInVehicle(hitting) then bindKey("H","down",startJob) end end end ) addEventHandler("onClientMarkerLeave",root, function () unbindKey("H","down",startJob) end ) fileDelete('jobClient.lua') addEventHandler("onClientResourceStart", resourceRoot, function() window22 = guiCreateWindow(451, 305, 264, 131, "[JopSystem]Iron Jop : Warring !!", false) guiWindowSetSizable(window22, false) guiSetAlpha(window22 , 1.00) guiSetProperty(window22, "CaptionColour", "FFFE0000") guiSetVisible (window22, false) label22 = guiCreateLabel(20, 23, 241, 31, "Are You Sure Want To Get Out Of The Job", false, window22) guiSetFont(label22, "default-bold-small") guiLabelSetColor(label22, 254, 0, 255) button11 = guiCreateButton(10, 64, 110, 54, "Yes", false, window22) button22 = guiCreateButton(143, 64, 110, 54, "No", false, window22) end ) addEventHandler("onClientMarkerHit",root, function ( hitElement ) if ( source == Taxi1 ) then if ( hitElement == localPlayer ) then if ( getPlayerTeam ( localPlayer ) ) then if ( getElementData( localPlayer, 'Occupation' ) == "Miner-Jop" ) and ( getTeamName ( getPlayerTeam ( localPlayer ) ) == "No Team" ) and not isPedInVehicle(localPlayer) then guiSetVisible (window22, true) showCursor(true) end end end end end ) addEventHandler( "onClientGUIClick", root, function() if source == button11 then triggerServerEvent('remveMiner', localPlayer) guiSetVisible (window22, false) showCursor (false) destroyElement ( minerMark ) destroyElement ( minerMarkk ) destroyElement ( minerBlip ) destroyElement ( minerObj ) elseif source == button22 then guiSetVisible (window22, false) showCursor (false) end end ) ملف سيرفر شباب ضروري ساعدوني

مابيه كلينت انا ابي الشخصيات والحركات تظهر للناس

مطلوب مبرمج مقابل مبلغ مادي اعطيه الفلوس واقله الفكره وهو يعطي لنفسه المده الي بيسوي فيها المود حط رقمك وراح اتواصل معاك باسرع وقت

السلام عليكم ورحمه الله وبركاته اليوم ابي اسوي مود لوحه فيب حرب عصابات يعني مثلا زر يعطيك دم 200 ودرع 100 حارس شخصي تقدر تنزله كل 5 دقايق دمه 500 ومعاه رشاش وسياره خاصه تقدر تنزلها كل 1 دقيقه وطائره حربيه كل 5 دقايق تقدر تنزلها وسفينه تقدر تنزلها كل 1 دقيقه وتقدر تغير الماشيه حقتك وكذا وقريد ليست فيه شخصيات ممكن الفنكشات؟

السلام عليكم ورحمه الله وبركاته انا ابي مساعده انا معي مود مستر جراند حق الشراء ابي لم يجي المشتري يدفع يجي لي اسم حسابه + سيرياله المود يطلع سيرياله فقط , اتمني الفنكشات او تسووه انتم انا معاكم في اي شي كلينت Photo = {} WND = {} Close = {} local screenW, screenH = guiGetScreenSize() WND.ShowWindow = guiCreateWindow((screenW - 746) / 2, (screenH - 519) / 2, 746, 519, "", false) guiWindowSetSizable(WND.ShowWindow, false) guiSetAlpha(WND.ShowWindow, 1.00) guiSetProperty(WND.ShowWindow, "CaptionColour", "FFFE00E9") guiSetVisible(WND.ShowWindow, false) Photo.ShowWindow = guiCreateStaticImage(10, 22, 726, 455, "ShowPhoto.png", false, WND.ShowWindow) guiSetAlpha(Photo.ShowWindow, 0.75) Close.ShowWindow = guiCreateButton(635, 483, 101, 26, "X", false, WND.ShowWindow) guiSetFont(Close.ShowWindow, "default-bold-small") guiSetProperty(Close.ShowWindow, "NormalTextColour", "FFFE0000") Players = { GridList = {} } cardType = { Label = {} } DeleteAll = { Button = {} } CardsNumbers = { GridList = {} } X = { Button = {} } BuyingManager = {} CopySerial = { Button = {} } TotalPrice = { Label = {} } PlayerSerial = { Label = {} } CardNumber = { Edit4 = {}, Edit5 = {}, Edit1 = {}, Edit6 = {}, Edit3 = {}, Edit2 = {} } CardNumbers = { Label = {} } CARTSNote = { Label = {} } Mobily = { Selection = {} } GUIEditor = { button = {}, label = {} } BuyType = { Label = {} } ShowBuyWindow = { Button = {} } STC = { Selection = {} } EnteredPasswordStatus = { Label = {} } Items = { GridList = {} } X = { Button = {} } StatusNote = { Label = {} } cashU = { Selection = {} } TypeToBuy = { Label = {} } Password = { Label = {}, Edit = {} } SentMyInfo = { Button = {} } Buy = {} local screenW, screenH = guiGetScreenSize() Buy.BuyWND = guiCreateWindow((screenW - 740) / 2, (screenH - 460) / 2, 740, 460, "# - | لوحة الشراء | - #", false) guiWindowSetSizable(Buy.BuyWND, false) guiSetAlpha(Buy.BuyWND, 1.00) guiSetProperty(Buy.BuyWND, "CaptionColour", "FFE400CC") guiSetVisible(Buy.BuyWND, false) GUIEditor.label[1] = guiCreateLabel(603, 30, 127, 22, "* | تعليمات | *", false, Buy.BuyWND) guiSetFont(GUIEditor.label[1], "default-bold-small") guiLabelSetColor(GUIEditor.label[1], 56, 255, 35) guiLabelSetHorizontalAlign(GUIEditor.label[1], "center", false) guiLabelSetVerticalAlign(GUIEditor.label[1], "center") GUIEditor.label[2] = guiCreateLabel(26, 67, 704, 72, "ملاحظة : إدارة السيرفر غير مسؤولة عن اي مشتريات تتم خارج هذه اللوحة !, عند توفر الشراء \n- وذلك بأمر من صاحب السيرفر, يجب ملء الحقول التالية بمعلومات صحيحة لتتم عملية الشراء بشكل صحيح !\n- سيتم تفعيل الخدمة التي اشتريتها لمدة اقصاها 48 ساعة, وإذا لم تتم عملية تفعيل الخدمة الخاصة بك, قم بمراجعة صاحب السيرفر \n-للشراء عن طريق باي بال او ون كارد الرجاء بل تواصل علي الرقم التالي\n", false, Buy.BuyWND) guiSetFont(GUIEditor.label[2], "default-bold-small") guiLabelSetColor(GUIEditor.label[2], 0, 27, 233) guiLabelSetHorizontalAlign(GUIEditor.label[2], "right", false) GUIEditor.label[3] = guiCreateLabel(668, 149, 62, 23, "حالة البيع :", false, Buy.BuyWND) guiSetFont(GUIEditor.label[3], "default-bold-small") guiLabelSetColor(GUIEditor.label[3], 247, 244, 0) guiLabelSetHorizontalAlign(GUIEditor.label[3], "right", false) guiLabelSetVerticalAlign(GUIEditor.label[3], "center") StatusNote.Label.BuyWND = guiCreateLabel(593, 149, 72, 23, "مفتوح الان .!", false, Buy.BuyWND) guiSetFont(StatusNote.Label.BuyWND, "default-bold-small") guiLabelSetHorizontalAlign(StatusNote.Label.BuyWND, "right", false) guiLabelSetVerticalAlign(StatusNote.Label.BuyWND, "center") Password.Label.BuyWND = guiCreateLabel(356, 149, 235, 23, "| قم بأدخال كلمة السر لدخول لوحة الشراء :", false, Buy.BuyWND) guiSetFont(Password.Label.BuyWND, "default-bold-small") guiLabelSetColor(Password.Label.BuyWND, 0, 247, 29) guiLabelSetHorizontalAlign(Password.Label.BuyWND, "center", false) guiLabelSetVerticalAlign(Password.Label.BuyWND, "center") Password.Edit.BuyWND = guiCreateEdit(234, 149, 122, 23, "", false, Buy.BuyWND) GUIEditor.button[1] = guiCreateButton(94, 149, 138, 23, "الدخول للوحة الشراء", false, Buy.BuyWND) guiSetFont(GUIEditor.button[1], "default-bold-small") guiSetProperty(GUIEditor.button[1], "NormalTextColour", "FF00F71D") EnteredPasswordStatus.Label.BuyWND = guiCreateLabel(10, 178, 222, 21, "* خطأ : كلمة السر التي ادخلتها خاطئة .!", false, Buy.BuyWND) guiSetFont(EnteredPasswordStatus.Label.BuyWND, "default-bold-small") guiLabelSetColor(EnteredPasswordStatus.Label.BuyWND, 247, 0, 0) guiLabelSetHorizontalAlign(EnteredPasswordStatus.Label.BuyWND, "center", false) guiLabelSetVerticalAlign(EnteredPasswordStatus.Label.BuyWND, "center") TypeToBuy.Label.BuyWND = guiCreateLabel(601, 209, 129, 24, "- الشيء المراد شرائه :", false, Buy.BuyWND) guiSetFont(TypeToBuy.Label.BuyWND, "default-bold-small") guiLabelSetColor(TypeToBuy.Label.BuyWND, 211, 194, 43) guiLabelSetHorizontalAlign(TypeToBuy.Label.BuyWND, "right", false) guiLabelSetVerticalAlign(TypeToBuy.Label.BuyWND, "center") Items.GridList.BuyWND = guiCreateGridList(416, 243, 314, 197, false, Buy.BuyWND) guiGridListAddColumn(Items.GridList.BuyWND, "# النوع", 0.3) guiGridListAddColumn(Items.GridList.BuyWND, "# الخطة", 0.3) guiGridListAddColumn(Items.GridList.BuyWND, "# السعر", 0.3) CardNumbers.Label.BuyWND = guiCreateLabel(277, 243, 129, 24, "- ارقام بطائق الشحن :", false, Buy.BuyWND) guiSetFont(CardNumbers.Label.BuyWND, "default-bold-small") guiLabelSetColor(CardNumbers.Label.BuyWND, 211, 194, 43) guiLabelSetHorizontalAlign(CardNumbers.Label.BuyWND, "right", false) guiLabelSetVerticalAlign(CardNumbers.Label.BuyWND, "center") CardNumber.Edit1.BuyWND = guiCreateEdit(10, 273, 188, 26, "", false, Buy.BuyWND) guiSetFont(ShowBuyWindow.Button.BuyWND, "default-bold-small") guiSetProperty(ShowBuyWindow.Button.BuyWND, "NormalTextColour", "FFE700DA") guiSetFont(GUIEditor.label[4], "default-bold-small") guiLabelSetColor(GUIEditor.label[4], 56, 255, 35) guiLabelSetHorizontalAlign(GUIEditor.label[4], "right", false) guiLabelSetVerticalAlign(GUIEditor.label[4], "center") SentMyInfo.Button.BuyWND = guiCreateButton(227, 415, 179, 25, "إرسال المعلومات", false, Buy.BuyWND) guiSetFont(SentMyInfo.Button.BuyWND, "default-bold-small") guiSetProperty(SentMyInfo.Button.BuyWND, "NormalTextColour", "FF0AE600") X.Button.BuyWND = guiCreateButton(10, 415, 86, 25, "X", false, Buy.BuyWND) guiSetFont(X.Button.BuyWND, "default-bold-small") guiSetProperty(X.Button.BuyWND, "NormalTextColour", "FFE50000") BuyType.Label.BuyWND = guiCreateLabel(325, 210, 81, 23, "- طريقة الدفع : ", false, Buy.BuyWND) guiSetFont(BuyType.Label.BuyWND, "default-bold-small") guiLabelSetColor(BuyType.Label.BuyWND, 211, 194, 43) guiLabelSetHorizontalAlign(BuyType.Label.BuyWND, "right", false) guiLabelSetVerticalAlign(BuyType.Label.BuyWND, "center") STC.Selection.BuyWND = guiCreateCheckBox(247, 210, 78, 23, "سوا | STC", false, false, Buy.BuyWND) guiSetFont(STC.Selection.BuyWND, "default-bold-small") cashU.Selection.BuyWND = guiCreateCheckBox(131, 210, 111, 23, "Vodafone | فودافون", false, false, Buy.BuyWND) guiSetFont(cashU.Selection.BuyWND, "default-bold-small") Mobily.Selection.BuyWND = guiCreateCheckBox(10, 210, 111, 23, "Etisalat | اتصالات", false, false, Buy.BuyWND) guiSetFont(Mobily.Selection.BuyWND, "default-bold-small") CardNumber.Edit2.BuyWND = guiCreateEdit(218, 273, 188, 26, "", false, Buy.BuyWND) CardNumber.Edit3.BuyWND = guiCreateEdit(10, 305, 188, 26, "", false, Buy.BuyWND) CardNumber.Edit4.BuyWND = guiCreateEdit(218, 305, 188, 26, "", false, Buy.BuyWND) CardNumber.Edit5.BuyWND = guiCreateEdit(10, 336, 188, 26, "", false, Buy.BuyWND) CardNumber.Edit6.BuyWND = guiCreateEdit(218, 336, 188, 26, "", false, Buy.BuyWND) CARTSNote.Label.BuyWND = guiCreateLabel(20, 367, 386, 27, "ملاحظة : في حال وجود بطاقة واحدة فقط قم بأدخال مربع واحد فقط !", false, Buy.BuyWND) guiSetFont(CARTSNote.Label.BuyWND, "default-bold-small") guiLabelSetColor(CARTSNote.Label.BuyWND, 255, 0, 0) guiLabelSetHorizontalAlign(CARTSNote.Label.BuyWND, "right", false) guiLabelSetVerticalAlign(CARTSNote.Label.BuyWND, "center") addEventHandler( 'onClientMouseEnter', root, function() if (source == Photo.ShowWindow) then guiSetAlpha(Photo.ShowWindow, 1.00) end end ) addEventHandler( 'onClientMouseLeave', root, function() if (source == Photo.ShowWindow) then guiSetAlpha(Photo.ShowWindow, 0.75) end end ) addEventHandler( 'onClientGUIClick', root, function() if (source == ShowBuyWindow.Button.BuyWND) then guiSetVisible(WND.ShowWindow, true) guiSetVisible(Buy.BuyWND, false) elseif (source == Close.ShowWindow) then guiSetVisible(WND.ShowWindow, false) guiSetVisible(Buy.BuyWND, true) end end ) function showTotalWND() guiSetVisible(TypeToBuy.Label.BuyWND, true) guiSetVisible(Items.GridList.BuyWND, true) guiSetVisible(CardNumbers.Label.BuyWND, true) guiSetVisible(SentMyInfo.Button.BuyWND, true) guiSetVisible(BuyType.Label.BuyWND , true) guiSetVisible(STC.Selection.BuyWND, true) guiSetVisible(cashU.Selection.BuyWND, true) guiSetVisible(Mobily.Selection.BuyWND, true) guiSetVisible(CardNumber.Edit1.BuyWND, true) guiSetVisible(CardNumber.Edit2.BuyWND, true) guiSetVisible(CardNumber.Edit3.BuyWND, true) guiSetVisible(CardNumber.Edit4.BuyWND, true) guiSetVisible(CardNumber.Edit5.BuyWND, true) guiSetVisible(CardNumber.Edit6.BuyWND, true) guiSetVisible(CARTSNote.Label.BuyWND, true) end function hideTotalWND() guiSetText(StatusNote.Label.BuyWND, "مغلق الان .!") guiSetVisible(Password.Label.BuyWND, true) guiSetVisible(Password.Edit.BuyWND, true) guiSetVisible(GUIEditor.button[1], true) guiSetVisible(EnteredPasswordStatus.Label.BuyWND, false) guiSetVisible(TypeToBuy.Label.BuyWND, false) guiSetVisible(Items.GridList.BuyWND, false) guiSetVisible(CardNumbers.Label.BuyWND, false) guiSetVisible(SentMyInfo.Button.BuyWND, false) guiSetVisible(BuyType.Label.BuyWND , false) guiSetVisible(STC.Selection.BuyWND, false) guiSetVisible(cashU.Selection.BuyWND, false) guiSetVisible(Mobily.Selection.BuyWND, false) guiSetVisible(CardNumber.Edit1.BuyWND, false) guiSetVisible(CardNumber.Edit2.BuyWND, false) guiSetVisible(CardNumber.Edit3.BuyWND, false) guiSetVisible(CardNumber.Edit4.BuyWND, false) guiSetVisible(CardNumber.Edit5.BuyWND, false) guiSetVisible(CardNumber.Edit6.BuyWND, false) guiSetVisible(CARTSNote.Label.BuyWND, false) end addEventHandler( 'onClientGUIClick', root, function() if (source == SentMyInfo.Button.BuyWND) then if (guiCheckBoxGetSelected(STC.Selection.BuyWND) == false and guiCheckBoxGetSelected(cashU.Selection.BuyWND) == false and guiCheckBoxGetSelected(Mobily.Selection.BuyWND) == false) then outputChatBox('* خطأ : #FFFFFF يجب ان تقوم بتحديد طريقة الدفع لأكمال عملية الشراء بنجاح !', 255, 0, 0, true) return end local getItemSelected = guiGridListGetItemText(Items.GridList.BuyWND, guiGridListGetSelectedItem(Items.GridList.BuyWND), 1) if (not getItemSelected or getItemSelected == "") then outputChatBox('* خطأ : #FFFFFF يجب ان تقوم بتحديد نوع وخطة الشيء المراد شرائه !', 255, 0, 0, true) return end local getitemsfromSELECTED = guiGridListGetSelectedItem(Items.GridList.BuyWND) local BoutghType = guiGridListGetItemText(Items.GridList.BuyWND, getitemsfromSELECTED, 1) local BoutghPlan = guiGridListGetItemText(Items.GridList.BuyWND, getitemsfromSELECTED, 2) local BoutghPrice = guiGridListGetItemText(Items.GridList.BuyWND, getitemsfromSELECTED, 3) local CARDnumber1 = guiGetText(CardNumber.Edit1.BuyWND) local CARDnumber2 = guiGetText(CardNumber.Edit2.BuyWND) local CARDnumber3 = guiGetText(CardNumber.Edit3.BuyWND) local CARDnumber4 = guiGetText(CardNumber.Edit4.BuyWND) local CARDnumber5 = guiGetText(CardNumber.Edit5.BuyWND) local CARDnumber6 = guiGetText(CardNumber.Edit6.BuyWND) local getID1 = guiEditGetCaretIndex (CardNumber.Edit1.BuyWND) local getID2 = guiEditGetCaretIndex (CardNumber.Edit2.BuyWND) local getID3 = guiEditGetCaretIndex (CardNumber.Edit3.BuyWND) local getID4 = guiEditGetCaretIndex (CardNumber.Edit4.BuyWND) local getID5 = guiEditGetCaretIndex (CardNumber.Edit5.BuyWND) local getID6 = guiEditGetCaretIndex (CardNumber.Edit6.BuyWND) local getID = getID1 + getID2 + getID3 + getID4 + getID5 + getID6 if (not tonumber(CARDnumber1) and not tonumber(CARDnumber2) and not tonumber(CARDnumber3) and not tonumber(CARDnumber4) and not tonumber(CARDnumber5) and not tonumber(CARDnumber6)) then outputChatBox('* خطأ : #FFFFFF يرجى كتابة رقم بطاقة صحيح لتتم عملية ارسال المعلومات بنجاح !', 255, 0, 0, true) return end if ((CARDnumber1 ~= "") and not tonumber(CARDnumber1) or (CARDnumber2 ~= "") and not tonumber(CARDnumber2) or (CARDnumber3 ~= "") and not tonumber(CARDnumber3) or (CARDnumber4 ~= "") and not tonumber(CARDnumber4) or (CARDnumber5 ~= "") and not tonumber(CARDnumber5) or (CARDnumber6 ~= "") and not tonumber(CARDnumber6)) then outputChatBox('* خطأ : #FFFFFF يرجى كتابة رقم بطاقة صحيح لتتم عملية ارسال المعلومات بنجاح !', 255, 0, 0, true) return end if (guiCheckBoxGetSelected(STC.Selection.BuyWND) == true) then local cardType = "سوا | STC" triggerServerEvent( 'NewPlayerBought', localPlayer, getID, BoutghType, BoutghPlan, BoutghPrice, cardType, CARDnumber1, CARDnumber2, CARDnumber3, CARDnumber4, CARDnumber5, CARDnumber6) else if (guiCheckBoxGetSelected(cashU.Selection.BuyWND) == true) then local cardType = "Vodafone | فودافون" triggerServerEvent( 'NewPlayerBought', localPlayer, getID, BoutghType, BoutghPlan, BoutghPrice, cardType, CARDnumber1, CARDnumber2, CARDnumber3, CARDnumber4, CARDnumber5, CARDnumber6) else if (guiCheckBoxGetSelected(Mobily.Selection.BuyWND) == true) then local cardType = "Etisalat | اتصالات" triggerServerEvent( 'NewPlayerBought', localPlayer, getID, BoutghType, BoutghPlan, BoutghPrice, cardType, CARDnumber1, CARDnumber2, CARDnumber3, CARDnumber4, CARDnumber5, CARDnumber6) end end end end end ) addEvent( 'SeccessfullySent', true ) addEventHandler( 'SeccessfullySent', root, function() guiSetEnabled(SentMyInfo.Button.BuyWND, false) guiSetText(SentMyInfo.Button.BuyWND, "تم ارسال المعلومات بنجاح") setTimer(guiSetEnabled, 10000, 1, SentMyInfo.Button.BuyWND, true) setTimer(guiSetText, 10000, 1, SentMyInfo.Button.BuyWND, "إرسال المعلومات") end ) addEvent( 'ERRORselectedBUY', true ) addEventHandler( 'ERRORselectedBUY', root, function() guiSetEnabled(SentMyInfo.Button.BuyWND, false) guiSetText(SentMyInfo.Button.BuyWND, "خطأ : لقد قمت بشراءه مسبقا") setTimer(guiSetEnabled, 10000, 1, SentMyInfo.Button.BuyWND, true) setTimer(guiSetText, 10000, 1, SentMyInfo.Button.BuyWND, "إرسال المعلومات") end ) addEventHandler( 'onClientResourceStart', resourceRoot, function() showTotalWND() guiSetVisible(Password.Label.BuyWND, false) guiSetVisible(Password.Edit.BuyWND, false) guiSetVisible(GUIEditor.button[1], false) guiSetVisible(EnteredPasswordStatus.Label.BuyWND, false) guiSetEnabled(GUIEditor.button[1], false) guiEditSetReadOnly(Password.Edit.BuyWND, true) end ) addEventHandler( 'onClientGUIClick', root, function() if (source == X.Button.BuyWND) then guiSetVisible(Buy.BuyWND, false) showCursor(false) elseif (source == GUIEditor.button[1]) then local getPassword = guiGetText(Password.Edit.BuyWND) if (getPassword == getElementData(localPlayer, "Password")) then guiSetVisible(EnteredPasswordStatus.Label.BuyWND, true) showTotalWND() guiSetEnabled(GUIEditor.button[1], false) guiEditSetReadOnly(Password.Edit.BuyWND, true) guiSetText(EnteredPasswordStatus.Label.BuyWND, 'تهانينا : كلمة المرور صحيحة, تم فتح اللوحة .!') guiLabelSetColor(EnteredPasswordStatus.Label.BuyWND, 0, 255, 0) guiSetVisible(EnteredPasswordStatus.Label.BuyWND, true) setTimer(guiSetVisible, 5000, 1, EnteredPasswordStatus.Label.BuyWND, false) else guiSetText(EnteredPasswordStatus.Label.BuyWND, '* خطأ : كلمة السر التي ادخلتها غير صالحة .!') guiLabelSetColor(EnteredPasswordStatus.Label.BuyWND, 255, 0, 0) guiSetVisible(EnteredPasswordStatus.Label.BuyWND, true) setTimer(guiSetVisible, 5000, 1, EnteredPasswordStatus.Label.BuyWND, false) end elseif (source == STC.Selection.BuyWND) then guiCheckBoxSetSelected(cashU.Selection.BuyWND, false) guiCheckBoxSetSelected(Mobily.Selection.BuyWND, false) elseif (source == cashU.Selection.BuyWND) then guiCheckBoxSetSelected(STC.Selection.BuyWND, false) guiCheckBoxSetSelected(Mobily.Selection.BuyWND, false) elseif (source == Mobily.Selection.BuyWND) then guiCheckBoxSetSelected(STC.Selection.BuyWND, false) guiCheckBoxSetSelected(cashU.Selection.BuyWND, false) end end ) function openBuyWND() if (guiGetVisible(Buy.BuyWND) == false) then guiSetVisible(Buy.BuyWND, true) showCursor(true) else guiSetVisible(Buy.BuyWND, false) showCursor(false) end end bindKey( 'F10', 'down', openBuyWND) local screenW, screenH = guiGetScreenSize() BuyingManager.BuyingWNDManager = guiCreateWindow((screenW - 713) / 2, (screenH - 492) / 2, 713, 492, "# - | إدارة المشتريات | - #", false) guiWindowSetSizable(BuyingManager.BuyingWNDManager, false) guiSetAlpha(BuyingManager.BuyingWNDManager, 1.00) guiSetProperty(BuyingManager.BuyingWNDManager, "CaptionColour", "FFFE00D8") guiSetVisible(BuyingManager.BuyingWNDManager, false) Label1 = guiCreateLabel(554, 25, 151, 21, "* الاعبين الذين قاموا بالدفع :", false, BuyingManager.BuyingWNDManager) guiSetFont(Label1, "default-bold-small") guiLabelSetColor(Label1, 0, 254, 239) guiLabelSetHorizontalAlign(Label1, "right", false) guiLabelSetVerticalAlign(Label1, "center") Players.GridList.BuyingWNDManager = guiCreateGridList(12, 63, 692, 165, false, BuyingManager.BuyingWNDManager) guiGridListAddColumn(Players.GridList.BuyingWNDManager, "اسم الاعب", 0.3) guiGridListAddColumn(Players.GridList.BuyingWNDManager, "نوع الشيء", 0.3) guiGridListAddColumn(Players.GridList.BuyingWNDManager, "الخطة", 0.3) Label2 = guiCreateLabel(616, 240, 89, 23, "- السعر الكلي :", false, BuyingManager.BuyingWNDManager) guiSetFont(Label2, "default-bold-small") guiLabelSetColor(Label2, 219, 177, 34) guiLabelSetHorizontalAlign(Label2, "right", false) guiLabelSetVerticalAlign(Label2, "center") TotalPrice.Label.BuyingWNDManager = guiCreateLabel(496, 240, 116, 23, "", false, BuyingManager.BuyingWNDManager) guiSetFont(TotalPrice.Label.BuyingWNDManager, "default-bold-small") guiLabelSetHorizontalAlign(TotalPrice.Label.BuyingWNDManager, "right", false) guiLabelSetVerticalAlign(TotalPrice.Label.BuyingWNDManager, "center") Label3 = guiCreateLabel(583, 273, 122, 23, "- ارقام بطائق الشحن : ", false, BuyingManager.BuyingWNDManager) guiSetFont(Label3, "default-bold-small") guiLabelSetColor(Label3, 219, 177, 34) guiLabelSetHorizontalAlign(Label3, "right", false) guiLabelSetVerticalAlign(Label3, "center") CardsNumbers.GridList.BuyingWNDManager = guiCreateGridList(426, 306, 278, 176, false, BuyingManager.BuyingWNDManager) guiGridListAddColumn(CardsNumbers.GridList.BuyingWNDManager, "#", 0.1) guiGridListAddColumn(CardsNumbers.GridList.BuyingWNDManager, "ارقام بطائق الشحن", 0.8) Label5 = guiCreateLabel(317, 376, 98, 22, "- سيريال الاعب :", false, BuyingManager.BuyingWNDManager) guiSetFont(Label5, "default-bold-small") guiLabelSetColor(Label5, 219, 177, 34) guiLabelSetHorizontalAlign(Label5, "right", false) guiLabelSetVerticalAlign(Label5, "center") PlayerSerial.Label.BuyingWNDManager = guiCreateLabel(70, 377, 243, 21, "", false, BuyingManager.BuyingWNDManager) guiSetFont(PlayerSerial.Label.BuyingWNDManager, "default-bold-small") guiLabelSetHorizontalAlign(PlayerSerial.Label.BuyingWNDManager, "right", false) guiLabelSetVerticalAlign(PlayerSerial.Label.BuyingWNDManager, "center") CopySerial.Button.BuyingWNDManager = guiCreateButton(20, 404, 99, 21, "نسخ", false, BuyingManager.BuyingWNDManager) guiSetFont(CopySerial.Button.BuyingWNDManager, "default-bold-small") guiSetProperty(CopySerial.Button.BuyingWNDManager, "NormalTextColour", "FF22FF0B") X.Button.BuyingWNDManager = guiCreateButton(10, 459, 38, 23, "X", false, BuyingManager.BuyingWNDManager) guiSetFont(X.Button.BuyingWNDManager, "default-bold-small") guiSetProperty(X.Button.BuyingWNDManager, "NormalTextColour", "FFF10000") DeleteAll.Button.BuyingWNDManager = guiCreateButton(111, 240, 124, 23, "حذف الاعب المحدد", false, BuyingManager.BuyingWNDManager) guiSetFont(DeleteAll.Button.BuyingWNDManager, "default-bold-small") guiSetProperty(DeleteAll.Button.BuyingWNDManager, "NormalTextColour", "FFF100C0") Label4 = guiCreateLabel(238, 240, 178, 23, "- حذف الاعب المحدد من القائمة :", false, BuyingManager.BuyingWNDManager) guiSetFont(Label4, "default-bold-small") guiLabelSetColor(Label4, 219, 177, 34) guiLabelSetHorizontalAlign(Label4, "right", false) guiLabelSetVerticalAlign(Label4, "center") Label10 = guiCreateLabel(301, 306, 114, 23, "- نوع بطائق الشحن :", false, BuyingManager.BuyingWNDManager) guiSetFont(Label10, "default-bold-small") guiLabelSetColor(Label10, 219, 177, 34) guiLabelSetHorizontalAlign(Label10, "right", false) guiLabelSetVerticalAlign(Label10, "center") cardType.Label.ManagerBuyWND = guiCreateLabel(128, 306, 173, 23, "", false, BuyingManager.BuyingWNDManager) guiSetFont(cardType.Label.ManagerBuyWND, "default-bold-small") guiLabelSetHorizontalAlign(cardType.Label.ManagerBuyWND, "right", false) guiLabelSetVerticalAlign(cardType.Label.ManagerBuyWND, "center") addEventHandler( 'onClientGUIClick', root, function() if (source == DeleteAll.Button.BuyingWNDManager) then local getItemSelected = guiGridListGetSelectedItem(Players.GridList.BuyingWNDManager) if (getItemSelected == -1) then outputChatBox( '* خطأ : #FFFFFF لم تقم بتحديد مشتري من القائمة !', 255, 0, 0, true) return end local SERIAL_ = guiGridListGetItemData(Players.GridList.BuyingWNDManager, getItemSelected, 1) local ID = guiGridListGetItemData(Players.GridList.BuyingWNDManager, getItemSelected, 2) triggerServerEvent( 'removeUSERfromBuyWindow', localPlayer, SERIAL_, ID) guiGridListClear(CardsNumbers.GridList.BuyingWNDManager) guiSetText(TotalPrice.Label.BuyingWNDManager, "") guiSetText(PlayerSerial.Label.BuyingWNDManager, "") guiSetText(cardType.Label.ManagerBuyWND, "") guiSetEnabled(DeleteAll.Button.BuyingWNDManager, false) setTimer(guiSetEnabled, 5000, 1, DeleteAll.Button.BuyingWNDManager, true) elseif (source == CopySerial.Button.BuyingWNDManager) then local PlayerSerial = guiGetText(PlayerSerial.Label.BuyingWNDManager) if (PlayerSerial == "") then outputChatBox( '* خطأ : #FFFFFF لا يوجد سيريال لتقوم بنسخه !', 255, 0, 0, true) return end setClipboard(PlayerSerial) guiSetEnabled(CopySerial.Button.BuyingWNDManager, false) setTimer(guiSetEnabled, 5000, 1, CopySerial.Button.BuyingWNDManager, true) outputChatBox('* إدارة المشتريات : #FFFFFF تم نسخ سيريال المشتري بنجاح !', 0, 255, 0, true) end end ) addEvent( 'UPDATEGRIDLIST', true ) addEventHandler( 'UPDATEGRIDLIST', root, function() guiGridListClear(Players.GridList.BuyingWNDManager) triggerServerEvent( 'putPlayers', localPlayer ) end ) function putPlayersBought(SQL) guiGridListClear(Players.GridList.BuyingWNDManager) for i, _ in ipairs(SQL) do local player_ = guiGridListAddRow(Players.GridList.BuyingWNDManager) local text1 = guiGridListSetItemText(Players.GridList.BuyingWNDManager, player_, 1, SQL[i].userName, false, false) local text2 = guiGridListSetItemText(Players.GridList.BuyingWNDManager, player_, 2, SQL[i].boughtType, false, false) local text4 = guiGridListSetItemText(Players.GridList.BuyingWNDManager, player_, 3, SQL[i].boughtPlan, false, false) local Data1 = guiGridListSetItemData(Players.GridList.BuyingWNDManager, player_, 1, SQL[i].userSerial) local data3 = guiGridListSetItemData(Players.GridList.BuyingWNDManager, player_, 3, SQL[i].boughtPrice) local id = guiGridListSetItemData(Players.GridList.BuyingWNDManager, player_, 2, SQL[i].userID) guiGridListSetItemColor(Players.GridList.BuyingWNDManager, player_, 1, 255, 0, 0) guiGridListSetItemColor(Players.GridList.BuyingWNDManager, player_, 2, 255, 255, 0) guiGridListSetItemColor(Players.GridList.BuyingWNDManager, player_, 3, 0, 255, 0) end end addEvent( 'PutPlayersInList', true ) addEventHandler( 'PutPlayersInList', root, putPlayersBought) addEventHandler( 'onClientResourceStart', resourceRoot, function() triggerServerEvent( 'putPlayers', localPlayer ) end ) addEvent( 'putNUMBERS', true ) addEventHandler( 'putNUMBERS', root, function(CARDtype_, CARD1_, CARD2_, CARD3_, CARD4_, CARD5_, CARD6_) guiGridListClear(CardsNumbers.GridList.BuyingWNDManager) Row1 = guiGridListAddRow(CardsNumbers.GridList.BuyingWNDManager) Row2 = guiGridListAddRow(CardsNumbers.GridList.BuyingWNDManager) Row3 = guiGridListAddRow(CardsNumbers.GridList.BuyingWNDManager) Row4 = guiGridListAddRow(CardsNumbers.GridList.BuyingWNDManager) Row5 = guiGridListAddRow(CardsNumbers.GridList.BuyingWNDManager) Row6 = guiGridListAddRow(CardsNumbers.GridList.BuyingWNDManager) if (Row1) and (CARD1_ ~= "") then local text1 = guiGridListSetItemText(CardsNumbers.GridList.BuyingWNDManager, Row1, 2, CARD1_, false, false) guiGridListSetItemColor(CardsNumbers.GridList.BuyingWNDManager, Row1, 2, 0, 255, 0) end if (Row2) and (CARD2_ ~= "") then local text2 = guiGridListSetItemText(CardsNumbers.GridList.BuyingWNDManager, Row2, 2, CARD2_, false, false) guiGridListSetItemColor(CardsNumbers.GridList.BuyingWNDManager, Row2, 2, 0, 255, 0) end if (Row3) and (CARD3_ ~= "") then local text3 = guiGridListSetItemText(CardsNumbers.GridList.BuyingWNDManager, Row3, 2, CARD3_, false, false) guiGridListSetItemColor(CardsNumbers.GridList.BuyingWNDManager, Row3, 2, 0, 255, 0) end if (Row4) and (CARD4_ ~= "") then local text4 = guiGridListSetItemText(CardsNumbers.GridList.BuyingWNDManager, Row4, 2, CARD4_, false, false) guiGridListSetItemColor(CardsNumbers.GridList.BuyingWNDManager, Row4, 2, 0, 255, 0) end if (Row5) and (CARD5_ ~= "") then local text5 = guiGridListSetItemText(CardsNumbers.GridList.BuyingWNDManager, Row5, 2, CARD5_, false, false) guiGridListSetItemColor(CardsNumbers.GridList.BuyingWNDManager, Row5, 2, 0, 255, 0) end if (Row6) and (CARD6_ ~= "") then local text6 = guiGridListSetItemText(CardsNumbers.GridList.BuyingWNDManager, Row6, 2, CARD6_, false, false) guiGridListSetItemColor(CardsNumbers.GridList.BuyingWNDManager, Row6, 2, 0, 255, 0) end if (Row1) and (CARD1_ ~= "") then local text1C1 = guiGridListSetItemText(CardsNumbers.GridList.BuyingWNDManager, Row1, 1, "-", false, false) guiGridListSetItemColor(CardsNumbers.GridList.BuyingWNDManager, Row1, 1, 255, 0, 0) end if (Row2) and (CARD2_ ~= "") then local text2C1 = guiGridListSetItemText(CardsNumbers.GridList.BuyingWNDManager, Row2, 1, "-", false, false) guiGridListSetItemColor(CardsNumbers.GridList.BuyingWNDManager, Row2, 1, 255, 0, 0) end if (Row3) and (CARD3_ ~= "") then local text3C1 = guiGridListSetItemText(CardsNumbers.GridList.BuyingWNDManager, Row3, 1, "-", false, false) guiGridListSetItemColor(CardsNumbers.GridList.BuyingWNDManager, Row3, 1, 255, 0, 0) end if (Row4) and (CARD4_ ~= "") then local text4C1 = guiGridListSetItemText(CardsNumbers.GridList.BuyingWNDManager, Row4, 1, "-", false, false) guiGridListSetItemColor(CardsNumbers.GridList.BuyingWNDManager, Row4, 1, 255, 0, 0) end if (Row5) and (CARD5_ ~= "") then local text5C1 = guiGridListSetItemText(CardsNumbers.GridList.BuyingWNDManager, Row5, 1, "-", false, false) guiGridListSetItemColor(CardsNumbers.GridList.BuyingWNDManager, Row5, 1, 255, 0, 0) end if (Row6) and (CARD6_ ~= "") then local text6C1 = guiGridListSetItemText(CardsNumbers.GridList.BuyingWNDManager, Row6, 1, "-", false, false) guiGridListSetItemColor(CardsNumbers.GridList.BuyingWNDManager, Row6, 1, 255, 0, 0) end guiSetText(cardType.Label.ManagerBuyWND, CARDtype_) end ) addEventHandler( 'onClientGUIClick', root, function() if (source == Players.GridList.BuyingWNDManager) then local getItemSelected = guiGridListGetSelectedItem(Players.GridList.BuyingWNDManager) if (getItemSelected == -1) then guiSetText(TotalPrice.Label.BuyingWNDManager, "") guiSetText(PlayerSerial.Label.BuyingWNDManager, "") guiSetText(cardType.Label.ManagerBuyWND, "") guiGridListClear(CardsNumbers.GridList.BuyingWNDManager) end end end ) addEventHandler( 'onClientGUIClick', root, function() if (source == Players.GridList.BuyingWNDManager) then local getItemSelected = guiGridListGetSelectedItem(Players.GridList.BuyingWNDManager) if (getItemSelected ~= -1) then local SERIAL_ = guiGridListGetItemData(Players.GridList.BuyingWNDManager, getItemSelected, 1) local PRICE_ = guiGridListGetItemData(Players.GridList.BuyingWNDManager, getItemSelected, 3) guiSetText(TotalPrice.Label.BuyingWNDManager, PRICE_) guiSetText(PlayerSerial.Label.BuyingWNDManager, SERIAL_) guiGridListClear(CardsNumbers.GridList.BuyingWNDManager) local ID = guiGridListGetItemData(Players.GridList.BuyingWNDManager, getItemSelected, 2) triggerServerEvent( 'getCARDS', localPlayer, SERIAL_, ID) end elseif (source == X.Button.BuyingWNDManager) then guiSetVisible(BuyingManager.BuyingWNDManager, false) showCursor(false) end end ) function openBuyWNDmanager() if (not Access[getPlayerSerial(source)]) then outputChatBox("* ERROR : #FFFFFF Access denied !", 255, 0, 0, true) return end if (guiGetVisible(BuyingManager.BuyingWNDManager) == false) then guiSetVisible(BuyingManager.BuyingWNDManager, true) showCursor(true) else guiSetVisible(BuyingManager.BuyingWNDManager, false) showCursor(false) end end سيرفر executeSQLQuery( ' CREATE TABLE IF NOT EXISTS `BoughtUSERSsystem` (userSerial,userID,userName,boughtType,boughtPlan,boughtPrice,typeCard,CARD1,CARD2,CARD3,CARD4,CARD5,CARD6) ' ) --executeSQLQuery( ' DROP TABLE `BoughtUSERSsystem` ' ) addEvent( 'removeUSERfromBuyWindow', true ) addEventHandler( 'removeUSERfromBuyWindow', root, function(SERIAL_, ID) local checkPlayer = executeSQLQuery( ' SELECT * FROM `BoughtUSERSsystem` WHERE userSerial=?', SERIAL_ ) if (checkPlayer) then end executeSQLQuery( ' DELETE FROM `BoughtUSERSsystem` WHERE userID=? ', ID ) outputChatBox('* إدارة المشتريات : #FFFFFF تم حذف المشتري من القائمة بنجاح !', source, 0, 255, 0, true) triggerClientEvent( 'UPDATEGRIDLIST', source) end ) addEvent( 'getCARDS', true ) addEventHandler( 'getCARDS', root, function(SERIAL_, ID) local checkPlayer = executeSQLQuery( ' SELECT * FROM `BoughtUSERSsystem` WHERE userSerial=?', SERIAL_ ) if (checkPlayer) then end local checkID = executeSQLQuery( ' SELECT * FROM `BoughtUSERSsystem` WHERE userID=?', ID ) local CARD1_ = checkID[1]['CARD1'] local CARD2_ = checkID[1]['CARD2'] local CARD3_ = checkID[1]['CARD3'] local CARD4_ = checkID[1]['CARD4'] local CARD5_ = checkID[1]['CARD5'] local CARD6_ = checkID[1]['CARD6'] local CARDtype_ = checkID[1]['typeCard'] triggerClientEvent(source, 'putNUMBERS', source, CARDtype_, CARD1_, CARD2_, CARD3_, CARD4_, CARD5_, CARD6_) end ) addEvent( 'NewPlayerBought', true ) addEventHandler( 'NewPlayerBought', root, function(getID, BoutghType, BoutghPlan, BoutghPrice, cardType, CARDnumber1, CARDnumber2, CARDnumber3, CARDnumber4, CARDnumber5, CARDnumber6) local check = executeSQLQuery('SELECT * FROM `BoughtUSERSsystem` WHERE userSerial=?', getPlayerSerial(source)) if (type(check) == 'table' and #check ~= 0 and check) then local oldItemPlan = check[1]['boughtPlan'] if (oldItemPlan == BoutghPlan) then outputChatBox('* خطأ : #FFFFFF لقد قمت بشراء النوع والخطة التي حددتها مسبقا !', source, 255, 0, 0, true) triggerClientEvent( source, "ERRORselectedBUY", source ) return end local ID = 1 + getID - math.random(10, 100) + math.random(10,100) * getPlayerPing(source) executeSQLQuery('INSERT INTO `BoughtUSERSsystem` (userSerial,userID,userName,boughtType,boughtPlan,boughtPrice,typeCard,CARD1,CARD2,CARD3,CARD4,CARD5,CARD6) VALUES(?,?,?,?,?,?,?,?,?,?,?,?,?)', getPlayerSerial(source), ID, getPlayerName(source), BoutghType, BoutghPlan, BoutghPrice, cardType, CARDnumber1, CARDnumber2, CARDnumber3, CARDnumber4, CARDnumber5, CARDnumber6) triggerClientEvent( 'UPDATEGRIDLIST', source) triggerClientEvent( source, 'SeccessfullySent', source) else local ID = getPlayerSerial(source) executeSQLQuery('INSERT INTO `BoughtUSERSsystem` (userSerial,userID,userName,boughtType,boughtPlan,boughtPrice,typeCard,CARD1,CARD2,CARD3,CARD4,CARD5,CARD6) VALUES(?,?,?,?,?,?,?,?,?,?,?,?,?)', getPlayerSerial(source), ID, getPlayerName(source), BoutghType, BoutghPlan, BoutghPrice, cardType, CARDnumber1, CARDnumber2, CARDnumber3, CARDnumber4, CARDnumber5, CARDnumber6) triggerClientEvent( 'UPDATEGRIDLIST', source) triggerClientEvent( source, 'SeccessfullySent', source) end end ) addEvent( 'putPlayers', true ) addEventHandler( 'putPlayers', root, function() local TABLE = executeSQLQuery( ' SELECT * FROM `BoughtUSERSsystem` ' ) triggerClientEvent( 'PutPlayersInList', source, TABLE) end ) اتمني المساعده