AUTOLISP: Building a horizontal chain of dimensions

Sold -1
Refunds -1
Good feedbacks -1
Bad feedbacks -1

The program is designed to build a horizontal chain of sizes in RUSSIAN versions of autocad 2013 ... 2017 and later.
The program asks to enter a base point, location of the dimension chain text height, length and width of the arrows, and then asks you to pick points for dimensioning.
As a result, a dimension chain is constructed based on the specified points.
Sepgor file.place the lsp with the program in a separate folder after the purchase, for example E:\LSP.
Go to the menu (Tools Настройка settingsFilesTrusted locations ) and add the path to this folder E:\LSP. Then go to the menu
(Service Aut AutuLispApplications) and in the autoload group, click the APPLICATIONS button and add the sepgor file there.lsp for automatic loading.
To assign a separate button
go to Tools _ Customize _ Interface and click the "Create a new command" button. Enter the name of the command and its description, such as "Horizontal dimension chain".
Enter the name of the _ sepgor function in the macro line.
The new "Horizontal dimension chain" command should appear in the list at the bottom left.
Drag it with the right mouse button to the desired panel in the "tree" of the neighboring window at the top and click OK.