Програмиране с Ruby

Курс във Факултета по Математика и Информатика към СУ

Решение на Четвърта задача от Антонио Николов

Обратно към всички решения

Към профила на Антонио Николов

Резултати

  • 6 точки от тестове
  • 0 бонус точки
  • 6 точки общо
  • 8 успешни тест(а)
  • 0 неуспешни тест(а)

Код

module Asm
module OperationInstructions
def mov_instruction(destination_register, source)
set_register = set_value(source)
instance_variable_set("@#{destination_register}", set_register)
end
def inc_instruction(destination_register, value)
value = 1 if value == nil
set_register = set_value(value)
set_register += set_value(destination_register)
instance_variable_set("@#{destination_register}", set_register)
end
def dec_instruction(destination_register, value)
value = 1 if value == nil
set_register = set_value(value)
set_register = set_value(destination_register) - set_register
instance_variable_set("@#{destination_register}", set_register)
end
def cmp_instruction(register, value)
@cmp = set_value(register) <=> set_value(value)
end
def set_value(value)
if value.class == Symbol
instance_variable_get("@#{value}")
else
value
end
end
end
module JumpInstructions
def jmp_instruction(where)
if where.class == Symbol
execute_instructions(@operations_queue.index([:label, where]) + 1)
else
cut_tail = @operations_queue.size - where - 1
label_count = @operations_queue.reverse.drop(cut_tail).reverse.select do |label|
label[0] == :label
end.size
execute_instructions(where + label_count)
end
end
def je_instruction(where)
if @cmp == 0
jmp_instruction(where)
else
execute_instructions(@operations_queue.index([:je, where]) + 1)
end
end
def jne_instruction(where)
if @cmp != 0
jmp_instruction(where)
else
execute_instructions(@operations_queue.index([:jne, where]) + 1)
end
end
def jl_instruction(where)
if @cmp < 0
jmp_instruction(where)
else
execute_instructions(@operations_queue.index([:jl, where]) + 1)
end
end
def jle_instruction(where)
if @cmp <= 0
jmp_instruction(where)
else
execute_instructions(@operations_queue.index([:jle, where]) + 1)
end
end
def jg_instruction(where)
if @cmp > 0
jmp_instruction(where)
else
execute_instructions(@operations_queue.index([:jg, where]) + 1)
end
end
def jge_instruction(where)
if @cmp >= 0
jmp_instruction(where)
else
execute_instructions(@operations_queue.index([:jge, where]) + 1)
end
end
end
class AssemblerSubset
def method_missing(method)
method
end
def initialize
@ax = 0
@bx = 0
@cx = 0
@dx = 0
@operations_queue = []
@cmp = 0
end
instructions = [:mov, :inc, :dec, :cmp, :label, :jmp, :je, :jne, :jl, :jle, :jg, :jge]
instructions.each do |instruction_name|
define_method instruction_name do |*args|
@operations_queue << [instruction_name, *args]
end
end
def execute_instructions(drop_index)
@operations_queue.drop(drop_index).each do |instruction|
if [:mov, :inc, :dec, :cmp].include? instruction[0]
send (instruction[0].to_s + "_instruction"), instruction[1], instruction[2]
elsif instruction[0] == :label
next
else
return send (instruction[0].to_s + "_instruction"), instruction[1]
end
end
[@ax, @bx, @cx, @dx]
end
private
include OperationInstructions
include JumpInstructions
end
def self.asm(&block)
task = AssemblerSubset.new
task.instance_eval &block
task.execute_instructions(0)
end
end

Лог от изпълнението

........

Finished in 0.0079 seconds
8 examples, 0 failures

История (1 версия и 1 коментар)

Антонио обнови решението на 15.01.2014 13:16 (преди почти 11 години)

+module Asm
+ module OperationInstructions
+ def mov_instruction(destination_register, source)
+ set_register = set_value(source)
+ instance_variable_set("@#{destination_register}", set_register)
+ end
+
+ def inc_instruction(destination_register, value)
+ value = 1 if value == nil
+ set_register = set_value(value)
+ set_register += set_value(destination_register)
+ instance_variable_set("@#{destination_register}", set_register)
+ end
+
+ def dec_instruction(destination_register, value)
+ value = 1 if value == nil
+ set_register = set_value(value)
+ set_register = set_value(destination_register) - set_register
+ instance_variable_set("@#{destination_register}", set_register)
+ end
+
+ def cmp_instruction(register, value)
+ @cmp = set_value(register) <=> set_value(value)
+ end
+
+ def set_value(value)
+ if value.class == Symbol
+ instance_variable_get("@#{value}")
+ else
+ value
+ end
+ end
+ end
+
+ module JumpInstructions
+ def jmp_instruction(where)
+ if where.class == Symbol
+ execute_instructions(@operations_queue.index([:label, where]) + 1)
+ else
+ cut_tail = @operations_queue.size - where - 1
+ label_count = @operations_queue.reverse.drop(cut_tail).reverse.select do |label|
+ label[0] == :label
+ end.size
+ execute_instructions(where + label_count)
+ end
+ end
+
+ def je_instruction(where)
+ if @cmp == 0
+ jmp_instruction(where)
+ else
+ execute_instructions(@operations_queue.index([:je, where]) + 1)
+ end
+ end
+
+ def jne_instruction(where)
+ if @cmp != 0
+ jmp_instruction(where)
+ else
+ execute_instructions(@operations_queue.index([:jne, where]) + 1)
+ end
+ end
+
+ def jl_instruction(where)
+ if @cmp < 0
+ jmp_instruction(where)
+ else
+ execute_instructions(@operations_queue.index([:jl, where]) + 1)
+ end
+ end
+
+ def jle_instruction(where)
+ if @cmp <= 0
+ jmp_instruction(where)
+ else
+ execute_instructions(@operations_queue.index([:jle, where]) + 1)
+ end
+ end
+
+ def jg_instruction(where)
+ if @cmp > 0
+ jmp_instruction(where)
+ else
+ execute_instructions(@operations_queue.index([:jg, where]) + 1)
+ end
+ end
+
+ def jge_instruction(where)
+ if @cmp >= 0
+ jmp_instruction(where)
+ else
+ execute_instructions(@operations_queue.index([:jge, where]) + 1)
+ end
+ end
+ end
+
+ class AssemblerSubset
+ def method_missing(method)
+ method
+ end
+
+ def initialize
+ @ax = 0
+ @bx = 0
+ @cx = 0
+ @dx = 0
+ @operations_queue = []
+ @cmp = 0
+ end
+
+ instructions = [:mov, :inc, :dec, :cmp, :label, :jmp, :je, :jne, :jl, :jle, :jg, :jge]
+
+ instructions.each do |instruction_name|
+ define_method instruction_name do |*args|
+ @operations_queue << [instruction_name, *args]
+ end
+ end
+
+ def execute_instructions(drop_index)
+ @operations_queue.drop(drop_index).each do |instruction|
+ if [:mov, :inc, :dec, :cmp].include? instruction[0]
+ send (instruction[0].to_s + "_instruction"), instruction[1], instruction[2]
+ elsif instruction[0] == :label
+ next
+ else
+ return send (instruction[0].to_s + "_instruction"), instruction[1]
+ end
+ end
+ [@ax, @bx, @cx, @dx]
+ end
+
+ private
+
+ include OperationInstructions
+ include JumpInstructions
+ end
+
+ def self.asm(&block)
+ task = AssemblerSubset.new
+ task.instance_eval &block
+ task.execute_instructions(0)
+ end
+end