Jump to content

طلب كود او تعدبل كود

iA7bk#

By iA7bk#
in البرمجة

Recommended Posts

iA7bk# Transformer

iA7bk#

Posted
Posted

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

شباب ابي تصحيح للكود ذا 

addEventHandler("onClientGUIClick", root, 
    function () 
 if ( source == A1 ) then 
    txd = engineLoadTXD ( "1.txd" ) 
    engineImportTXD ( txd, 4867 ) 
elseif ( source == A2 ) then 
 engineRestoreModel ( 4867 ) 
   end  
end  
)

الكود عباره عن تشغيل الزفلته وايقافها

الحين اضن تشغيل الزفلته مضبوط اما ايقفال الزفلته ما ضبط ابيكم تعدلونه لي

Link to comment
EH10 Loc

EH10

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

شباب ابي تصحيح للكود ذا 

addEventHandler("onClientGUIClick", root, 
    function () 
 if ( source == A1 ) then 
    txd = engineLoadTXD ( "1.txd" ) 
    engineImportTXD ( txd, 4867 ) 
elseif ( source == A2 ) then 
 engineRestoreModel ( 4867 ) 
   end  
end  
)

الكود عباره عن تشغيل الزفلته وايقافها

الحين اضن تشغيل الزفلته مضبوط اما ايقفال الزفلته ما ضبط ابيكم تعدلونه لي

من وين جايب الكود

Link to comment
EH10 Loc

EH10

Posted
Posted

جرب الأن ..

addEventHandler("onClientGUIClick", root, 
    function () 
 if ( source == A1 ) then 
    txd = engineLoadTXD ( "1.txd" ) 
    engineImportTXD ( txd, 4867 ) 
   end  
end  
) 
  
addEventHandler("onClientGUIClick", root, 
    function () 
 if ( source == A2 ) then 
    engineRestoreModel ( 4867 ) 
   end  
end  
)

@@

Link to comment
iA7bk# Transformer

iA7bk#

Posted
  • Author
Posted
جرب الأن ..

addEventHandler("onClientGUIClick", root, 
    function () 
 if ( source == A1 ) then 
    txd = engineLoadTXD ( "1.txd" ) 
    engineImportTXD ( txd, 4867 ) 
   end  
end  
) 
  
addEventHandler("onClientGUIClick", root, 
    function () 
 if ( source == A2 ) then 
    engineRestoreModel ( 4867 ) 
   end  
end  
)

@@

ما يقفل الـtxd

Link to comment
TAPL Ghetto Star

TAPL

Posted
Posted
جرب الأن ..

addEventHandler("onClientGUIClick", root, 
    function () 
 if ( source == A1 ) then 
    txd = engineLoadTXD ( "1.txd" ) 
    engineImportTXD ( txd, 4867 ) 
   end  
end  
) 
  
addEventHandler("onClientGUIClick", root, 
    function () 
 if ( source == A2 ) then 
    engineRestoreModel ( 4867 ) 
   end  
end  
)

@@

ذا نفس الكود يا بطل

@iA7bk#, اعتقد انك بتحتاج تجيب الزفلته الأصلية و تركبها مره ثانية

dff بس حق engineRestoreModel لان الفنكشن ذا

بس جرب ذا يمكن يضبط

addEventHandler("onClientGUIClick", root, 
function() 
    if (source == A1) then 
        txd = engineLoadTXD("1.txd") 
        engineImportTXD(txd, 4867) 
    elseif (source == A2) then 
        destroyElement(txd) 
    end 
end)

إذا ما ضبط بتحتاج الزفلته الأصلية

Link to comment
iA7bk# Transformer

iA7bk#

Posted
  • Author
Posted

طيب تابل انا اضفت ال

dff

بس ما ضبط 

     
    addEventHandler("onClientGUIClick", root, 
    function() 
        if (source == A1) then 
            txd = engineLoadTXD("1.txd") 
            engineImportTXD(txd, 4867) 
  dff = engineLoadDFF("1.dff", 4867 ) 
  engineReplaceModel(dff, 4867) 
        elseif (source == A2) then 
  engineReplaceModel(dff, 4867) 
        end 
    end)

Link to comment
Booo Fool

Booo

Posted
Posted
طيب تابل انا اضفت ال

dff

بس ما ضبط 

     
    addEventHandler("onClientGUIClick", root, 
    function() 
        if (source == A1) then 
            txd = engineLoadTXD("1.txd") 
            engineImportTXD(txd, 4867) 
  dff = engineLoadDFF("1.dff", 4867 ) 
  engineReplaceModel(dff, 4867) 
        elseif (source == A2) then 
  engineReplaceModel(dff, 4867) 
        end 
    end)

جرب الكود هذا اول شي

اذا ماضبط جرب الثاني وعطنا تجربتك مع الإكواد

local helhRBL = false 
function addRBL ( )  
    if not helhRBL then 
  local txd = engineLoadTXD ( "1.txd" ) 
    engineImportTXD ( txd, 4867 ) 
        helhRBL = true 
    else 
        engineRestoreModel ( 4867 ) 
        helhRBL = false 
    end 
end 
  
  
addEventHandler("onClientGUIClick", root, 
  
    function () 
  
 if ( source == A1 ) then 
addRBL ( )  
elseif ( source == A2 ) then 
addRBL ( )  
   end  
  
end  
  
)

الكود الثاني

local helhRBL = false 
function addRBL ( )  
    if not helhRBL then 
  local txd = engineLoadTXD ( "1.txd" ) 
    engineImportTXD ( txd, 4867 ) 
       local dff = engineLoadDFF("1.dff",4867) 
        engineReplaceModel(dff, 4867) 
        helhRBL = true 
    else 
        engineRestoreModel ( 4867 ) 
        helhRBL = false 
    end 
end 
  
  
addEventHandler("onClientGUIClick", root, 
  
    function () 
  
 if ( source == A1 ) then 
addRBL ( )  
elseif ( source == A2 ) then 
addRBL ( )  
   end  
  
end  
  
)
Link to comment
iA7bk# Transformer

iA7bk#

Posted
  • Author
Posted
طيب تابل انا اضفت ال

dff

بس ما ضبط 

     
    addEventHandler("onClientGUIClick", root, 
    function() 
        if (source == A1) then 
            txd = engineLoadTXD("1.txd") 
            engineImportTXD(txd, 4867) 
  dff = engineLoadDFF("1.dff", 4867 ) 
  engineReplaceModel(dff, 4867) 
        elseif (source == A2) then 
  engineReplaceModel(dff, 4867) 
        end 
    end)

جرب الكود هذا اول شي

اذا ماضبط جرب الثاني وعطنا تجربتك مع الإكواد

local helhRBL = false 
function addRBL ( )  
    if not helhRBL then 
  local txd = engineLoadTXD ( "1.txd" ) 
    engineImportTXD ( txd, 4867 ) 
        helhRBL = true 
    else 
        engineRestoreModel ( 4867 ) 
        helhRBL = false 
    end 
end 
  
  
addEventHandler("onClientGUIClick", root, 
  
    function () 
  
 if ( source == A1 ) then 
addRBL ( )  
elseif ( source == A2 ) then 
addRBL ( )  
   end  
  
end  
  
)

الكود الثاني

local helhRBL = false 
function addRBL ( )  
    if not helhRBL then 
  local txd = engineLoadTXD ( "1.txd" ) 
    engineImportTXD ( txd, 4867 ) 
       local dff = engineLoadDFF("1.dff",4867) 
        engineReplaceModel(dff, 4867) 
        helhRBL = true 
    else 
        engineRestoreModel ( 4867 ) 
        helhRBL = false 
    end 
end 
  
  
addEventHandler("onClientGUIClick", root, 
  
    function () 
  
 if ( source == A1 ) then 
addRBL ( )  
elseif ( source == A2 ) then 
addRBL ( )  
   end  
  
end  
  
)

نفس الشيء ما ضبط

تجربتي انا ضبطت اول ما اشغل المود ما يجي التعديل حق الابجكت لما اضغط على الزر تجي الزفلته

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

    addEventHandler("onClientGUIClick", root, 
    function() 
        if (source == A1) then 
            txd = engineLoadTXD("1.txd") 
            engineImportTXD(txd, 4867) 
  dff = engineLoadDFF("1.dff", 4867 ) 
  engineReplaceModel(dff, 4867) 
        elseif (source == A2) then 
  engineReplaceModel(dff, 4867) 
        end 
    end)

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
Go to topic listing

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...