information
  language "Swedish"
  country "Sweden"
  variant "Svdvorak"
end information

include "common/dvorak"
include "common/base"


function comma/0
  ","
end function
function altcomma/0
  "."
end function

macro mod_letter/2
  <letter \1> : "\1"
  <shift letter \1> : "\2"
  <caps letter \1> : "\2"
  <shift caps letter \1> : "\1"
end macro

mod_letter("å" "Å")
mod_letter("ä" "Ä")
mod_letter("ö" "Ö")

<keycode 41> : <letter §>
<keycode 12> : <letter +>
<keycode 13> : <dead letter ´>
<keycode 16> : <letter å>
<keycode 17> : <letter ,>
<keycode 18> : <letter .>
<keycode 26> : <letter '>
<keycode 27> : <dead letter ¨>
<keycode 40> : <letter ->
<keycode 43> : <letter <>
<keycode 86> : <letter ö>
<keycode 44> : <letter ä>


macro key/4
  <letter \1> : "\1"
  <shift letter \1> : "\2"
  <altgr letter \1> : "\3"
  <altgr shift letter \1> : "\4"
end macro


key("§" "½" "¶" "¾")
key("1" "!" "¡" "¹")
key("2" "\"" "@" "²")
key("3" "#" "£" "³")
key("4" "¤" "$" "¼")
key("5" "%" "€" "¢")
key("6" "&" "¥" "⅝")
key("7" "/" "{" "÷")
key("8" "(" "[" "«")
key("9" ")" "]" "»")
key("0" "=" "}" "°")
key("+" "?" "\\" "¿")
<shift dead letter ´> : <dead letter `>
<altgr dead letter ´> : "±"
<altgr shift dead letter ´> : "¬"

<shift dead letter ¨> : <dead letter ^>
<altgr dead letter ¨> : <dead letter ~>
<altgr shift dead letter ¨> : <dead letter ˇ>

<letter '> : "'"
<shift letter '> : "*"
<altgr letter '> : "`"
<altgr shift letter '> : <dead letter °>
key("<" ">" "|" "×")


macro nocaps/3
  <altgr letter \1> : "\2"
  <altgr shift letter \1> : "\3"
end macro

macro caps/3
  <altgr letter \1> : "\2"
  <altgr shift letter \1> : "\3"
  <altgr caps letter \1> : "\3"
  <altgr caps shift letter \1> : "\2"
end macro

nocaps("å" "{" "Ω")
key("," ";" "[" "€")
key("." ":" "]" "¢")
nocaps("p" "}" "®")
caps("y" "þ" "Þ")
nocaps("f" "←" "¥")
nocaps("g" "↓" "↑")
nocaps("c" "→" "ı")
caps("l" "œ" "Œ")

caps("a" "æ" "Æ")
nocaps("o" "(" "«")
nocaps("e" ")" "»")
caps("u" "đ" "Ð")
caps("d" "ð" "Ð")
caps("h" "ħ" "Ħ")
caps("t" "ŧ" "Ŧ")
caps("n" "ł" "Ł")
<altgr letter s> : "ß"
<altgr shift letter s> : <void>
<shift letter -> : "_"
caps("-" "ø" "Ø")

nocaps("ö" "|" "¦")
nocaps("ä" "«" "ª")
nocaps("q" "»" "º")
caps("j" "π" "Π")
<altgr letter k> : "ĸ"
<altgr shift letter k> : "©"
nocaps("x" "‘" "“")
nocaps("b" "’" "”")
caps("m" "µ" "º")
<altgr letter w> : <dead letter ¸>
<altgr shift letter w> : <dead letter ˛>
<altgr letter v> : "·"
<altgr shift letter v> : <dead letter ˙>
<altgr letter z> : <dead letter \u0323>
<altgr shift letter z> : <dead letter ¯>