$_[2] + 4 * ($_[1] + 4 * $_[0]) + 16,
map { (0, 139, 205, 255)[$_] } @_
},
$_[2] + 4 * ($_[1] + 4 * $_[0]) + 16,
map { (0, 139, 205, 255)[$_] } @_
},
$_[2] + 6 * ($_[1] + 6 * $_[0]) + 16,
map { $_ && $_*40 + 55 } @_
},
$_[2] + 6 * ($_[1] + 6 * $_[0]) + 16,
map { $_ && $_*40 + 55 } @_
},