Jump to content

+Source|>

Members
  • Posts

    1,388
  • Joined

  • Last visited

  • Days Won

    14

Everything posted by +Source|>

  1. +Source|>

    -_-

    طبعاً محد راضي يساعدني في هالكود function dxDrawImageOnElement(TheElement,img,height,distance,R,G,B,alpha,size,font,checkBuildings,checkVehicles,checkPeds,checkDummies,seeThroughStuff,ignoreSomeObjectsForCamera,ignoredElement) local x, y, z = getElementPosition(TheElement) local x2, y2, z2 = getElementPosition(localPlayer) local distance = distance or 20 local height = height or 1 local checkBuildings = checkBuildings or true local checkVehicles = checkVehicles or false local checkPeds = checkPeds or false local checkObjects = checkObjects or true local checkDummies = checkDummies or true local seeThroughStuff = seeThroughStuff or false local ignoreSomeObjectsForCamera = ignoreSomeObjectsForCamera or false local ignoredElement = ignoredElement or nil if (isLineOfSightClear(x, y, z, x2, y2, z2, checkBuildings, checkVehicles, checkPeds , checkObjects,checkDummies,seeThroughStuff,ignoreSomeObjectsForCamera,ignoredElement)) then local sx, sy = getScreenFromWorldPosition(x, y, z+height) if(sx) and (sy) then local distanceBetweenPoints = getDistanceBetweenPoints3D(x, y, z, x2, y2, z2) if(distanceBetweenPoints < distance) then dxDrawImage( sx+1, sy+1, sx, sy, img, (size or 1.4)-(distanceBetweenPoints / distance), false ) end end end end -- الخطأ هنا dxDrawImage( sx+1, sy+1, sx, sy, img, (size or 1.4)-(distanceBetweenPoints / distance), false )
  2. والله المنتدى صار ميت
  3. يا هو احد يرد وش المشكله هنا function dxDrawImageOnElement(TheElement,img,height,distance,R,G,B,alpha,size,font,checkBuildings,checkVehicles,checkPeds,checkDummies,seeThroughStuff,ignoreSomeObjectsForCamera,ignoredElement) local x, y, z = getElementPosition(TheElement) local x2, y2, z2 = getElementPosition(localPlayer) local distance = distance or 20 local height = height or 1 local checkBuildings = checkBuildings or true local checkVehicles = checkVehicles or false local checkPeds = checkPeds or false local checkObjects = checkObjects or true local checkDummies = checkDummies or true local seeThroughStuff = seeThroughStuff or false local ignoreSomeObjectsForCamera = ignoreSomeObjectsForCamera or false local ignoredElement = ignoredElement or nil if (isLineOfSightClear(x, y, z, x2, y2, z2, checkBuildings, checkVehicles, checkPeds , checkObjects,checkDummies,seeThroughStuff,ignoreSomeObjectsForCamera,ignoredElement)) then local sx, sy = getScreenFromWorldPosition(x, y, z+height) if(sx) and (sy) then local distanceBetweenPoints = getDistanceBetweenPoints3D(x, y, z, x2, y2, z2) if(distanceBetweenPoints < distance) then dxDrawImage( sx+1, sy+1, sx, sy, img, (size or 1.4)-(distanceBetweenPoints / distance), false ) end end end end
  4. الخطأ هنا يقول الديبق dxDrawImage( sx+1, sy+1, sx, sy, img )
  5. وش المشكله في هذا الكود function dxDrawImgOnElement(TheElement,img,height,distance,R,G,B,alpha,size,font,checkBuildings,checkVehicles,checkPeds,checkDummies,seeThroughStuff,ignoreSomeObjectsForCamera,ignoredElement) local x, y, z = getElementPosition(TheElement) local x2, y2, z2 = getElementPosition(localPlayer) local distance = distance or 20 local height = height or 1 local checkBuildings = checkBuildings or true local checkVehicles = checkVehicles or false local checkPeds = checkPeds or false local checkObjects = checkObjects or true local checkDummies = checkDummies or true local seeThroughStuff = seeThroughStuff or false local ignoreSomeObjectsForCamera = ignoreSomeObjectsForCamera or false local ignoredElement = ignoredElement or nil if (isLineOfSightClear(x, y, z, x2, y2, z2, checkBuildings, checkVehicles, checkPeds , checkObjects,checkDummies,seeThroughStuff,ignoreSomeObjectsForCamera,ignoredElement)) then local sx, sy = getScreenFromWorldPosition(x, y, z+height) if(sx) and (sy) then local distanceBetweenPoints = getDistanceBetweenPoints3D(x, y, z, x2, y2, z2) if(distanceBetweenPoints < distance) then dxDrawImage( sx+1, sy+1, sx, sy, img ) end end end end
  6. السلام عليكم ورحمة الله وبركاته كيف حالكم رجعتلكم بمود حصري جديد ما اتوقع احد جابه قبل كذا بدون كلام كثير كل شي عن هذا المود في هذا الرابط تلقونه ولا احد يجي يقولي وين الصور ض22 قلتلكم في الرابط هذا https://www.youtube.com/watch?v=kMOYsG_RTh8&t=15s بالتوفيق للجميع
  7. انا مسوي بيد ped في السيرفر سايد ابي اخليه شفاف يعني لما تضربه او تدعسه بالسياره الضرب يخترقه
  8. ما ظبط ابيها للسيرفر سايد
  9. اخر طلب لاهنت ابي اسوي البيد ped لما احد يضربه او يطلق عليه او يدعسه بسياره يخترقه يعني ما يجيه شيء
  10. سؤال ثاني لاهنت كيف اخلي لما اللاعب ينتقل لمكان position يكون وجهه لجهة معينه
  11. سلام عليكم ابي امر حذف الاوبجكت
  12. احد يعرف كيف استخدم ذا الشيء function guiSetDelay(gui, delay) assert(getElementType(gui):find('gui-'), 'bad argument guiSetDelay @1 gui-element expected got '..(isElement(gui) and getElementType(gui) or type(gui))) assert(type(delay)=='table', 'bad argument guiSetDelay @2 table expected got '..type(delay)) local canContinue for key in pairs(types) do if delay[key] then canContinue = true; break end end if canContinue then guiSetEnabled(gui, false); guiEnable[gui] = {oldString = guiGetText(gui), element = gui} local ms = 0; for key, value in pairs(delay) do if types[key] then ms=ms+(types[key]*value) end end guiEnable[gui].timer = setTimer(function() guiSetEnabled(gui, true) if isTimer(guiEnable[gui].timer) then killTimer(guiEnable[gui].timer);guiSetText(gui,guiEnable[gui].oldString);guiEnable[gui]=nil;end; local newTable = {}; for _, value in pairs(guiEnable) do table.insert(newTable, value) end if #newTable == 0 and isTimer(timerCheck) then killTimer(timerCheck) end end, ms, 1) timer(true) if not isTimer(timerCheck) then timerCheck = setTimer(timer, 1000, 0);end; setTimer(function() local details = getTimerDetails(guiEnable[gui].timer);guiSetText(guiEnable[gui].element, msToString(details)); end, 50, 1) end end
  13. انا كنت مسوي مود كل شي ينكتب في اف 8 يجيني في لوق محفوظ بالسكل لو تبغاه كلمني
  14. عن طريق السكل انو لما اللاعب يضغط زر والتايمر باقي ما خلص يقوله حاول بعد 24 ساعه لو التايمر خلص يعطيه فلوسه ويبدأ تايمر جديد واو
  15. لاا ما ابيه ينعاد انا ققصدي الحين انا سحبت راتب المفروض انتظر 24 ساعه عشان اخذ الراتب اللي بعده بس ابي لما اللاعب ما يكون موجود في السيرفر التايمر ما يوقف لين يدخل بعدين يكم ابيه لما يطلع التايمر يستمر في العد لمدة 24 ساعه فاهمني ؟
  16. عشان لما يطلع اللاعب واقفل المود واشغله ينعاد التايمر من جديد قولي كيف اسويه ؟
  17. function myEvents () if ( eventName == "onPlayerQuit" ) then local playerSerial = getPlayerSerial ( source ) local checkSQL = executeSQLQuery ( 'SELECT * FROM ghj WHERE SerialP=?' , playerSerial ) if ( isTimer ( TimeWaitSet [ source ] ) ) then local myTimer = getTimerDetails ( TimeWaitSet [ source ] ) if ( myTimer ) then if ( #checkSQL == 0 ) then executeSQLQuery( "INSERT INTO ghj ( Timer, SerialP ) VALUES( ? , ? )", myTimer, playerSerial ) else executeSQLQuery("UPDATE ghj SET Timer=? WHERE SerialP=?", myTimer, playerSerial ) end TimeWaitSet [ source ] = nil end end elseif ( eventName == "onResourceStop" ) then for k, v in ipairs ( getElementsByType ( "player" ) ) do local playerSerial = getPlayerSerial ( v ) local checkSQL = executeSQLQuery ( 'SELECT * FROM ghj WHERE SerialP=?' , playerSerial ) if ( isTimer ( TimeWaitSet [ v ] ) ) then local myTimer = getTimerDetails ( TimeWaitSet [ v ] ) if ( myTimer ) then if ( #checkSQL == 0 ) then executeSQLQuery( "INSERT INTO ghj ( Timer, SerialP ) VALUES( ? , ? )", myTimer, playerSerial ) else executeSQLQuery("UPDATE ghj SET Timer=? WHERE SerialP=?", myTimer, playerSerial ) end end end end elseif ( eventName == "onResourceStart" ) then for k, v in ipairs ( getElementsByType ( "player" ) ) do local playerSerial = getPlayerSerial ( v ) local checkSQL = executeSQLQuery ( 'SELECT * FROM ghj WHERE SerialP=?' , playerSerial ) if ( #checkSQL ~= 0 ) then if ( isTimer ( TimeWaitSet [ v ] ) ) then killTimer ( TimeWaitSet [ v ] ) end TimeWaitSet [ v ] = setTimer( function() end, checkSQL[1].Timer, 1 ) end end elseif ( eventName == "onPlayerLogin" ) then local playerSerial = getPlayerSerial ( source ) local checkSQL = executeSQLQuery ( 'SELECT * FROM ghj WHERE SerialP=?' , playerSerial ) if ( #checkSQL ~= 0 ) then if ( isTimer ( TimeWaitSet [ v ] ) ) then killTimer ( TimeWaitSet [ v ] ) end TimeWaitSet [ source ] = setTimer( function() end, checkSQL[1].Timer, 1 ) end end end addEventHandler("onPlayerLogin", root, myEvents) addEventHandler("onPlayerQuit", root, myEvents) addEventHandler("onResourceStop", root, myEvents) addEventHandler("onResourceStart", root, myEvents) التايمر كذا ينحفظ ولما ادخل يرجع يبدأ من المكان اللي انحفظ فيه انا ابغا لما الاعب يطلع التايمر يستمر وما يوقف الين ينتهي
  18. ادري جربت فيه بس المشكله ما ينحفظ
  19. لا ابيه لما يطلع التايمر ما يوقف يستمر
  20. سلام عليكم ابي اسوي كود تايمر يعني بعد ما ياخذ الراتب مثلا ينتظر 24 ساعه عشان الراتب اللي بعده وابيها تنحفظ لما يطلع او المود يتقفل محاولاتي addEventHandler( "onResourceStart", root, function() executeSQLQuery( "CREATE TABLE IF NOT EXISTS SQLWaitDaykff ( Timer, SerialP )" ) end ) TimeDaySet = {} addEvent("onGet", true) addEventHandler("onGet", root, function( Money ) if isTimer( TimeDaySet[source] ) then triggerClientEvent( source, "WaitDay", source ) return end givePlayerMoney( source, Money ) TimeDaySet[source] = setTimer( function() end, 86400000, 1 ) end ) function myEvents () if ( eventName == "onPlayerLogin" ) then local playerSerial = getPlayerSerial ( source ) local checkSQL = executeSQLQuery ( 'SELECT * FROM SQLWaitDaykf WHERE SerialP=?' , playerSerial ) if ( #checkSQL ~= 0 ) then if ( isTimer ( TimeDaySet [ source ] ) ) then killTimer ( TimeDaySet [ source ] ) end TimeDaySet [ source ] = setTimer( function() end, checkSQL[1].Timer, 1 ) end elseif ( eventName == "onPlayerQuit" ) then local playerSerial = getPlayerSerial ( source ) local checkSQL = executeSQLQuery ( 'SELECT * FROM SQLWaitDaykf WHERE SerialP=?' , playerSerial ) if ( isTimer ( TimeDaySet [ source ] ) ) then local myTimer = getTimerDetails ( TimeDaySet [ source ] ) if ( myTimer ) then if ( #checkSQL == 0 ) then executeSQLQuery( "INSERT INTO SQLWaitDaykf ( Timer, SerialP ) VALUES( ? , ? )", myTimer, playerSerial ) else executeSQLQuery("UPDATE SQLWaitDaykf SET Timer=? WHERE SerialP=?", myTimer, playerSerial ) end TimeDaySet[ source ] = nil end end elseif ( eventName == "onResourceStop" ) then for k, v in ipairs ( getElementsByType ( "player" ) ) do local playerSerial = getPlayerSerial ( v ) local checkSQL = executeSQLQuery ( 'SELECT * FROM SQLWaitDaykf WHERE SerialP=?' , playerSerial ) if ( isTimer ( TimeDaySet [ v ] ) ) then local myTimer = getTimerDetails ( TimeDaySet [ v ] ) if ( myTimer ) then if ( #checkSQL == 0 ) then executeSQLQuery( "INSERT INTO SQLWaitDaykf ( Timer, SerialP ) VALUES( ? , ? )", myTimer, playerSerial ) else executeSQLQuery("UPDATE SQLWaitDaykf SET Timer=? WHERE SerialP=?", myTimer, playerSerial ) end end end end elseif ( eventName == "onResourceStart" ) then for k, v in ipairs ( getElementsByType ( "player" ) ) do local playerSerial = getPlayerSerial ( v ) local checkSQL = executeSQLQuery ( 'SELECT * FROM SQLWaitDaykf WHERE SerialP=?' , playerSerial ) if ( #checkSQL ~= 0 ) then if ( isTimer ( TimeDaySet [ v ] ) ) then killTimer ( TimeDaySet [ v ] ) end TimeDaySet [ v ] = setTimer( function() end, checkSQL[1].Timer, 1 ) end end end end addEventHandler("onPlayerLogin", root, myEvents) addEventHandler("onPlayerQuit", root, myEvents) addEventHandler("onResourceStop", root, myEvents) addEventHandler("onResourceStart", root, myEvents)
  21. getElementModel getPedOccupiedVehicle triggerClientEvent playSound
  22. كلها صح تنفع الاثنين
×
×
  • Create New...