stylet 0.0.1

data/examples/00980_observer_/343/201/235/343/201/2562_/346/231/256/351/200/232/343/201/253Singleton/347/211/210.rb

@@ -0,0 +1,30 @@
+# Stylet::Base 側のループで描画されるのではなくPlayer側のタイミングで描画する
+require_relative "helper"
+
+class Player
+  include Observable
+  def render
+    changed
+    notify_observers(self)
+  end
+end
+
+class Window
+  def initialize(player)
+    Stylet::Base.active_frame.run_initializers
+    player.add_observer(self)
+  end
+
+  def update(player)            # Stylet::Base を継承してないのでデフォルトの update で受けられる
+    Stylet::Base.active_frame.instance_eval do
+      next_frame
+      vputs player
+    end
+  end
+end
+
+player = Player.new
+Window.new(player)
+loop do
+  player.render
+end

data/examples/00990_observer_/343/201/235/343/201/2563_SimpleDelegator/347/211/210.rb

@@ -0,0 +1,28 @@
+# Stylet::Base 側のループで描画されるのではなくPlayer側のタイミングで描画する
+require_relative "helper"
+
+class Player
+  include Observable
+  def render
+    changed
+    notify_observers(self)
+  end
+end
+
+class Window < SimpleDelegator
+  def initialize(player)
+    super(Stylet::Base.active_frame)
+    player.add_observer(self)
+  end
+
+  def update(player)          # observer として呼ばれる update
+    next_frame                # Stylet::Base#update を呼ぶ。干渉しない。
+    vputs player
+  end
+end
+
+player = Player.new
+Window.new(player)
+loop do
+  player.render
+end

data/examples/01000_observer_/343/201/235/343/201/2564_/351/200/206/343/201/253/343/203/253/343/203/274/343/203/227/344/270/273/345/260/216.rb

@@ -0,0 +1,28 @@
+# Stylet::Base 側のループで描画されるのではなくPlayer側のタイミングで描画するとみせかけて、やっぱり Stylet::Base 側のループで描画する
+require_relative "helper"
+
+class Player
+  include Observable
+  def render
+    changed
+    notify_observers(self)
+  end
+end
+
+class Window < SimpleDelegator
+  def initialize(player)
+    super(Stylet::Base.active_frame)
+    player.add_observer(self)
+  end
+
+  def update(player)
+    next_frame
+    vputs player
+  end
+end
+
+player = Player.new
+Window.new(player)
+(60 * 3).times do
+  player.render
+end

data/examples/01010_observer_/343/201/235/343/201/2565_/343/201/204/343/202/215/343/202/223/343/201/252/346/211/200/343/201/213/343/202/211/345/221/274/343/202/223/343/201/247/343/201/204/343/202/213/343/201/221/343/201/251Singleton/343/201/252/343/201/256/343/201/247/345/256/211/345/205/250.rb

@@ -0,0 +1,37 @@
+require_relative "helper"
+
+class Player
+  include Observable
+  def render
+    changed
+    notify_observers(self)
+  end
+end
+
+class Window < SimpleDelegator
+  def initialize(player)
+    super(Stylet::Base.active_frame)
+    player.add_observer(self)
+  end
+
+  def update(player)
+    next_frame
+    vputs [frame_counter, player.object_id, self.class.name]
+  end
+end
+
+player = Player.new
+Window.new(player)
+
+60.times { player.render }      # observer形式で60回呼ぶ
+
+# 【重要】 Stylet::Base.run の場合は singleton のインスタンスを汚さないので何度呼んでもいいが、
+# Stylet::Base を継承して作ったクラスで update コールバックを使う場合はグローバルなインスタンスに結びついてしまうため
+# 他のところで実行されたオブザーバーが update コールバックもいっしょに呼んでしまう。
+
+Stylet::Base.run do             # これを実行し始めたときにはすでに frame_counter は 60 になっている
+  if frame_counter == 120               # ので 60 フレームたったときにここにくる
+    60.times { player.render }  # さらにループの中で observer 形式で呼び出しても Singleton なので安全
+  end
+  vputs [frame_counter, player.object_id, self.class.name]
+end

data/examples/01020_observer_/343/201/235/343/201/2566_/343/201/204/343/202/215/343/202/223/343/201/252/346/211/200/343/201/213/343/202/211/345/221/274/343/201/266/345/240/264/345/220/210callbacks/343/202/222/344/275/277/343/202/217/343/201/252/343/201/204/343/202/210/343/201/206/343/201/253.rb

@@ -0,0 +1,30 @@
+require_relative "helper"
+
+class W1 < SimpleDelegator
+  def initialize
+    super(Stylet::Base.active_frame)
+  end
+
+  def update
+    next_frame
+    vputs self.class.name
+  end
+end
+
+class W2 < SimpleDelegator
+  def initialize
+    super(Stylet::Base.active_frame)
+  end
+
+  def update
+    next_frame
+    vputs self.class.name
+  end
+end
+
+w1 = W1.new
+w2 = W2.new
+
+30.times { w1.update }
+30.times { w2.update }
+30.times { w1.update }

data/examples/01030_observer_/343/201/235/343/201/2567_/343/202/250/343/203/225/343/202/247/343/202/257/343/203/210/343/202/277/343/202/271/343/202/257/343/202/222/345/233/236/343/201/231/344/276/213.rb

@@ -0,0 +1,57 @@
+require_relative "helper"
+
+class MyApp < Stylet::Base
+  attr_accessor :tasks
+  def initialize(*)
+    super
+    @tasks = []
+  end
+  instance
+end
+
+class Player
+  include Observable
+  def render
+    changed
+    notify_observers(self)
+  end
+end
+
+class Task
+  include Stylet::Delegators
+
+  def initialize
+    @counter = 0
+  end
+
+  def call
+    @counter += 1
+    vputs "#{self.class.name} #{@counter}"
+    if @counter >= 60
+      Stylet::Base.active_frame.tasks.delete(self)
+    end
+  end
+end
+
+class Window < SimpleDelegator
+  def initialize(player)
+    super(Stylet::Base.active_frame) # MyApp.active_frame でも可
+    player.add_observer(self)
+  end
+
+  def update(player)            # observer として呼ばれる update
+    if frame_counter.modulo(120).zero?
+      tasks << Task.new
+    end
+    tasks.each(&:call)
+
+    next_frame                  # Stylet::Base#update を呼ぶ。干渉しない。
+    vputs "#{self.class.name} #{frame_counter}"
+  end
+end
+
+player = Player.new
+window = Window.new(player)
+loop do
+  player.render
+end

data/examples/01040_/343/203/236/343/202/246/343/202/271/343/201/256/344/275/215/347/275/256/343/201/253/343/203/224/343/202/257/343/202/273/343/203/253/343/202/222/346/211/223/343/201/244.rb

@@ -0,0 +1,18 @@
+# マウスの位置にピクセルを打つ
+require_relative "helper"
+
+class App < Stylet::Base
+  setup do
+    SDL::Mouse.hide
+  end
+
+  update do
+    rgb = 3.times.collect { rand(256) }
+    screen[*mouse.point] = screen.format.map_rgb(*rgb)
+  end
+
+  def background_clear
+  end
+
+  run
+end

data/examples/01050_/343/203/224/343/202/257/343/202/273/343/203/253/345/205/250/344/275/223/343/202/222/346/233/270/343/201/215/350/276/274/343/202/200.rb

@@ -0,0 +1,27 @@
+require_relative "helper"
+
+Stylet.configure do |config|
+  config.screen_size = [320 / 4, 240 / 4]
+end
+
+class App < Stylet::Base
+  setup do
+    SDL::Mouse.hide
+  end
+
+  update do
+    screen.h.times.each do |y|
+      screen.w.times.each do |x|
+        r = 127 * Stylet::Magic.rsin(1.0 / 256 / 2 * frame_counter * x)
+        g = 0
+        b = 127 * Stylet::Magic.rsin(1.0 / 256 / 2 * frame_counter * y)
+        screen[x, y] = screen.format.map_rgb(r, g, b)
+      end
+    end
+  end
+
+  def background_clear
+  end
+
+  run
+end

data/examples/01060_effect_/347/224/273/345/203/217/343/201/256/343/202/263/343/203/263/343/203/234/343/203/252/343/203/245/343/203/274/343/203/210/346/263/225/343/201/253/343/202/210/343/202/213/343/202/250/343/203/225/343/202/247/343/202/257/343/203/210/345/207/246/347/220/206.rb

@@ -0,0 +1,116 @@
+# 参考
+# 画像のコンボリュート法によるブラー処理(dinop.com)
+# http://www.dinop.com/vc/image_convolute_blur.html
+
+require_relative "helper"
+require "matrix"
+
+class App < Stylet::Base
+  include Helper::Cursor
+
+  setup do
+    SDL::Mouse.hide
+
+    @around = [
+      [-1, -1], [0, -1], [1, -1],
+      [-1,  0], [0,  0], [1,  0],
+      [-1,  1], [0,  1], [1,  1],
+    ]
+
+    @cell = 8
+
+    @index = 0
+    load_image
+    effect_set
+  end
+
+  update do
+    if button.btB.trigger? || button.btC.trigger? || button.btD.trigger?
+      @index += -button.btB.repeat + button.btC.repeat
+      load_image
+      effect_set
+    end
+    if button.btA.trigger? || frame_counter == 0
+      (screen.h / @cell).times.each do |y|
+        (screen.w / @cell).times.each do |x|
+          color = Vector[0, 0, 0]
+          @around.each.with_index do |v, i|
+            vv = Vector[x, y] + Vector[*v]
+            color += Vector[*screen.format.get_rgb(screen[*(vv * @cell)])] * @current[:weights][i]
+          end
+          color /= @total_weight
+          color = color.collect do |v|
+            if v < 0
+              0
+            elsif v > 255
+              255
+            else
+              v
+            end
+          end
+          screen.fill_rect(x * @cell, y * @cell, @cell, @cell, color.to_a)
+        end
+      end
+    end
+    vputs "A:実行 B:NEXT C:PREV"
+    vputs "#{@index}:#{@current[:name]}"
+  end
+
+  def background_clear
+  end
+
+  def effect_set
+    @effects = [
+      {
+        :name => "ブラー",
+        :weights => [
+          1, 2, 1,
+          2, 3, 2,
+          1, 2, 1,
+        ],
+      },
+      {
+        :name => "ぼかし",
+        :weights => [
+          1, 1, 1,
+          1, 1, 1,
+          1, 1, 1,
+        ],
+      },
+      {
+        :name => "シャープ",
+        :weights => [
+          0, -3, 0,
+          -3, 24, -3,
+          0, -3, 0,
+        ],
+      },
+      {
+        :name => "エンボス",
+        :weights => [
+          -4, -2, 0,
+          -2, 2, -2,
+          0, 2, 4,
+        ],
+      },
+      {
+        :name => "なし",
+        :weights => [
+          0, 0, 0,
+          0, 1, 0,
+          0, 0, 0,
+        ],
+      },
+    ]
+    @current = @effects[@index.modulo(@effects.size)]
+    @total_weight = @current[:weights].reduce(0, :+).abs.to_f
+  end
+
+  def load_image
+    s = SDL::Surface.load("assets/love_live.png")
+    image = s.display_format
+    screen.put(image, 0, 0)
+  end
+
+  run
+end

data/examples/01070_effect_FF7/343/201/256/346/210/246/351/227/230/343/201/253/345/205/245/343/202/213/343/201/250/343/201/215/343/201/256/343/202/250/343/203/225/343/202/247/343/202/257/343/203/210.rb

@@ -0,0 +1,33 @@
+# FF7の戦闘に入るときのエフェクト
+
+require_relative "helper"
+require "matrix"
+
+Stylet.configure do |config|
+  config.screen_size = [640, 480]
+  config.production = true
+end
+
+class App < Stylet::Base
+  include Helper::Cursor
+
+  setup do
+    SDL::Mouse.hide
+    screen.set_alpha(SDL::SRCALPHA, 128)
+  end
+
+  update do
+    if button.btA.trigger? || frame_counter == 0 || frame_counter.modulo(60).zero?
+      f = Pathname.glob("assets/bg*.png").to_a.sample
+      s = SDL::Surface.load(f.to_s)
+      image = s.display_format
+      SDL::Surface.transform_draw(image, screen, 0, 1.00, 1.00, image.w / 2, image.h / 2, *srect.center, SDL::Surface::TRANSFORM_AA)
+    end
+  end
+
+  def background_clear
+    SDL::Surface.transform_blit(screen, screen, 2, 1.05, 1.05, *srect.center, *srect.center, SDL::Surface::TRANSFORM_AA | SDL::Surface::TRANSFORM_SAFE)
+  end
+
+  run
+end

data/examples/01080_effect_/350/203/214/346/231/257/343/202/222/347/267/251/343/201/217/346/266/210/343/201/227/343/201/246/343/201/204/343/201/217/343/201/250/343/202/271/343/203/240/343/203/274/343/202/272/343/201/253/343/201/252/343/202/213.rb

@@ -0,0 +1,16 @@
+# 背景を100%で塗り潰さないとスムーズになる
+require_relative "helper"
+
+class App < Stylet::Base
+  include Helper::CursorWithObjectCollection
+
+  update do
+    draw_triangle(mouse.point, :radius => 128, :angle => 1.0 / 256 * frame_counter)
+  end
+
+  def background_clear
+    screen.draw_filled_rect_alpha(*srect, [0, 0, 0], 8)
+  end
+
+  run
+end

data/examples/01090_/347/224/273/345/203/217/343/201/256/343/202/257/343/203/255/343/202/271/343/203/225/343/202/247/343/203/274/343/203/211.rb

@@ -0,0 +1,37 @@
+# 画像のクロスフェード
+require_relative "helper"
+require "pathname"
+
+class App < Stylet::Base
+  include Helper::CursorWithObjectCollection
+
+  setup do
+    @images = Pathname.glob(Pathname("assets/bg*.png").expand_path).collect do |file|
+      SDL::Surface.load(file.to_s).display_format
+    end
+    @index = 0
+    @alpha = 0
+  end
+
+  update do
+    a = @images[(@index + 0).modulo(@images.size)]
+    b = @images[(@index + 1).modulo(@images.size)]
+
+    a.set_alpha(SDL::SRCALPHA, 255)
+    screen.put(a, 0, 0)
+
+    b.set_alpha(SDL::SRCALPHA, @alpha)
+    screen.put(b, 0, 0)
+
+    @alpha += 4
+    if @alpha >= 255
+      @index += 1
+      @alpha = 0
+    end
+  end
+
+  def background_clear
+  end
+
+  run
+end