-- идея sToLp: в начале комстроки цифру/знак по кругу менять на префиксы плагинов -- реализация John Doe Tue 14 Oct, 2014 18:17 http://forum.farmanager.com/viewtopic.php?p=124279#p124279 -- Неторопливое размеренное последовательное нажатие клавиши на цифровой линейке клавиатуры (1 - 0, - = \) -- приводит к вводу в комстроку назначенных на клавишу префиксов, по кругу сменяющих друг друга. -- Клавиши применяются также и с модифиатором Shift -- Для ввода в начало комстроки двух соответствующих цифр/знаков надо быстро дважды подряд нажать соответствующую клавишу/шорткат. -- контрольные суммы вычисляются плагином Integrity Checker посредством макроса: -- buniak_a_h Sun 03 Feb 2019 16:02 -- https://forum.farmanager.com/viewtopic.php?p=152951#p152951 local prev = 0 -- переменная prev используется в condition макросов local prefixes = {"2", "crc:", "crc32:", "md5:", "sha1:", "sha-256:", "sha-512:", "sha3-512:", "whirlpool:", } local cycle = {} for i,v in ipairs(prefixes) do cycle[v] = prefixes[i+1] or prefixes[1] end Macro { --в начале комстроки цифру 2 по кругу менять на префиксы подсчета контрольной суммы description="по кругу [2] - [crc:] - [crc32:] - [md5:] - [sha1:] - [sha-256:] - [sha-512:] - [sha3-512:] - [whirlpool:] - [2]"; area="Shell"; key="2"; uid="C24F0734-FD8D-41F9-9C49-6598D6CAF599"; condition=function() local time = Far.UpTime; delta = time-prev; prev = time return delta>300 and CmdLine.Value~=" "; end; action=function() replace = cycle[CmdLine.Value] if replace then Keys"CtrlY" print(replace) else Keys"AKey" end end; }