Jump to content

طلب كود ارجو رد


yazan

Recommended Posts

سلام عليكم شباب اعرف غلبتكم

تم عمل مارك +النافذه ودي ياها تفتح النافذه لمن تلمس مارك السطر16و الاخير فيهن غلط يرجا تعديل

Edited by Guest
Link to comment
  • Replies 52
  • Created
  • Last Reply

Top Posters In This Topic

Top Posters In This Topic

هذى الكود كلنت ابيه لو تلمس المارك المحدد تفتح النفضه و ارجو رد سريع

marker = createMarker( -1353.4000244141, -483.5, 14.199999809265, "cylinder", 4, 255, 255, 255, 225 ) 
outputChatBox('#FFFF00الورشه في المطار',255, 255, 0, true ) 
local screX, screY = guiGetScreenSize() 
  
function Show_wheel_one() 
        if (guiGetVisible(Window_Wheel) == true) then 
            guiSetVisible(Window_Wheel, false) 
            showCursor(false) 
        else 
            guiSetVisible(Window_Wheel, true) 
            showCursor(true) 
            local sound = playSound("x1x.wma") 
            setSoundVolume(sound, 1) 
        end  
end 
addEventHandler("onClientMarkerHit","down",Show_wheel_one) 
  
  
Window_Wheel = guiCreateWindow(screX/2 - 150, screY/2 - 150,347,295,"Wheels Window",false) 
guiSetVisible(Window_Wheel, false) 
Grid_Wheel = guiCreateGridList(14,23,186,261,false,Window_Wheel) 
guiGridListSetSelectionMode(Grid_Wheel,2) 
  
Image_Wheel = guiCreateStaticImage(217,36,117,96,"img/i.png",false,Window_Wheel) 
Butto_Wheel_on = guiCreateButton(220,158,104,39,"Change it",false,Window_Wheel) 
Checkbox_txd_for_wheel_on = guiCreateCheckBox(262,261,16,16,"",false,false,Window_Wheel) 
lbl_wheel__ = guiCreateLabel(213,238,119,17,"By HoLsTeN",false,Window_Wheel) 
lbl_wheel_ = guiCreateLabel(213,213,119,17,"New Wheels : OFF",false,Window_Wheel) 
guiLabelSetColor(lbl_wheel_,255,0,0) 
  
  
Servers = guiGridListAddColumn(Grid_Wheel,"Wheels List",0.5) 
Wheels = {1074,1075,1076,1077,1078,1079,1080,1081,1082,1083,1084,1085,1096,1097} 
for _, k in ipairs(Wheels) do 
guiGridListSetItemText(Grid_Wheel, guiGridListAddRow(Grid_Wheel), Servers, tostring(k), false, false) 
end 
  
   
function guiClick (button, state, absoluteX, absoluteY) 
    local scheck = guiGridListGetItemText ( Grid_Wheel, guiGridListGetSelectedItem ( Grid_Wheel ), 1 ) 
    if (source == Butto_Wheel_on) then 
        if ( guiCheckBoxGetSelected(Checkbox_txd_for_wheel_on) ) then 
        triggerServerEvent ( "addWheel", getLocalPlayer(), scheck) 
        else 
        outputChatBox ( "Sorry , You must select the check box to turn it on" , 0, 217,176, false ) 
        end 
        elseif (source == Grid_Wheel) then  
        local scheck = guiGridListGetItemText ( Grid_Wheel, guiGridListGetSelectedItem ( Grid_Wheel ), 1 ) or 1 
        guiStaticImageLoadImage(Image_Wheel,"img/i"..scheck..".png") 
    end 
end 
addEventHandler ("onClientGUIClick", getRootElement(), guiClick) 
  
  
  
function Replacetxd() 
        if ( guiCheckBoxGetSelected(source) ) then 
            playSoundFrontEnd(1) 
            txd = engineLoadTXD("data/wheel_gn1.txd", 1074 ) 
            engineImportTXD(txd, 1074) 
            dff = engineLoadDFF("data/wheel_gn1.dff", 1074) 
            engineReplaceModel(dff, 1074) 
   
            txd = engineLoadTXD("data/wheel_gn2.txd", 1075 ) 
            engineImportTXD(txd, 1075) 
            dff = engineLoadDFF("data/wheel_gn2.dff", 1075) 
            engineReplaceModel(dff, 1075) 
     
            txd = engineLoadTXD("data/wheel_gn3.txd", 1076 ) 
            engineImportTXD(txd, 1076) 
            dff = engineLoadDFF("data/wheel_gn3.dff", 1076) 
            engineReplaceModel(dff, 1076) 
   
            txd = engineLoadTXD("data/wheel_gn4.txd", 1077 ) 
            engineImportTXD(txd, 1077) 
            dff = engineLoadDFF("data/wheel_gn4.dff", 1077) 
            engineReplaceModel(dff, 1077) 
   
            txd = engineLoadTXD("data/wheel_gn5.txd", 1078 ) 
            engineImportTXD(txd, 1078) 
            dff = engineLoadDFF("data/wheel_gn5.dff", 1078) 
            engineReplaceModel(dff, 1078) 
   
            txd = engineLoadTXD("data/wheel_lr1.txd", 1079 ) 
            engineImportTXD(txd, 1079) 
            dff = engineLoadDFF("data/wheel_lr1.dff", 1079) 
            engineReplaceModel(dff, 1079) 
   
            txd = engineLoadTXD("data/wheel_lr2.txd", 1080 ) 
        engineImportTXD(txd, 1080) 
        dff = engineLoadDFF("data/wheel_lr2.dff", 1080) 
        engineReplaceModel(dff, 1080) 
   
         txd = engineLoadTXD("data/wheel_lr3.txd", 1081 ) 
         engineImportTXD(txd, 1081) 
          dff = engineLoadDFF("data/wheel_lr3.dff", 1081) 
         engineReplaceModel(dff, 1081) 
   
         txd = engineLoadTXD("data/wheel_lr4.txd", 1082 ) 
          engineImportTXD(txd, 1082) 
         dff = engineLoadDFF("data/wheel_lr4.dff", 1082) 
         engineReplaceModel(dff, 1082) 
   
          txd = engineLoadTXD("data/wheel_lr5.txd", 1083) 
         engineImportTXD(txd, 1083) 
         dff = engineLoadDFF("data/wheel_lr5.dff", 1083) 
          engineReplaceModel(dff, 1083) 
   
          txd = engineLoadTXD("data/wheel_sr1.txd", 1084 ) 
         engineImportTXD(txd, 1084) 
         dff = engineLoadDFF("data/wheel_sr1.dff", 1084) 
        engineReplaceModel(dff, 1084) 
   
          txd = engineLoadTXD("data/wheel_sr2.txd", 1085 ) 
          engineImportTXD(txd, 1085) 
         dff = engineLoadDFF("data/wheel_sr2.dff", 1085) 
          engineReplaceModel(dff, 1085) 
   
          txd = engineLoadTXD("data/wheel_sr3.txd", 1096 ) 
        engineImportTXD(txd, 1096) 
         dff = engineLoadDFF("data/wheel_sr3.dff", 1096) 
         engineReplaceModel(dff, 1096) 
   
        txd = engineLoadTXD("data/wheel_sr4.txd", 1097 ) 
        engineImportTXD(txd, 1097) 
        dff = engineLoadDFF("data/wheel_sr4.dff", 1097) 
        engineReplaceModel(dff, 1097) 
        guiLabelSetColor(lbl_wheel_,0,255,0) 
        guiSetText ( lbl_wheel_, "New Wheels : ON" ) 
        else 
            playSoundFrontEnd(2) 
            engineRestoreModel(1074) 
            engineRestoreModel(1075) 
            engineRestoreModel(1076) 
            engineRestoreModel(1077) 
            engineRestoreModel(1078) 
            engineRestoreModel(1079) 
            engineRestoreModel(1080) 
            engineRestoreModel(1081) 
            engineRestoreModel(1082) 
            engineRestoreModel(1083) 
            engineRestoreModel(1084) 
            engineRestoreModel(1085) 
            engineRestoreModel(1096) 
            engineRestoreModel(1097) 
            guiLabelSetColor(lbl_wheel_,255,0,0) 
            guiSetText ( lbl_wheel_, "New Wheels : OFF" )        
        end 
end 
addEventHandler("onClientMarkerHit", Checkbox_txd_for_wheel_on, Replacetxd, false) 
  

Link to comment

Example !

marker1 = createMarker( -1353.4000244141, -483.5, 14.199999809265, "cylinder", 4, 255, 255, 255, 225 ) 
addEventHandler('onClientMarkerHit', marker1, 
function(player) 
    if(getElementType(player) == 'player' and player == localPlayer) then 
    guiSetVisible(gui_element, true) 
    showCursor(true) 
   end 
end 
) 

Link to comment
function Show_wheel_one(player) 
        if player ~= localPlayer then return end 
        if (guiGetVisible(Window_Wheel) == true) then 
            guiSetVisible(Window_Wheel, false) 
            showCursor(false) 
        else 
            guiSetVisible(Window_Wheel, true) 
            showCursor(true) 
            local sound = playSound("x1x.wma") 
            setSoundVolume(sound, 1) 
        end  
end 
addEventHandler("onClientMarkerHit", marker, Show_wheel_one) 

Link to comment

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
  • Recently Browsing   0 members

    • No registered users viewing this page.

×
×
  • Create New...