prct5 0.0.1

data/spec/examen.rb

@@ -0,0 +1,63 @@
+require 'multirespuesta'
+require 'verdadero_falso'
+require 'lista_enlazada'
+
+class Examen < ListaEnlazada
+	def initialize(vector_preguntas)
+		super(vector_preguntas)
+		@respondido = false
+		if vector_preguntas.kind_of? Array
+			@n_preguntas = vector_preguntas.length
+		else
+			@n_preguntas = 1
+		end
+		@respuestas = []
+	end
+	def print
+		while @actual != nil
+			@actual.val.to_s
+			@actual = @actual.siguiente
+		end
+		@actual = @head
+	end
+	def print_node(val)
+		for i in 0..val do
+			@actual = @actual.siguiente			
+		end
+		@actual.val.to_s
+		@actual = @head
+	end
+	def getCorrecta(node)
+		return node.val.correcta
+	end
+	def getPreg(node)
+		return node.val.preg
+	end
+	def getNum(node)
+		return node.val.num
+	end
+	def responder(value)
+		print_node(value)
+		print "Introduzca su respuesta -> "
+		STDOUT.flush
+		resp = gets.chomp
+		if resp == @actual.val.correcta
+			return true
+		else
+			return false
+		end
+	end
+	def my_while(condicion, &bloque) 
+		while condicion.call
+			bloque.call
+		end
+	end
+	def inverse
+		aux = @tail
+		my_while -> {aux != nil} do
+			aux.val.to_s
+			aux = aux.prev
+		end
+		return true
+	end
+end

data/spec/interfaz.rb

@@ -0,0 +1,48 @@
+require 'examen'
+
+class Interfaz
+	def initialize(vector_preguntas)
+		@respondido = false
+		@n_preguntas = vector_preguntas.length
+		@exam = Examen.new(vector_preguntas)
+		@respuestas = []
+	end
+	def muestra_menu
+		while true do
+			puts "Prueba Examen"
+			puts "Seleccione una opcion del menu:"
+			puts "1) Mostrar examen"
+			puts "2) Responder examen"
+			if @respondido == true
+				puts "3) Mostrar calificacion"
+			end
+			puts "0) Salir"
+			print "-> "
+			STDOUT.flush
+			a = gets.chomp
+			case a
+			when "1"
+				@exam.print
+			when "2"
+				for i in 0..@n_preguntas do
+					@respuestas[i] = @exam.responder(i)
+				end
+				@respondido = true
+			when "3"
+				a = 0
+				puts "Calificacion"
+				for i in 0..@n_preguntas do
+					if @respuestas[i] == true
+						puts "#{i}) Correcta"
+						a = a+1
+					else
+						puts "#{i}) Incorrecta"
+					end
+					puts "Tu puntuacion total es de #{(a/n_preguntas)*10}"
+				end
+			when 0
+				exit
+			end
+		end
+	end
+end

data/spec/lista_enlazada.rb

@@ -0,0 +1,136 @@
+class Nodo
+	attr_reader :val, :siguiente, :prev
+	attr_writer :val, :siguiente, :prev
+	def initialize (val,sig,prev)
+		@val = val
+		@siguiente = sig
+		@prev = prev
+	end
+end
+
+class ListaEnlazada
+	include Enumerable
+	attr_reader :head, :tail
+	attr_writer :head, :tail
+
+	def <=> (anOther)
+		@actual.val <=> anOther.actual.val
+	end
+	def each
+		while @actual != nil do
+			yield @actual.val
+			@actual = @actual.siguiente
+		end
+		@actual = @head
+	end
+	def initialize (entrada)
+		@size = 0
+
+		@actual = Nodo.new(nil,nil,nil)
+
+		@head = Nodo.new(nil,nil,nil)
+		@tail = Nodo.new(nil,nil,nil)
+		@head = @tail
+		@tail = @head
+		push(entrada)
+
+		@actual = @head
+	end
+	def pop
+		aux = @head.val
+		@head = @head.siguiente
+		@size = @size-1
+		return aux
+	end
+	def pop_f
+		aux = @tail.val
+		@tail = @tail.siguiente
+		@size = @size-1
+		return aux
+	end
+	def push (val)
+		if val.instance_of? Array
+			for i in 0..val.length do
+#			(0..(val.length)).each do |i|
+				aux = Nodo.new(val[i],nil,nil)
+				if((@head == nil) and (@tail == nil))
+					@head = aux
+					@tail = @head
+					@size = @size + 1
+				else
+					@tail.siguiente = aux
+					aux.prev = @tail
+					@tail = aux
+					@size = @size + 1
+				end
+			end
+		else
+			aux = Nodo.new(val,nil,nil)
+			if((@head == nil) and (@tail == nil))
+				@head = aux
+				@tail = @head
+				@size = @size + 1
+			else
+				@tail.siguiente = aux
+				aux.prev = @tail
+				@tail = aux
+				@size = @size + 1
+			end
+		end
+		return true
+	end
+	def push_i (val)
+		if val.instance_of? Array
+			for i in 0..val.length do
+#			(0..(val.length)).each do |i|
+				aux = Nodo.new(val[i],nil,nil)
+				if((@head == nil) and (@tail == nil))
+					@head = aux
+					@tail = @head
+					@size = @size + 1
+				else
+					@head.prev = aux
+					aux.siguiente = @head
+					@head = aux
+					@size = @size + 1
+				end
+			end
+		else
+			aux = Nodo.new(val,nil,nil)
+			if((@head == nil) and (@tail == nil))
+				@head = aux
+				@tail = @head
+				@size = @size + 1
+			else
+				@head.prev = aux
+				aux.siguiente = @head
+				@head = aux
+				@size = @size + 1
+			end
+		end
+		return true
+	end
+	def imprime(nodo)
+		if (nodo != nil)
+			print "#{nodo.val} "
+			imprime(nodo.siguiente)
+		end
+	end
+	def forPrint
+		imprime(@head)
+		puts ""
+	end
+	def my_while(condicion, &bloque) 
+		while condicion.call
+			bloque.call
+		end
+	end
+	def inverse
+		aux = @tail
+		my_while -> {aux != nil} do 
+			print "#{aux.val} "
+			aux = aux.prev
+		end
+		puts ""
+	end
+end

data/spec/lista_respuesta.rb

@@ -0,0 +1,36 @@
+require 'multirespuesta'
+require 'lista_enlazada'
+
+describe MultiRespuesta do
+	before :each do
+		@resp = [5]
+		pregunta1 = "Cual es la salida del siguiente codigo en ruby?\n\tclass Xyz\n\t\tdef pots\n\t\t\t@nice\n\t\tend?\n\tend?\n\txyz = Xyz.new?\n\tp xyz.pots"
+		pregunta2 = "La siguiente definicion de un hash en Ruby es valida:\n\thash_raro = {\n\t\t[1,2,3] => Object.new(),\n\t\tHash.new => :toto\n\t}"
+		pregunta3 = "Cual es la salida del siguiente codigo Ruby?\n\tclass Array\n\t\tdef say_hi\n\t\t\t\"Hey!\"\n\t\tend\n\tend\n\tp [1, \"bob\"].say_hi"
+		pregunta4 = "Cual es el tipo de objeto en el siguiente codigo Ruby?\n\tclass Objeto\n\tend"
+		pregunta5 = "Es apropiado que una clase Tablero herede de una clase Juego"
+		preguntas = [pregunta1,pregunta2,pregunta3,pregunta4,pregunta5]
+		numeros = [4,2,4,4,2]
+		respuestas1 = ["#<Xyz:0xa000208>","nil","0","Ninguna de las anteriores"]
+		respuestas2 = ["Cierto","Falso"]
+		respuestas3 = ["1","Bob","HEY!","Ninguna de las anteriores"]
+		respuestas4 = ["Una instancia de la clase Class","Una constante","Un objeto","Ninguna de las anteriores"]
+		respuestas5 = ["Cierto","Falso"]
+		for i in 0..@resp.length
+			@resp[i] = MultiRespuesta.new("#{i}.-)#{preguntas[i]}",numeros[i],nil)
+			case i
+			when 1
+				@resp[i].introducir_resp(respuestas1)
+			when 2
+				@resp[i].introducir_resp(respuestas2)
+			when 3
+				@resp[i].introducir_resp(respuestas3)
+			when 4
+				@resp[i].introducir_resp(respuestas4)
+			when 5
+				@resp[i].introducir_resp(respuestas5)
+			end
+		end
+		@lista = ListaEnlazada.new(@resp)
+	end
+end

data/spec/multirespuesta.rb

@@ -0,0 +1,36 @@
+class MultiRespuesta
+	include Comparable
+	attr_reader :preg, :num, :resp, :correcta
+	attr_writer :preg, :num, :resp, :correcta
+	def <=> (anOther)
+		@num <=> anOther.num
+	end
+	def == (anOther)
+		@num == anOther.num && @preg == anOther.preg
+	end
+	def initialize(preg,num,correcta)
+		@resp = []
+		@num = num
+		@preg = preg
+		@correcta = correcta
+	end
+	def introducir_resp(resp)
+		for i in 0..(@num.to_i - 1)
+			@resp[i] = resp[i]
+		end
+	end
+	def to_s
+		puts "#{@preg}?"
+		for i in 0..(@num-1) do
+			puts"#{i+1})#{@resp[i]}"
+		end
+	end
+	def correccion(respuesta_usuario)
+		if(respuesta_usuario == @correcta)
+			return true
+		else
+			return false
+		end
+	end
+	
+end

data/spec/node_spec.rb

@@ -0,0 +1,91 @@
+require 'spec_helper'
+require 'lista_enlazada'
+
+describe ListaEnlazada do
+	before :each do
+		a = [3,5,6,7]
+		@nodo2 = Nodo.new(5,nil,nil)
+		@nodo1 = Nodo.new(3,@nodo2,nil)
+		@lista = ListaEnlazada.new(3)
+	end
+	describe "Valor de nodo1 = 3" do
+		it "Valor de nodo1 correcto" do
+			@nodo1.val.should eq(3)
+		end
+	end
+	describe "Nodo siguiente a nodo1 = nodo2" do
+		it "Nodo siguiente correcto" do
+			@nodo1.siguiente.should eq(@nodo2)
+		end
+	end
+	describe "Insercion de varios elementos" do
+		it "Insercion multiple correcta" do
+			a = [1,2,3]
+			@lista.push(a).should eq(true)
+		end
+	end
+	describe "Insercion de un elemento" do
+		it "Insercion simple correcta" do
+			@lista.push(1).should eq(true)
+		end
+	end
+	describe "Extraccion de un elemento" do
+		it "Extraccion simple correcta" do
+			@lista.pop.should eq(nil)
+		end
+	end
+	describe "Consulta de cabeza" do
+		it "Consulta de cabeza correcta" do
+			@lista.head.val.should eq(nil)
+		end
+	end
+end
+
+#module Enumerable
+#	describe "Enumerable" do
+#		it "Funciona collect" do
+#			@lista.collect{ |i| i.to_s + "x"}.should eq('3x')
+#		end
+#		it "Funciona sort" do
+#			@lista.sort.should eq(3)
+#		end
+#		it "Funciona max" do
+#			@lista.max.should eq(3)
+#		end
+#		it "Funciona min" do
+#			@lista.min.should eq (3)
+#		end
+#	end
+#end
+
+#describe "prueba" do
+#module Enumerable
+#By default is included in Array class
+#r = [1,2,3,4,5,6].each{ |i| puts i}
+#
+#puts r
+#
+#r = [1,2,3,4,5,6].collect{ |i| i.to_s + "x"}
+#
+#puts r
+#
+#r = [1,2,3,4,5,6].detect{ |i| i.between?(2,3)}
+#
+#puts r
+#
+#r = [1,2,3,4,5,6].select{ |i| i.between?(3,5)}
+#
+#puts r
+#
+#r = [2,1,6,5,4,3].sort
+#
+#puts r
+#
+#r = [2,1,6,5,4,3].max
+#
+#puts r
+#
+#r = [2,1,6,5,4,3].min
+#
+#puts r
+#end

data/spec/prct5_spec.rb

@@ -0,0 +1,82 @@
+require 'spec_helper'
+require 'prct5'
+require 'multirespuesta'
+
+describe MultiRespuesta do
+	before :each do
+		@multi = MultiRespuesta.new("Como me llamo",4,3)
+		@multi2 = MultiRespuesta.new("Eres canario",2,1)
+	end
+	describe "#Introducir pregunta" do
+		it "Introduccion de pregunta correcto" do
+			@multi.preg.should eq("Como me llamo")
+		end
+	end
+	describe "#Introducir numero de respuestas" do
+		it "Numero de respuestas correctas" do
+			@multi.num.should eq(4)
+		end
+	end
+	describe "#respuesta correcta" do
+		it "La respuesta correcta es" do
+			@multi.correcta.should eq(3)
+		end
+	end
+	describe "#Introducir resuestas" do
+		it"Respuestas correctas" do
+			resp = ["Paco", "Pedro", "Carlos", "Adexe"]
+			@multi.introducir_resp(resp)
+			@multi.resp.should eq(["Paco", "Pedro", "Carlos", "Adexe"])
+		end
+	end
+	describe "#Respuesta correcta? si" do
+		it "Respuesta correcta (Programa funciona correctamente)" do
+			@multi.correccion(3).should eq(true)
+		end
+	end
+	describe "#Respuesta correcta? no" do
+		it "Respuesta incorrecta (Programa funciona correctamente)" do
+			@multi.correccion(2).should eq(false)
+		end
+	end
+	describe "#Existen getters?" do
+		it "Responde al getter de preg" do
+			@multi.respond_to?("preg").should eq(true)
+		end
+		it "Responde al getter de resp" do
+			@multi.respond_to?("resp").should eq(true)
+		end
+		it "Responde al getter de num" do
+			@multi.respond_to?("num").should eq(true)
+		end
+		it "Responde al getter de correcta" do
+			@multi.respond_to?("correcta").should eq(true)
+		end
+		it "Responde al getter de introducir_resp" do
+			@multi.respond_to?("introducir_resp").should eq(true)
+		end
+	end
+	describe "Comparable" do
+		it "Mas respuestas" do
+			a = @multi > @multi2
+			a.should eq(true)
+		end
+		it "Mas respuestas falso" do
+			a = @multi2 > @multi
+			a.should eq(false)
+		end
+		it "Menos respuestas" do
+			a = @multi2 < @multi
+			a.should eq(true)
+		end
+		it "Menos respuestas falso" do
+			a = @multi < @multi2
+			a.should eq(false)
+		end
+		it "Pregunta igual" do
+			multi3 = MultiRespuesta.new("Eres canario",2,1)
+			a = multi3 == @multi2
+			a.should eq(true)
+		end
+	end
+end

data/spec/preg2.rb

@@ -0,0 +1,31 @@
+#Ejercicio 1
+class Xyz
+	def pots
+		@nice
+	end
+end
+xyz = Xyz.new
+p xyz.pots
+
+#Ejercicio 2
+hash_raro = {
+	[1, 2, 3] => Object.new(),
+	Hash.new => :toto
+}
+
+#Ejercicio 3
+class Array
+	def say_hi
+		"HEY!"
+	end
+end
+p [1, "bob"].say_hi
+
+
+#Ejercicio 4
+class Objeto
+end
+puts Objeto.class #Modificación creada para comprobar la clase del objeto...
+
+#Ejercicio 5
+

data/spec/preg2_spec.rb

@@ -0,0 +1,53 @@
+require 'spec_helper'
+require 'preg2'
+
+#Prueba ejercicio 1
+#describe Xyz do
+#	before :each do
+#		@resp = Xyz.new()
+#	end
+#	describe "Salida apartado 1" do
+#		it "Valor de apartado 1 correcto" do
+#			@resp.should eq(nil)
+#		end
+#	end
+#end
+#
+#Prueba ejercicio 2
+#describe "Prueba hash raro" do
+#	it "Hash raro es correcto" do
+#		hash_raro = {
+#			[1, 2, 3] => Object.new(),
+#			Hash.new => :toto
+#		}
+#		hash_raro.should eq("{[1, 2, 3]=>#<Object:0x00000000e96678>, {}=>:toto}")
+#	end
+#end
+
+
+#Prueba ejercicio 3
+describe Array do
+	before :each do
+		@Array = Array.new()
+	end
+	describe "Salida apartado 3" do
+		it "Valor de apartado 3 correcto" do
+			@Array.say_hi.should eq("HEY!")
+		end
+	end
+end
+
+#Prueba ejercicio 4
+describe Objeto do
+	before :each do
+		@Objeto = Objeto.new()
+	end
+	describe "Salida apartado 4" do
+		it "Valor de apartado 4 correcto" do
+			@Objeto.class.should eq(Objeto)
+		end
+	end
+end	
+
+#Prueba ejercicio 5
+

data/spec/quiz1.rb

@@ -0,0 +1,114 @@
+#encoding: utf-8
+#require './preg'
+class Answer
+	attr_accessor :kind, :order, :answer
+	def initialize(order, kind, answer)
+		@kind = kind
+		@order = order
+		@answer = answer
+	end
+
+	def to_s
+		"#{@order} -  #{answer}"
+	end
+	def is_right?
+		@kind == Quiz::RIGHT
+	end
+	def <=>(other)
+		self.order <=> other.order
+	end
+end
+
+class Question
+	ORDER = 0
+	KIND = 1
+	attr_accessor :text, :answers
+	def initialize(text, answers)
+		@text = text
+		@answers = answers.map { |k, v| Answer.new(k[ORDER], k[KIND],  v) }.sort
+	end
+
+	def to_s
+		output = <<"EOQ"
+		#{@text}
+		#{
+		out = ""
+		@answers.each do |answer|
+		out << "  #{answer}\n"
+	end
+	out
+	}
+EOQ
+	end
+	def ask
+		begin
+			puts self
+			print "Su respuesta: " 
+			answerno = gets.to_i - 1
+		end while (answerno < 0 or answerno >= @answers.length)
+		@answers[answerno].is_right? 
+	end
+end
+
+class Quiz
+	RIGHT = :right
+	WRONG = :wrong
+
+	attr_accessor :name, :questions 
+
+	def initialize(name = "", &block)
+		self.name = name
+		self.questions = []
+		@counter = 0
+		instance_eval &block
+	end
+	
+	def question(text, answers)
+		q = Question.new(text, answers)
+		questions << q
+		@counter = 0
+	end
+
+	def to_s
+		out = <<"EOQUIZ"
+		#{self.name}
+		#{self.questions.join("\n")}
+EOQUIZ
+	end
+
+	def wrong
+		@counter += 1
+		[@counter, WRONG]
+	end
+
+	def right
+		@counter+= 1
+		[@counter, RIGHT]
+	end
+
+	def title(title)
+		@name = title
+	end
+
+	def run
+		counter=0
+		puts self.name+"\n\n"
+		self.questions.each { |q| counter += 1 if q.ask }
+		puts "#{counter} respuestas correctas de un total de #{@questions.size}."
+	end
+end
+
+	quiz = Quiz.new("Cuestionario de LPP 10/12/2014") do
+		question '¿Cuántos argumentos de tipo bloque puede recibir un método?',
+			right =>'Uno',
+			wrong =>'Dos',
+			wrong =>'Muchos',
+			wrong =>'Los que defina el usuario'
+		question 'En Ruby los bloque son objetos que continen código',
+			wrong =>'Cierto',
+			right =>'Falso'
+	end
+#	puts quiz
+	puts "************************"
+	quiz.run
+

data/spec/spec_helper.rb

@@ -0,0 +1,18 @@
+#require 'coveralls'
+#Coveralls.wear!
+# This file was generated by the `rspec --init` command. Conventionally, all
+# specs live under a `spec` directory, which RSpec adds to the `$LOAD_PATH`.
+# Require this file using `require "spec_helper"` to ensure that it is only
+# loaded once.
+#
+# See http://rubydoc.info/gems/rspec-core/RSpec/Core/Configuration
+RSpec.configure do |config|
+  config.treat_symbols_as_metadata_keys_with_true_values = true
+  config.run_all_when_everything_filtered = true
+  config.filter_run :focus
+  # Run specs in random order to surface order dependencies. If you find an
+  # order dependency and want to debug it, you can fix the order by providing
+  # the seed, which is printed after each run.
+  #     --seed 1234
+  config.order = 'random'
+end