Jump to content

PeTer.NexT

Members
  • Posts

    74
  • Joined

  • Last visited

Everything posted by PeTer.NexT

  1. طيب ابي اخليه يحفظ تاجات خاصه على SQL executeSQLQuery شكرأ برستيج تمت الافادة يغلق
  2. طيب ابي اخليه يحفظ تاجات خاصه على SQL
  3. المشكله الثاني هي اني ماقدر اضيف تاج لاحد بس اقدر احط لنفسي ويوم اغير ماقدر اغير لاحد بس اقدر اغير لنفسي يعني كل مين يسوي حقه بنفسه وانا مابغاه كذا ابغا الى معاه الخاصيه يقدر يضيف ويلغي المشكله الثاني مو من الفري روم
  4. السلام عليكم ورحمة الله وبركاته انا عندي مود تاجات خاصه بسريال> بس المشكله يوم احط تاج للرتب العاديه الى في اسل واضيف تاج خاص تتكرر التاجات مثل : جيت لرتبت كونسول وانا معي كونسول التاج راح يكون كونسول واذا ضفت تاج خاص من نفس المود الى عندي راح يتكرر التاج ابي حل الاكواد Client : local screenW, screenH = guiGetScreenSize() GUIEditor = { label = {} } T_WND = guiCreateWindow((screenW - 454) / 2, (screenH - 364) / 2, 454, 364, "~.* Player TAG - Panel *.~", false) guiWindowSetSizable(T_WND, false) guiSetProperty(T_WND, "CaptionColour", "FF29FF00") guiSetVisible(T_WND,false) GUIEditor.label[1] = guiCreateLabel(10, 29, 429, 17, "* Note : You can put Player serial and TAG Text for can show it in CHAT box", false, T_WND) guiSetFont(GUIEditor.label[1], "default-bold-small") guiLabelSetColor(GUIEditor.label[1], 255, 0, 0) GUIEditor.label[2] = guiCreateLabel(10, 67, 98, 16, "* Player serial :-", false, T_WND) guiSetFont(GUIEditor.label[2], "default-bold-small") guiLabelSetColor(GUIEditor.label[2], 47, 255, 0) T_Serial = guiCreateEdit(110, 67, 329, 18, "", false, T_WND) GUIEditor.label[3] = guiCreateLabel(10, 93, 98, 16, "* Player TAG :-", false, T_WND) guiSetFont(GUIEditor.label[3], "default-bold-small") guiLabelSetColor(GUIEditor.label[3], 5, 0, 255) T_TAG = guiCreateEdit(110, 91, 329, 18, "", false, T_WND) T_Enable = guiCreateButton(193, 123, 163, 28, "", false, T_WND) guiSetFont(T_Enable, "default-bold-small") guiSetProperty(T_Enable, "NormalTextColour", "FFF6FF00") T_Close = guiCreateButton(356, 334, 88, 20, "Close", false, T_WND) guiSetFont(T_Close, "default-bold-small") guiSetProperty(T_Close, "NormalTextColour", "FFFF0000") GUIEditor.label[4] = guiCreateLabel(9, 334, 257, 20, "#.~ Created by MR.GRAND", false, T_WND) guiSetFont(GUIEditor.label[4], "default-bold-small") guiLabelSetColor(GUIEditor.label[4], 0, 234, 255) GUIEditor.label[5] = guiCreateLabel(434, 151, 15, 177, "||\n||\n||\n||\n||\n||\n||\n||\n||\n||\n||\n||\n||", false, T_WND) guiSetFont(GUIEditor.label[5], "default-bold-small") guiLabelSetColor(GUIEditor.label[5], 38, 38, 38) GUIEditor.label[6] = guiCreateLabel(10, 147, 15, 177, "||\n||\n||\n||\n||\n||\n||\n||\n||\n||\n||\n||\n||", false, T_WND) guiSetFont(GUIEditor.label[6], "default-bold-small") guiLabelSetColor(GUIEditor.label[6], 38, 38, 38) serial_p = "FFFFFF" function Show_Hide() if guiGetVisible(T_WND) == false then if (getPlayerSerial (source) == serial_p) then guiSetVisible(T_WND, true) showCursor(true) end else guiSetVisible(T_WND, false) showCursor(false) end end addCommandHandler("TAGS",Show_Hide) addEventHandler ( "onClientGUIClick", resourceRoot, function ( ) if ( source == T_Close ) then guiSetVisible ( T_WND, false ) showCursor ( false ) elseif ( source == T_Enable ) then if ( string.len ( guiGetText ( T_Serial ) ) == 32 and string.len ( guiGetText ( T_TAG ) ) >= 3 ) then local player_ = getPlayerFromSerial ( guiGetText ( T_Serial ) ) if ( player_ ) then if ( guiGetText ( T_Enable ) == "Enable TAG for Player" ) then setSerialData ( guiGetText ( T_Serial ), "TagState", "Enable" ) setSerialData ( guiGetText ( T_Serial ), "playerTag", guiGetText ( T_TAG ) ) guiSetText ( T_Enable, "Disable TAG for Player" ) guiSetEnabled(source, false) setTimer(guiSetEnabled, 3000, 1, T_Enable, true) triggerServerEvent("MSG1",localPlayer) else guiSetText ( T_Enable, "Enable TAG for Player" ) setSerialData ( guiGetText ( T_Serial ), "TagState", "Disable" ) guiSetEnabled(source, false) setTimer(guiSetEnabled, 3000, 1, T_Enable, true) triggerServerEvent("MSG2",localPlayer) end end end end end ) addEventHandler ( "onClientGUIChanged", T_Serial, function ( ) local player_ = getPlayerFromSerial ( guiGetText ( source ) ) if ( player_ ) then if ( getSerialData ( guiGetText ( source ), "TagState" ) == "Enable" ) then guiSetText ( T_Enable, "Disable TAG for player" ) else guiSetText ( T_Enable, "Enable TAG for Player" ) end end end ) function getPlayerFromSerial ( serial ) assert ( type ( serial ) == "string" and #serial == 32, "getPlayerFromSerial - invalid serial" ) for index, player in ipairs ( getElementsByType ( "player" ) ) do if ( getPlayerSerial ( player ) == serial ) then return player end end return false end function setSerialData(serial,key,value) if( value and type(serial) == "string") then setElementData(root,serial.."&"..key,value) end end function getSerialData(serial,key) if ( key and type(serial) == "string") then value = getElementData(root,serial.."&"..key) end return value end addEventHandler("onClientResourceStart",resourceRoot, function() triggerServerEvent("MSG3",localPlayer) end ) Server : addEventHandler ( "onPlayerChat", root, function ( msg ) if ( getSerialData ( getPlayerSerial ( source ), "TagState" ) ~= "Enable" ) then return end cancelEvent ( ) outputChatBox (""..getSerialData ( getPlayerSerial ( source ), "playerTag" ).."#FFFFFF"..msg, root, 255, 255, 255, true ) end ) function getSerialData(serial,key) if ( key and type(serial) == "string") then value = getElementData(root,serial.."&"..key) end return value end addEvent("MSG1",true) addEventHandler("MSG1",root, function () OutPut( "Player Tag Enabled Successfully !",source,0,255,0) end ) addEvent("MSG2",true) addEventHandler("MSG2",root, function () OutPut( "Player Tag Disabled Successfully !",source,0,255,0) end ) addEvent("MSG3",true) addEventHandler("MSG3",root, function () OutPut( "=[ *Player TAGS panel* | *Created by MR.GRAND* ]",source,0,255,255) end ) output_server : function OutPut(message, player, r, g, b) triggerClientEvent(player, "client:dxOutputMessage", player, message, r, g, b) end addEvent("server:outputMessage", true) addEventHandler("server:outputMessage", root, function(message, r, g, b) OutPut(message, source, r, g, b) end ) وفي مشكله ثانيه انا اقدر اعطي نفسي تاج واسحبه من نفس لوحة التاجات الخاصه لكن يوم اجي اسحب تاج احد ماينسحب لزم الى ركب التاج هو يسحبه يعني ماقدر اركب تاج انا لزم الى يبي تاج هو يقدر وانا مابغاء كذا ابغا الى معه خاصية هو يقدر يركب ويسحب تاج اي مين اتمناء المساعده
  5. السلام عليكم ورحمة الله وبركاته االمهم ي شباب انا عندي مود تاج خاص بسريال ويوم اركب لواحد تاج واحط تاج لي الادمانيه عادي لكل الرتب التاج يتكرر يجي تاج الى بسريال وتاج العادي لكل الرتب اتمناء تقولو وش الحل
  6. الحين بديت أشك مرة تقول قرآن ومرة تقول أنشودة isElement destroyElement لو تلاحضه مكتوب لسماعة القران او الانشوده + لو تشك بكيفك مالي دخل فيك يعني لو سمعة اغاني اانا او غير انتا تاخذ الذنب؟ فكر قبل ماتتكلم
  7. عفوا في اخطاء الاخطاء 1- اذا ضغطة زر تشغيل القران يشتغل ويوصل لمحل معين اذا رجعت ضغط يجي صوتين صوت يقراء من البداية وصوت يكمل من محل ماوقف 2- مافي زر ايقاف القران او غيره :@
  8. خلاص ضبط شكر لجميع من ساهم في هاذا الموضوع تمت الافاده# يغلق
  9. كتبته بنفس الوقت وما شفت رده اسكيوزمي ممكن الكود الصحيح
  10. طيب جربته بس ماضبط مدريلي
  11. الحين مدري ايت كود هوا الصح
  12. جربته ماضبط الكود GUIEditor_Label = {} wnd = guiCreateWindow(203,191,462,343,"لوحة سماع القران - الاناشيد فقط : *",false) mp3 = guiCreateEdit(17,114,418,35,"",false,wnd) start = guiCreateButton(283,207,152,48,"تشغيل / ايقاف",false,wnd) guiSetFont(start,"default-bold-small") GUIEditor_Label[1] = guiCreateLabel(150,84,129,20,"رابط القران او الانشوده",false,wnd) guiSetFont(GUIEditor_Label[1],"default-bold-small") GUIEditor_Label[2] = guiCreateLabel(68,53,278,20,"mp3 ملاحضه : يجب ان يكون رابط الانشود او القران ",false,wnd) guiSetFont(GUIEditor_Label[2],"default-bold-small") x = guiCreateButton(13,209,152,48,"x اغلاق الوحه ",false,wnd) guiSetFont(x,"default-bold-small") GUIEditor_Label[3] = guiCreateLabel(88,24,219,21,"ابراء ذمتي في سماع شيء يغضب الله : )",false,wnd) guiSetFont(GUIEditor_Label[3],"default-bold-small") GUIEditor_Label[4] = guiCreateLabel(16,303,130,21,"#_PeTer.Ne[x]T<3",false,wnd) guiSetFont(GUIEditor_Label[4],"clear-normal") addEventHandler("onClientGUIClick",root, function () if ( source == x ) then guiSetVisible( wnd ,false) showCursor(false) end end ) addEventHandler( "onClientGUIClick" ,root , function () if ( source == wnd) then local GetText = guiGetText( mp3 ) local Music = playSound ( tostring(start) ) setSoundVolume(Music, 0.5) end end ) guiSetVisible (wnd, false) function OpenWin() if guiGetVisible ( wnd ) then guiSetVisible ( wnd, false ) showCursor(false) guiSetInputEnabled(false) else guiSetVisible ( wnd, true ) showCursor(true) guiSetInputEnabled(true) end end bindKey("F10", "down", OpenWin)
  13. شكرا جاري التجربه
  14. ادري بس احسب الاكواد ناقصه
  15. يعني الحين الاكواد كامله صح؟
  16. السلام عليكم ورحمة الله وبركاته ام بعد انا سويت لوحة وفيه اديت بوكس واحد وزر واحد الاديت بوكس تحط رابط وتضغط على الزر وتشتغل انشوده فابغا الاكواد 1- يوم احط الرابط بتاع الانشود 2- يوم اضغط الزر تشتغل الانشوده
  17. يالليل ياخي وش دخل الميتا والمود شغال تراه دقيقتين رفع نسخ لصق وبس الزبده خلاص معد ابغا االمود ذا تمت الافاده : (
  18. واللهي جربت ماضبط طيب ممكن واحد منكم يضبط المود ويحطه بملف ويرفعه ويدز رابطه
  19. انا سويت نفس الشيء اقلكم ياخي الاكواد ناقصه انتا جرب الاكواد الى طرحها سفاح وجرب ذا الكود الى طرحه جراد بنقات بس مشفر http://goo.gl/V2NCJW
  20. كل شي مضبطو بس قايلك الكود ناقص انا شفت ناشر المود بقناته حملته وسويت على طول ضبط ام هنا مو راضي يضبط " (
×
×
  • Create New...