<% WebSite.sendLinks %>
<%
pos = [ nil, 'n', 'v', 'v', 'adv', 'pron' ]
labels = { 'EO' => "English-Okaikiar", 'OE' => "Okaikiar-English" }
dir = q['dir']
if dir && labels.include?(dir[0])
dir = dir[0]
else
dir = 'EO'
end
labels.sort.each do
|k, v|
if k != dir
puts %|
"
end
end
list = { 'EO' => {}, 'OE' => {} }
File.foreach("/home/mreed/etc/okaikiar/roots") do
|l|
e, o, p = l.split(' ')
e.downcase!
e.gsub!('_', ' ')
list['EO'][e] = [o, pos[p.to_i]]
list['OE'][o] = [e, pos[p.to_i]]
end
last = nil
%>
Click on an Okaikiar word to see it written in Orendiar.
<%
n = 0
list[dir].sort.each do
|k, v|
t, p = v
index = k[0,1].upcase
if index != last then
if n >= list[dir].length/2 then
%>
<%
end
puts "
#{index}
"
last = index
end
n += 1
s = nil
if dir == 'OE' then
s = k
else
s = t
end
u = s.gsub("'", '%2527')
s = %|#{s}|
if dir == 'OE' then
k = s
else
t = s
end
%>