[QUEST] Açıksız Altın Bar Çıkarma Lua

[frenzyboy]

ROHAN2 WORLD 1-120 TR TİPİ OFFICIAL YOHARA, BALATHOR VE AMON! 80. GÜNÜNDE! +10.000 ONLİNE! HİLE VE BOT %100 ENGELLİ HEMEN TIKLA!

Merhaba arkadaşlar,

Bu kategoride küçük bir katkım olmasını istedim. Yardımcı olabildiğim kadar olacağım.
Quest Hakkında birkaç bilgi vereyim. Ve kapatılan bugları söyleyeyim.

Bu sistem Depocuda satılan Altın Bar iteminin Lua dosyasıdır. Yani Depocudan altın bar aldığınızda sağ tıklayarak açacağınız sistemde kodlanmıştır. İteme sağ tıkladığınızda sizin lua dosyasında belirttiğiniz miktarda para verir ve itemi siler.

Kapatılan bugları söylemek yerine size çalışma mantığını söyleyeyim.

Sağ tıkladığınız anda ilk önce item var mı yok mu onu kontrol eder. Var ise "Barı çıkartmak istiyor musunuz" diye sorar. Evet'e tıkladığınızda barı tekrar kontrol eder. Var ise oyuncunun para miktarını kontrol eder. Eğer oyuncunun envanterindeki para çıkardıktan sonra 2t yi geçiyorsa barı açmaz. Geçmiyorsa açar.

Vakit kaybetmeden size dosyayı paylaşayım

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

quest alikrbk_bar begin
    state start begin
        when 80005.use begin
        if pc . count_item ( 80005 ) < 1 then 
            say_title("Hey ".. pc.get_name() ..".")
            say ( "Bar Kaybolmus!" )
            end
            say_title("Hey ".. pc.get_name() ..".")
            say ( "100 Milyon Yang'ı envanterine çıkartacaksın!" )
            say ( "Dikkatli Ol Envanterine İyi Bak Paran 2t den Fazla Olacak Şekile Bozdurma!" )
            say ( "Aksi Taktirde Giden Paranızdan Sorumlu Değiliz..." )
            local s = select ( "Evet" , "Hayır" ) 
                if s == 1 then
                    local kalan= pc.count_item(80005)
                    if kalan <= 0 then 
                    say_title("Hey ".. pc.get_name() ..".")
                    say ( "Bar Kaybolmus!" )
                    elseif kalan >= 0 then
                        local anlikyang = pc.get_gold()
                        local barmiktari = 100000000
                        local maxyang = 2000000000
                        if anlikyang+barmiktari >= maxyang then
                        say_title("Kontrol:")
                        say("")
                        say("Barı açarsan paran 2t den fazla")
                        say("olacağı için çıkarılamadı.")    
                        else
                        say_reward ( "Başarıyla Çıkardın!" ) 
                        pc.change_money( barmiktari )
                        pc.removeitem("80005", 1) 
                    end
                end
                else
                end
        end
    end
end

local barmiktari = 100000000 -- BARI ÇIKARDIKTAN SONRA VERECEĞİ YANG MİKTARI
local maxyang = 2000000000 -- OYUNUN MAX YANG MİKTARI
80005 İSE İTEM KODUDUR.

Nasıl Yüklenir ?

Kodları boş bir dosyaya yapıştırdıktan sonra dosyaadi.lua olarak kaydediyorsunuz.
Sunucuya SFTP'den bağlantı yapıp dosyayı /usr/game/share/locale/turkey/quest dizini içerisine atıyorsunuz.
Putty ile giriş yapın ve :
cd /usr/game/share/locale/turkey/quest
./qc dosyaadi.lua

yazın. Hata alırsanız :

pc.get_gold fonksiyonunu quest_functions içine atın.

Oyundan Görüntü :

Dosya olarak paylaşılmadığı için virüstotale gerek görmedim. Ama çok isterseniz ;

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

Buyrun

İyi Forumlar

 

[onlinemt2ibrahim]

wooow başarılı ve yararlı bir paylaşım.. Çoğu kişinin işine yarayacaktır

 

[ZacqooLeaven]

Teşekkürler yararlı

 

[frenzyboy]

Rica ederim arkadaşlar.

 

[sontakip]

Paylasım için Teşekkür ederim.