GET     <IKHG$Dir>.Source.Chars.Latin3

KeyStruct9
        &       KeyTran9-KeyStruct9
        &       (KeyTran9End-KeyTran9) :SHR: 2
        &       InkeyTran-KeyStruct9
        &       ShiftingKeyList-KeyStruct9
        &       SpecialList9-KeyStruct9
        &       SpecialCodeTable9-KeyStruct9
        &       KeyStructInit-KeyStruct9
        &       PendingAltCode9-KeyStruct9
        &       PendingAltSpecial9-KeyStruct9
        &       PadK9NumTran-KeyStruct9-(SpecialList9Pad-SpecialList9)
        &       PadK9CurTran-KeyStruct9-(SpecialList9Pad-SpecialList9)

KeyTran9
        =       &1B, &1B, &1B, &1B
        =       &81, &91, &A1, &B1
        =       &82, &92, &A2, &B2
        =       &83, &93, &A3, &B3
        =       &84, &94, &A4, &B4
        =       &85, &95, &A5, &B5
        =       &86, &96, &A6, &B6
        =       &87, &97, &A7, &B7
        =       &88, &98, &A8, &B8
        =       &89, &99, &A9, &B9
        =       &CA, &DA, &EA, &FA
        =       &CB, &DB, &EB, &FB
        =       &CC, &DC, &EC, &FC
        =       &80, &90, &A0, &B0
        =       &FF, &FF, &FF, &FF
        =       &FF, &FF, &FF, &FF

        =       &FF, &FF, &FF, &FF
        =       &31, &21, &01, &01
        =       &FF, &FF, &FF, &FF
        =       &FF, &FF, &FF, &FF
        =       &34, &24, &04, &04
        =       &FF, &FF, &FF, &FF
        =       &FF, &FF, &FF, &FF
        =       &37, &26, &07, &07
        =       &FF, &FF, &FF, &FF
        =       &39, &28, &09, &09
        =       &30, &29, &00, &00
        =       &FF, &FF, &FF, &FF
        =       &FF, &FF, &FF, &FF
        =       &FF, &FF, &FF, &FF
        =       &08, &08, &08, &08
        =       &CD, &DD, &ED, &FD

        =       &1E, &1E, &1E, &1E
        =       &9F, &8F, &BF, &AF
        =       &FF, &FF, &FF, &FF
        =       &FF, &FF, &FF, &FF
        =       &FF, &FF, &FF, &FF
        =       &FF, &FF, &FF, &FF
        =       &FF, &FF, &FF, &FF
        =       &FF, &FF, &FF, &FF
        =       &77, &57, &17, &17
        =       &FF, &FF, &FF, &FF
        =       &72, &52, &12, &12
        =       &FF, &FF, &FF, &FF
        =       &79, &59, &19, &19
        =       &FF, &FF, &FF, &FF
        =       &FF, &FF, &FF, &FF
        =       &6F, &4F, &0F, &0F

        =       &70, &50, &10, &10
        =       &FF, &FF, &FF, &FF
        =       &FF, &FF, &FF, &FF
        =       &FF, &FF, &FF, &FF
        =       &FF, &FF, &FF, &FF
        =       &8B, &9B, &AB, &BB
        =       &9E, &8E, &BE, &AE
        =       &FF, &FF, &FF, &FF
        =       &FF, &FF, &FF, &FF
        =       &FF, &FF, &FF, &FF
        =       &FF, &FF, &FF, &FF
        =       &FF, &FF, &FF, &FF
        =       &61, &41, &01, &01
        =       &FF, &FF, &FF, &FF
        =       &64, &44, &04, &04
        =       &66, &46, &06, &06

        =       &FF, &FF, &FF, &FF
        =       &FF, &FF, &FF, &FF
        =       &FF, &FF, &FF, &FF
        =       &6B, &4B, &0B, &0B
        =       &FF, &FF, &FF, &FF
        =       &FF, &FF, &FF, &FF
        =       &FF, &FF, &FF, &FF
        =       &0D, &0D, &0D, &0D
        =       &FF, &FF, &FF, &FF
        =       &FF, &FF, &FF, &FF
        =       &FF, &FF, &FF, &FF
        =       &FF, &FF, &FF, &FF
        =       &FF, &FF, &FF, &FF
        =       &FF, &FF, &FF, &FF
        =       &FF, &FF, &FF, &FF
        =       &FF, &FF, &FF, &FF

        =       &FF, &FF, &FF, &FF
        =       &FF, &FF, &FF, &FF
        =       &FF, &FF, &FF, &FF
        =       &FF, &FF, &FF, &FF
        =       &FF, &FF, &FF, &FF
        =       &FF, &FF, &FF, &FF
        =       &FF, &FF, &FF, &FF
        =       &FF, &FF, &FF, &FF
        =       &FF, &FF, &FF, &FF
        =       &8F, &9F, &AF, &BF
        =       &FF, &FF, &FF, &FF
        =       &FF, &FF, &FF, &FF
        =       &FF, &FF, &FF, &FF
        =       &FF, &FF, &FF, &FF
        =       &FF, &FF, &FF, &FF
        =       &FF, &FF, &FF, &FF

        =       &FF, &FF, &FF, &FF
        =       &FF, &FF, &FF, &FF
        =       &8C, &9C, &AC, &BC
        =       &8E, &9E, &AE, &BE
        =       &8D, &9D, &AD, &BD
        =       &FF, &FF, &FF, &FF
        =       &FF, &FF, &FF, &FF
        =       &FF, &FF, &FF, &FF
        =       &C0, &D0, &E0, &F0
        =       &C0, &D0, &E0, &F0
        =       &C1, &D1, &E1, &F1
        =       &C2, &D2, &E2, &F2
        =       &C3, &D3, &E3, &F3
        =       &C4, &D4, &E4, &F4
        =       &FF, &FF, &FF, &FF
KeyTran9End

SpecialList9
        =       SpecialList9End-SpecialList9-1
SpecialList9Pad
        =       K1NumPadSlash, K1NumPadStar, K1NumPadHash
        =       K1NumPad7, K1NumPad8, K1NumPad9, K1NumPadMinus
        =       K1NumPad4, K1NumPad5, K1NumPad6, K1NumPadPlus
        =       K1NumPad1, K1NumPad2, K1NumPad3, K1NumPadEnter
        =       K1NumPad0, K1NumPadDot

        =       K1ShiftLeft, K1ShiftRight, K1CtrlLeft, K1CtrlRight
        =       K1AltLeft, K1AltRight
        =       K1RightMouse, K1CentreMouse, K1LeftMouse
        =       K1CapsLock, K1Tab
        =       K1Delete
        =       K1NumLock, K1ScrollLock, K1Break
K9TopBitSet
        =       &10, &12, &13, &15, &16, &18, &1B, &1C
        =       &1D, &27, &29, &2B, &2D, &2E, &31, &32
        =       &33, &3D, &40, &41, &42, &44, &45, &46
        =       &4D, &4E, &4F, &50, &51, &52, &53, &54
        =       &55, &56, &57, &5F
SpecialList9End
        ALIGN

SpecialCodeTable9
        &       ProcessK1Pad-SpecialCodeTable9
        &       ProcessK1Pad-SpecialCodeTable9
        &       ProcessK1Pad-SpecialCodeTable9
        &       ProcessK1Pad-SpecialCodeTable9
        &       ProcessK1Pad-SpecialCodeTable9
        &       ProcessK1Pad-SpecialCodeTable9
        &       ProcessK1Pad-SpecialCodeTable9
        &       ProcessK1Pad-SpecialCodeTable9
        &       ProcessK1Pad-SpecialCodeTable9
        &       ProcessK1Pad-SpecialCodeTable9
        &       ProcessK1Pad-SpecialCodeTable9
        &       ProcessK1Pad-SpecialCodeTable9
        &       ProcessK1Pad-SpecialCodeTable9
        &       ProcessK1Pad-SpecialCodeTable9
        &       ProcessK1Pad-SpecialCodeTable9
        &       ProcessK1Pad-SpecialCodeTable9
        &       ProcessK1Pad-SpecialCodeTable9
        &       ProcessKShift-SpecialCodeTable9
        &       ProcessKShift-SpecialCodeTable9
        &       ProcessKCtrl-SpecialCodeTable9
        &       ProcessKCtrl-SpecialCodeTable9
        &       ProcessKAlt-SpecialCodeTable9
        &       ProcessKAlt-SpecialCodeTable9
        &       ProcessKRight-SpecialCodeTable9
        &       ProcessKCentre-SpecialCodeTable9
        &       ProcessKLeft-SpecialCodeTable9
        &       ProcessKCaps-SpecialCodeTable9
        &       ProcessKTab-SpecialCodeTable9
        &       ProcessKDelete-SpecialCodeTable9
        &       ProcessKNum-SpecialCodeTable9
        &       ProcessKScroll-SpecialCodeTable9
        &       ProcessKBreak-SpecialCodeTable9
        &       ProcessK9TopBitSet-SpecialCodeTable9
        &       ProcessK9TopBitSet-SpecialCodeTable9
        &       ProcessK9TopBitSet-SpecialCodeTable9
        &       ProcessK9TopBitSet-SpecialCodeTable9
        &       ProcessK9TopBitSet-SpecialCodeTable9
        &       ProcessK9TopBitSet-SpecialCodeTable9
        &       ProcessK9TopBitSet-SpecialCodeTable9
        &       ProcessK9TopBitSet-SpecialCodeTable9
        &       ProcessK9TopBitSet-SpecialCodeTable9
        &       ProcessK9TopBitSet-SpecialCodeTable9
        &       ProcessK9TopBitSet-SpecialCodeTable9
        &       ProcessK9TopBitSet-SpecialCodeTable9
        &       ProcessK9TopBitSet-SpecialCodeTable9
        &       ProcessK9TopBitSet-SpecialCodeTable9
        &       ProcessK9TopBitSet-SpecialCodeTable9
        &       ProcessK9TopBitSet-SpecialCodeTable9
        &       ProcessK9TopBitSet-SpecialCodeTable9
        &       ProcessK9TopBitSet-SpecialCodeTable9
        &       ProcessK9TopBitSet-SpecialCodeTable9
        &       ProcessK9TopBitSet-SpecialCodeTable9
        &       ProcessK9TopBitSet-SpecialCodeTable9
        &       ProcessK9TopBitSet-SpecialCodeTable9
        &       ProcessK9TopBitSet-SpecialCodeTable9
        &       ProcessK9TopBitSet-SpecialCodeTable9
        &       ProcessK9TopBitSet-SpecialCodeTable9
        &       ProcessK9TopBitSet-SpecialCodeTable9
        &       ProcessK9TopBitSet-SpecialCodeTable9
        &       ProcessK9TopBitSet-SpecialCodeTable9
        &       ProcessK9TopBitSet-SpecialCodeTable9
        &       ProcessK9TopBitSet-SpecialCodeTable9
        &       ProcessK9TopBitSet-SpecialCodeTable9
        &       ProcessK9TopBitSet-SpecialCodeTable9
        &       ProcessK9TopBitSet-SpecialCodeTable9
        &       ProcessK9TopBitSet-SpecialCodeTable9
        &       ProcessK9TopBitSet-SpecialCodeTable9
        &       ProcessK9TopBitSet-SpecialCodeTable9

TopBitSetTable9
        =       &60, &00, &00, &03, &00, &03, &00, &03
        =       &00, &03, &B0, &00, &00, &03, &00, &03
        =       &32, &00, &22, &00, &02, &00, &02, &00
        =       &B2, &00, &00, &03, &00, &03, &00, &03
        =       &33, &00, &A4, &00, &03, &00, &03, &00
        =       &B3, &00, &A3, &00, &00, &03, &00, &03
        =       &35, &00, &25, &00, &05, &00, &05, &00
        =       &BD, &00, &8E, &00, &00, &03, &00, &03
        =       &36, &00, &5E, &00, &1E, &00, &1E, &00
        =       &00, &03, &8B, &00, &00, &03, &00, &03
        =       &38, &00, &2A, &00, &08, &00, &08, &00
        =       &00, &03, &8F, &00, &00, &03, &00, &03
        =       &2D, &00, &5F, &00, &1F, &00, &1F, &00
        =       &AD, &00, &99, &00, &00, &03, &00, &03
        =       &3D, &00, &2B, &00, &00, &03, &00, &03
        =       &97, &00, &98, &00, &00, &03, &00, &03
        =       &5C, &00, &7C, &00, &1C, &00, &1C, &00
        =       &8F, &00, &B7, &00, &00, &03, &00, &03
        =       &71, &01, &51, &01, &11, &00, &11, &00
        =       &9B, &01, &9A, &01, &00, &03, &00, &03
        =       &65, &01, &45, &01, &05, &00, &05, &00
        =       &80, &00, &00, &03, &00, &03, &00, &03
        =       &74, &01, &54, &01, &14, &00, &14, &00
        =       &8D, &00, &00, &03, &00, &03, &00, &03
        =       &75, &01, &55, &01, &15, &00, &15, &00
        =       &FD, &01, &DD, &01, &00, &03, &00, &03
        =       &69, &01, &49, &01, &09, &00, &09, &00
        =       &9E, &00, &00, &03, &00, &03, &00, &03
        =       &5B, &00, &7B, &00, &1B, &00, &1B, &00
        =       &07, &02, &00, &03, &00, &03, &00, &03
        =       &5D, &00, &7D, &00, &1D, &00, &1D, &00
        =       &06, &02, &00, &03, &00, &03, &00, &03
        =       &23, &00, &7E, &00, &00, &03, &00, &03
        =       &05, &02, &00, &03, &00, &03, &00, &03
        =       &73, &01, &53, &01, &13, &00, &13, &00
        =       &FE, &01, &DE, &01, &DF, &00, &A7, &00
        =       &67, &01, &47, &01, &07, &00, &07, &00
        =       &F8, &01, &D8, &01, &00, &03, &00, &03
        =       &68, &01, &48, &01, &08, &00, &08, &00
        =       &B6, &01, &A6, &01, &00, &03, &00, &03
        =       &6A, &01, &4A, &01, &0A, &00, &0A, &00
        =       &BC, &01, &AC, &01, &00, &03, &00, &03
        =       &6C, &01, &4C, &01, &0C, &00, &0C, &00
        =       &9F, &00, &00, &03, &00, &03, &00, &03
        =       &3B, &00, &3A, &00, &00, &03, &00, &03
        =       &08, &02, &8C, &00, &00, &03, &00, &03
        =       &27, &00, &40, &00, &00, &00, &00, &00
        =       &02, &02, &00, &03, &00, &03, &00, &03
        =       &5C, &00, &7C, &00, &1C, &00, &1C, &00
        =       &B7, &00, &00, &03, &00, &03, &00, &03
        =       &7A, &01, &5A, &01, &1A, &00, &1A, &00
        =       &00, &03, &92, &00, &00, &03, &00, &03
        =       &78, &01, &58, &01, &18, &00, &18, &00
        =       &00, &03, &93, &00, &00, &03, &00, &03
        =       &63, &01, &43, &01, &03, &00, &03, &00
        =       &E6, &01, &C6, &01, &00, &03, &00, &03
        =       &76, &01, &56, &01, &16, &00, &16, &00
        =       &90, &00, &94, &00, &00, &03, &00, &03
        =       &62, &01, &42, &01, &02, &00, &02, &00
        =       &91, &00, &95, &00, &00, &03, &00, &03
        =       &6E, &01, &4E, &01, &0E, &00, &0E, &00
        =       &00, &03, &96, &00, &00, &03, &00, &03
        =       &6D, &01, &4D, &01, &0D, &00, &0D, &00
        =       &B5, &00, &00, &03, &00, &03, &00, &03
        =       &2C, &00, &3C, &00, &00, &03, &00, &03
        =       &09, &02, &D7, &00, &00, &03, &00, &03
        =       &2E, &00, &3E, &00, &00, &03, &00, &03
        =       &03, &02, &F7, &00, &00, &03, &00, &03
        =       &2F, &00, &3F, &00, &00, &03, &00, &03
        =       &04, &02, &00, &03, &00, &03, &00, &03
        =       &20, &00, &20, &00, &20, &00, &20, &00
        =       &A0, &00, &A0, &00, &00, &03, &00, &03

ProcessK9TopBitSet      DoTopBit        9

        DoAccent        9, Latin3

        OutputAccentTable_Latin3

PadK9NumTran
        =       &2F, &2A, &23, &37, &38, &39, &2D, &34
        =       &35, &36, &2B, &31, &32, &33, &0D, &30
        =       &2E
PadK9CurTran
        =       &2F, &2A, &23, &1E, &8F, &9F, &2D, &8C
        =       &FF, &8D, &2B, &8B, &8E, &9E, &0D, &CD
        =       &7F
        ALIGN

        END