Sorunsuz Bar Sistemi - LUA

[Mogart]

HERAKLES Otomatik Avlı kalıcı sunucu. 19 Haziran'da açılıyor. Atius & Wizard güvencesiyle hemen kayıt ol, ön kayıt ödülleri aktif. HEMEN TIKLA!

anladım tesekkurler bu daha ıyı olmus ust uste koyma varmı barları

O yanlış bilmiyorsam mysql'dan ayarlanıyor.

 

[GaMeRTurK]

Merhaba Arkadaşlar,
Bu forumda bu tarzı paylaşılıp paylaşılmadığını bilmiyorum. Fakat gördüğüm bar sistemleri tam istediğim gibi olmadığı için kendim yazmaya karar verdim. Kendi local server'ımda denedim. Sorunsuz bir şekilde çalışıyor. Öncelikle şunu söylemek istiyorum. YGS tarihi yaklaştığı için pek sistem yazamıyorum. O yüzden arada bir paylaşımlarım olacak. Maruz görün. İnşallah YGS'den sonra paylaşımlara tam gaz devam edeceğim.

GENEL BİLGİ
Arkadaşlar sistem çok basittir. Bar'lara sağ tıkladığınız zaman Bar otomatik olarak açılır. Herhangi bir ekran gelmez. Eğer toplam yang miktarı 2 T yi aşıyorsa Bar'ı açmaz. Eğer aşmıyorsa Bar'ı sıkıntısız açar.

ÖZEL DUYURU
Arkadaşlar, şu uyarıyı yapmam gerekiyor. Ben kendi filesimde Altın Parçası isimli 80008 kodlu itemi Bar olarak kullanıyorum. Sizde aynı şekilde kullanmak istiyorsanız Navicattan type kısmını falan Bar'larda ki gibi ayarlarmanız gerekiyor.
Birde benim Bar'larımın ismine takılmayın.

LUA İÇERİĞİ

Linkleri görebilmek için Turkmmo Forumuna ÜYE olmanız gerekmektedir.

quest barsistemi begin
    state start begin
        when 80003.use begin
            local ellim = 50000000
            local guncelyang = pc.get_gold()
            local toplam = (guncelyang+ellim)
            if pc.count_item(80003) < 1 then
                syschat("<DirilişMt2> Gerekli Bar bulunamadı.")
            else
                if toplam > 2000000000 then
                    syschat("<DirilişMt2> Toplam yang miktarı 2 T'yi aştığı için Bar açılamadı.")
                else
                    pc.change_gold(ellim)
                    pc.remove_item("80003",1)
                    syschat("<DirilişMt2> Bar başarıyla açıldı. 50 M yüklendi.")
                end
            end
        end
        when 80004.use begin
            local yuzm = 100000000
            local guncelyang = pc.get_gold()
            local toplambir = (guncelyang+yuzm)
            if pc.count_item(80004) < 1 then
                syschat("<DirilişMt2> Gerekli Bar Bulunamadı.")
            else
                if toplambir > 2000000000 then
                    syschat("<DirilişMt2> Toplam yang miktarı 2 T'yi aştığı için Bar açılamadı.")
                else
                    pc.change_gold(yuzm)
                    pc.remove_item("80004",1)
                    syschat("<DirilişMt2> Bar başarıyla açıldı. 100 M yüklendi.")
                end
            end
        end
        when 80005.use begin
            local ikiellim = 250000000
            local guncelyang = pc.get_gold()
            local toplamiki = (guncelyang+ikiellim)
            if pc.count_item(80005) < 1 then
                syschat("<DirilişMt2> Gerekli Bar Bulunamadı.")
            else
                if toplamiki > 2000000000 then
                    syschat("<DirilişMt2> Toplam yang miktarı 2 T'yi aştığı için Bar açılamadı.")
                else
                    pc.change_gold(ikiellim)
                    pc.remove_item("80005",1)
                    syschat("<DirilişMt2> Bar başarıyla açıldı. 250 M yüklendi.")
                end
            end
        end
        when 80006.use begin
            local besyuzm = 500000000
            local guncelyang = pc.get_gold()
            local toplamuc = (guncelyang+besyuzm)
            if pc.count_item(80006) < 1 then
                syschat("<DirilişMt2> Gerekli Bar Bulunamadı.")
            else
                if toplamuc > 2000000000 then
                    syschat("<DirilişMt2> Toplam yang miktarı 2 T'yi aştığı için Bar açılamadı.")
                else
                    pc.change_gold(besyuzm)
                    pc.remove_item("80006",1)
                    syschat("<DirilişMt2> Bar başarıyla açıldı. 500 M yüklendi.")
                end
            end
        end
        when 80007.use begin
            local yediellim = 750000000
            local guncelyang = pc.get_gold()
            local toplamdort = (guncelyang+yediellim)
            if pc.count_item(80007) < 1 then
                syschat("<DirilişMt2> Gerekli Bar Bulunamadı.")
            else
                if toplamdort > 2000000000 then
                    syschat("<DirilişMt2> Toplam yang miktarı 2 T'yi aştığı için Bar açılamadı.")
                else
                    pc.change_gold(yediellim)
                    pc.remove_item("80007",1)
                    syschat("<DirilişMt2> Bar başarıyla açıldı. 750 M yüklendi.")
                end
            end
        end
        when 80008.use begin
            local birbucukt = 1500000000
            local guncelyang = pc.get_gold()
            local toplambes = (guncelyang+birbucukt)
            if pc.count_item(80008) < 1 then
                syschat("<DirilişMt2> Gerekli Bar Bulunamadı.")
            else
                if toplambes > 2000000000 then
                    syschat("<DirilişMt2> Toplam yang miktarı 2 T'yi aştığı için Bar açılamadı.")
                else
                    pc.change_gold(birbucukt)
                    pc.remove_item("80008",1)
                    syschat("<DirilişMt2> Bar başarıyla açıldı. 1.5 T yüklendi.")
                end
            end
        end
    end
end

Saygılarımla Arz Ederim. Bir Teşekkürü Çok Görmeyin.

işte bu paylaşım için teşekkürler..

 

[Mogart]

işte bu paylaşım için teşekkürler..

Rica Ederim.

 

[qecekondu06]

Teşekkürler

 

[Mogart]

Teşekkürler

Rica Ederim.