# ========== Messages ==========

def "Plural forms:"
(cat "Облици множине:")

def "\"We have %1 train(s) and %2 ship(s).\""
(cat "„Имамо " %1 " " (plural %1 "воз" "воза" "возова") " и "
               %2 " " (plural %2 "брод" "брода" "бродова") ".“")

def "Transforming verb to noun forms:"
(cat "Претварање глаголских у именичке облике:")

def "\"Undo %1\""
(cat "„Поништи " (action-to-noun-acu %1) "“")

def "Backreferencing:"
(cat "Повратно референцирање:")

def "\"Available filters\""
(cat "„Доступни филтери“")

def "\"Available actions\""
(cat "„Доступне акције“")

def "\"Make new\""
(cat "„Направи " (gender-new-acu %0-1) "“")
# %0-1 means parameter 0 (which is message in english itself) of 1st message
# previosly called.

## Alternative form, you can put arguments *inside* strings, if you don't need
## to modify them.
#def "\"We have %1 train(s) and %2 ship(s).\""
#(cat "„Имамо %1 " (plural %1 "воз" "воза" "возова")
#     " и %2 " (plural %2 "брод" "брода" "бродова") ".“")

# ========== Functions ==========

defv plural
(sel %1
     "-11" %4
     "-12" %4
     "-13" %4
     "-14" %4
     "-1"  %2
     "-2"  %3
     "-3"  %3
     "-4"  %3
     ""    %4)

defv action-to-noun-acu
(sel %1
     "Delete" "брисање"
     "Cut" "исецање"
     "Copy" "копирање"
)

defv gender-new-acu
(sel %1
     "-action-" "нову"
     "-filter-" "нови")