use utf8;
use strict;
use warnings;
no  warnings 'qw';
use Shiar_Sheet::KeyboardChars 'kbmodes';

my %rows = (
	# shifted as normal, altgr as shifted
	'' => {qw(
		a ɑ b ʙ c ʕ d ð e ɛ f ɸ g ɢ h ʜ i ɪ j ʔ k ɣ l ʟ m ŋ
		n ɴ o ɔ p β q ə r ʀ s ʃ t θ u ʊ v ʋ w ɤ x χ y ʏ z ʒ
		A æ E ɜ O ɒ V ʌ
		1 ˩ 2 ˨ 3 ˧ 4 ˦ 5 ˥  6 ↗ 7 ↘ 8 ↑ 9 ↓
		! ǃ @ ǁ # ǂ $ ǀ % ʘ
		/ ʔ " ˑ ' ː : ˈ = ‿
	)},
	';' => {qw(
		lead @
		a ɐ A ɒ e ɘ E ɜ h ɥ J ʕ m ɯ r ɹ R ʁ v ʌ w ʍ X ʔ y ʎ ? ʕ
	)},
	'&' => {qw(
		lead æ
		a æ b ɓ c ɕ E ɞ g ɠ G ʛ h ɦ H ɧ j ʝ l ɬ L ɮ
		m ɰ o œ O ɶ Q ɚ r ɾ R ɺ z ʑ
	)},
);

+{
	%{ kbmodes(\%rows) },
	version => '1.0',
	title => 'IPA',
	category => 'specialized/ipa',
	intro => join("\n",
		"Another layout for typing in the International Phonetic Alphabet",
		"designed by Richard Collins, last modified in 2009",
		"and no longer available.",
	),
	flags => {
		'^' => 'superscript',
		'_' => 'subscript',
		'@' => 'reversed',
		'<' => 'left tailed',  # ɲ
		'>' => 'right tailed', # ɳ
		'&' => 'extended',
		'-' => 'barred',
	},
	#moderows => '5421-1',
}
