glimmer-dsl-libui 0.2.13 → 0.2.17

data/VERSION

@@ -1 +1 @@
-0.2.13
+0.2.17

data/examples/area_gallery.rb

@@ -41,21 +41,19 @@ window('Area Gallery', 400, 400) {
       fill r: 202, g: 102, b: 204, a: 0.5
       stroke r: 0, g: 0, b: 0, thickness: 2, dashes: [50, 10, 10, 10], dash_phase: -50.0
     }
-    unless OS.windows?
-      path { # declarative stable path
-        arc(400, 220, 180, 90, 90, false)
-  
-        # radial gradient (has an outer_radius in addition to x0, y0, x1, y1, and stops)
-        fill outer_radius: 90, x0: 0, y0: 0, x1: 500, y1: 500, stops: [{pos: 0.25, r: 102, g: 102, b: 204, a: 0.5}, {pos: 0.75, r: 204, g: 102, b: 204}]
-        stroke r: 0, g: 0, b: 0, thickness: 2, dashes: [50, 10, 10, 10], dash_phase: -50.0
-      }
-      path { # declarative stable path
-        circle(200, 200, 90)
-  
-        fill r: 202, g: 102, b: 204, a: 0.5
-        stroke r: 0, g: 0, b: 0, thickness: 2
-      }
-    end
+    path { # declarative stable path
+      arc(400, 220, 180, 90, 90, false)
+
+      # radial gradient (has an outer_radius in addition to x0, y0, x1, y1, and stops)
+      fill outer_radius: 90, x0: 0, y0: 0, x1: 500, y1: 500, stops: [{pos: 0.25, r: 102, g: 102, b: 204, a: 0.5}, {pos: 0.75, r: 204, g: 102, b: 204}]
+      stroke r: 0, g: 0, b: 0, thickness: 2, dashes: [50, 10, 10, 10], dash_phase: -50.0
+    }
+    path { # declarative stable path
+      circle(200, 200, 90)
+
+      fill r: 202, g: 102, b: 204, a: 0.5
+      stroke r: 0, g: 0, b: 0, thickness: 2
+    }
     text(160, 40, 100) { # x, y, width
       string('Area Gallery') {
         font family: 'Times', size: 14

data/examples/area_gallery2.rb

@@ -95,32 +95,30 @@ window('Area Gallery', 400, 400) {
       fill r: 202, g: 102, b: 204, a: 0.5
       stroke r: 0, g: 0, b: 0, thickness: 2, dashes: [50, 10, 10, 10], dash_phase: -50.0
     }
-    unless OS.windows?
-      path { # declarative stable path
-        arc {
-          x_center 400
-          y_center 220
-          radius 180
-          start_angle 90
-          sweep 90
-          is_negative false
-        }
-  
-        # radial gradient (has an outer_radius in addition to x0, y0, x1, y1, and stops)
-        fill outer_radius: 90, x0: 0, y0: 0, x1: 500, y1: 500, stops: [{pos: 0.25, r: 102, g: 102, b: 204, a: 0.5}, {pos: 0.75, r: 204, g: 102, b: 204}]
-        stroke r: 0, g: 0, b: 0, thickness: 2, dashes: [50, 10, 10, 10], dash_phase: -50.0
+    path { # declarative stable path
+      arc {
+        x_center 400
+        y_center 220
+        radius 180
+        start_angle 90
+        sweep 90
+        is_negative false
       }
-      path { # declarative stable path
-        circle {
-          x_center 200
-          y_center 200
-          radius 90
-        }
-  
-        fill r: 202, g: 102, b: 204, a: 0.5
-        stroke r: 0, g: 0, b: 0, thickness: 2
+
+      # radial gradient (has an outer_radius in addition to x0, y0, x1, y1, and stops)
+      fill outer_radius: 90, x0: 0, y0: 0, x1: 500, y1: 500, stops: [{pos: 0.25, r: 102, g: 102, b: 204, a: 0.5}, {pos: 0.75, r: 204, g: 102, b: 204}]
+      stroke r: 0, g: 0, b: 0, thickness: 2, dashes: [50, 10, 10, 10], dash_phase: -50.0
+    }
+    path { # declarative stable path
+      circle {
+        x_center 200
+        y_center 200
+        radius 90
       }
-    end
+
+      fill r: 202, g: 102, b: 204, a: 0.5
+      stroke r: 0, g: 0, b: 0, thickness: 2
+    }
     text {
       x 160
       y 40

data/examples/area_gallery3.rb

@@ -42,21 +42,19 @@ window('Area Gallery', 400, 400) {
         fill r: 202, g: 102, b: 204, a: 0.5
         stroke r: 0, g: 0, b: 0, thickness: 2, dashes: [50, 10, 10, 10], dash_phase: -50.0
       }
-      unless OS.windows?
-        path { # a dynamic path is added semi-declaratively inside on_draw block
-          arc(400, 220, 180, 90, 90, false)
-    
-          # radial gradient (has an outer_radius in addition to x0, y0, x1, y1, and stops)
-          fill outer_radius: 90, x0: 0, y0: 0, x1: 500, y1: 500, stops: [{pos: 0.25, r: 102, g: 102, b: 204, a: 0.5}, {pos: 0.75, r: 204, g: 102, b: 204}]
-          stroke r: 0, g: 0, b: 0, thickness: 2, dashes: [50, 10, 10, 10], dash_phase: -50.0
-        }
-        path { # a dynamic path is added semi-declaratively inside on_draw block
-          circle(200, 200, 90)
-    
-          fill r: 202, g: 102, b: 204, a: 0.5
-          stroke r: 0, g: 0, b: 0, thickness: 2
-        }
-      end
+      path { # a dynamic path is added semi-declaratively inside on_draw block
+        arc(400, 220, 180, 90, 90, false)
+  
+        # radial gradient (has an outer_radius in addition to x0, y0, x1, y1, and stops)
+        fill outer_radius: 90, x0: 0, y0: 0, x1: 500, y1: 500, stops: [{pos: 0.25, r: 102, g: 102, b: 204, a: 0.5}, {pos: 0.75, r: 204, g: 102, b: 204}]
+        stroke r: 0, g: 0, b: 0, thickness: 2, dashes: [50, 10, 10, 10], dash_phase: -50.0
+      }
+      path { # a dynamic path is added semi-declaratively inside on_draw block
+        circle(200, 200, 90)
+  
+        fill r: 202, g: 102, b: 204, a: 0.5
+        stroke r: 0, g: 0, b: 0, thickness: 2
+      }
       text(160, 40, 100) { # x, y, width
         string('Area Gallery') {
           font family: 'Times', size: 14

data/examples/area_gallery4.rb

@@ -96,32 +96,30 @@ window('Area Gallery', 400, 400) {
         fill r: 202, g: 102, b: 204, a: 0.5
         stroke r: 0, g: 0, b: 0, thickness: 2, dashes: [50, 10, 10, 10], dash_phase: -50.0
       }
-      unless OS.windows?
-        path { # a dynamic path is added semi-declaratively inside on_draw block
-          arc {
-            x_center 400
-            y_center 220
-            radius 180
-            start_angle 90
-            sweep 90
-            is_negative false
-          }
-    
-          # radial gradient (has an outer_radius in addition to x0, y0, x1, y1, and stops)
-          fill outer_radius: 90, x0: 0, y0: 0, x1: 500, y1: 500, stops: [{pos: 0.25, r: 102, g: 102, b: 204, a: 0.5}, {pos: 0.75, r: 204, g: 102, b: 204}]
-          stroke r: 0, g: 0, b: 0, thickness: 2, dashes: [50, 10, 10, 10], dash_phase: -50.0
+      path { # a dynamic path is added semi-declaratively inside on_draw block
+        arc {
+          x_center 400
+          y_center 220
+          radius 180
+          start_angle 90
+          sweep 90
+          is_negative false
         }
-        path { # a dynamic path is added semi-declaratively inside on_draw block
-          circle {
-            x_center 200
-            y_center 200
-            radius 90
-          }
-    
-          fill r: 202, g: 102, b: 204, a: 0.5
-          stroke r: 0, g: 0, b: 0, thickness: 2
+  
+        # radial gradient (has an outer_radius in addition to x0, y0, x1, y1, and stops)
+        fill outer_radius: 90, x0: 0, y0: 0, x1: 500, y1: 500, stops: [{pos: 0.25, r: 102, g: 102, b: 204, a: 0.5}, {pos: 0.75, r: 204, g: 102, b: 204}]
+        stroke r: 0, g: 0, b: 0, thickness: 2, dashes: [50, 10, 10, 10], dash_phase: -50.0
+      }
+      path { # a dynamic path is added semi-declaratively inside on_draw block
+        circle {
+          x_center 200
+          y_center 200
+          radius 90
         }
-      end
+  
+        fill r: 202, g: 102, b: 204, a: 0.5
+        stroke r: 0, g: 0, b: 0, thickness: 2
+      }
       text {
         x 160
         y 40

data/examples/basic_transform.rb

@@ -16,10 +16,16 @@ window('Basic Transform', 350, 350) {
         fill r: [255 - n*5, 0].max, g: [n*5, 255].min, b: 0, a: 0.5
         stroke :black, thickness: 2
         transform {
-          skew 0.15, 0.15
-          translate 50, 50
+          unless OS.windows?
+            skew 0.15, 0.15
+            translate 50, 50
+          end
           rotate 100, 100, -9 * n
           scale 1.1, 1.1
+          if OS.windows?
+            skew 0.15, 0.15
+            translate 50, 50
+          end
         }
       }
     end

data/examples/color_button.rb

@@ -4,7 +4,7 @@ require 'glimmer-dsl-libui'
 
 include Glimmer
 
-window('color button', 230) {
+window('color button', 240) {
   color_button { |cb|
     color :blue
     

data/examples/{color_the_shapes.rb → color_the_circles.rb}

@@ -1,55 +1,56 @@
 require 'glimmer-dsl-libui'
 
-class ColorTheShapes
+class ColorTheCircles
   include Glimmer
   
   WINDOW_WIDTH = 800
   WINDOW_HEIGHT = 600
   SHAPE_MIN_SIZE = 15
-  SHAPE_MAX_SIZE = 100
+  SHAPE_MAX_SIZE = 75
   MARGIN_WIDTH = 55
   MARGIN_HEIGHT = 155
   TIME_MAX_EASY = 4
   TIME_MAX_MEDIUM = 3
   TIME_MAX_HARD = 2
   TIME_MAX_INSANE = 1
-  SHAPES = ['square'] + (OS.windows? ? [] : ['circle'])
   
   attr_accessor :score
   
   def initialize
-    @shapes_data = []
+    @circles_data = []
     @score = 0
     @time_max = TIME_MAX_HARD
     @game_over = false
     register_observers
-    setup_shape_factory
+    setup_circle_factory
   end
   
   def register_observers
     observer = Glimmer::DataBinding::Observer.proc do |new_score|
-      @score_label.text = new_score.to_s
-      if new_score == -20
-        @game_over = true
-        msg_box('You Lost!', 'Sorry! Your score reached -20')
-        restart_game
-      elsif new_score == 0
-        @game_over = true
-        msg_box('You Won!', 'Congratulations! Your score reached 0')
-        restart_game
+      Glimmer::LibUI.queue_main do
+        @score_label.text = new_score.to_s
+        if new_score == -20
+          @game_over = true
+          msg_box('You Lost!', 'Sorry! Your score reached -20')
+          restart_game
+        elsif new_score == 0
+          @game_over = true
+          msg_box('You Won!', 'Congratulations! Your score reached 0')
+          restart_game
+        end
       end
     end
     observer.observe(self, :score) # automatically enhances self to become Glimmer::DataBinding::ObservableModel and notify observer on score attribute changes
   end
   
-  def setup_shape_factory
+  def setup_circle_factory
     consumer = Proc.new do
       unless @game_over
-        if @shapes_data.empty?
-          # start with 3 shapes to make more challenging
-          add_shape until @shapes_data.size > 3
+        if @circles_data.empty?
+          # start with 3 circles to make more challenging
+          add_circle until @circles_data.size > 3
         else
-          add_shape
+          add_circle
         end
       end
       delay = rand * @time_max
@@ -58,13 +59,13 @@ class ColorTheShapes
     Glimmer::LibUI.queue_main(&consumer)
   end
   
-  def add_shape
-    shape_x = rand * (WINDOW_WIDTH - MARGIN_WIDTH - SHAPE_MAX_SIZE) + SHAPE_MAX_SIZE
-    shape_y = rand * (WINDOW_HEIGHT - MARGIN_HEIGHT - SHAPE_MAX_SIZE) + SHAPE_MAX_SIZE
-    shape_size = rand * (SHAPE_MAX_SIZE - SHAPE_MIN_SIZE) + SHAPE_MIN_SIZE
+  def add_circle
+    circle_x = rand * (WINDOW_WIDTH - MARGIN_WIDTH - SHAPE_MAX_SIZE) + SHAPE_MAX_SIZE
+    circle_y = rand * (WINDOW_HEIGHT - MARGIN_HEIGHT - SHAPE_MAX_SIZE) + SHAPE_MAX_SIZE
+    circle_size = rand * (SHAPE_MAX_SIZE - SHAPE_MIN_SIZE) + SHAPE_MIN_SIZE
     stroke_color = Glimmer::LibUI.x11_colors.sample
-    @shapes_data << {
-      args: [shape_x, shape_y, shape_size],
+    @circles_data << {
+      args: [circle_x, circle_y, circle_size],
       fill: nil,
       stroke: stroke_color
     }
@@ -74,27 +75,27 @@ class ColorTheShapes
   
   def restart_game
     @score = 0 # update variable directly to avoid notifying observers
-    @shapes_data.clear
+    @circles_data.clear
     @game_over = false
   end
   
-  def color_shape(x, y)
-    clicked_shape_data = @shapes_data.find do |shape_data|
-      shape_data[:fill].nil? && shape_data[:shape]&.include?(x, y)
+  def color_circle(x, y)
+    clicked_circle_data = @circles_data.find do |circle_data|
+      circle_data[:fill].nil? && circle_data[:circle]&.include?(x, y)
     end
-    if clicked_shape_data
-      clicked_shape_data[:fill] = clicked_shape_data[:stroke]
-      push_colored_shape_behind_uncolored_shapes(clicked_shape_data)
+    if clicked_circle_data
+      clicked_circle_data[:fill] = clicked_circle_data[:stroke]
+      push_colored_circle_behind_uncolored_circles(clicked_circle_data)
       @area.queue_redraw_all
       self.score += 1 # notifies score observers automatically of change
     end
   end
   
-  def push_colored_shape_behind_uncolored_shapes(colored_shape_data)
-    removed_colored_shape_data = @shapes_data.delete(colored_shape_data)
-    last_colored_shape_data = @shapes_data.select {|cd| cd[:fill]}.last
-    last_colored_shape_data_index = @shapes_data.index(last_colored_shape_data) || -1
-    @shapes_data.insert(last_colored_shape_data_index + 1, removed_colored_shape_data)
+  def push_colored_circle_behind_uncolored_circles(colored_circle_data)
+    removed_colored_circle_data = @circles_data.delete(colored_circle_data)
+    last_colored_circle_data = @circles_data.select {|cd| cd[:fill]}.last
+    last_colored_circle_data_index = @circles_data.index(last_colored_circle_data) || -1
+    @circles_data.insert(last_colored_circle_data_index + 1, removed_colored_circle_data)
   end
 
   def launch
@@ -139,12 +140,12 @@ class ColorTheShapes
     menu('Help') {
       menu_item('Instructions') {
         on_clicked do
-          msg_box('Instructions', "Score goes down as shapes are added.\nIf it reaches -20, you lose!\n\nClick shapes to color and score!\nOnce score reaches 0, you win!\n\nBeware of concealed light-colored shapes!\nThey are revealed once darker shapes intersect them.\n\nThere are four levels of difficulty.\nChange via difficulty menu if the game gets too tough.")
+          msg_box('Instructions', "Score goes down as circles are added.\nIf it reaches -20, you lose!\n\nClick circles to color and score!\nOnce score reaches 0, you win!\n\nBeware of concealed light-colored circles!\nThey are revealed once darker circles intersect them.\n\nThere are four levels of difficulty.\nChange via difficulty menu if the game gets too tough.")
         end
       }
     }
     
-    window('Color The Shapes', WINDOW_WIDTH, WINDOW_HEIGHT) {
+    window('Color The Circles', WINDOW_WIDTH, WINDOW_HEIGHT) {
       margined true
       
       grid {
@@ -158,13 +159,13 @@ class ColorTheShapes
           end
         }
         
-        label('Score goes down as shapes are added. If it reaches -20, you lose!') {
+        label('Score goes down as circles are added. If it reaches -20, you lose!') {
           left 0
           top 1
           halign :center
         }
         
-        label('Click shapes to color and score! Once score reaches 0, you win!') {
+        label('Click circles to color and score! Once score reaches 0, you win!') {
           left 0
           top 2
           halign :center
@@ -199,18 +200,18 @@ class ColorTheShapes
               fill :white
             }
 
-            @shapes_data.each do |shape_data|
+            @circles_data.each do |circle_data|
               path {
-                shape_data[:shape] = send(SHAPES.sample, *shape_data[:args])
+                circle_data[:circle] = circle(*circle_data[:args])
 
-                fill shape_data[:fill]
-                stroke shape_data[:stroke]
+                fill circle_data[:fill]
+                stroke circle_data[:stroke]
               }
             end
           end
 
           on_mouse_down do |area_mouse_event|
-            color_shape(area_mouse_event[:x], area_mouse_event[:y])
+            color_circle(area_mouse_event[:x], area_mouse_event[:y])
           end
         }
       }
@@ -218,4 +219,4 @@ class ColorTheShapes
   end
 end
 
-ColorTheShapes.new.launch
+ColorTheCircles.new.launch

data/examples/meta_example.rb

@@ -11,7 +11,7 @@ class MetaExample
   
   def examples
     if @examples.nil?
-      example_files = Dir.glob(File.join(File.expand_path('.', __dir__), '**', '*.rb'))
+      example_files = Dir.glob(File.join(File.expand_path('.', __dir__), '*.rb'))
       example_file_names = example_files.map { |f| File.basename(f, '.rb') }
       example_file_names = example_file_names.reject { |f| f == 'meta_example' || f.match(/\d$/) }
       @examples = example_file_names.map { |f| f.underscore.titlecase }
@@ -42,16 +42,20 @@ class MetaExample
   end
   
   def run_example(example)
-    command = "ruby -r #{glimmer_dsl_libui_file} #{example} 2>&1"
-    result = ''
-    IO.popen(command) do |f|
-      f.each_line do |line|
-        result << line
-        puts line
-        $stdout.flush # for Windows
+    Thread.new do
+      command = "ruby -r #{glimmer_dsl_libui_file} #{example} 2>&1"
+      result = ''
+      IO.popen(command) do |f|
+        sleep(0.0001) # yield to main thread
+        f.each_line do |line|
+          result << line
+          puts line
+          $stdout.flush # for Windows
+          sleep(0.0001) # yield to main thread
+        end
       end
+      Glimmer::LibUI.queue_main { msg_box('Error Running Example', result) } if result.downcase.include?('error')
     end
-    msg_box('Error Running Example', result) if result.downcase.include?('error')
   end
   
   def launch
@@ -106,6 +110,8 @@ class MetaExample
                   FileUtils.mkdir_p(parent_dir)
                   example_file = File.join(parent_dir, "#{selected_example.underscore}.rb")
                   File.write(example_file, @code_entry.text)
+                  example_supporting_directory = File.expand_path(selected_example.underscore, __dir__)
+                  FileUtils.cp_r(example_supporting_directory, parent_dir) if Dir.exist?(example_supporting_directory)
                   FileUtils.cp_r(File.expand_path('../icons', __dir__), File.dirname(parent_dir))
                   FileUtils.cp_r(File.expand_path('../sounds', __dir__), File.dirname(parent_dir))
                   run_example(example_file)

data/examples/tetris/model/block.rb

@@ -0,0 +1,48 @@
+# Copyright (c) 2007-2021 Andy Maleh
+#
+# Permission is hereby granted, free of charge, to any person obtaining
+# a copy of this software and associated documentation files (the
+# "Software"), to deal in the Software without restriction, including
+# without limitation the rights to use, copy, modify, merge, publish,
+# distribute, sublicense, and/or sell copies of the Software, and to
+# permit persons to whom the Software is furnished to do so, subject to
+# the following conditions:
+#
+# The above copyright notice and this permission notice shall be
+# included in all copies or substantial portions of the Software.
+#
+# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+# EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+# MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+# NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
+# LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
+# OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
+# WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
+
+class Tetris
+  module Model
+    class Block
+      COLOR_CLEAR = :white
+    
+      attr_accessor :color
+      
+      # Initializes with color. Default color (gray) signifies an empty block
+      def initialize(color = COLOR_CLEAR)
+        @color = color
+      end
+      
+      # Clears block color. `quietly` option indicates if it should not notify observers by setting value quietly via variable not attribute writer.
+      def clear
+        self.color = COLOR_CLEAR unless self.color == COLOR_CLEAR
+      end
+      
+      def clear?
+        self.color == COLOR_CLEAR
+      end
+      
+      def occupied?
+        !clear?
+      end
+    end
+  end
+end