glimmer-dsl-swt 4.18.2.1 → 4.18.3.0

data/samples/elaborate/tetris/view/block.rb

@@ -0,0 +1,70 @@
+# 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 View
+    class Block
+      include Glimmer::UI::CustomWidget
+  
+      options :game_playfield, :block_size, :row, :column
+  
+      before_body {
+        @bevel_constant = 20
+      }
+  
+      body {
+        canvas {
+          layout nil
+          background bind(game_playfield[row][column], :color)
+          polygon(0, 0, block_size, 0, block_size - 4, 4, 4, 4, fill: true) {
+            background bind(game_playfield[row][column], :color) { |color_value|
+              color = color(color_value)
+              rgb(color.red + 4*@bevel_constant, color.green + 4*@bevel_constant, color.blue + 4*@bevel_constant)
+            }
+          }
+          polygon(block_size, 0, block_size - 4, 4, block_size - 4, block_size - 4, block_size, block_size, fill: true) {
+            background bind(game_playfield[row][column], :color) { |color_value|
+              color = color(color_value)
+              rgb(color.red - @bevel_constant, color.green - @bevel_constant, color.blue - @bevel_constant)
+            }
+          }
+          polygon(block_size, block_size, 0, block_size, 4, block_size - 4, block_size - 4, block_size - 4, fill: true) {
+            background bind(game_playfield[row][column], :color) { |color_value|
+              color = color(color_value)
+              rgb(color.red - 2*@bevel_constant, color.green - 2*@bevel_constant, color.blue - 2*@bevel_constant)
+            }
+          }
+          polygon(0, 0, 0, block_size, 4, block_size - 4, 4, 4, fill: true) {
+            background bind(game_playfield[row][column], :color) { |color_value|
+              color = color(color_value)
+              rgb(color.red - @bevel_constant, color.green - @bevel_constant, color.blue - @bevel_constant)
+            }
+          }
+          rectangle(0, 0, block_size, block_size) {
+            foreground bind(game_playfield[row][column], :color) { |color_value|
+              color_value == Model::Block::COLOR_CLEAR ? :gray : color_value
+            }
+          }
+        }
+      }
+    end
+  end
+end

data/samples/elaborate/tetris/view/game_over_dialog.rb

@@ -0,0 +1,72 @@
+# 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 View
+    class GameOverDialog
+      include Glimmer::UI::CustomShell
+  
+      options :parent_shell
+      
+      body {
+        dialog(parent_shell) {
+          row_layout {
+            type :vertical
+            center true
+          }
+          text 'Tetris'
+          
+          label(:center) {
+            text 'Game Over!'
+            font name: 'Menlo', height: 30, style: :bold
+          }
+          label # filler
+          button {
+            text 'Play Again?'
+            
+            on_widget_selected {
+              Model::Game.restart
+              
+              body_root.close
+            }
+          }
+          
+          on_shell_activated {
+            Model::Game.game_over = true
+            display.beep
+          }
+          
+          on_shell_closed {
+            exit_game
+          }
+          
+          on_key_pressed { |event|
+            exit_game if event.keyCode == swt(:cr)
+          }
+        }
+      }
+      
+      def exit_game
+        display.dispose if Model::Game.game_over?
+      end
+    end
+  end
+end

data/samples/elaborate/tetris/view/playfield.rb

@@ -0,0 +1,56 @@
+# 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.
+
+require_relative 'block'
+
+class Tetris
+  module View
+    class Playfield
+      include Glimmer::UI::CustomWidget
+  
+      options :game_playfield, :playfield_width, :playfield_height, :block_size
+  
+      body {
+        canvas {
+          grid_layout {
+            num_columns playfield_width
+            make_columns_equal_width true
+            margin_width block_size
+            margin_height block_size
+            horizontal_spacing 0
+            vertical_spacing 0
+          }
+
+          playfield_height.times { |row|
+            playfield_width.times { |column|
+              block(game_playfield: game_playfield, block_size: block_size, row: row, column: column) {
+                layout_data {
+                  width_hint block_size
+                  height_hint block_size
+                }
+              }
+            }
+          }
+        }
+      }
+    end
+  end
+end

data/samples/elaborate/tetris/view/score_lane.rb

@@ -0,0 +1,87 @@
+# 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.
+
+require_relative 'block'
+require_relative 'playfield'
+
+class Tetris
+  module View
+    class ScoreLane
+      include Glimmer::UI::CustomWidget
+  
+      options :block_size
+      
+      before_body {
+        @font_name = 'Menlo'
+        @font_height = 32
+      }
+  
+      body {
+        composite {
+          row_layout {
+            type :vertical
+            center true
+            fill true
+            margin_width 0
+            margin_right block_size
+            margin_height block_size
+          }
+          label(:center) {
+            text 'Next'
+            font name: @font_name, height: @font_height, style: :bold
+          }
+          playfield(game_playfield: Model::Game.preview_playfield, playfield_width: PREVIEW_PLAYFIELD_WIDTH, playfield_height: PREVIEW_PLAYFIELD_HEIGHT, block_size: BLOCK_SIZE)
+
+          label(:center) {
+            text 'Score'
+            font name: @font_name, height: @font_height, style: :bold
+          }
+          label(:center) {
+            text bind(Model::Game, :score)
+            font height: @font_height
+          }
+          
+          label # spacer
+          
+          label(:center) {
+            text 'Lines'
+            font name: @font_name, height: @font_height, style: :bold
+          }
+          label(:center) {
+            text bind(Model::Game, :lines)
+            font height: @font_height
+          }
+          
+          label # spacer
+          
+          label(:center) {
+            text 'Level'
+            font name: @font_name, height: @font_height, style: :bold
+          }
+          label(:center) {
+            text bind(Model::Game, :level)
+            font height: @font_height
+          }
+        }
+      }
+    end
+  end
+end

data/samples/hello/hello_canvas_transform.rb

@@ -0,0 +1,40 @@
+include Glimmer
+
+glimmer_logo = File.expand_path('../../images/glimmer-logo-hi-res.png', __dir__)
+
+shell {
+  text 'Hello, Canvas Transform!'
+  minimum_size 330, 352
+  
+  canvas { |canvas_proxy|
+    background :white
+
+    image(glimmer_logo, 0, 0) {
+      transform {
+        translate 110, 110
+        rotate 90
+        scale 0.21, 0.21
+      }
+    }
+    image(glimmer_logo, 0, 0) {
+      transform {
+        translate 110, 220
+        scale 0.21, 0.21
+      }
+    }
+    image(glimmer_logo, 0, 0) {
+      transform {
+        translate 220, 220
+        rotate 270
+        scale 0.21, 0.21
+      }
+    }
+    image(glimmer_logo, 0, 0) {
+      transform {
+        translate 220, 110
+        rotate 180
+        scale 0.21, 0.21
+      }
+    }
+  }
+}.open

metadata

@@ -1,21 +1,21 @@
 --- !ruby/object:Gem::Specification
 name: glimmer-dsl-swt
 version: !ruby/object:Gem::Version
-  version: 4.18.2.1
+  version: 4.18.3.0
 platform: ruby
 authors:
 - AndyMaleh
 autorequire:
 bindir: bin
 cert_chain: []
-date: 2021-01-21 00:00:00.000000000 Z
+date: 2021-01-26 00:00:00.000000000 Z
 dependencies:
 - !ruby/object:Gem::Dependency
   requirement: !ruby/object:Gem::Requirement
     requirements:
     - - "~>"
       - !ruby/object:Gem::Version
-        version: 1.0.8
+        version: 1.0.9
   name: glimmer
   type: :runtime
   prerelease: false
@@ -23,7 +23,7 @@ dependencies:
     requirements:
     - - "~>"
       - !ruby/object:Gem::Version
-        version: 1.0.8
+        version: 1.0.9
 - !ruby/object:Gem::Dependency
   requirement: !ruby/object:Gem::Requirement
     requirements:
@@ -402,6 +402,7 @@ files:
 - lib/glimmer/dsl/swt/menu_bar_expression.rb
 - lib/glimmer/dsl/swt/menu_expression.rb
 - lib/glimmer/dsl/swt/message_box_expression.rb
+- lib/glimmer/dsl/swt/multiply_expression.rb
 - lib/glimmer/dsl/swt/observe_expression.rb
 - lib/glimmer/dsl/swt/property_expression.rb
 - lib/glimmer/dsl/swt/radio_group_selection_data_binding_expression.rb
@@ -413,6 +414,7 @@ files:
 - lib/glimmer/dsl/swt/sync_exec_expression.rb
 - lib/glimmer/dsl/swt/tab_item_expression.rb
 - lib/glimmer/dsl/swt/table_items_data_binding_expression.rb
+- lib/glimmer/dsl/swt/transform_expression.rb
 - lib/glimmer/dsl/swt/tree_items_data_binding_expression.rb
 - lib/glimmer/dsl/swt/tree_properties_expression.rb
 - lib/glimmer/dsl/swt/widget_expression.rb
@@ -453,6 +455,7 @@ files:
 - lib/glimmer/swt/tab_item_proxy.rb
 - lib/glimmer/swt/table_column_proxy.rb
 - lib/glimmer/swt/table_proxy.rb
+- lib/glimmer/swt/transform_proxy.rb
 - lib/glimmer/swt/tree_proxy.rb
 - lib/glimmer/swt/widget_listener_proxy.rb
 - lib/glimmer/swt/widget_proxy.rb
@@ -465,6 +468,14 @@ files:
 - samples/elaborate/contact_manager/contact_repository.rb
 - samples/elaborate/login.rb
 - samples/elaborate/meta_sample.rb
+- samples/elaborate/tetris.rb
+- samples/elaborate/tetris/model/block.rb
+- samples/elaborate/tetris/model/game.rb
+- samples/elaborate/tetris/model/tetromino.rb
+- samples/elaborate/tetris/view/block.rb
+- samples/elaborate/tetris/view/game_over_dialog.rb
+- samples/elaborate/tetris/view/playfield.rb
+- samples/elaborate/tetris/view/score_lane.rb
 - samples/elaborate/tic_tac_toe.rb
 - samples/elaborate/tic_tac_toe/board.rb
 - samples/elaborate/tic_tac_toe/cell.rb
@@ -473,6 +484,7 @@ files:
 - samples/hello/hello_button.rb
 - samples/hello/hello_canvas.rb
 - samples/hello/hello_canvas_animation.rb
+- samples/hello/hello_canvas_transform.rb
 - samples/hello/hello_checkbox.rb
 - samples/hello/hello_checkbox_group.rb
 - samples/hello/hello_combo.rb