Jump to content

iMr.G[7]A

Members
 View Profile  See their activity

  • Posts

    133

  • Joined

  • Last visited

 Content Type 

Posts posted by iMr.G[7]A

    تعديل !!!

    in البرمجة

    Posted

    ابي 4 شخصيات اللي تنحمي مو شخصية

    + ابي اللي داخل المنطقة يطلع في الشات

    انت في منطقة الحماية

    واذا طلع لقد خرجت من منطقة الحماية

    الكود

    safecol = createColCuboid ( -404.13677978516, 1761.6762695313, 43.881458282471, 255, 255, 255 ) 
safeZoneRadar = createRadarArea ( -404.13677978516, 1761.6762695313, 255, 255, 255, 255, 255 ) 
setElementData (safeZoneRadar, "zombieProof", true) 
  
  
function enterZone(hitPlayer,thePlayer) 
local skin = getElementModel (hitPlayer) 
      if ( skin == 293 ) then 
    toggleControl (hitPlayer, "fire", true ) 
    toggleControl (hitPlayer, "aim_weapon", true) 
    toggleControl (hitPlayer, "vehicle_fire", true) 
    outputChatBox("", hitPlayer, 0, 255, 0) 
       else 
         killPed (hitPlayer) 
end 
end 
addEventHandler( "onColShapeHit", safecol, enterZone ) 
  
function leaveZone(hitPlayer,thePlayer) 
local skin = getElementModel (hitPlayer) 
    toggleControl (hitPlayer, "fire", true) 
    toggleControl (hitPlayer, "aim_weapon", true) 
    toggleControl (hitPlayer, "vehicle_fire", true) 
    outputChatBox("", hitPlayer, 255, 0, 0) 
 if not ( skin == 293 )  then 
  killPed (hitPlayer) 
end 
end 
addEventHandler( "onColShapeLeave", safecol, leaveZone ) 
aclGroupAddObject (aclGetGroup("Console"), "user.SPR")

    الشخصيات اللي ابيهآ تنظاف

    285

    287

    282

    283

    تعديل

    in البرمجة

    Posted

    ابي اخلي زر القتل صورة ؟

    الكود

            {'btn', id='انتحار', onclick=killLocalPlayer, width = 121}, 
        {'btn', id='شخصيات', window=wndSkin, width = 121}, 
        {'btn', id='حركات', window=wndAnim, width = 121}, 
        {'btn', id='الادوات', window=wndWeapon, width = 121}, 
        {'btn', id='ملابس', window=wndClothes, width = 121},

    تعديل !!!

    in البرمجة

    Posted

    شبآب ابي تعديل على الكود ^^ الـ كلينت

    ابي سيارة مقفله للفل معين وسيآرة لآسل معين

    اللي للفل هي اللي قبل الاخيرة

    والاخيرة للاسل

    تعديل !!!

    in البرمجة

    Posted

    سيرفر وش احطه

    addEvent ("getCaraaa", true) 
addEventHandler ("getCaraaa", getRootElement(), 
function(car) 
    if veh[source] and isElement( veh[source] ) then destroyElement( veh[source] )  
    veh[source] = nil  
    end 
    local carID = getVehicleNameFromModel (car) 
    local x,y,z = getElementPosition(source) 
    local carName = getVehicleNameFromModel (carID) 
    veh[source] = createVehicle(carID, x,y-7,z ,0, 0,80) 
    setVehicleColor(veh[source], 255, 255, 255) 
    warpPedIntoVehicle(source, veh[source])     
end 
)

    تعديل !!!

    in البرمجة

    Posted · Edited by Guest

    السلآم عليكم ابي تعديل ابي اكتب انا اسم السيآرة ~

    مو يجيب لي اسم السيآرة الاصلي

    الكلينت :

    GUIEditor = { 
    gridlist = {}, 
    window = {}, 
    button = {} 
} 
  
cars = { 
    {598}, 
    {597}, 
    {596}, 
    {523}, 
    {599}, 
    {427}, 
  --{carID}, 
    } 
  
  
  
local l, w = guiGetScreenSize() 
GUIEditor.window[1] = guiCreateWindow((l - 250) / 2, (w - 300) / 2, 215, 348, "Vehicle Q.9", false) 
guiWindowSetSizable(GUIEditor.window[1], false) 
guiSetVisible(GUIEditor.window[1],false) 
guiSetAlpha(GUIEditor.window[1], 1.00) 
guiSetProperty(GUIEditor.window[1], "NormalTextColour", "FF0000FE")   
  
GUIEditor.gridlist[1] = guiCreateGridList(9, 10, 197, 280, false, GUIEditor.window[1]) 
guiGridListAddColumn(GUIEditor.gridlist[1], "#", 0.2) 
guiGridListAddColumn(GUIEditor.gridlist[1], "Vehicle", 0.7) 
GUIEditor.button[1] = guiCreateButton(9, 301, 89, 37, "أختيآر", false, GUIEditor.window[1]) 
guiSetFont(GUIEditor.button[1], "default-bold-small") 
guiSetProperty(GUIEditor.button[1], "NormalTextColour", "FF0000FE")   
GUIEditor.button[2] = guiCreateButton(118, 301, 88, 37, "X", false, GUIEditor.window[1]) 
guiSetFont(GUIEditor.button[2], "default-bold-small") 
guiSetProperty(GUIEditor.button[2], "NormalTextColour", "FF0000FE")   
  
for i,v in ipairs (cars) do 
    local carName = getVehicleNameFromModel (v[1]) 
    local row = guiGridListAddRow (GUIEditor.gridlist[1]) 
    guiGridListSetItemText (GUIEditor.gridlist[1], row, 1, i.."-", false, true) 
    guiGridListSetItemText (GUIEditor.gridlist[1], row, 2, carName, false, true) 
end 
  
  
  
addEvent ("openMeanaaa", true) 
function openMean () 
if (getLocalPlayer() == source) then 
guiSetVisible(GUIEditor.window[1],true) 
showCursor(true) 
end 
end 
addEventHandler ("openMeanaaa", getRootElement(), openMean) 
  
addEvent ("closeOpenMeanaaa", true) 
function closeOpenMean () 
if (getLocalPlayer() == source) then 
guiSetVisible(GUIEditor.window[1],false) 
showCursor(false) 
end 
end 
addEventHandler ("closeOpenMeanaaa", getRootElement(), closeOpenMean) 
  
addEventHandler ("onClientGUIClick", GUIEditor.button[2], 
function (button, state, absoluteX, absoluteYe) 
 guiSetVisible(GUIEditor.window[1],false) 
 showCursor(false) 
end) 
function trigger () 
if (guiGridListGetSelectedItem (GUIEditor.gridlist[1])) then 
local car = guiGridListGetItemText (GUIEditor.gridlist[1], guiGridListGetSelectedItem (GUIEditor.gridlist[1]), 2) 
if car == "" or car == nil then outputChatBox( "please selected car from list.",255,0,0,true ) return end 
  triggerServerEvent ("getCaraaa", getLocalPlayer(), car) 
  guiSetVisible(GUIEditor.window[1],false) 
  showCursor(false) 
end 
end 
addEventHandler ("onClientGUIClick", GUIEditor.button[1], 
function () 
trigger(getLocalPlayer()) 
end) 
  
addEventHandler ("onClientGUIDoubleClick", GUIEditor.gridlist[1], 
function () 
trigger(getLocalPlayer()) 
end) 
 

    مساعدهـ سريعةة

    in البرمجة

    Posted

    مثلا عندي سيارة بوقاتي في اللعبة وابي كل الاعضاء يضغطون 8

    تطلع السيارة

    مره وحدهـ تطلع

    توضيح :

    اضغط رقم 8 تطلع سيارة

    مره تطلع مو يوم اضغط رقم 8

    ثلاث مرات تطلع لي ثلاث سيارات لا ابي وحده بس

    +

    ابي كود اغنية او مود اذا خلصت الاغنية يطفي المود

    =

    بليز جاهز واذا ما

    قدرتو بحأأول

    !! طلب كود

    in البرمجة

    Posted

    السلآم عليكم ورحمة الله وبركآتة

    اولآ :

    طالبكم اليوم بـ كود تحويل الزر الى ماركر ؟

    ومن الزر الى ماركر ابي الماركر ما يفتح الا لرتبة اسمهأ

    Kill

    >>>>

    اتمنى المساعد’ة مع تمنياتي لكم بالتوفيق

    سسريع تعديل تكفوون

    in البرمجة

    Posted

    ابي اضافة ما تفتح للادمن تفتح لحساب معين

        function ( thePlayer ) 
        accName = getAccountName ( getPlayerAccount ( thePlayer ) ) 
        if isObjectInACLGroup ("user."..accName, aclGetGroup ( "Admin" ) ) then 
            triggerClientEvent ( thePlayer, "openT9wetWindowPlease", thePlayer )  
        else 
            outputChatBox ( "* You Don't Have Permissions !!", thePlayer, 255, 0, 0, true ) 
        end 
    end 
)

    تعديل

    in البرمجة

    Posted

    ابي منكم تخلون بدال ماهو ماركت

    يصير زر اضغطه اخذ الفلوس

    ما ابي ماركر

    local marker = createMarker(2489.5065917969,-1671.2672119141,13.335947036743,'cylinder',1.3,255,255,255,0) 
  
addEventHandler('onResourceStart',resourceRoot, 
function() 
    for _,v in pairs( getElementsByType('player') ) do 
    setElementData(resourceRoot,'money',0) 
    end 
end 
) 
  
addEventHandler('onMarkerHit',marker, 
function(player) 
    if ( player ) then 
    if ( getElementData(resourceRoot,'money') == 0 ) then return end 
    givePlayerMoney(player,getElementData(resourceRoot,'money')) 
    setElementData(resourceRoot,'money',0) 
    end 
end 
) 
  
setTimer(function() 
    if ( getElementData(resourceRoot,'money') ) then 
    setElementData(resourceRoot,'money',getElementData(resourceRoot,'money') + math.random(15,55)) 
    end 
end,5000,0)

    تعديل + اضافة

    in البرمجة

    Posted

    كود شوب سيارات ~

    يوم اشتري سياره وابي اظهرهآ تطلع واحد ابي حل ابي تعدلون لي الكود ذا

    ابي اشتري اكثر من سياره واظهرهـأ يعني قصدي اشتري سيارتين

    واظهرها من اف 2 ابي يوم اظهرها ما تطلع 1 ابي يوم افتح اللوحه اقدر اختر سياره من اللي شرييتها اتمنى فهمتو اللي ما فهم يجي سكايب اشرحله باالتفصيل

    الكود 

    local screenX, screenY = guiGetScreenSize() 
local width, height = 200, 200 
local x = (screenX/2) - (width/2) 
local y = (screenY/2) - (height/2) 
local lp = getLocalPlayer() 
  
theWindow = guiCreateWindow(x,y,width,height,"Car Control / التحكم بالسيارة",false) 
guiWindowSetSizable(theWindow,false) 
guiSetVisible (theWindow, false) 
spawnBut = guiCreateButton(0.0604,0.120,0.4,0.2,"Spawn \n إظهار",true,theWindow) 
engenieBut = guiCreateButton(0.0604,0.420,0.4,0.2,"Engenie \n المحرك",true,theWindow) 
lockBut = guiCreateButton(0.490,0.420,0.4,0.2,"Lock \n قفل",true,theWindow) 
lightsBut = guiCreateButton(0.0604,0.720,0.4,0.2,"Lights \n النور",true,theWindow) 
destroyBut = guiCreateButton(0.490,0.120,0.4,0.2,"Destroy \n إخفاء",true,theWindow) 
  
function resourceStart () 
  bindKey ("F2", "down", menuShow) 
end 
addEventHandler ("onClientResourceStart", getResourceRootElement ( getThisResource () ), resourceStart) 
  
function menuShow () 
    visableornot = guiGetVisible (theWindow) 
    if (visableornot == true) then 
        guiSetVisible (theWindow, false) 
        showCursor (false) 
    end 
    if (visableornot == false) then 
        guiSetVisible (theWindow, true) 
        showCursor (true) 
    end 
end 
  
addEvent ("carSpawn", true) 
addEvent ("carDestroy", true) 
  
function guiClick (button, state, absoluteX, absoluteY) 
  if (source == spawnBut) then 
    triggerServerEvent ("carSpawn", lp) 
  elseif (source == destroyBut) then 
    triggerServerEvent ("carDestroy", lp) 
  elseif (source == engenieBut) then 
    triggerServerEvent ("engenieSwitch", lp)     
  elseif (source == lockBut) then 
    triggerServerEvent ("lockSwitch", lp)    
  elseif (source == lightsBut) then 
    triggerServerEvent ("lightsSwitch", lp)  
  end 
end 
addEventHandler ("onClientGUIClick", getRootElement(), guiClick) 
  
  
carshopWindow = guiCreateWindow(500,200,290,440,"Car Shop",false) 
guiSetVisible (carshopWindow, false) 
guiSetAlpha(carshopWindow,1) 
guiWindowSetSizable(carshopWindow,false) 
carPic = guiCreateStaticImage( 0.0423,0.0709,0.8889,0.408, "Png\\style.png", true,carshopWindow ) 
carGridList = guiCreateGridList(0.0476,0.5289,0.9048,0.33,true,carshopWindow) 
guiGridListSetSelectionMode(carGridList,0) 
carColumn = guiGridListAddColumn(carGridList,"Car",0.5) 
costColumn = guiGridListAddColumn(carGridList,"$",0.3) 
local cars = {{429,60000},{421,60000},{527,28000},{550,65000},{546,65000},{411,45000},{589,45000}} 
for i,v in ipairs (cars) do 
    local carName = getVehicleNameFromModel (v[1]) 
    local row = guiGridListAddRow (carGridList) 
    guiGridListSetItemText (carGridList, row, 1, carName, false, true) 
    guiGridListSetItemText (carGridList, row, 2, tostring(v[2]), false, true) 
end 
function navList ( key, keyState) 
    local rowSel = guiGridListGetSelectedItem ( carGridList ) 
    if key == "arrow_u" then 
        guiGridListSetSelectedItem ( carGridList, tonumber(rowSel)-1, 1 ) 
    elseif key == "arrow_d" then 
        guiGridListSetSelectedItem ( carGridList, tonumber(rowSel)+1, 1 ) 
    end 
    local aCurrentVehicle = guiGridListGetItemText ( carGridList, guiGridListGetSelectedItem ( carGridList ), 1 ) 
    guiStaticImageLoadImage ( carPic, "Png\\"..aCurrentVehicle..".png" ) 
end 
function aClickGuiCar (button) 
    if (button == "left" ) then 
        if (source == carGridList ) then 
            aCurrentVehicle = guiGridListGetItemText ( carGridList, guiGridListGetSelectedItem ( carGridList ), 1 ) 
            if ( carPic ) then 
                if guiStaticImageLoadImage ( carPic, "Png\\"..aCurrentVehicle..".png" ) == false then 
                    guiStaticImageLoadImage ( carPic, "Png\\rien.png" ) 
                end 
            else 
                local dd = destroyElement( carPic ) 
                if ( dd ) then 
                carPic = guiCreateStaticImage( 0.0423,0.0709,0.8889,0.408, "Png\\"..aCurrentVehicle..".png", true,carshopWindow ) 
                end 
            end 
        end 
    end 
end 
addEventHandler("onClientGUIClick",root,aClickGuiCar) 
guiSetAlpha(carGridList,1) 
buyButton = guiCreateButton(0.0476,0.8624,0.7778,0.0963,"Buy it / شراء السيارة",true,carshopWindow) 
guiSetAlpha(buyButton,1) 
closeButton = guiCreateButton(0.8571,0.8624,0.0899,0.1009,"x",true,carshopWindow) 
  
  
addEvent ("viewGUI", true) 
function viewGUI () 
  if (getLocalPlayer() == source) then 
    guiSetVisible (carshopWindow, true) 
    showCursor (true) 
  end 
end 
addEventHandler ("viewGUI", getRootElement(), viewGUI) 
  
function onClientGUIClick (button, state, absoluteX, absoluteYe) 
  if (source == buyButton) then guiSetVisible (carshopWindow, false) showCursor (false) 
    if (guiGridListGetSelectedItem (carGridList)) then 
      local carName = guiGridListGetItemText (carGridList, guiGridListGetSelectedItem (carGridList), 1) 
      local carID = getVehicleModelFromName (carName) 
      local carCost = guiGridListGetItemText (carGridList, guiGridListGetSelectedItem (carGridList), 2) 
      triggerServerEvent ("carShopCarBuy", getLocalPlayer(), carID, carCost, carName) 
    end 
  elseif (source == closeButton) then 
  guiSetVisible (carshopWindow, false) 
  showCursor (false) 
  end 
end 
addEventHandler ("onClientGUIClick", getRootElement(), onClientGUIClick) 
  
fileDelete("client.lua") 
 

    سكايب : xXG7AXx

×
×
  • Create New...