20 Haziran 2018, 16:22:28

Gönderen Konu: [İNDİR] Para Yollama Paneli  (Okunma sayısı 626 defa)

0 Üye ve 1 Ziyaretçi konuyu incelemekte.

DeaRSwaT

  • Aranızda Yeni Birisi var - Entry
  • Acemi Üye
  • *
  • İleti: 112
  • Script Yapmak İçin Kod Yetmez.
[İNDİR] Para Yollama Paneli
« : 01 Nisan 2017, 05:11:25 »
Para Yollama Panel Alıntıdır! Fakat Grafiklendirme Tamamen Bana Aittir.

Link: Linkleri Görebilmek İçin Kayıt Olun veya Giriş Yapın



Resim:
« Son Düzenleme: 01 Nisan 2017, 13:55:56 Gönderen: DeaRSwaT »
 

MTASA-TURK | Türkiye'nin En Güncel MTA Platformu

[İNDİR] Para Yollama Paneli
« : 01 Nisan 2017, 05:11:25 »

Cynax

  • #
  • Uzman Üye
  • *
  • İleti: 546
  • Bıraktı
Ynt: [İNDİR] Para Yollama Paneli
« Yanıtla #1 : 01 Nisan 2017, 06:45:09 »
Yararlı paylaşım.
 

CruzerGq

  • Süper Moderatör
  • *
  • İleti: 503
  • LS Gaming | Hırsız & Polis
    • MTASA-TURK
Ynt: [İNDİR] Para Yollama Paneli
« Yanıtla #2 : 01 Nisan 2017, 11:10:51 »
Scriptin sana ait olduğuna eminmisin ? Linkleri Görebilmek İçin Kayıt Olun veya Giriş Yapın

para1.lua (Senin scriptindeki)

Kod: Lua
  1. addEvent("onPlayerReceiveMoney",true)
  2. addEventHandler("onPlayerReceiveMoney", getRootElement(),
  3. function(comboPlayer,sentMoney)
  4. local name = getPlayerName(source)
  5. local comboPlayerName = getPlayerFromName(comboPlayer)
  6. local getmoney = tonumber(getPlayerMoney(source))
  7. if tonumber(sentMoney) <= getmoney and tonumber(sentMoney) >= 0 and tonumber(sentMoney) ~= 0 then
  8. local give = givePlayerMoney (comboPlayerName,tonumber(sentMoney))
  9. local take = takePlayerMoney (source,tonumber(sentMoney))
  10.  
  11. if give and take then
  12. outputChatBox("#0099FFPara Baþarýyla Gönderildi. $"..sentMoney.." < Kime > = "..comboPlayer.."#FF0000!",source,0,255,0,true)
  13. outputChatBox("#000099Sana Baþarýyla Para Gönderildi. $"..sentMoney.." < Kim > ="..getPlayerName(source).."#FF0000!",comboPlayerName,0,255,0,true)
  14. end
  15.  
  16. elseif getmoney <= tonumber(sentMoney) or 0 >= tonumber(sentMoney) then
  17. outputChatBox("#0099FFAdamim Önce Parana Bak Sonra Para Yolla!="..sentMoney.." Kime = "..comboPlayer.."#FF0000!",source,255,0,0,true)
  18.  
  19. elseif not tonumber(sentMoney) == 0 then
  20. outputChatBox("#660000Gecerli Bir Sayi Yaz!",source,255,0,0,true)
  21. end
  22. end )

para2.lua (Senin scriptindeki)

Kod: Lua
  1. local gui = {}
  2.         gui._placeHolders = {}
  3.        
  4.         local screenWidth, screenHeight = guiGetScreenSize()
  5.         local windowWidth, windowHeight = 280, 215
  6.         local left = screenWidth/2 - windowWidth/2
  7.         local top = screenHeight/2 - windowHeight/2
  8.        
  9.         gui["_root"] = guiCreateWindow(left, top, windowWidth, windowHeight, "Mtasa-Turk Para Gönderme Paneli", false)
  10.         guiWindowSetSizable(gui["_root"], false)
  11.        
  12.         guiSetVisible(gui["_root"], false)
  13.         showCursor(false)
  14.        
  15.         gui["comboBox"] = guiCreateComboBox(70, 85, 191, 54,"Bir Kisi Sec", false, gui["_root"])
  16.        
  17.         for id, player in ipairs(getElementsByType("player")) do
  18.         guiComboBoxAddItem(gui["comboBox"], getPlayerName(player))
  19.         end
  20.        
  21.         gui["label_2"] = guiCreateLabel(16, 89, 50, 20, "Kime:", false, gui["_root"])
  22.         guiLabelSetHorizontalAlign(gui["label_2"], "left", false)
  23.         guiLabelSetVerticalAlign(gui["label_2"], "center")
  24.        
  25.         gui["label_3"] = guiCreateLabel(15, 118, 50, 25, "Para Miktari:", false, gui["_root"])
  26.         guiLabelSetHorizontalAlign(gui["label_3"], "left", false)
  27.         guiLabelSetVerticalAlign(gui["label_3"], "center")
  28.        
  29.         gui["lineEdit"] = guiCreateEdit(70, 115, 101, 20, "", false, gui["_root"])
  30.         guiEditSetMaxLength(gui["lineEdit"],8)
  31.        
  32.         gui["label_4"] = guiCreateLabel(178, 115, 120, 16, "f", false, gui["_root"])
  33.         guiLabelSetHorizontalAlign(gui["label_4"], "left", false)
  34.         guiLabelSetVerticalAlign(gui["label_4"], "center")
  35.         guiSetFont(gui["label_4"],"default-smalls")
  36.        
  37.         guiCreateStaticImage(9,20,290,62,"resim.png",false,gui["_root"])
  38.        
  39.        
  40.         gui["pushButton"] = guiCreateButton(-5, 147, 331, 51, "Gönder", false, gui["_root"])
  41.  
  42. addEventHandler("onClientRender",getRootElement(),
  43. function()
  44.         guiSetText(gui["label_4"],"Cebindeki Paralar>> $="..getPlayerMoney())
  45. end )
  46.  
  47. bindKey("f5","down",
  48. function()
  49.         if guiGetVisible(gui["_root"]) == true then
  50.                 guiSetVisible(gui["_root"], false)
  51.                 showCursor(false)
  52.         elseif guiGetVisible(gui["_root"]) == false then
  53.                 guiSetVisible(gui["_root"], true)
  54.                 showCursor(true)
  55.         end
  56. end )
  57.        
  58. addEventHandler("onClientGUIClick", getRootElement(),
  59. function(a,b,c,d)
  60.         if source == gui["pushButton"] and guiComboBoxGetItemText(gui["comboBox"],guiComboBoxGetSelected(gui["comboBox"])) ~= "Oyuncu Sec" then
  61.                 local getComboPlayer = guiComboBoxGetItemText(gui["comboBox"],guiComboBoxGetSelected(gui["comboBox"]))
  62.                 local getMoneyToSend = guiGetText(gui["lineEdit"])
  63.                 if getComboPlayer and getMoneyToSend then
  64.                         triggerServerEvent("onPlayerReceiveMoney",localPlayer,getComboPlayer,getMoneyToSend)
  65.                 end
  66.         end
  67.         end )




para1.lua (Diğer scriptindeki)

Kod: Lua
  1. addEvent("onPlayerReceiveMoney",true)
  2. addEventHandler("onPlayerReceiveMoney", getRootElement(),
  3. function(comboPlayer,sentMoney)
  4. local name = getPlayerName(source)
  5. local comboPlayerName = getPlayerFromName(comboPlayer)
  6. local getmoney = tonumber(getPlayerMoney(source))
  7. if tonumber(sentMoney) <= getmoney and tonumber(sentMoney) >= 0 and tonumber(sentMoney) ~= 0 then
  8. local give = givePlayerMoney (comboPlayerName,tonumber(sentMoney))
  9. local take = takePlayerMoney (source,tonumber(sentMoney))
  10.  
  11. if give and take then
  12. outputChatBox("#0099FFPara Gonderildi. $"..sentMoney.." < Kime > = "..comboPlayer.."#FF0000!",source,0,255,0,true)
  13. outputChatBox("#000099Para Gonderdi. $"..sentMoney.." < Kim > ="..getPlayerName(source).."#FF0000!",comboPlayerName,0,255,0,true)
  14. end
  15.  
  16. elseif getmoney <= tonumber(sentMoney) or 0 >= tonumber(sentMoney) then
  17. outputChatBox("#0099FFGondermek icin Yeterli Paran <<#CC3300 YOK >>$="..sentMoney.." Kime = "..comboPlayer.."#FF0000!",source,255,0,0,true)
  18.  
  19. elseif not tonumber(sentMoney) == 0 then
  20. outputChatBox("#660000Gecerli Bir Miktar Yaz!",source,255,0,0,true)
  21. end
  22. end )

para2.lua (Diğer scriptindeki)

Kod: Lua
  1. local gui = {}
  2.         gui._placeHolders = {}
  3.        
  4.         local screenWidth, screenHeight = guiGetScreenSize()
  5.         local windowWidth, windowHeight = 280, 215
  6.         local left = screenWidth/2 - windowWidth/2
  7.         local top = screenHeight/2 - windowHeight/2
  8.        
  9.         gui["_root"] = guiCreateWindow(left, top, windowWidth, windowHeight, "Para Gonderme Paneli [-Blue Production-]", false)
  10.         guiWindowSetSizable(gui["_root"], false)
  11.        
  12.         guiSetVisible(gui["_root"], false)
  13.         showCursor(false)
  14.        
  15.         gui["comboBox"] = guiCreateComboBox(70, 85, 191, 54,"Bir Kiþi Seç", false, gui["_root"])
  16.        
  17.         for id, player in ipairs(getElementsByType("player")) do
  18.         guiComboBoxAddItem(gui["comboBox"], getPlayerName(player))
  19.         end
  20.        
  21.         gui["label_2"] = guiCreateLabel(16, 89, 50, 20, "Kime:", false, gui["_root"])
  22.         guiLabelSetHorizontalAlign(gui["label_2"], "left", false)
  23.         guiLabelSetVerticalAlign(gui["label_2"], "center")
  24.        
  25.         gui["label_3"] = guiCreateLabel(15, 118, 50, 25, "Para Miktarý:", false, gui["_root"])
  26.         guiLabelSetHorizontalAlign(gui["label_3"], "left", false)
  27.         guiLabelSetVerticalAlign(gui["label_3"], "center")
  28.        
  29.         gui["lineEdit"] = guiCreateEdit(70, 115, 101, 20, "", false, gui["_root"])
  30.         guiEditSetMaxLength(gui["lineEdit"],8)
  31.        
  32.         gui["label_4"] = guiCreateLabel(178, 115, 120, 16, "f", false, gui["_root"])
  33.         guiLabelSetHorizontalAlign(gui["label_4"], "left", false)
  34.         guiLabelSetVerticalAlign(gui["label_4"], "center")
  35.         guiSetFont(gui["label_4"],"default-smalls")
  36.        
  37.         guiCreateStaticImage(9,20,290,62,"resim.png",false,gui["_root"])
  38.        
  39.        
  40.         gui["pushButton"] = guiCreateButton(-5, 147, 331, 51, "Gönder", false, gui["_root"])
  41.  
  42. addEventHandler("onClientRender",getRootElement(),
  43. function()
  44.         guiSetText(gui["label_4"],"Paran>> $="..getPlayerMoney())
  45. end )
  46.  
  47. bindKey("f6","down",
  48. function()
  49.         if guiGetVisible(gui["_root"]) == true then
  50.                 guiSetVisible(gui["_root"], false)
  51.                 showCursor(false)
  52.         elseif guiGetVisible(gui["_root"]) == false then
  53.                 guiSetVisible(gui["_root"], true)
  54.                 showCursor(true)
  55.         end
  56. end )
  57.        
  58. addEventHandler("onClientGUIClick", getRootElement(),
  59. function(a,b,c,d)
  60.         if source == gui["pushButton"] and guiComboBoxGetItemText(gui["comboBox"],guiComboBoxGetSelected(gui["comboBox"])) ~= "Oyuncu Sec" then
  61.                 local getComboPlayer = guiComboBoxGetItemText(gui["comboBox"],guiComboBoxGetSelected(gui["comboBox"]))
  62.                 local getMoneyToSend = guiGetText(gui["lineEdit"])
  63.                 if getComboPlayer and getMoneyToSend then
  64.                         triggerServerEvent("onPlayerReceiveMoney",localPlayer,getComboPlayer,getMoneyToSend)
  65.                 end
  66.         end
  67.         end )

Linkleri Görebilmek İçin Kayıt Olun veya Giriş Yapın

Bu konu hakkında bir açıklama yap ve düzelt. Yoksa konun çöpe taşınacaktır.
« Son Düzenleme: 01 Nisan 2017, 13:43:46 Gönderen: CruzerGq »
 

DeaRSwaT

  • Aranızda Yeni Birisi var - Entry
  • Acemi Üye
  • *
  • İleti: 112
  • Script Yapmak İçin Kod Yetmez.
Ynt: [İNDİR] Para Yollama Paneli
« Yanıtla #3 : 01 Nisan 2017, 13:56:40 »
Açıklamayı yaptım.
« Son Düzenleme: 01 Nisan 2017, 21:13:22 Gönderen: Narkoz »
 

Mucks

  • Muhammet Emin Özer
  • Bilgin Üye
  • *
  • Default Avatar
  • İleti: 239
Ynt: [İNDİR] Para Yollama Paneli
« Yanıtla #4 : 02 Nisan 2017, 14:45:28 »
Linkleri Görebilmek İçin Kayıt Olun veya Giriş Yapın
Yararlı paylaşım.
Linkleri Görebilmek İçin Kayıt Olun veya Giriş Yapın