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!

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.

 

[Aven Flipers]

Teşekkürler Yararlı . Çok paylaşıldı ama olur böyle şeyler.

 

[Mogart]

Teşekkürler Yararlı . Çok paylaşıldı ama olur böyle şeyler.

Doğrudur kardeşim. Dediğim gibi istediğim gibisini bulamadığım için yazıp paylaştım.

 

[Aven Flipers]

Doğrudur kardeşim. Dediğim gibi istediğim gibisini bulamadığım için yazıp paylaştım.

Paylaşmak güzeldir .

 

[Mogart]

Paylaşmak güzeldir .

Aynen öyle