L3yr Posted March 13, 2017 Posted March 13, 2017 السلام عليكم شباب ممكن مساعده فى حاجا ممكن حد يبرمجلى زر ايداع الفلوس وسحب الفلوس GUIEditor = { edit = {} } Deposit = guiCreateButton(674, 605, 101, 40, "", false)------ زر ايداع الفلوس guiSetAlpha(Deposit, 0.28) guiSetVisible(Deposit,false) Withdraw = guiCreateButton(478, 607, 101, 40, "", false)----زر سحب الفلوس guiSetAlpha(Withdraw, 0.28) guiSetVisible(Withdraw,false) edit1 = guiCreateEdit(506, 483, 238, 33, "", false)-----الرقم الفلوس الى هتشيلو guiSetVisible(edit1,false) edit = guiCreateEdit(506, 554, 238, 33, "", false) -------هذه مكان انك تعرف انت شايل كام فى مكنه الصرافه guiSetVisible(edit,false) -----مكان لوحه الدى اكس
Abdul KariM Posted March 13, 2017 Posted March 13, 2017 كم مره كررت الموضوع وقالوا لك محاولتك وين ماحد فاضي يبرمج لك كذا على البارد المستريح اما ان تحاول او تشوفلك واحد بمقابل مادي 1
L3yr Posted March 13, 2017 Author Posted March 13, 2017 15 minutes ago, Abdul KariM said: كم مره كررت الموضوع وقالوا لك محاولتك وين ماحد فاضي يبرمج لك كذا على البارد المستريح اما ان تحاول او تشوفلك واحد بمقابل مادي دى تانى مره والمره الى فااتت حاولت وما ظبطت
Abu-Solo Posted March 13, 2017 Posted March 13, 2017 Just now, L3yr said: دى تانى مره والمره الى فااتت حاولت وما ظبطت طيب سوي محاولة حتي لو شخابيط وجيبها هنا
L3yr Posted March 13, 2017 Author Posted March 13, 2017 14 minutes ago, Abu-Solo said: طيب سوي محاولة حتي لو شخابيط وجيبها هنا هذه اخى GUIEditor = { edit = {} } Deposit = guiCreateButton(674, 605, 101, 40, "", false)------ زر ايداع الفلوس guiSetAlpha(Deposit, 0.28) guiSetVisible(Deposit,false) Withdraw = guiCreateButton(478, 607, 101, 40, "", false)----زر سحب الفلوس guiSetAlpha(Withdraw, 0.28) guiSetVisible(Withdraw,false) editt = guiCreateEdit(506, 483, 238, 33, "", false)-----الرقم الفلوس الى هتشيلو guiSetVisible(editt,false) edit = guiCreateEdit(506, 554, 238, 33, "", false) -------هذه مكان انك تعرف انت شايل كام فى مكنه الصرافه guiSetVisible(edit,false) ---لوحه dx ------------- addEventHandler("onClientMarkerHit",marker,-----عند لمس الماركر function ( L3yr ) ----لوحه showCursor(true)-----اظهار الماوس end end ) addEventHandler("onClientGUIClick",root, function() if ( source == ) then triggerServerEvent ( "atm", localPlayer ) elseif (source == Withdraw ) then Text1 = guiGetText (editt) BanckMoney = getPlayerMoney ( localPlayer ) if Text1 > BanckMoney then else triggerServerEvent("triggerOnPlayerSendMoney",localPlayer, tonumber (Text1) ) end elseif (source == Deposit ) then Text2 = guiGetText (edit) triggerServerEvent("triggerGivePlayerMoney",localPlayer, tonumber (Text2) ) elseif (source == Close ) then ----لوحه showCursor(false) end end ) -- server money = 0 function e ( Text2 ) money = money-Text2 end function d () money = money end function w ( Text1 ) money = money+Text1 end function onPlayerQuit ( ) local playeraccount = getPlayerAccount ( source ) if ( playeraccount ) and not isGuestAccount ( playeraccount ) then local money = money setAccountData ( playeraccount, "money", money ) end end function onPlayerLogin (_, playeraccount ) if ( playeraccount ) then local money = getAccountData ( playeraccount, "money" ) if ( money ) then money = money function d () end end end addEventHandler ( "onPlayerQuit", root, onPlayerQuit ) addEventHandler ( "onPlayerLogin", root, onPlayerLogin ) addEvent("triggerOnPlayerSendMoney",true) addEventHandler ("triggerOnPlayerSendMoney",root, function ( Text1 ) function w ( Text1 ) takePlayerMoney ( client, tonumber(Text1) ) end ) addEvent ( "triggerGivePlayerMoney", true) addEventHandler ( "triggerGivePlayerMoney", root, function ( Text2 ) if not tonumber(Text2) > tonumber(money) then givePlayerMoney ( client, tonumber(Text2) ) function e ( Text2 ) end end )
L3yr Posted March 13, 2017 Author Posted March 13, 2017 2 minutes ago, Master_MTA said: سطر 38 خطا مافي بارتمر ل getplayermoney بكلنت ممكن التصحيح فى الكود اخى
Master_MTA Posted March 13, 2017 Posted March 13, 2017 addEventHandler('onClientGUIClick',root,function() if source==btn then -----------------------------بدل btn باسم الزر triggerServerEvent('eda3:money',localPlayer,guiGetText(edit))-----------------edit بدلها باسم الاديت بوكس elseif source==btn2 then -----------------نفس الشي triggerServerEvent('get:money',localPlayer,guiGetText(edit))-----------------edit بدلها باسم الاديت بوكس end end) -------------------- --------------------server----------------- addEvent('eda3:money',true) addEventHandler('eda3:money',root,function(money) local acc=getPlayerAccount(source) if isGuestAccount(acc) then return end if getPlayerMoney(source) < money then return end setAccountData(acc,'eda3',money) takePlayerMoney(source,money) end) addEvent('get:money',true) addEventHandler('get:money',root,function(money) local acc=getPlayerAccount(source) if isGuestAccount(acc) then return end if getAccountData(acc,'eda3') < money then return end setAccountData(acc,'eda3'(getAccountData(acc,'eda3')or 0)-money ) givePlayerMoney(source,money) end) طبعا سويتلك كود بدائي ناقصه كم تحقق انت كملهم
L3yr Posted March 13, 2017 Author Posted March 13, 2017 34 minutes ago, Master_MTA said: addEventHandler('onClientGUIClick',root,function() if source==btn then -----------------------------بدل btn باسم الزر triggerServerEvent('eda3:money',localPlayer,guiGetText(edit))-----------------edit بدلها باسم الاديت بوكس elseif source==btn2 then -----------------نفس الشي triggerServerEvent('get:money',localPlayer,guiGetText(edit))-----------------edit بدلها باسم الاديت بوكس end end) -------------------- --------------------server----------------- addEvent('eda3:money',true) addEventHandler('eda3:money',root,function(money) local acc=getPlayerAccount(source) if isGuestAccount(acc) then return end if getPlayerMoney(source) < money then return end setAccountData(acc,'eda3',money) takePlayerMoney(source,money) end) addEvent('get:money',true) addEventHandler('get:money',root,function(money) local acc=getPlayerAccount(source) if isGuestAccount(acc) then return end if getAccountData(acc,'eda3') < money then return end setAccountData(acc,'eda3'(getAccountData(acc,'eda3')or 0)-money ) givePlayerMoney(source,money) end) طبعا سويتلك كود بدائي ناقصه كم تحقق انت كملهم شكرا اخى على الافاده حياك الله
Master_MTA Posted March 13, 2017 Posted March 13, 2017 Just now, L3yr said: شكرا اخى على الافاده حياك الله الله يحييك بالتوفيق
Recommended Posts
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 accountSign in
Already have an account? Sign in here.
Sign In Now