ÇÖZÜLDÜ Lua görev Hakkında

[hatarnak]

Merhaba Premiumlu charlara npcden item vermek istiyorum örneğin durationu premiumla npcden istediği kadar alabilecek premiumsuz charlar bu npcden alışveriş yapamayacak birde görev şeklinde yapmak istiyorum yani luayla bunun kodu nedir acaba örnekle verilebilirse çok güzel olur

local NPC = 32000;

if (EVENT == 1454) then --Premiumsistem
SelectMsg(UID, 3, -1, 1000000, NPC,1100000,1110000);
end
if (EVENT == 1110000) then -- pus 1
SelectMsg(UID, 3, -1, 1000000, NPC,2100000,2110000);
end
if (EVENT == 2110000) then -- duration
SlotCheck = CheckGiveSlot(UID, 1)
if SlotCheck == false then
else
Prem = GetPremium(UID);
if (Prem > 0) then
GiveItem(UID, 800022000, 1,1);
else
ExpChange(UID, 100);
end

burda tıkandım bu koduda bir luadan aldim durationu premium olan herkese vermeye çalışıyorum exp vermeme bakmayin o oylesine koydum

 

[ATABEYY]

Yanlış biliyor olabilirim ama düzeltirler sanırım DB ve TBL de npc itemi kopyalayıp o itemi sadece premium la trade edilmesini saglayabilirsin tahminim

 

[hatarnak]

getpremium gibi fonksiyonları var unuttum şimdi bana öyle lazım hocam

 

[Adorable]

getpremium fonksiyonu çalışıyor mu luada

 

[hatarnak]

getpremiumla npcyi kurunca npc bile açılmıyor fakat başka kendime yazdığım bir kodları yazdığımda npc açılıyor

 

[ATABEYY]

Premiumpot veren bı npc vardı moradonda ona baktın mı mantık aynı sanırım premium olunca açılıyordu sadece o mantıkla ilerleyebilirsin sanırım akşam bakacağım

 

[hatarnak]

hocam bunlara ben süre koyuyorum premium pot dedigin satın almalı şekilde lua şeklinde lazım bana

 

[ATABEYY]

Npc nin luasina baksan yardimci olur anlamında dedim kendine göre duzenleyebilirsin akşam bakacağım senin için

 

[hatarnak]

o luayu bulamadım sanırım benim filesta yok

 

[Adorable]

getpremium fonksiyonu yoksa zaten calısmaz npc gameserverde hata olarak gosterır. anladıgım kadarıyla premiumu olanlar npcyi acabilecek ve satın alma işlemi veya ödül işlemi yapacak. eğer getpremium fonksiyonun calısıyorsa ona uygun lua yazarız

 

[hatarnak]

şöyle bir hata alıyorum

Ziyaretçiler için gizlenmiş link,görmek için Giriş yap veya üye ol.

yapmam istediğim şu premium olan userlere bedava bazı pus itemleri vermeyi düşünüyorum galiba bazı fileslarda çalışmıyor getpremium galiba öyle anladım

 

[TriLogy]

Sadece premium olanlar bu npc açsın istiyorsan base evente premium kontrolü koyman lazım bu şekilde premium olmayana menü açılmaz ona da hata mesajı eklersin else yaparak git premium al gibisinden

 

[TriLogy]

şöyle bir hata alıyorum

Ziyaretçiler için gizlenmiş link,görmek için Giriş yap veya üye ol.

yapmam istediğim şu premium olan userlere bedava bazı pus itemleri vermeyi düşünüyorum galiba bazı fileslarda çalışmıyor getpremium galiba öyle anladım

Bu hata eksik end veya fazla end koyduğun zaman verir event bitişlerinde her if eklediğinde onun kadar end koymalısın

 

[hatarnak]

yorumun için teşekkürler baseeventi biraz daha açarmısın luaysa örnek verebilirmisin dbdense nerden ayarlanıyor

 

[Adorable]

luayı paylaş inceleyelim

 

[hatarnak]

local NPC = 32000;

if (EVENT == 1454) then --Premiumsistem
SelectMsg(UID, 3, -1, 1000000, NPC,1100000,1110000);
end
if (EVENT == 1110000) then -- pus 1
SelectMsg(UID, 3, -1, 1000000, NPC,2100000,2110000);
end
if (EVENT == 2110000) then -- duration
war = HowmuchItem(UID, 900000000);
if (war < 1 or war == 0) then
else
Prem = GetPremium(UID);
if (Prem > 0) then
else
SlotCheck = CheckGiveSlot(UID, 1)
if SlotCheck == false then
else
GoldLose(UID, 1);
GiveItem(UID, 800022000, 1,1);
end

1 coins istiyor ama onu öylesine koydum getpremiumlada premiumlulara vermeye çalışıyorum

 

[TriLogy]

yorumun için teşekkürler baseeventi biraz daha açarmısın luaysa örnek verebilirmisin dbdense nerden ayarlanıyor

Discord kullanıyorsan yardımcı olayım o lua kodlaması biraz saçma olmuş onun üzerinden devam etme

 

[hatarnak]

geri dönüsünüz icin teşekkürler Discord adresim hatarnak

 

[Adorable]

local NPC = 32000;



if (EVENT == 101) then

SelectMsg(UID, 3, -1, <questtalk>, NPC, <questmenu>, eventno1);

end



if (EVENT == eventno1) then --

SelectMsg(UID, 3, -1, <questtalk>,NPC, <questmenu>,eventno2);

end



if (EVENT == eventno2) then -- duration

war = HowmuchItem(UID, 900000000);

if (war > 0) then

Prem = GetPremium(UID);

if (Prem > 0) then

-- Premium varsa

SlotCheck = CheckGiveSlot(UID, 1);

if (SlotCheck == true) then

GoldLose(UID, 1);

GiveItem(UID, 800022000, 1, 1);

end

else

SelectMsg(UID, 2, -1, <questtalk pre yoksa mesaj>, NPC, 10, -1);

end

else

SelectMsg(UID, 2, -1, <questtalk gold yoksa mesaj>, NPC, 10, -1);

end

end

 

[Adorable]

getpremium fonksiyonun calısıyorsa bu kod calısacaktır. questhelper Tablosuna npcyı eklemeyı unutma