kaki-lifegame 0.0.1

checksums.yaml

@@ -0,0 +1,7 @@
+---
+SHA1:
+  metadata.gz: d8b005dd3f21e84190a592064607d3c57d7d1b77
+  data.tar.gz: cfe64c5f8f91ad79834da2fc3499ed7c32144e0b
+SHA512:
+  metadata.gz: ad313461534ff9031a7d55804bd180d2f9a5aa33fd7fea769f63bd7ac47f87ea4f3480364d577e73ebec52cb7483b8bd2daf5a89f39b0a603466b544ac7bb845
+  data.tar.gz: 1a6e554edd145762b260af06c8cbf15d6182d90888f6f0e109204ed040de35bb2398b979a43dcdd3b7475dcfa7148108be9b48490dc17184c712f2cc4a134404

data/README.md

@@ -0,0 +1,40 @@
+## 概要
+
+いわゆる「コンウェイのライフゲーム」です。GTK2を使ったフィールド・エディタが付いています。
+
+## 実行
+
+以下のコマンドでエディタが立ち上がります。
+
+```
+$ kaki-lifegame
+```
+
+## 機能
+
+- 開始
+    - 実行します。
+- 停止
+    - 停止します。以下の機能はすべて停止中にのみ有効です。
+- 1ステップ進める
+    - ステップ実行です。
+- ばらまく
+    - 適当にセルを散布します。
+- 格子
+    - 格子の表示を切り替えます。
+- 緑色/橙色
+    - セルの色です。
+- 全クリア
+    - すべてのセルを消します。
+- 一時保存
+    - 一時的にフィールドを内部に保存します。
+- 復帰
+    - 内部に保存したデータをフィールドに戻します。
+- ファイルに保存
+    - フィールドをファイルに保存します。
+- ファイルの読み込み
+    - ファイルに保存したフィールドのデータを読み込んで表示します。
+- 終了
+    - 終了します。
+
+

data/bin/kaki-lifegame

@@ -0,0 +1,4 @@
+#!/usr/bin/env ruby
+require 'kaki-lifegame'
+
+LifeGame.start

data/lib/kaki-lifegame.rb

@@ -0,0 +1,434 @@
+require 'gtk2'
+
+module LifeGame
+  class Field
+    Width, Height = 85, 60
+    MG = 4
+    
+    def initialize
+      clear
+      @step = @stored_step = 0
+      @reserved = copy
+    end
+    attr_reader :step
+    
+    def set_cell(x, y)
+      @field[y + MG][x + MG] = 1
+    end
+    
+    def reset_cell(x, y)
+      @field[y + MG][x + MG] = 0
+    end
+    
+    def get_cell(x, y)
+      @field[y + MG][x + MG]
+    end
+    
+    def next
+      @before = copy
+      nxf = new_field
+      each_cell do |x, y|
+        n = alive_cells(x, y)
+        if get_cell(x, y).zero?
+          nxf[y + MG][x + MG] = 1 if n == 3
+        else
+          nxf[y + MG][x + MG] = 1 if n == 2 or n == 3
+        end
+      end
+      @field = nxf
+    end
+    
+    def alive_cells(x, y)
+      get_cell(x - 1, y - 1) + get_cell(x, y - 1) + get_cell(x + 1, y - 1) +
+        get_cell(x - 1, y) + get_cell(x + 1, y) +
+        get_cell(x - 1, y + 1) + get_cell(x, y + 1) + get_cell(x + 1, y + 1)
+    end
+    
+    def each_cell
+      (Height + (MG - 1) * 2).times do |y|
+        (Width + (MG - 1) * 2).times {|x| yield(x - MG + 1, y - MG + 1)}
+      end
+    end
+    
+    def new_field
+      Array.new(Height + MG * 2) {Array.new(Width + MG * 2, 0)}
+    end
+    
+    def copy
+      copied = new_field
+      each_cell do |x, y|
+        copied[y + MG][x + MG] = get_cell(x, y)
+      end
+      copied
+    end
+    
+    def renewal?(x, y)
+      @before[y + MG][x + MG] != get_cell(x, y)
+    end
+    
+    def preserve
+      @reserved = copy
+      @stored_step = @step
+    end
+    
+    def restore
+      @field = @reserved
+      @step = @stored_step
+    end
+    
+    def clear
+      @field = Array.new(Height + MG * 2) {Array.new(Width + MG * 2, 0)}
+    end
+    
+    def load(file_name)
+      @field = []
+      open(file_name, "r") do |io|
+        @step = io.gets.chomp.scan(/\d+/)[0].to_i
+        io.each_line do |line|
+          @field << line.chomp.split(",").map(&:to_i)
+        end
+      end
+    end
+    
+    def save(file_name)
+      open(file_name, "w") do |io|
+        io.puts "Step : #{@step}"
+        @field.each {|x| io.puts x.map(&:to_s).join(",")}
+      end
+    end
+    
+    def count
+      @step += 1
+    end
+    
+    def step_reset
+      @step = 0
+    end
+  end
+  
+  class FieldArea < Gtk::DrawingArea
+    CellSize = 11
+    Space = 1
+    
+    L = CellSize + Space * 2
+    AreaW, AreaH = Field::Width * L, Field::Height * L
+    
+    def initialize(field)
+      super()
+      set_size_request(AreaW, AreaH)
+      
+      @f = field
+      
+      @colormap = Gdk::Colormap.system
+      @color = {black: Gdk::Color.new(0, 0, 0), green: Gdk::Color.new(0xc784, 0xffff, 0x52c4),
+                orange: Gdk::Color.new(0xffff, 0xbb85, 0xf7a),
+                grid_color: Gdk::Color.new(0x4b79, 0x4b79, 0x4b79)}
+      @color.each {|_, v| @colormap.alloc_color(v, false, true)}
+      @cell_color = :green
+      
+      @grid = false
+      
+      signal_connect("expose_event") do
+        @gc = Gdk::GC.new(window)
+        set_color(:black)
+        window.draw_rectangle(@gc, true, 0, 0, AreaW, AreaH)
+      end
+      
+      @time_goes = false
+      add_events(Gdk::Event::BUTTON_PRESS_MASK | Gdk::Event::BUTTON_MOTION_MASK)
+      
+      signal_connect("button_press_event") do |w, e|
+        unless @time_goes
+          x, y = e.x.to_i / L, e.y.to_i / L
+          c = @f.get_cell(x, y)
+          c.zero? ? set_cell(x, y) : reset_cell(x, y)
+        end
+      end
+      
+      signal_connect('motion_notify_event') do |w, e|
+        unless @time_goes
+          x, y = e.x.to_i / L, e.y.to_i / L
+          set_cell(x, y)   if e.state.button1_mask?
+          reset_cell(x, y) if e.state.button3_mask?
+        end
+      end
+      
+      Gtk.timeout_add(500) do
+        go_on_one_step if @time_goes
+        true
+      end
+    end
+    attr_writer :time_goes, :label
+    
+    def set_color(color_name)
+      @gc.rgb_fg_color = @color[color_name]
+    end
+    
+    def set_cell(x, y)
+      set_color(@cell_color)
+      @f.set_cell(x, y)
+      window.draw_rectangle(@gc, true, L * x + Space, L * y + Space, CellSize, CellSize)
+    end
+    
+    def reset_cell(x, y)
+      set_color(:black)
+      @f.reset_cell(x, y)
+      window.draw_rectangle(@gc, true, L * x + Space, L * y + Space, CellSize, CellSize)
+    end
+    
+    def go_on_one_step
+      @f.next
+      
+      each_cell do |x, y|
+        renewal_one_place(x, y) if @f.renewal?(x, y)
+      end
+      
+      @f.count
+      show_step
+    end
+    
+    def renewal_one_place(x, y)
+      @f.get_cell(x, y).zero? ? reset_cell(x, y) : set_cell(x, y)
+    end
+    
+    def preserve
+      @f.preserve
+    end
+    
+    def restore
+      @f.restore
+      redraw
+      show_step
+    end
+    
+    def show_step
+      @label.set_text("Step : #{@f.step}")
+    end
+    
+    def redraw
+      each_cell {|x, y| renewal_one_place(x, y)}
+    end
+    
+    def each_cell
+      Field::Height.times do |y|
+        Field::Width.times {|x| yield(x, y)}
+      end
+    end
+    
+    def clear
+      @f.clear
+      redraw
+      @f.step_reset
+      show_step
+    end
+    
+    def scatter
+      100.times do
+        x, y = rand(Field::Width), rand(Field::Height)
+        set_cell(x, y) if @f.get_cell(x, y).zero?
+      end
+    end
+    
+    def save_file(file_name)
+      @f.save(file_name)
+    end
+    
+    def load_file(file_name)
+      @f.load(file_name)
+      redraw
+      show_step
+    end
+    
+    def grid
+      @grid = !@grid
+      set_color(@grid ? :grid_color : :black)
+      window.draw_rectangle(@gc, true, 0, 0, AreaW, AreaH)
+      redraw
+    end
+    
+    def set_cell_color(color)
+      @cell_color = color
+      redraw
+    end
+  end
+  
+  class SideBar < Gtk::VBox
+    def initialize(field_area)
+      super()
+      set_size_request(130, FieldArea::AreaH)
+      @farea = field_area
+      @edit_mode = true
+      
+      set_box1
+      set_box2
+      set_box3
+      set_box4
+      set_box5
+    end
+    
+    def set_box1
+      start_bt   = Gtk::Button.new("開始")
+      stop_bt    = Gtk::Button.new("停止")
+      step_bt    = Gtk::Button.new("１ステップ進める")
+      
+      start_bt.signal_connect("clicked") do
+        @edit_mode = false
+        @farea.time_goes = true
+      end
+      
+      stop_bt.signal_connect("clicked") do
+        @edit_mode = true
+        @farea.time_goes = false
+      end
+      
+      step_bt.signal_connect("clicked") do
+        @farea.go_on_one_step if @edit_mode
+      end
+      
+      l = Gtk::Label.new("")
+      @farea.label = l
+      
+      box = Gtk::VBox.new
+      pack_start(box, false, false, 0)
+      box.pack_start(start_bt, false, false, 5)
+      box.pack_start(stop_bt , false, false, 5)
+      box.pack_start(step_bt , false, false, 5)
+      box.pack_start(l, false, false, 5)
+      box.pack_start(Gtk::HSeparator.new, false, false, 10)
+    end
+    
+    def set_box2
+      scatter_bt = Gtk::Button.new("ばらまく")
+      grid_bt    = Gtk::Button.new("格子")
+      green_bt   = Gtk::Button.new("緑色")
+      orange_bt  = Gtk::Button.new("橙色")
+      clear_bt   = Gtk::Button.new("全クリア")
+      
+      scatter_bt.signal_connect("clicked") do
+        @farea.scatter if @edit_mode
+      end
+      
+      grid_bt.signal_connect("clicked") do
+        @farea.grid if @edit_mode
+      end
+      
+      green_bt.signal_connect("clicked") do
+        @farea.set_cell_color(:green) if @edit_mode
+      end
+      
+      orange_bt.signal_connect("clicked") do
+        @farea.set_cell_color(:orange) if @edit_mode
+      end
+      
+      clear_bt.signal_connect("clicked") do
+        @farea.clear if @edit_mode
+      end
+      
+      small_box = Gtk::HBox.new
+      small_box.pack_start(green_bt , true, true, 1)
+      small_box.pack_start(orange_bt, true, true, 1)
+      
+      box = Gtk::VBox.new
+      pack_start(box, false, false, 0)
+      box.pack_start(scatter_bt, false, false, 5)
+      box.pack_start(grid_bt   , false, false, 5)
+      box.pack_start(small_box , false, false, 5)
+      box.pack_start(clear_bt  , false, false, 5)
+      box.pack_start(Gtk::HSeparator.new, false, false, 10)
+    end
+    
+    def set_box3
+      preserve_bt = Gtk::Button.new("一時保存")
+      restore_bt  = Gtk::Button.new("復帰")
+      
+      preserve_bt.signal_connect("clicked") do
+        @farea.preserve if @edit_mode
+      end
+      
+      restore_bt.signal_connect("clicked") do
+        @farea.restore if @edit_mode
+      end
+      
+      box = Gtk::VBox.new
+      pack_start(box, false, false, 0)
+      box.pack_start(preserve_bt, false, false, 5)
+      box.pack_start(restore_bt, false, false, 5)
+      box.pack_start(Gtk::HSeparator.new, false, false, 10)
+    end
+    
+    def set_box4
+      save_bt = Gtk::Button.new("ファイルに保存")
+      load_bt = Gtk::Button.new("ファイルの読み込み")
+      
+      save_bt.signal_connect("clicked") do
+        if @edit_mode
+          file_name = select_file("Save File", Gtk::FileChooser::ACTION_SAVE)
+          @farea.save_file(file_name) if file_name
+        end
+      end
+      
+      load_bt.signal_connect("clicked") do
+        if @edit_mode
+          file_name = select_file("Load File", Gtk::FileChooser::ACTION_OPEN)
+          @farea.load_file(file_name) if file_name
+        end
+      end
+      
+      box = Gtk::VBox.new
+      pack_start(box, false, false, 0)
+      box.pack_start(save_bt, false, false, 5)
+      box.pack_start(load_bt, false, false, 5)
+      box.pack_start(Gtk::HSeparator.new, false, false, 10)
+    end
+    
+    def set_box5
+      close_bt = Gtk::Button.new("終了")
+      
+      close_bt.signal_connect("clicked") do
+        Gtk.main_quit if @edit_mode
+      end
+      
+      box = Gtk::VBox.new
+      pack_start(box, false, false, 0)
+      box.pack_start(close_bt, false, false, 5)
+    end
+    
+    def select_file(title, mode)
+      file_name = nil
+      dialog = Gtk::FileChooserDialog.new(title,
+        nil, mode, nil,
+        [Gtk::Stock::CANCEL, Gtk::Dialog::RESPONSE_CANCEL],
+        [Gtk::Stock::OPEN, Gtk::Dialog::RESPONSE_ACCEPT])
+      if dialog.run == Gtk::Dialog::RESPONSE_ACCEPT
+        file_name = dialog.filename
+      end
+      dialog.destroy
+      file_name
+    end
+  end
+  
+  class MainWindow < Gtk::Window
+    def initialize
+      super("Life Game")
+      set_resizable(false)
+      
+      field = Field.new
+      field_area = FieldArea.new(field)
+      side_bar = SideBar.new(field_area)
+      
+      box = Gtk::HBox.new
+      add(box)
+      box.pack_start(field_area, true, true, 0)
+      box.pack_start(side_bar  , true, true, 0)
+      
+      signal_connect("destroy") {Gtk.main_quit}
+      show_all
+    end
+  end
+  
+  def self.start
+    MainWindow.new
+    Gtk.main
+  end
+end
+

metadata

@@ -0,0 +1,61 @@
+--- !ruby/object:Gem::Specification
+name: kaki-lifegame
+version: !ruby/object:Gem::Version
+  version: 0.0.1
+platform: ruby
+authors:
+- obelisk
+autorequire: 
+bindir: bin
+cert_chain: []
+date: 2018-04-09 00:00:00.000000000 Z
+dependencies:
+- !ruby/object:Gem::Dependency
+  name: gtk2
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - ">="
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :runtime
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - ">="
+      - !ruby/object:Gem::Version
+        version: '0'
+description: Conway's Game of Life with GTK+ Field Editor
+email: obelisk_1968@mail.goo.ne.jp
+executables:
+- kaki-lifegame
+extensions: []
+extra_rdoc_files: []
+files:
+- README.md
+- bin/kaki-lifegame
+- lib/kaki-lifegame.rb
+homepage: 
+licenses:
+- MIT
+metadata: {}
+post_install_message: 
+rdoc_options: []
+require_paths:
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement
+  requirements:
+  - - ">="
+    - !ruby/object:Gem::Version
+      version: '0'
+required_rubygems_version: !ruby/object:Gem::Requirement
+  requirements:
+  - - ">="
+    - !ruby/object:Gem::Version
+      version: '0'
+requirements: []
+rubyforge_project: 
+rubygems_version: 2.5.2
+signing_key: 
+specification_version: 4
+summary: Conway's Game of Life
+test_files: []