; > Source.KeyStruct

KeyStructureTable
        DCD     Country_UK,          KeyStruct1-KeyStructureTable

        MACRO
        GetStruct $name, $no
 [ Keyboard = "Scandinavian"
   [ "$name" = "Denmark" :LOR: "$name" = "Norway" :LOR: "$name" = "Sweden" :LOR: "$name" = "Finland"
        DCD     Country_$name,       KeyStruct$no-KeyStructureTable
   ]
 |
 [ Keyboard = "$name" :LOR: Keyboard = "All"
        DCD     Country_$name,       KeyStruct$no-KeyStructureTable
 ]
 ]
        MEND

        GetStruct Italy,       4
        GetStruct Spain,       5
        GetStruct France,      6
        GetStruct Germany,     7
        GetStruct Esperanto,   9
        GetStruct Greece,      10
        GetStruct Sweden,      11
        GetStruct Finland,     11
        GetStruct Denmark,     14
        GetStruct Norway,      15
        GetStruct Iceland,     16
        ; GetStruct Canada,      19
        GetStruct Turkey,      20
        GetStruct Russia,      24
        ; GetStruct Russia2,     25
        GetStruct Israel,      26
        GetStruct LatinAm,     28
        GetStruct Belgium,     31
        GetStruct Japan,       32
        GetStruct Netherlands, 34
        GetStruct Switzerland, 35
        GetStruct Wales,       36
        GetStruct Wales2,      36
        GetStruct USA,         48
        GetStruct DvorakUK,    70
        GetStruct DvorakUSA,   71

        DCD       -1,KeyStruct1-KeyStructureTable

        END