DouKaku?

#! c:\ruby\bin\ruby.exe -Ks

String.class_eval do |string|
    def words
        self.split(//)
    end
    def fix_width(width, padding)
        (self.words.size > width) ? self : (padding * (width - self.words.size) + self)
    end
end

Fixnum.class_eval do |fixnum|
    alias :to_s_orig :to_s
    def to_s(base, width)
        binary = self.to_s_orig(base).fix_width(width, "0")
    end
end

class BinaryClock
    attr_accessor :now
    def initialize
        self.now = Time.now
    end
    def print
        output(self.now.hour.to_s(2, 5))
        output(self.now.min.to_s(2, 6))
    end
private
    def output(binary)
        puts binary.words.map { |f| f == "0" ? "□" : "■" }.join.fix_width(6, "　")
    end
end

BinaryClock.new.print

DECLARE @now AS datetime = GETDATE(); --'20:18';

WITH
  Input(now_str) AS (
    SELECT LEFT(CONVERT(varchar(max), @now, 8), 5)
  )
, Split(id, n, max_bits) AS (
    SELECT 1, LEFT(now_str, 2), 6 FROM Input
    UNION ALL
    SELECT 2, RIGHT(now_str, 2),6 FROM Input
  )
, ToBin(id, bin, deci, crnt) AS (
    SELECT
        id
      , CAST(CASE
             WHEN n >= POWER(CAST(2 AS bigint), max_bits)
                THEN POWER(CAST(10 AS bigint), max_bits)
                ELSE CAST(0 AS bigint)
             END AS bigint)
      , CASE
        WHEN n >= POWER(CAST(2 AS bigint), max_bits)
           THEN n - POWER(CAST(2 AS bigint), max_bits)
           ELSE n
        END
      , max_bits - 1
    FROM
        Split
    UNION ALL
    SELECT
        id
      , CASE
        WHEN deci >= POWER(CAST(2 AS bigint), crnt)
          THEN POWER(CAST(10 AS bigint), crnt)
          ELSE 0
        END + bin
      , CASE
        WHEN deci >= POWER(CAST(2 AS bigint), crnt)
          THEN deci - POWER(CAST(2 AS bigint), crnt)
          ELSE deci
        END
      , crnt - 1
    FROM
        ToBin
    WHERE
        crnt >= 0
  )
SELECT
    REPLACE(
      REPLACE(
        RIGHT(N'00000' + CAST(bin as nvarchar(6)), 6),
        N'0', N'□'
      ),
      N'1', N'■'
    )
FROM
    ToBin
WHERE
    crnt = -1
ORDER BY
    id