Quest írás probléma

[ddani700]

Sziasztok!

Nem vagyok egy nagy quest író de most épp próbálkozok vele egész jól megy már csak ezzel van itt gondom:

Kód Kijelölés Kibont

if valaszt2==1 then
else
say_title(mob_name(20094)..":")
say("Sajnálom nincs meg neked ")
say("a 10db készség könyv!")
if pc.removeitem() < 10 then
end
pc.removeitem("50300",10)
j = math.random(1,2,3,4,5)
if j==1 then
pc.give_item2("50401",1)
elseif j==2 then
pc.give_item2("50402",1)
elseif j==3 then
pc.give_item2("50403",1)
elseif j==4 then
pc.give_item2("50404",1)
elseif j==5 then
pc.give_item2("50405",1)
end
end

Nem veszi el a 10db könyvet ha megvan.
Ne vegye el a a könyvet tőled ha nincs meg a 10 db
és hogy mit adjon random az 5 tárgy ból próbáltam hogy csak 1,2 van beírva de akkor az első 2 tárgy közül választott :/
A segítséget előre is köszönöm!

[5310pati]

Elég sok sebből vérzik szegényke.
mi az h if ... then
majd rögtön egy else utána?
2 if pc.removeitem() < 10
wat ez szerintem item_count akart lenni
3 a randomnál intervallumot kell megadni, nem felsorolni az elemeket
math.random(1,5)
és felesleges a macskaköröm a giveitem-be

[ddani700]

Mondtam nem vagyok egy nagy quest író

így ? most nem veszi el a 10 könyvet de kapsz mindig 1 -et csak úgy..

Kód Kijelölés Kibont

if valaszt2==1 then
pc.removeitem("50300",10)
j = math.random(1,5)
if j==1 then
pc.give_item2("50401",1)
elseif j==2 then
pc.give_item2("50402",1)
elseif j==3 then
pc.give_item2("50403",1)
elseif j==4 then
pc.give_item2("50404",1)
elseif j==5 then
pc.give_item2("50405",1)
end
else
if pc.removeitem() < 10 then
say_title(""..mob_name(20090).."")
say("Sajnálom nincs meg neked ")
say("a 10db készség könyv!")
return
end

Valami kimarad de nem jövök rá :/ Vagy ha nagyon rossz át írod nekem? legalább látom mi nem jó

[5310pati]

Kód Kijelölés Kibont

quest asd begin
state start begin
when ID.chat."Asd" begin
say_title("blabla")
say("Biztos?")
local s = select("Igen", "Nem")
if s == 2 then
return
else
if pc.count_item(tárgyID) >= darabszám then
pc.remove_item(tárgyID, darabszám)
local r = math.random(1,5)
if r == 1 then
pc.give_item2(ID1, 1)
elseif r == 2 then
pc.give_item2(ID2, 1)
elseif r == 3 then
pc.give_item2(ID3, 1)
elseif r == 4 then
pc.give_item2(ID4, 1)
else
pc.give_item2(ID5, 1)
end
else
say("Nincs nálad elég ...")
return
end
end
end
end
end
Ha nem írtam el semmit.
A megfelelő dolgokat persze írd át, ID-k és darabszám.

[ddani700]

Már majdnem jó előbb annyira működött hogy elvette a 10 db könyvet és adott 1 -et random de ha nincs meg akkor nem írja ki hogy nincs nálad elég könyv
akkor itt van a teljes quest amit nehezen össze hoztam tegnap

Kód Kijelölés Kibont

quest keszsegkonyv begin
state start begin
when 20090.chat."Keszseg konyv Cserelo" begin
say_title("Keszség konyv Cserelo")
say("")
say("Hello! Nálam becserélheted a készség könyveket")
say("egy neked való kasztra!")
say("")
say("10db készség könyvet hozz el nekem")
say("és cserébe adok 1 neked való készség könyvet!")
say_item("Készség könyv",50300,"")
say("")
say("Szeretnéd becserélni?")
local valaszt=select("Igen","Nem")
if valaszt==2 then
return
end
if valaszt==1 then
local valaszt2=select("Testi Harcos","Menta Harcos","Mágikus fegyver Sura","Fekete Mágia Sura","Sárkány Sámán","Gyógyító sámán","Tőr Nindzsa","Íjász Nindzsa","Mégse")
if valaszt2==9 then
return
end
if valaszt2==8 then
if pc.count_item(50300) >= 10 then
pc.removeitem(50300,10)
local a=math.random(1,5)
if a==1 then
pc.give_item2(50446,1)
elseif a==2 then
pc.give_item2(50447,1)
elseif a==3 then
pc.give_item2(50448,1)
elseif a==4 then
pc.give_item2(50449,1)
else
pc.give_item2(50450,1)
end
end
if valaszt2==7 then
if pc.count_item(50300) >= 10 then
pc.removeitem(50300,10)
local b=math.random(1,5)
if b==1 then
pc.give_item2(50431,1)
elseif b==2 then
pc.give_item2(50432,1)
elseif b==3 then
pc.give_item2(50433,1)
elseif b==4 then
pc.give_item2(50434,1)
else
pc.give_item2(50435,1)
end
end
if valaszt2==6 then
if pc.count_item(50300) >= 10 then
pc.removeitem(50300,10)
local c=math.random(1,6)
if c==1 then
pc.give_item2(50506,1)
elseif c==2 then
pc.give_item2(50507,1)
elseif c==3 then
pc.give_item2(50508,1)
elseif c==4 then
pc.give_item2(50509,1)
elseif c==5 then
pc.give_item2(50510,1)
else
pc.give_item2(50511,1)
end
end
if valaszt2==5 then
if pc.count_item(50300) >= 10 then
pc.removeitem(50300,10)
local d=math.random(1,6)
if d==1 then
pc.give_item2(50491,1)
elseif d==2 then
pc.give_item2(50492,1)
elseif d==3 then
pc.give_item2(50493,1)
elseif d==4 then
pc.give_item2(50494,1)
elseif d==5 then
pc.give_item2(50495,1)
else
pc.give_item2(50496,1)
end
end
if valaszt2==4 then
if pc.count_item(50300) >= 10 then
pc.removeitem(50300,10)
local f=math.random(1,6)
if f==1 then
pc.give_item2(50461,1)
elseif f==2 then
pc.give_item2(50462,1)
elseif f==3 then
pc.give_item2(50463,1)
elseif f==4 then
pc.give_item2(50464,1)
elseif f==5 then
pc.give_item2(50465,1)
else
pc.give_item2(50466,1)
end
end
if valaszt2==3 then
if pc.count_item(50300) >= 10 then
pc.removeitem(50300,10)
local g=math.random(1,6)
if g==1 then
pc.give_item2(50476,1)
elseif g==2 then
pc.give_item2(50477,1)
elseif g==3 then
pc.give_item2(50478,1)
elseif g==4 then
pc.give_item2(50479,1)
elseif g==5 then
pc.give_item2(50480,1)
else
pc.give_item2(50481,1)
end
end
if valaszt2==2 then
if pc.count_item(50300) >= 10 then
pc.removeitem(50300,10)
local h=math.random(1,5)
if h==1 then
pc.give_item2(50416,1)
elseif h==2 then
pc.give_item2(50417,1)
elseif h==3 then
pc.give_item2(50418,1)
elseif h==4 then
pc.give_item2(50419,1)
else
pc.give_item2(50420,1)
end
end
if valaszt2==1 then
if pc.count_item(50300) >= 10 then
pc.removeitem(50300,10)
local j=math.random(1,5)
if j==1 then
pc.give_item2(50401,1)
elseif j==2 then
pc.give_item2(50402,1)
elseif j==3 then
pc.give_item2(50403,1)
elseif j==4 then
pc.give_item2(50404,1)
else
pc.give_item2(50405,1)
end
end
end
end
end
end

most már hibát ír ki rá
ezt hova kellene beírni??

Kód Kijelölés Kibont

else
say_title(""..mob_name(20090).."")
say("Sajnálom nincs meg neked ")
say("a 10db készség könyv!")
return
end
Én már elvesztettem a fonalat tuti valahol elírtam valamit de már sokszor végig mentem de nem látom mi a gond :/

[5310pati]

Kód Kijelölés Kibont

quest keszsegkonyv begin
state start begin
when 20090.chat."Keszseg konyv Cserelo" begin
say_title("Keszség konyv Cserelo")
say("")
say("Hello! Nálam becserélheted a készség könyveket")
say("egy neked való kasztra!")
say("")
say("10db készség könyvet hozz el nekem")
say("és cserébe adok 1 neked való készség könyvet!")
say_item("Készség könyv",50300,"")
say("")
say("Szeretnéd becserélni?")
local valaszt=select("Igen","Nem")
if valaszt==2 then
return
else
if pc.count_item(50300) < 10 then
say_title(""..mob_name(20090).."")
say("Sajnálom nincs meg neked ")
say("a 10db készség könyv!")
return
end
local valaszt2=select("Testi Harcos","Menta Harcos","Mágikus fegyver Sura","Fekete Mágia Sura","Sárkány Sámán","Gyógyító sámán","Tőr Nindzsa","Íjász Nindzsa","Mégse")
local a=math.random(1,5)
if valaszt2==9 then
return
elseif valaszt2==8 then
pc.removeitem(50300,10)
if a==1 then
pc.give_item2(50446,1)
elseif a==2 then
pc.give_item2(50447,1)
elseif a==3 then
pc.give_item2(50448,1)
elseif a==4 then
pc.give_item2(50449,1)
else
pc.give_item2(50450,1)
end
elseif valaszt2==7 then
pc.removeitem(50300,10)
if a==1 then
pc.give_item2(50431,1)
elseif a==2 then
pc.give_item2(50432,1)
elseif a==3 then
pc.give_item2(50433,1)
elseif a==4 then
pc.give_item2(50434,1)
else
pc.give_item2(50435,1)
end
elseif valaszt2==6 then
pc.removeitem(50300,10)
if a==1 then
pc.give_item2(50506,1)
elseif a==2 then
pc.give_item2(50507,1)
elseif a==3 then
pc.give_item2(50508,1)
elseif a==4 then
pc.give_item2(50509,1)
elseif a==5 then
pc.give_item2(50510,1)
else
pc.give_item2(50511,1)
end
elseif valaszt2==5 then
pc.removeitem(50300,10)
if a==1 then
pc.give_item2(50491,1)
elseif a==2 then
pc.give_item2(50492,1)
elseif a==3 then
pc.give_item2(50493,1)
elseif a==4 then
pc.give_item2(50494,1)
elseif a==5 then
pc.give_item2(50495,1)
else
pc.give_item2(50496,1)
end
elseif valaszt2==4 then
pc.removeitem(50300,10)
if a==1 then
pc.give_item2(50461,1)
elseif a==2 then
pc.give_item2(50462,1)
elseif a==3 then
pc.give_item2(50463,1)
elseif a==4 then
pc.give_item2(50464,1)
elseif a==5 then
pc.give_item2(50465,1)
else
pc.give_item2(50466,1)
end
elseif valaszt2==3 then
pc.removeitem(50300,10)
if a==1 then
pc.give_item2(50476,1)
elseif a==2 then
pc.give_item2(50477,1)
elseif a==3 then
pc.give_item2(50478,1)
elseif a==4 then
pc.give_item2(50479,1)
elseif a==5 then
pc.give_item2(50480,1)
else
pc.give_item2(50481,1)
end
elseif valaszt2==2 then
pc.removeitem(50300,10)
if a==1 then
pc.give_item2(50416,1)
elseif a==2 then
pc.give_item2(50417,1)
elseif a==3 then
pc.give_item2(50418,1)
elseif a==4 then
pc.give_item2(50419,1)
else
pc.give_item2(50420,1)
end
else
pc.removeitem(50300,10)
if a==1 then
pc.give_item2(50401,1)
elseif a==2 then
pc.give_item2(50402,1)
elseif a==3 then
pc.give_item2(50403,1)
elseif a==4 then
pc.give_item2(50404,1)
else
pc.give_item2(50405,1)
end
end
end
end
end
end

[ddani700]

Köszönöm szépen! Működik
Ennyire meglátszik hogy kezdő vagyok benne

~Témát zártam!~