gbtiles 0.0.1

data/lib/gbtiles/gbr/export/asm/asm.h.erb

@@ -0,0 +1,15 @@
+<% tile_export = tile_set.tile_export.first -%>
+/**
+ * .H created with
+ * GBTiles Ruby Gem (v<%= GBTiles::VERSION %>) - GBR
+ *
+ * .GBR created with
+ * <%= tile_set.producers.first.name %> (v<%= tile_set.producers.first.version %>)
+ * <%= tile_set.producers.first.info %>
+ */
+
+// Helper: The bank the tiles were saved as
+#define <%= tile_export.label_name %>Bank <%= tile_export.bank %>
+
+// Extern: A placeholder for the data
+extern unsigned char <%= tile_export.label_name %>[];

data/lib/gbtiles/gbr/export/asm/asm.rb

@@ -0,0 +1,52 @@
+require "erb"
+
+module GBTiles
+  module GBR
+    module Export
+      module ASM
+        class ASM
+          include ERB::Util
+
+          attr_accessor :tile_set
+          @tile_set
+
+          def initialize
+          end
+
+          def prerender
+            if @tile_set.nil? then
+              raise "Missing required tile set"
+            end
+          end
+
+          def render_s
+            prerender
+
+            template = File.open(File.join(__dir__, "asm.s.erb"), "r").read
+
+            ERB.new(template, nil, "-").result(binding)
+          end
+
+          def render_h
+            prerender
+
+            template = File.open(File.join(__dir__, "asm.h.erb"), "r").read
+
+            ERB.new(template, nil, "-").result(binding)
+          end
+
+          def write output_stream
+            output_stream.write(render_s)
+
+            if output_stream.is_a? File then
+              header_path = "#{File.basename(output_stream.path, ".s")}.h"
+              header_stream = File.open(header_path, "w")
+              header_stream.write(render_h)
+              header_stream.close
+            end
+          end
+        end
+      end
+    end
+  end
+end

data/lib/gbtiles/gbr/export/asm/asm.s.erb

@@ -0,0 +1,17 @@
+<% tile_export = tile_set.tile_export.first -%>
+; .S created with
+; GBTiles Ruby Gem (v<%= GBTiles::VERSION %>) - GBR
+;
+; .GBR created with
+; <%= tile_set.producers.first.name %> (v<%= tile_set.producers.first.version %>)
+; <%= tile_set.producers.first.info %>
+
+.area _CODE_<%= tile_export.bank %>
+
+.globl _<%= tile_export.label_name %>
+.dw _<%= tile_export.label_name %>
+
+_<%= tile_export.label_name %>:
+<% (tile_export.from..tile_export.upto).each do |i| -%>
+.db <%= tile_set.tile_data.first.render_tile(i) %>
+<% end %>

data/lib/gbtiles/gbr/import/gbr_file.rb

@@ -0,0 +1,70 @@
+module GBTiles
+  module GBR
+    module Import
+      class GBRFile
+        attr_accessor :version, :tile_set
+
+        @version
+        @tile_set
+
+        def initialize()
+          @tile_set = GBTiles::GBR::TileSet::TileSet.new
+        end
+
+        def self.open(file)
+          import = GBTiles::GBR::Import::GBRFile.new
+
+          # Check to see if this is a valid file type
+          if (file.read(3) != "GBO") then
+            raise "Invalid file, header does not start with GBO"
+          end
+
+          # Version number
+          import.version = file.read(1)
+
+          # For each object
+          while !file.eof?
+            object_type = GBTiles::DataType.word(file.read(2))
+            object_id   = GBTiles::DataType.word(file.read(2))
+            object_len  = GBTiles::DataType.long(file.read(4))
+            object_data = file.read(object_len)
+
+            case object_type
+            when GBTiles::GBR::TileSet::ObjectType::PRODUCER
+              object = GBTiles::GBR::TileSet::Objects::Producer.initFromBitString object_data
+
+            when GBTiles::GBR::TileSet::ObjectType::TILE_DATA
+              object = GBTiles::GBR::TileSet::Objects::TileData.initFromBitString object_data
+
+            when GBTiles::GBR::TileSet::ObjectType::TILE_SETTINGS
+              object = GBTiles::GBR::TileSet::Objects::TileSettings.initFromBitString object_data
+
+            when GBTiles::GBR::TileSet::ObjectType::TILE_EXPORT
+              object = GBTiles::GBR::TileSet::Objects::TileExport.initFromBitString object_data
+
+            when GBTiles::GBR::TileSet::ObjectType::TILE_IMPORT
+              object = GBTiles::GBR::TileSet::Objects::TileImport.initFromBitString object_data
+
+            when GBTiles::GBR::TileSet::ObjectType::PALETTES
+              object = GBTiles::GBR::TileSet::Objects::Palettes.initFromBitString object_data
+
+            when GBTiles::GBR::TileSet::ObjectType::TILE_PAL
+              object = GBTiles::GBR::TileSet::Objects::TilePal.initFromBitString object_data
+
+            else
+              object = GBTiles::GBR::TileSet::Objects::Unknown.new object_type
+              object.object_data = object_data
+
+            end
+
+            object.object_id = object_id
+
+            import.tile_set.objects.push object
+          end
+
+          import
+        end
+      end
+    end
+  end
+end

data/lib/gbtiles/gbr/tile_set/color_set.rb

@@ -0,0 +1,12 @@
+module GBTiles
+  module GBR
+    module TileSet
+      module ColorSet
+        POCKET    = 0
+        GAME_BOY  = 1
+        GBC       = 2
+        SGB       = 3
+      end
+    end
+  end
+end

data/lib/gbtiles/gbr/tile_set/export_type.rb

@@ -0,0 +1,13 @@
+module GBTiles
+  module GBR
+    module TileSet
+      module ExportType
+        RGBDS_ASSEMBLY  = 0x00
+        RGBDS_OBJECT    = 0x01
+        TASM_ASSEMBLY   = 0x02
+        GBDK_C          = 0x03
+        BINARY          = 0x04
+      end
+    end
+  end
+end

data/lib/gbtiles/gbr/tile_set/object.rb

@@ -0,0 +1,18 @@
+module GBTiles
+  module GBR
+    module TileSet
+      class Object
+
+        attr_accessor :object_id
+        @object_id
+
+        attr_accessor :object_type
+        @object_type
+
+        def initialize object_type
+          @object_type = object_type
+        end
+      end
+    end
+  end
+end

data/lib/gbtiles/gbr/tile_set/object_type.rb

@@ -0,0 +1,16 @@
+module GBTiles
+  module GBR
+    module TileSet
+      module ObjectType
+        PRODUCER      = 0x01
+        TILE_DATA     = 0x02
+        TILE_SETTINGS = 0x03
+        TILE_EXPORT   = 0x04
+        TILE_IMPORT   = 0x05
+        PALETTES      = 0x0D
+        TILE_PAL      = 0x0E
+        DELETED       = 0xFF
+      end
+    end
+  end
+end

data/lib/gbtiles/gbr/tile_set/objects/palettes.rb

@@ -0,0 +1,41 @@
+module GBTiles
+  module GBR
+    module TileSet
+      module Objects
+        class Palettes < GBTiles::GBR::TileSet::Object
+
+          attr_accessor :id
+          @id
+
+          attr_accessor :count
+          @count
+
+          attr_accessor :colors
+          @colors
+
+          attr_accessor :sgb_count
+          @sgb_count
+
+          attr_accessor :sgb_colors
+          @sgb_colors
+
+          def initialize
+            super GBTiles::GBR::TileSet::ObjectType::PALETTES
+          end
+
+          def self.initFromBitString src
+            object = GBTiles::GBR::TileSet::Objects::Palettes.new
+
+            object.id         = GBTiles::DataType.word!(src)
+            object.count      = GBTiles::DataType.word!(src)
+            object.colors     = src.slice!(0, object.count)
+            object.sgb_count  = GBTiles::DataType.word!(src)
+            object.sgb_colors = src.slice!(0, object.sgb_count)
+
+            object
+          end
+        end
+      end
+    end
+  end
+end

data/lib/gbtiles/gbr/tile_set/objects/producer.rb

@@ -0,0 +1,33 @@
+module GBTiles
+  module GBR
+    module TileSet
+      module Objects
+        class Producer < GBTiles::GBR::TileSet::Object
+
+          attr_accessor :name
+          @name
+
+          attr_accessor :version
+          @version
+
+          attr_accessor :info
+          @info
+
+          def initialize
+            super GBTiles::GBR::TileSet::ObjectType::PRODUCER
+          end
+
+          def self.initFromBitString src
+            object = GBTiles::GBR::TileSet::Objects::Producer.new
+
+            object.name     = GBTiles::DataType.string!(src, 30)
+            object.version  = GBTiles::DataType.string!(src, 10)
+            object.info     = GBTiles::DataType.string!(src, 80)
+
+            object
+          end
+        end
+      end
+    end
+  end
+end

data/lib/gbtiles/gbr/tile_set/objects/tile_data.rb

@@ -0,0 +1,82 @@
+module GBTiles
+  module GBR
+    module TileSet
+      module Objects
+        class TileData < GBTiles::GBR::TileSet::Object
+
+          attr_accessor :name
+          @name
+
+          attr_accessor :width
+          @width
+
+          attr_accessor :height
+          @height
+
+          attr_accessor :count
+          @count
+
+          attr_accessor :color_set
+          @color_set
+
+          attr_accessor :data
+          @data
+
+          def initialize
+            super GBTiles::GBR::TileSet::ObjectType::TILE_DATA
+          end
+
+          def self.initFromBitString src
+            object = GBTiles::GBR::TileSet::Objects::TileData.new
+
+            object.name       = GBTiles::DataType.string!(src, 30)
+            object.width      = GBTiles::DataType.word!(src)
+            object.height     = GBTiles::DataType.word!(src)
+            object.count      = GBTiles::DataType.word!(src)
+            object.color_set  = src.slice!(0, 4)
+            object.data       = src
+
+            object
+          end
+
+          def render_tile(tile_index)
+            tile = []
+
+            tile_data = @data.slice(
+              tile_index * @width * @height,
+              @width * @height
+            )
+
+            (1..@height).each do |row|
+              byte_0 = 0x00
+              byte_1 = 0x00
+
+              bitmask = 0x80
+
+              (1..@width).each do |col|
+                pixel = tile_data[(row - 1) * @height + col - 1]
+
+                case pixel.unpack("C")[0]
+                when 0 # Black
+                when 1 # Dark Grey
+                  byte_0 |= bitmask
+                when 2 # Light Grey
+                  byte_1 |= bitmask
+                when 3 # White
+                  byte_0 |= bitmask
+                  byte_1 |= bitmask
+                end
+
+                bitmask >>= 1
+              end
+
+              tile.push(sprintf("0x%02x,0x%02x", byte_0, byte_1))
+            end
+
+            tile.join(",")
+          end
+        end
+      end
+    end
+  end
+end

data/lib/gbtiles/gbr/tile_set/objects/tile_export.rb

@@ -0,0 +1,105 @@
+module GBTiles
+  module GBR
+    module TileSet
+      module Objects
+        class TileExport < GBTiles::GBR::TileSet::Object
+
+          attr_accessor :tile_id
+          @tile_id
+
+          attr_accessor :file_name
+          @file_name
+
+          attr_accessor :file_type
+          @file_type
+
+          attr_accessor :section_name
+          @section_name
+
+          attr_accessor :label_name
+          @label_name
+
+          attr_accessor :bank
+          @bank
+
+          attr_accessor :tile_array
+          @tile_array
+
+          attr_accessor :format
+          @format
+
+          attr_accessor :counter
+          @counter
+
+          attr_accessor :from
+          @from
+
+          attr_accessor :upto
+          @upto
+
+          attr_accessor :compression
+          @compression
+
+          attr_accessor :include_colors
+          @include_colors
+
+          attr_accessor :sgb_palettes
+          @sgb_palettes
+
+          attr_accessor :gbc_palettes
+          @gbc_palettes
+
+          attr_accessor :make_meta_tiles
+          @make_meta_tiles
+
+          attr_accessor :meta_offset
+          @meta_offset
+
+          attr_accessor :meta_counter
+          @meta_counter
+
+          attr_accessor :split
+          @split
+
+          attr_accessor :block_size
+          @block_size
+
+          attr_accessor :sel_tab
+          @sel_tab
+
+          def initialize
+            super GBTiles::GBR::TileSet::ObjectType::TILE_EXPORT
+          end
+
+          def self.initFromBitString src
+            object = GBTiles::GBR::TileSet::Objects::TileExport.new
+
+            object.tile_id         = GBTiles::DataType.word!(src)
+            object.file_name       = GBTiles::DataType.string!(src, 128)
+            object.file_type       = GBTiles::DataType.byte!(src)
+            object.section_name    = GBTiles::DataType.string!(src, 20)
+            object.label_name      = GBTiles::DataType.string!(src, 20)
+            object.bank            = GBTiles::DataType.byte!(src)
+            object.tile_array      = GBTiles::DataType.byte!(src)
+            object.format          = GBTiles::DataType.byte!(src)
+            object.counter         = GBTiles::DataType.byte!(src)
+            object.from            = GBTiles::DataType.word!(src)
+            object.upto            = GBTiles::DataType.word!(src)
+            object.compression     = GBTiles::DataType.byte!(src)
+            object.include_colors  = GBTiles::DataType.boolean!(src)
+            object.sgb_palettes    = GBTiles::DataType.byte!(src)
+            object.gbc_palettes    = GBTiles::DataType.byte!(src)
+            object.make_meta_tiles = GBTiles::DataType.boolean!(src)
+            object.meta_offset     = GBTiles::DataType.long!(src)
+            object.meta_counter    = GBTiles::DataType.byte!(src)
+            object.split           = GBTiles::DataType.boolean!(src)
+            object.block_size      = GBTiles::DataType.long!(src)
+            object.sel_tab         = GBTiles::DataType.byte!(src)
+
+            object
+          end
+        end
+      end
+    end
+  end
+end