From 66c51b0e714fa8a1c80784108191270babc8525e Mon Sep 17 00:00:00 2001 From: unwox Date: Sun, 31 Aug 2025 17:51:57 +0600 Subject: implement shop --- dicts.fnl | 22 ++++++++++++++++++++++ 1 file changed, 22 insertions(+) create mode 100644 dicts.fnl (limited to 'dicts.fnl') diff --git a/dicts.fnl b/dicts.fnl new file mode 100644 index 0000000..d7c72b6 --- /dev/null +++ b/dicts.fnl @@ -0,0 +1,22 @@ +(local tea-type + [{:value "white" :label "Белый"} + {:value "dark-oolong" :label "Темный улун"} + {:value "light-oolong" :label "Светлый улун"} + {:value "red" :label "Красный"} + {:value "green" :label "Зеленый"} + {:value "shu-puerh" :label "Шу пуэр"} + {:value "sheng-puerh" :label "Шэн пуэр"}]) + +(local tea-packaging + [{:value "loose" :label "Россыпь"} + {:value "piece" :label "Штучный товар"} + {:value "pieces" :label "Разлом"}]) + +(fn label [dict value] + (var result nil) + (each [_ item (ipairs dict) &until result] + (when (= item.value value) + (set result item.label))) + result) + +{: tea-type : tea-packaging : label} -- cgit v1.2.3