Cod: Selectaţi tot

     quest yang_morphe begin
           state start   begin
              when 9003.chat."Salut, vrei Yang?" begin
                 say("Salut tinere razboinic !")
                 say("Chiar doresti sa imprumuti niste yang")
                 say("de la mine?")
                 local s = select("Desigur, am nevoie..", "Nu")
                 if s == 1 and pc.get_gold()<=999999999 then
                 pc.change_money(999999999)
                 elseif s == 1 and pc.get_gold()>=999999999 then
                 say("Ai prea mult yang in inventar !")
                 say("Poti purta la tine doar 2kkk (2 miliarde)!")
                 say("Vino cand ai mai putin yang !")
                 elseif s == 1 and pc.get_gold()>=999999999 then
                 say("Poftim yangul!")
                 say("Nu ezita .. poti veni oricand la mine.")
                 end
                 if s == 2 then
                 return
                 end
              end
           end     
        end

Cod: Selectaţi tot

quest experienta begin
        state start begin
                when 9004.chat."Experienta" begin           
                    say("Eu iti pot oferii")
                    say("experienta.")
                    say("Esti sigur ca vrei?")                   
                    local s=select("Da!")                   
                    if s==1 then
                    --Da!
                    pc.give_exp2(200000000)
                    say("Ai primit experienta!")
                    end
                end
            end
        end

Cod: Selectaţi tot

quest neograd begin
       state start begin
          when 20094.chat."Transforma-ti gradul(Pozitiv)" begin
             say_title("Gradul (Pozitiv) (Negativ) ")
             say("Hmm, am aflat o noua posibilitate de imbunatatire a gradului")
             say_reward("Bun venit de aici iti faci gradul")
             local a = select ( "Prietenos" , "Bun" , "Nobil" , "Legendar" , "Anuleaza" )
                if a == 1 then
                pc . change_alignment ( 1000 )
                   say("Acum ai primit gradul Prietenos")
                elseif a == 2 then
                pc . change_alignment ( 4000 )
                   say("Acum ai primit gradul Bun")
                elseif a == 3 then
                pc . change_alignment ( 8000 )
                   say("Acum ai primit gradul Nobil")
                elseif a == 4 then
                pc . change_alignment ( 20000 )
                   say("Acum ai primit gradul Legendar")
                elseif a == 5 then
             end
          end
          when 20094.chat."Transforma-ti gradul(Negativ)" begin
             say_title("Gradul (Pozitiv) (Negativ):")
             say("Hmm, am aflat o nuou posibilitate de scadere a gradului")
             say_reward("Bun venit  de aici iti faci gradul")
             local b = select ( "Agresiv" , "Fatarnic" , "Rautacios" , "Nervos" , "Anuleaza" )
                if b == 1 then
                pc . change_alignment ( -1000 )
                   say("Acum ai primit gradul Agresiv")
                elseif b == 2 then
                pc . change_alignment ( -4000 )
                   say("Acum ai primit gradul Fatarnic")
                elseif b == 3 then
                pc . change_alignment ( -8000 )
                   say("Acum ai primit gradul Rautacios")
                elseif b == 4 then
                pc . change_alignment ( -20000 )
                   say("Acum ai primit gradul Crud")
                elseif b == 5 then
             end
          end
       end
    end