nyle 0.5.2

data/samples/nyle_falling.rb

@@ -0,0 +1,298 @@
+
+require 'nyle'
+
+class Field
+  SKYLINE       = 400
+
+  def initialize
+    _init_score
+  end
+
+  private def _init_score
+    @score       = 0
+    @click_count = 0
+  end
+
+  def draw
+    Nyle.draw_rect( 0, 0,       640, SKYLINE, {color: :SKY_BLUE,     fill: true})
+    Nyle.draw_rect( 0, SKYLINE, 640, 480,     {color: :FOREST_GREEN, fill: true})
+    Nyle.draw_text(80, 400 + 24, "Your score #{@score} points   Click count #{@click_count} times", {color: :WHITE, size: 24})
+  end
+
+  def add_score(score, click_count)
+    @score       += score
+    @click_count += click_count
+  end
+
+  def game_clear?
+    @score >= 100
+  end
+
+  def init_score
+    _init_score
+  end
+end
+
+
+class Item
+  MOVING_RANGE_X = 640
+  MOVING_RANGE_Y = 480
+
+  attr_reader :x, :y
+
+  def initialize(filename, xrange, sx = 1.0, sy = 1.0)
+    @image = Nyle.load_image(filename, {sx: sx, sy: sy, color_key: :WHITE})
+    @xrange = xrange
+    @sx = sx
+    @sy = sy
+    reset
+  end
+
+  def reset
+    @x = rand(MOVING_RANGE_X)
+    @y = 0
+    @speed_x = (@xrange == 0 ? 0 : rand(@xrange) - (@xrange - 1) / 2)
+    @speed_y = rand(10) + 1
+  end
+
+  def drop
+    @x = @x + @speed_x
+    @y = @y + @speed_y
+    if @y > MOVING_RANGE_Y
+      reset
+    end
+  end
+
+  def centerx
+    return @x + @image.width / 2
+  end
+
+  def centery
+    return @y + @image.height / 2
+  end
+
+  def draw
+    Nyle.draw_image(@x, @y, @image)
+  end
+
+  def clicked?
+    clicked = false
+    if Nyle.mouse_press?(1)
+      diffx = Nyle.mouse_x - self.centerx
+      diffy = Nyle.mouse_y - self.centery
+      if (diffx > -20) and (diffx < 20) and (diffy > -20) and (diffy < 20)
+        clicked = true
+      end
+    end
+    return clicked
+  end
+
+end
+
+class Weapon < Item
+  def initialize
+    super("image/n_f_weapon.png", 7, 0.4, 0.4)
+  end
+end
+
+class Banana < Item
+  def initialize
+    super("image/n_f_banana.png", 0, 0.6, 0.6)
+  end
+
+  def get_score
+    return 10
+  end
+end
+
+class Strawberry < Item
+  def initialize
+    super("image/n_f_strawberry.png", 0, 0.6, 0.6)
+  end
+
+  def get_score
+    return 20
+  end
+end
+
+
+class Hero
+  MOVING_RANGE_X = 640
+
+  def initialize(x, y)
+    @image = Nyle.load_image("./image/n_f_panda.png", {sx: 0.3, sy: 0.3, color_key: :WHITE})
+    @x = x - @image.width / 2
+    @y = y - @image.height
+    @speed = 3.5
+  end
+
+  def move(dx, dy)
+    @x += (dx * @speed)
+    @x = 0 if @x <= 0
+    @x = MOVING_RANGE_X - @image.width if @x >= MOVING_RANGE_X - @image.width
+  end
+
+  def draw
+    Nyle.draw_image(@x, @y, @image) 
+  end
+
+  def hit?(item)
+    diffx = _centerx - item.centerx
+    diffy = _centery - item.centery
+    if (diffx > -20) and (diffx < 20) and (diffy > -20) and (diffy < 20)
+      return true
+    else
+      return false
+    end
+  end
+
+  private def _centerx
+    return @x + @image.width / 2
+  end
+
+  private def _centery
+    return @y + @image.height / 2
+  end
+end
+
+
+
+class Screen_GameOver < Nyle::Screen
+  def initialize
+    super(640, 480, {bgcolor: :BEIGE})
+  end
+  def draw
+    Nyle.draw_text( 60, 200, "Game over!  Thank you for playing.", {})
+
+    Nyle.draw_text(450, 420, "[SPC] to Retry", {size: 20})
+    Nyle.draw_text(450, 450, "[ESC] to Finish", {size: 20})
+
+    @status = :REPLAY if Nyle.key_press?(KEY_space)
+    Nyle.quit         if Nyle.key_press?(KEY_Escape)
+  end
+
+  def suspend
+  end
+
+  def resume
+    # Initialize status
+    @status = nil
+  end
+end
+
+class Screen_GameClear < Nyle::Screen
+  def initialize
+    super(640, 480)
+  end
+  def draw
+    Nyle.draw_text( 80, 200, "Congratulations!  You've won!", {color: :RED})
+    Nyle.draw_text(450, 450, "[ESC] to Finish", {size: 20})
+
+    Nyle.quit if Nyle.key_press?(KEY_Escape)
+  end
+end
+
+
+class Screen_Play < Nyle::Screen
+  NWEAPON     = 3
+  NBANANA     = 2
+  NSTRAWBERRY = 1
+
+  def initialize
+    super(640, 480)
+    setup
+  end
+
+  def setup
+    @field = Field.new
+    @hero = Hero.new(@width / 2, Field::SKYLINE)
+    @weapons      = []
+    @bananas      = []
+    @strawberries = []
+    NWEAPON.times     { @weapons      << Weapon.new     }
+    NBANANA.times     { @bananas      << Banana.new     }
+    NSTRAWBERRY.times { @strawberries << Strawberry.new }
+  end
+
+  def draw
+    @field.draw
+    @hero.draw
+    @weapons.each      { |weapon|      weapon.draw      }
+    @bananas.each      { |banana|      banana.draw      }
+    @strawberries.each { |strawberrie| strawberrie.draw }
+  end
+
+  def update
+    @weapons.each      { |weapon|      weapon.drop      }
+    @bananas.each      { |banana|      banana.drop      }
+    @strawberries.each { |strawberrie| strawberrie.drop }
+    _detect
+    @hero.move( 1, 0) if Nyle.key_down?(KEY_Right)
+    @hero.move(-1, 0) if Nyle.key_down?(KEY_Left)
+    Nyle.quit if Nyle.key_press?(KEY_Escape)
+  end
+
+  private def _detect
+    (@weapons + @bananas + @strawberries).each do |item|
+      # detect collision about hero and item
+      if @hero.hit?(item)
+        if item.instance_of?(Weapon)        # weapon
+          @status = :GAMEOVER
+        else                                # fruit
+          @field.add_score(item.get_score, 0)
+          @status = :GAMECLEAR if @field.game_clear?
+          item.reset
+        end
+      end
+      # detect click on item
+      if item.clicked?
+        if item.instance_of?(Weapon)        # weapon
+          @status = :GAMEOVER
+        else                                # fruit
+          @field.add_score(item.get_score, 1)
+          @status = :GAMECLEAR if @field.game_clear?
+          item.reset
+         end
+      end
+    end
+  end
+
+  def suspend
+  end
+
+  def resume
+    # Initialize status
+    @status = nil
+
+    # Initialize positon of items
+    @weapons.each      { |weapon|      weapon.reset      }
+    @bananas.each      { |banana|      banana.reset      }
+    @strawberries.each { |strawberrie| strawberrie.reset }
+
+    # Initialize score
+    @field.init_score
+  end
+
+end
+
+
+class Frame < Nyle::Frame
+  def initialize
+    super(640, 480)
+
+    @screen_play      = Screen_Play.new
+    @screen_gameover  = Screen_GameOver.new
+    @screen_gameclear = Screen_GameClear.new
+    self.set_current(@screen_play)
+
+    # Transition table
+    @transition << {current: @screen_play,     status: :GAMEOVER,  next: @screen_gameover}
+    @transition << {current: @screen_play,     status: :GAMECLEAR, next: @screen_gameclear}
+    @transition << {current: @screen_gameover, status: :REPLAY,    next: @screen_play}
+  end
+end
+
+
+Frame.new.show_all
+Gtk.main
+

data/samples/nyle_rpg.rb

@@ -0,0 +1,98 @@
+
+require 'nyle'
+
+class Character
+  def initialize(x, y, tiles)
+    @x     = x
+    @y     = y
+    @tiles = tiles
+    @tx    = 0       # initial index of @tiles for x
+    @ty    = 0       # initial index of @tiles for y
+  end
+
+  def draw
+    Nyle.draw_image(@x, @y, @tiles[@tx][@ty])
+  end
+
+  def move(dx, dy)
+    @ty = 0 if dy > 0    # index of @tiles for down
+    @ty = 1 if dx < 0    # index of @tiles for left
+    @ty = 2 if dx > 0    # index of @tiles for right
+    @ty = 3 if dy < 0    # index of @tiles for up
+
+    @tx += 1             # animation to walk
+    @tx  = 0 if @tx > 2  # range = (0..2)
+
+    @x += dx             # drawing position(x)
+    @y += dy             # drawing position(y)
+
+    @x = -@tiles[0][0].width   if @x >  Nyle.screen_width     # right end
+    @x =  Nyle.screen_width    if @x < -@tiles[0][0].width    # left end
+    @y = -@tiles[0][0].height  if @y >  Nyle.screen_height    # lower end
+    @y =  Nyle.screen_height   if @y < -@tiles[0][0].height   # upper end
+  end
+end
+
+class Screen < Nyle::Screen
+  def initialize
+    super(510, 390)
+    @image            = Nyle.load_image("./image/n_i_bg.jpg", {sx: 0.5, sy: 0.5})
+    @image_half_right = Nyle.load_image("./image/n_i_bg.jpg", {sx: 0.5, sy: 0.5, cx: 320, cy:   0, cw: 320, ch: 480})
+    @image_half_low   = Nyle.load_image("./image/n_i_bg.jpg", {sx: 0.5, sy: 0.5, cx:   0, cy: 240, cw: 640, ch: 240})
+    @image_quarter    = Nyle.load_image("./image/n_i_bg.jpg", {sx: 0.5, sy: 0.5, cx: 320, cy: 240, cw: 320, ch: 240})
+
+    @tiles01      = Nyle.load_image_tiles("./image/n_i_chara.png", 1, 1)   # itself
+    @tiles03      = Nyle.load_image_tiles("./image/n_i_chara.png", 3, 1)   # divide into  3 pieces horizontally
+    @tiles04      = Nyle.load_image_tiles("./image/n_i_chara.png", 1, 4)   # divide into  4 pieces vertically
+    @tiles12      = Nyle.load_image_tiles("./image/n_i_chara.png", 3, 4)   # divide into 12 pieces vertically and horizontally
+
+    @tiles_player = Nyle.load_image_tiles("./image/n_i_chara.png", 3, 4, {sx: 1.25, sy: 1.25})   # divide into 12 pieces and enlarge
+    @character = Character.new(140, 150, @tiles_player)
+  end
+
+  def draw
+    Nyle.draw_image( 10,  10, @image)
+    Nyle.draw_image(340,  10, @image_half_right)
+    Nyle.draw_image( 10, 260, @image_half_low)
+    Nyle.draw_image(340, 260, @image_quarter)
+
+    for i in (0...1)
+      for j in (0...1)
+        Nyle.draw_image( 10 + i * 50,  10, @tiles01[i][j])
+      end
+    end
+
+    for i in (0...3)
+      for j in (0...1)
+        Nyle.draw_image(200 + i * 50,  10, @tiles03[i][j])
+      end
+    end
+
+    for i in (0...1)
+      for j in (0...4)
+        Nyle.draw_image( 10, 200 + j * 50, @tiles04[i][j])
+      end
+    end
+
+    for i in (0...3)
+      for j in (0...4)
+        Nyle.draw_image(200 + i * 50, 200 + j * 50, @tiles12[i][j])
+      end
+    end
+
+    @character.draw
+
+    Nyle.quit if Nyle.key_press?(KEY_Escape)
+  end
+
+  def update
+    dx = (Nyle.key_down?(KEY_Right) ? 1 : (Nyle.key_down?(KEY_Left) ? -1 : 0))
+    dy = (Nyle.key_down?(KEY_Down)  ? 1 : (Nyle.key_down?(KEY_Up)   ? -1 : 0))
+    @character.move(dx, dy)
+  end
+end
+
+
+Screen.new.show_all
+Gtk.main
+

data/samples/nyle_shape.rb

@@ -0,0 +1,70 @@
+
+require 'nyle'
+
+module Points
+  def star(x, y)
+    [
+     [x,      y - 50],
+     [x + 14, y - 20],
+     [x + 47, y - 15],
+     [x + 23, y +  7],
+     [x + 29, y + 40],
+     [x,      y + 25],
+     [x - 29, y + 40],
+     [x - 23, y +  7],
+     [x - 47, y - 15],
+     [x - 14, y - 20]
+    ]
+  end
+
+  def para_star(x, y)
+    rl, rm, rs = 70, 50, 30       # radius(large, middle, small)
+    count = 10
+    angle = 360.0 / (count * 4)   # central angle of each vertex
+    deg = Math::PI / 180.0
+
+    points = []
+    for i in 1..count
+      points << [x + rs * Math.cos((i * 4 - 3) * angle * deg), y + rs * Math.sin((i * 4 - 3) * angle * deg)]
+      points << [x + rm * Math.cos((i * 4 - 2) * angle * deg), y + rm * Math.sin((i * 4 - 2) * angle * deg)]
+      points << [x + rs * Math.cos((i * 4 - 1) * angle * deg), y + rs * Math.sin((i * 4 - 1) * angle * deg)]
+      points << [x + rl * Math.cos((i * 4 - 0) * angle * deg), y + rl * Math.sin((i * 4 - 0) * angle * deg)]
+    end
+    points
+  end
+
+  def wave(x, y)
+    points = []
+    for deg in 0..(360 * 5)
+      th = -deg * (Math::PI / 180)
+      points << [deg / 5 + x, Math.sin(th) * 20 + y]
+    end
+    points
+  end
+end
+
+
+class Screen < Nyle::Screen
+  include Points
+  def initialize
+    super
+  end
+  def draw
+     Nyle.draw_shape(star(120, 100), {color: :GOLD,         weight: 5, close: true})
+     Nyle.draw_shape(star(280, 100), {color: :GOLD,         weight: 5, close: true, fill: true})
+     Nyle.draw_shape(star(440, 100), {color: :GOLD, a: 0.5, weight: 5, close: true, fill: true})
+
+     Nyle.draw_shape(para_star(120, 240), {color: :BROWN,         weight: 3, close: true})
+     Nyle.draw_shape(para_star(280, 240), {color: :BROWN,         weight: 3, close: true, fill: true})
+     Nyle.draw_shape(para_star(440, 240), {color: :BROWN, a: 0.8, weight: 3, close: true, fill: true})
+
+     Nyle.draw_shape(wave(100, 360), {color: :SKY_BLUE, weight: 5, cap: :ROUND})
+     Nyle.draw_shape(wave(100, 410), {color: :SKY_BLUE, weight: 5, cap: :ROUND, fill: true})
+
+    Nyle.quit if Nyle.key_press?(KEY_Escape)
+  end
+end
+
+Screen.new.show_all
+Gtk.main
+

data/samples/nyle_sketch.rb

@@ -0,0 +1,45 @@
+
+require 'nyle'
+
+class Screen < Nyle::Screen
+
+  def initialize
+    super(600, 400, {trace: true})
+    @color = :BLUE
+  end
+
+  def draw
+    #printf "(%3d , %3d)   down:%6s   press:%6s   release:%6s\n",
+    #         Nyle.mouse_x,
+    #         Nyle.mouse_y,
+    #         Nyle.mouse_down[1],
+    #         Nyle.mouse_press[1],
+    #         Nyle.mouse_release[1]
+
+    Nyle.draw_circle(Nyle.mouse_x, Nyle.mouse_y, 10, {color: @color, fill: true}) if Nyle.mouse_down?(1)   # draw  (left-click)
+    Nyle.draw_circle(Nyle.mouse_x, Nyle.mouse_y, 10, {color: :WHITE, fill: true}) if Nyle.mouse_down?(3)   # erase (right-click)
+
+    Nyle.draw_text( 10,  20, "[mouse left ]  draw",       {size: 16})
+    Nyle.draw_text( 10,  40, "[mouse right]  erase",      {size: 16})
+    Nyle.draw_text( 10,  70, "[space]  save",             {size: 16})
+    Nyle.draw_text( 10, 380, "[r]",                       {size: 28, color: :RED          })
+    Nyle.draw_text( 50, 380, "[g]",                       {size: 28, color: :FOREST_GREEN })
+    Nyle.draw_text( 90, 380, "[b]",                       {size: 28, color: :BLUE         })
+    Nyle.draw_text(140, 380, "press key to change color", {size: 18})
+  end
+
+  def update
+    @color = :RED          if Nyle.key_press?(KEY_r)
+    @color = :FOREST_GREEN if Nyle.key_press?(KEY_g)
+    @color = :BLUE         if Nyle.key_press?(KEY_b)
+
+    Nyle.save_image("./sketch.png") if Nyle.key_press?(KEY_space)
+
+    Nyle.quit if Nyle.key_press?(KEY_Escape)
+  end
+
+end
+
+Screen.new.show_all
+Gtk.main
+

data/samples/nyle_tree.rb

@@ -0,0 +1,48 @@
+
+require 'nyle'
+
+class Screen < Nyle::Screen
+  def initialize
+    super(300, 200)
+     setup
+  end
+
+  def setup
+    @theta = nil                                  # rotation angle
+  end
+
+  def draw
+    @theta = _map(Nyle.mouse_x, 0, @width, 0, Math::PI/2)
+    Nyle.translate(@width / 2, @height);
+    _branch(60)
+
+    Nyle.quit if Nyle.key_press?(KEY_Escape)
+  end
+
+  private def _map(v, s1, e1, s2, e2)
+    v = v.to_f if v.integer?                      # Convert integer into float
+    (v - s1) / (e1 - s1) * (e2 - s2) + s2         # Adjust v in between s1 and e1 to between s2 and e2
+  end
+
+  private def _branch(len)
+    sw = _map(len, 2, 120, 1, 10)                 # adjust weight as length of branch
+    Nyle.draw_line(0, 0, 0, -len, {weight: sw})   # draw branch
+    Nyle.translate(0, -len)                       # move origin
+    len *= 0.66                                   # adjust length (two-thirds)
+    if len > 2
+      Nyle.cr.save do
+        Nyle.rotate(@theta)                       # rotate
+        _branch(len)
+      end
+      Nyle.cr.save do
+        Nyle.rotate(-@theta)                      # rotate
+        _branch(len)
+      end
+    end
+  end
+end
+
+
+Screen.new.show_all
+Gtk.main
+

data/samples/nyle_walk_notrace.rb

@@ -0,0 +1,54 @@
+
+require 'nyle'
+
+class Walker
+  RADIUS = 3
+  def initialize(max_x, max_y)
+    @max_x = max_x
+    @max_y = max_y
+    @x = max_x / 2.0
+    @y = max_y / 2.0
+    @step = 5
+  end
+
+  # Randomly move up, down, left, right
+  def move
+    stepx = rand(3) - 1
+    stepy = rand(3) - 1
+    @x += stepx * @step
+    @y += stepy * @step
+
+    # x,y limitter
+    @x = 0      if @x < 0
+    @x = @max_x if @x > @max_x
+    @y = 0      if @y < 0
+    @y = @max_y if @y > @max_y
+  end
+
+  def draw
+    Nyle.draw_circle(@x, @y, RADIUS, {color: :RED, fill: true})
+  end
+end
+
+
+class Screen < Nyle::Screen
+
+  def initialize
+    super(64 * 5, 48 * 5, {bgcolor: :IVORY})
+    @walker = Walker.new(@width, @height)
+  end
+
+  def draw
+    @walker.draw
+  end
+
+  def update
+    @walker.move
+    Nyle.quit if Nyle.key_press?(KEY_Escape)
+  end
+
+end
+
+Screen.new.show_all
+Gtk.main
+

data/samples/nyle_walk_trace.rb

@@ -0,0 +1,54 @@
+
+require 'nyle'
+
+class Walker
+  RADIUS = 3
+  def initialize(max_x, max_y)
+    @max_x = max_x
+    @max_y = max_y
+    @x = max_x / 2.0
+    @y = max_y / 2.0
+    @step = 5
+  end
+
+  # Randomly move up, down, left, right
+  def move
+    stepx = rand(3) - 1
+    stepy = rand(3) - 1
+    @x += stepx * @step
+    @y += stepy * @step
+
+    # x,y limitter
+    @x = 0      if @x < 0
+    @x = @max_x if @x > @max_x
+    @y = 0      if @y < 0
+    @y = @max_y if @y > @max_y
+  end
+
+  def draw
+    Nyle.draw_circle(@x, @y, RADIUS, {color: :RED, fill: true})
+  end
+end
+
+
+class Screen < Nyle::Screen
+
+  def initialize
+    super(64 * 5, 48 * 5, {bgcolor: :IVORY, trace: true})
+    @walker = Walker.new(@width, @height)
+  end
+
+  def draw
+    @walker.draw
+  end
+
+  def update
+    @walker.move
+    Nyle.quit if Nyle.key_press?(KEY_Escape)
+  end
+
+end
+
+Screen.new.show_all
+Gtk.main
+

data/samples/readme_samples.txt

@@ -0,0 +1,29 @@
+
+[samples]
+
+ nyle_basics.rb                   ... basics
+ nyle_basics2.rb                  ... basics (in case of using 'include' statement to ommit 'Nyle.' modifier)
+ nyle_block.rb                    ... breakout
+ nyle_colors.rb                   ... color list
+ nyle_falling.rb                  ... falling game
+ nyle_rpg.rb                      ... roll playing game like
+ nyle_shape.rb                    ... shapes
+ nyle_sketch.rb                   ... sketch tool
+ nyle_tree.rb                     ... fractal tree
+ nyle_walk_notrace.rb             ... random walk (no trace)
+ nyle_walk_trace.rb               ... random walk (trace)
+
+
+[image files]
+
+ image/n_b_crocodile.png          ... crocodile (image for nyle_basics.rb)
+ image/n_b_river.gif              ... river     (image for nyle_basics.rb)
+
+ image/n_f_banana.png             ... banana    (image for nyle_falling.rb)
+ image/n_f_panda.png              ... panda     (image for nyle_falling.rb)
+ image/n_f_strawberry.png         ... strawberry(image for nyle_falling.rb)
+ image/n_f_weapon.png             ... weapon    (image for nyle_falling.rb))
+
+ image/n_i_bg.png                 ... background(image for nyle_rgb.rb)
+ image/n_i_chara.png              ... character (image for nyle_rgb.rb)
+