base: radix economy for 3 different maximums

[sheet.git] / keys.inc.pl

diff --git a/keys.inc.pl b/keys.inc.pl
index 3def8bd6502d93638b0199fb88a223ade2b11c8d..1cb8536d19ba986bba8755aa5d64e4921829589b 100644 (file)
--- a/keys.inc.pl
+++ b/keys.inc.pl
@@ -112,3 +112,39 @@ abc => [[
        [qw'^t ^u ^v ^w ^x ^y ^z ^0 ^0 ^? '],
 ]],
 
+colemak => [[
+       [qw/ `  1  2  3  4  5  6  7  8  9  0  -  = /],
+       [qw/ ~  !  @  #  $  %  ^  &  *  (  )  _  + /],
+       [@num, qw/                           ^_ ^0 /],
+], [
+       [qw/ q  w  f  p  g  j  l  u  y  ;  [  ] /],
+       [qw/ Q  W  F  P  G  J  L  U  Y  :  {  } /],
+       [qw/^q ^w ^f ^p ^g ^j ^l ^u ^y ^0 ^[ ^] /],
+], [
+       [qw/ a  r  s  t  d  h  n  e  i  o  '  \\ /],
+       [qw/ A  R  S  T  D  H  N  E  I  O  "   | /],
+       [qw/^a ^r ^s ^t ^d ^h ^n ^e ^i ^o ^0 ^\\ /],
+], [
+       [qw( z  x  c  v  b  k  m  ,  .  / )],
+       [qw( Z  X  C  V  B  K  M  <  >  ? )],
+       [qw(^z ^x ^c ^v ^b ^k ^m ^0 ^0 ^? )],
+]],
+
+qwerak => [[
+       [qw/ `  1  2  3  4  5  6  7  8  9  0  -  = /],
+       [qw/ ~  !  @  #  $  %  ^  &  *  (  )  _  + /],
+       [@num, qw/                           ^_ ^0 /],
+], [
+       [qw/ q  w  j  p  ;  y  g  k  r  l  [  ] /],
+       [qw/ Q  W  J  P  :  Y  G  K  R  L  {  } /],
+       [qw/^q ^w ^j ^p ^0 ^y ^g ^k ^r ^l ^[ ^] /],
+], [
+       [qw/ a  s  e  i  u  d  h  t  n  o  '  \\ /],
+       [qw/ A  S  E  I  U  D  H  T  N  O  "   | /],
+       [qw/^a ^s ^e ^i ^u ^d ^h ^t ^n ^o ^0 ^\\ /],
+], [
+       [qw( z  x  c  v  b  f  m  ,  .  / )],
+       [qw( Z  X  C  V  B  F  M  <  >  ? )],
+       [qw(^z ^x ^c ^v ^b ^f ^m ^0 ^0 ^? )],
+]],
+