quest compra_exp begin
    state start begin
        when 9003.chat."exp test" begin
            say_title ( "test:" )
            say ( "Compra l'exè ricorda che" )
            say_reward ( "1 exp e' uguale a 1000 YANG" )
            local test == select ( "Continua" , "Esci" )
            if test == 2 then
            return
            elseif test == 1 then
            say_title ( "test:" )
            say ( "Inserisci il numero di exp che vuoi comprare" )
            local exp = input ()
            yang = (exp*1000)
            say ( "Vuoi continuare?" )
            local test2 == select ( "Si" , "No" )
            if test2 == 2 then
            return
            elseif test2 == 1 then
            pc . give_exp2 ( exp )
            pc . changegold ( - yang )
            say_title ( "test:" )
            say ( "ottimo!" )
            say_reward ( "Fattura test:" )
            say_reward ( "Hai acquistato:" ..exp )
            say_reward ( "Hai pagato:" ..yang )
            end
            if pc . gold <= yang then
            say ( "Non hai abbastanza yang!" )
            end
        end
    end
end