### 7x9ピクセルの数字画像データ

sub init_data {
  $width = 7;		#数字の幅(ピクセル単位)
  $height = 9;		#数字の高さ(〃)
  @bits = (		#数字の画像データ

# 0
  '0000000',
  '0011100',
  '0100010',
  '0100010',
  '0100010',
  '0100010',
  '0100010',
  '0011100',
  '0000000',

# 1
  '0000000',
  '0001000',
  '0001000',
  '0001000',
  '0001000',
  '0001000',
  '0001000',
  '0001000',
  '0000000',

# 2
  '0000000',
  '0011100',
  '0100010',
  '0000010',
  '0001100',
  '0010000',
  '0100000',
  '0111110',
  '0000000',

# 3
  '0000000',
  '0011100',
  '0100010',
  '0000010',
  '0001100',
  '0000010',
  '0100010',
  '0011100',
  '0000000',

# 4
  '0000000',
  '0100100',
  '0100100',
  '0100100',
  '0100100',
  '0111110',
  '0000100',
  '0000100',
  '0000000',

# 5
  '0000000',
  '0111110',
  '0100000',
  '0100000',
  '0111100',
  '0000010',
  '0100010',
  '0011100',
  '0000000',

# 6
  '0000000',
  '0011100',
  '0100010',
  '0100000',
  '0111100',
  '0100010',
  '0100010',
  '0011100',
  '0000000',

# 7
  '0000000',
  '0111110',
  '0100010',
  '0000010',
  '0000100',
  '0000100',
  '0001000',
  '0001000',
  '0000000',

# 8
  '0000000',
  '0011100',
  '0100010',
  '0100010',
  '0011100',
  '0100010',
  '0100010',
  '0011100',
  '0000000',

# 9
  '0000000',
  '0011100',
  '0100010',
  '0100010',
  '0011110',
  '0000010',
  '0100010',
  '0011100',
  '0000000',
  );
}