[Relase]Quest Crea/Scambia Lingotti.

--------------------------------
-- Quest Crea/Scambia Lingotto -
-- By: LightMistic             -
--------------------------------
quest lingotti_uriel begin
    state start begin
        when 20011.chat."Lingotti" begin
            say ( "Ciao, che cosa vuoi?!" )
            say ( "Non vedi che sono impegnato con i miei libri?" )
            say ( "Non ho tempo da perdere con quelli come te." )
            say ( "Aspetta sto vedendo del denaro o mi sbaglio?" )
            local lingotto = select ( "100kk" , "250kk" , "500kk" , "1kkk" , "1.9kkk" , "No" )
            if lingotto == 6 then
                say ( "Mi hai fatto perdere solo del tempo" )
                say ( "dovresti vergognarti... " )
                say ( "Ti avevo ritenuto un bravo ragazzo" )
                say ( "invece sei un nabbo." )
            elseif lingotto == 1 then
                    if pc . gold >= 100000000 then
                    pc . changegold ( - 100000000 )
                    pc . give_item2 ( "80003" , 1 )
                    say ( "Lo scambio ha avuto buon fine" )
                else
                    say ( "Non possiedi tanto denaro" )
                end
            elseif lingotto == 2 then
                    if pc . gold >= 250000000 then
                    pc . changegold ( - 250000000 )
                    pc . give_item2 ( "80004" , 1 )
                    say ( "Lo scambio ha avuto buon fine" )
                else
                    say ( "Non possiedi tanto denaro" )
                end
                elseif lingotto == 3 then
                    if pc . gold >= 500000000 then
                    pc . changegold ( - 500000000 )
                    pc . give_item2 ( "80005" , 1 )
                    say ( "Lo scambio ha avuto buon fine" )
                else
                    say ( "Non possiedi tanto denaro" )
                end
            elseif lingotto == 4 then
                    if pc . gold >= 1000000000 then
                    pc . changegold ( - 1000000000 )
                    pc . give_item2 ( "80006" , 1 )
                    say ( "Lo scambio ha avuto buon fine" )
                else
                    say ( "Non possiedi tanto denaro" )
                end
            elseif lingotto == 5 then
                    if pc . gold >= 1900000000 then
                    pc . changegold ( - 1900000000 )
                    pc . give_item2 ( "80007" , 1 )
                    say ( "Lo scambio ha avuto buon fine" )
                else
                    say ( "Non possiedi tanto denaro" )
                end
            end --  if
        end --  when
        when 20011.chat."Scambia Lingotti" begin
            local scambio = select ( "100kk" , "200kk" , "500kk" , "1kkk" , "1.9kkk" )
            if scambio == 1 then
                    if pc . count_item ( 80003 ) >= 1 then
                    pc . remove_item ( "80003" , 1 )
                    pc . changegold ( 100000000 )
                    say_reward ( "Hai ricevuto 100kk" )
                else
                    say ( "Non possiedi il lingotto" )
                end
            elseif scambio == 2 then
                    if pc . count_item ( 80004 ) >= 1 then
                    pc . remove_item ( "80004" , 1 )
                    pc . changegold ( 200000000 )
                    say_reward ( "Hai ricevuto 200kk" )
                else
                    say ( "Non possiedi il lingotto" )
                end
            elseif scambio == 3 then
                    if pc . count_item ( 80005 ) >= 1 then
                    pc . remove_item ( "80005" , 1 )
                    pc . changegold ( 500000000 )
                    say_reward ( "Hai ricevuto 500kk" )
                else
                    say ( "Non possiedi il lingotto" )
                end
                elseif scambio == 4 then
                    if pc . count_item ( 80006 ) >= 1 then
                    pc . remove_item ( "80006" , 1 )
                    pc . changegold ( 1000000000 )
                    say_reward ( "Hai ricevuto 1kkk" )
                else
                    say ( "Non possiedi il lingotto" )
                end
            elseif scambio == 5 then
                    if pc . count_item ( 80007 ) >= 1 then
                    pc . remove_item ( "80007" , 1 )
                    pc . changegold ( 1900000000 )
                    say_reward ( "Hai ricevuto 1.9kkk" )
                else
                    say ( "Non possiedi il lingotto" )
                end
            end --  if
        end --  when
    end --  state
end --  quest