[Quest]Dragonul rosu

Am facut un quest cu Dragonul Rosu .
Questul incepe la nivel 75 .
Ce trebuie sa faceti ? Sa omorati un dragon rosu .
Recompensa :
15 Blessuri
5 Metale Magice
25 milioane exp
25kk
Nivel cal 30

Cod:

quest Dragonul rosu begin
    state start begin
        when login with pc.level >= 75 begin
            set_state(information)
        end
    end

    state information begin
        when letter begin
            send_letter("Dragonul rosu")
        end

        when info or button begin
            say("Dragonul rosu")
            say("Dragonul rosu a aparut si nu poate fi stapanit avem nevoie de ajutorul tau .")
            say("Trebuie sa il omori .")
            say("Ajutane sa nu murim toti .Ucide Dragonul")
            say("Sper ca ne vei ajuta")
            say_reward("Vei primi 15 Blessuri ( Perg. Binecuvantarii ) 5 Metale Magice , 25 MIlioane Experienta , 25kk Yang")
            say("")
            pc.setqf("state", 1)
            q.set_counter("Dragonul Rosu ", 1)
        end

        when 2291.kill begin
            local count = pc.getqf("state") - 1
            if count <= 1 then
                pc.setqf("state", count)
                q.set_counter("Dragonul Rosu  ", count)
            end
            if count == 0 then
                say_title("Dragonul rosu")
                say("Bravo Misiune completa!")
                say("")
                say_reward("1")
                say_reward("und")
                say_reward("25000000")
                say_reward("Rasplata :")
                say_reward("30 Level cal")
                say_reward("Item : Pergamentul Binecuvantarii ")
                say_reward("Exp : 25000000")
                say_reward("Yang : 25000000")
                pc.change_money(25000000)
                pc.give_exp2(25000000)
                pc.give_item2(25040, 15)
                pc.give_item2(25041, 5)
                horse.set_level("30")
                clear_letter()
                set_state(__COMPLETE__)

            end
        end
    end

    state __COMPLETE__ begin
    end
end