Quest sorunu

[cb4wtu]

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!

Yeni bi biyolog için quest oluşturdum birkaç hatayı çözdüm ama bu hataya bi türlü çözüm üretemedim bi yerlerde hata yapıyorum ama nerede biraz yardımcı olabilir misiniz?

Hata:
biyo1.lua:21:assertion failure : nested==0

codes

quest biyo1 begin
    state start begin
        when button begin
            say_title ( "Biyolog Chaegirab:" )
            local biyosec = select("Ruh Kristali","Kan Kristali")
           
            if biyosec == 1 then
                if pc.getqf("biyo1") == 0 then
                    say_title ( "Biyolog Chaegirab:" )
                    say ( "Merhaba yolcu bu günlerde 1. köyü inceliyorum" )
                    say ( "1. köydeki metinlerden ruh kristallerini topluyorum" )
                    say ( "Bu konuda biraz yardıma ihtiyacım olacak" )
                    say ( "Eğer bana 200 tane ruh kristali getirirsen" )
                    say ( "Sana ödül olarak +500 saldırı değeri verebilirim." )
                    say ( "200 adet ruh kristalin var mı?." )
                    local biyo1 = select("Evet","Hayır")
                   
                    if biyo1 == 1 then
                       
                        if pc . count_item ( 8500 ) > 199 then
                            pc . remove_item ( "8500" , 200 )
                            affect . add_collect ( apply . ATT_GRADE_BONUS , 500 , 60 * 60 * 24 * 365 * 60 )
                            say_title ( "Biyolog Chaegirab:" )
                            say ( "Muhteşem 200 adet ruh kristalini buldun" )
                            say ( "sana ödül olarak +500 saldırı değerini veriyorum" )
                            say ( "diğer araştırmalarımda görüşmek üzere." )
                               
                            pc.setqf("biyo1",1)
                        else
                            say ( "Yeterince ruh kristalin bulunmuyor!" )
                               
                        end
                    end
                else
                    say ( "Bu görevi zaten tamamladın!" )
                end
            elseif biyosec == 2 then
                if pc.getqf("biyo2") == 0 then
                    say_title ( "Biyolog Chaegirab:" )
                    say ( "Merhaba yolcu bu günlerde 2. köyü inceliyorum" )
                    say ( "2. köydeki metinlerden kan kristallerini topluyorum" )
                    say ( "Bu konuda biraz yardıma ihtiyacım olacak" )
                    say ( "Eğer bana 500 tane kan kristali getirirsen" )
                    say ( "Sana ödül olarak +1000 saldırı değeri verebilirim." )
                    say ( "500 adet kan kristalin var mı?." )
                    local biyo1 = select("Evet","Hayır")
                   
                    if biyo1 == 1 then
                       
                        if pc . count_item ( 8501 ) > 499 then
                            pc . remove_item ( "8501" , 500 )
                            affect . add_collect ( apply . ATT_GRADE_BONUS , 1000 , 60 * 60 * 24 * 365 * 60 )
                            say_title ( "Biyolog Chaegirab:" )
                            say ( "Muhteşem 500 adet kan kristalini buldun" )
                            say ( "sana ödül olarak +1000 saldırı değerini veriyorum" )
                            say ( "diğer araştırmalarımda görüşmek üzere." )
                               
                            pc.setqf("biyo2",1)
                        else
                            say ( "Yeterince kan kristalin bulunmuyor!" )
                        end
                    end   
                else
                    say ( "Bu görevi zaten tamamladın!" )
               
                end
            end
        end
    end

 

[hakikat]

bana skype vs verebilir misin lütfen.

İMZADA VAR