{"id":470742,"date":"2025-08-14T15:00:38","date_gmt":"2025-08-14T15:00:38","guid":{"rendered":"http:\/\/savepearlharbor.com\/?p=470742"},"modified":"-0001-11-30T00:00:00","modified_gmt":"-0001-11-29T21:00:00","slug":"","status":"publish","type":"post","link":"https:\/\/savepearlharbor.com\/?p=470742","title":{"rendered":"GIMP Script-Fu \u041e\u041e\u041f. \u0412\u0435\u043a\u0442\u043e\u0440\u044b<\/span>"},"content":{"rendered":"
<\/div>\n
\n
\n
\n
\n

\u0411\u0438\u0431\u043b\u0438\u043e\u0442\u0435\u043a\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u0439 \u043a Script-fu<\/a><\/p>\n

\u0412\u0432\u0435\u0434\u0435\u043d\u0438\u0435<\/h2>\n

\u041d\u0435\u0442 \u0432 \u044d\u0442\u043e\u0439 \u0441\u0442\u0430\u0442\u044c\u0435 \u044f \u043d\u0435 \u0431\u0443\u0434\u0443 \u0440\u0430\u0441\u0441\u043a\u0430\u0437\u044b\u0432\u0430\u0442\u044c \u043e \u043a\u043b\u0430\u0441\u0441\u0430\u0445 «\u0412\u0435\u043a\u0442\u043e\u0440», \u0442\u0435\u043c\u043e\u0439 \u043c\u043e\u0435\u0433\u043e \u0440\u0430\u0441\u0441\u043c\u043e\u0442\u0440\u0435\u043d\u0438\u044f \u0431\u0443\u0434\u0435\u0442 \u0433\u0440\u0430\u0444\u0438\u0447\u0435\u0441\u043a\u0438\u0439 \u044d\u043b\u0435\u043c\u0435\u043d\u0442 \u0438\u0437\u043e\u0431\u0440\u0430\u0436\u0435\u043d\u0438\u044f \u0432 GIMP, \u043f\u043e\u0434 \u043d\u0430\u0437\u0432\u0430\u043d\u0438\u0435\u043c vector<\/code> \u0438 \u0435\u0433\u043e \u0441\u043e\u0441\u0442\u0430\u0432\u043b\u044f\u044e\u0449\u0438\u0435 \u043f\u043e\u0434 \u043d\u0430\u0437\u0432\u0430\u043d\u0438\u0435\u043c stroke<\/code>.<\/p>\n

\u041a\u043e\u0433\u0434\u0430 \u0442\u043e, \u043e\u0447\u0435\u043d\u044c \u0434\u0430\u0432\u043d\u043e, \u0441\u0447\u0438\u0442\u0430\u043b\u043e\u0441\u044c \u0447\u0442\u043e \u0433\u0440\u0430\u0444\u0438\u0447\u0435\u0441\u043a\u0438\u0435 \u0440\u0435\u0434\u0430\u043a\u0442\u043e\u0440\u044b \u0434\u0435\u043b\u044f\u0442\u0441\u044f \u043d\u0430 \u0440\u0430\u0441\u0442\u0440\u043e\u0432\u044b\u0435 \u0438 \u0432\u0435\u043a\u0442\u043e\u0440\u043d\u044b\u0435. \u041a \u0432\u0435\u043a\u0442\u043e\u0440\u043d\u044b\u043c \u043e\u0442\u043d\u043e\u0441\u0438\u043b\u0438\u0441\u044c Coreldraw, Adobe Illustrator, Inkscape \u0438 \u0440\u0430\u0431\u043e\u0442\u0430\u043b\u0438 \u043e\u043d\u0438 \u043d\u0435 \u0441 \u043e\u0442\u0434\u0435\u043b\u044c\u043d\u044b\u043c\u0438 \u043f\u0438\u043a\u0441\u0435\u043b\u0430\u043c\u0438 \u0438\u0437\u043e\u0431\u0440\u0430\u0436\u0435\u043d\u0438\u0439, \u0430 \u0441 \u044d\u043b\u0435\u043c\u0435\u043d\u0442\u0430\u043c\u0438 \u043d\u0430\u0437\u044b\u0432\u0430\u0435\u043c\u044b\u043c\u0438 \u0432\u0435\u043a\u0442\u043e\u0440\u0430\u043c\u0438, \u043a\u043e\u0442\u043e\u0440\u044b\u0435 \u043c\u043e\u0436\u043d\u043e \u043f\u0440\u0435\u0432\u0440\u0430\u0449\u0430\u0442\u044c, \u0441 \u043f\u043e\u043c\u043e\u0449\u044c\u044e \u043c\u0430\u043d\u0438\u043f\u0443\u043b\u044f\u0446\u0438\u0439 \u0432 \u0434\u0443\u0433\u0438 \u0440\u0430\u0437\u043b\u0438\u0447\u043d\u043e\u0439 \u0444\u043e\u0440\u043c\u044b, \u043d\u0430\u0437\u044b\u0432\u0430\u0435\u043c\u044b\u043c\u0438 \u043a\u0440\u0438\u0432\u044b\u043c\u0438 \u0411\u0435\u0437\u044c\u0435<\/strong>. \u041a \u0440\u0430\u0441\u0442\u0440\u043e\u0432\u044b\u043c \u0436\u0435 \u043e\u0442\u043d\u043e\u0441\u0438\u043b\u0438\u0441\u044c Photoshop, Paint \u0438 \u0442\u043e\u0442 \u0436\u0435 GIMP. \u0412 \u044d\u0442\u0438\u0445 \u0440\u0435\u0434\u0430\u043a\u0442\u043e\u0440\u0430\u0445 \u043e\u0442\u0441\u0443\u0442\u0441\u0442\u0432\u043e\u0432\u0430\u043b\u0430 \u043a\u0430\u043a\u0430\u044f \u043b\u0438\u0431\u043e \u0433\u0435\u043e\u043c\u0435\u0442\u0440\u0438\u044f \u0438 \u0438\u0437\u043e\u0431\u0440\u0430\u0436\u0435\u043d\u0438\u044f \u043f\u0440\u0435\u0434\u0441\u0442\u0430\u0432\u043b\u044f\u043b\u0438 \u0441\u043e\u0431\u043e\u0439 \u043d\u0430\u0431\u043e\u0440\u044b \u043e\u0442\u0434\u0435\u043b\u044c\u043d\u044b\u0445 \u0442\u043e\u0447\u0435\u043a — \u043f\u0438\u043a\u0441\u0435\u043b\u043e\u0432. \u041d\u043e \u0432\u0440\u0435\u043c\u044f \u043d\u0435 \u0441\u0442\u043e\u0438\u0442 \u043d\u0430 \u043c\u0435\u0441\u0442\u0435 \u0438 \u044d\u043b\u0435\u043c\u0435\u043d\u0442\u044b \u0440\u0430\u0441\u0442\u0440\u043e\u0432\u043e\u0433\u043e \u0440\u0435\u0434\u0430\u043a\u0442\u0438\u0440\u043e\u0432\u0430\u043d\u0438\u044f \u043f\u0440\u043e\u043d\u0438\u043a\u0430\u043b\u0438 \u0432 \u0440\u0435\u0434\u0430\u043a\u0442\u043e\u0440\u044b, \u043a\u043e\u0442\u043e\u0440\u044b\u0435 \u0441\u0447\u0438\u0442\u0430\u043b\u0438\u0441\u044c \u0432\u0435\u043a\u0442\u043e\u0440\u043d\u044b\u043c\u0438 \u0438 \u043d\u0430\u043e\u0431\u043e\u0440\u043e\u0442, \u044d\u043b\u0435\u043c\u0435\u043d\u0442\u044b \u0432\u0435\u043a\u0442\u043e\u0440\u043d\u044b\u0445 \u0440\u0435\u0434\u0430\u043a\u0442\u043e\u0440\u043e\u0432 \u043f\u0435\u0440\u0435\u043d\u043e\u0441\u0438\u043b\u0438\u0441\u044c \u0432 \u0440\u0430\u0441\u0442\u0440\u043e\u0432\u044b\u0435 \u0433\u0440\u0430\u0444\u0438\u0447\u0435\u0441\u043a\u0438\u0435 \u0440\u0435\u0434\u0430\u043a\u0442\u043e\u0440\u044b. \u041f\u0440\u0438\u043c\u0435\u0440\u043e\u043c \u0442\u043e\u043c\u0443 \u044f\u0432\u043b\u044f\u0435\u0442\u0441\u044f GIMP.<\/p>\n

\u041f\u0440\u0435\u0434\u0441\u0442\u0430\u0432\u043b\u0435\u043d\u0438\u0435 \u043e \u0442\u043e\u043c, \u0447\u0442\u043e GIMP \u0442\u043e \u0440\u0430\u0441\u0442\u0440\u043e\u0432\u044b\u0439 \u0433\u0440\u0430\u0444\u0438\u0447\u0435\u0441\u043a\u0438\u0439 \u0440\u0435\u0434\u0430\u043a\u0442\u043e\u0440 \u0434\u0430\u0432\u043d\u043e \u0443\u0436\u0435 \u0443\u0441\u0442\u0430\u0440\u0435\u043b\u043e. \u0422\u0435\u043a\u0441\u0442\u043e\u0432\u044b\u0439 \u0441\u043b\u043e\u0439, \u0434\u0430 \u0438 \u0432\u0441\u044f \u0440\u0430\u0431\u043e\u0442\u0430 \u0441\u043e \u0448\u0440\u0438\u0444\u0442\u0430\u043c\u0438 \u0432 GIMP\u0435 \u044d\u0442\u043e \u0440\u0430\u0431\u043e\u0442\u0430 \u0441 \u0432\u0435\u043a\u0442\u043e\u0440\u043d\u044b\u043c\u0438 \u043e\u0431\u044a\u0435\u043a\u0442\u0430\u043c\u0438 \u043f\u0440\u0435\u0434\u0441\u0442\u0430\u0432\u043b\u044f\u044e\u0449\u0438\u043c\u0438 \u0441\u043e\u0431\u043e\u0439 \u043a\u0440\u0438\u0432\u044b\u0435 \u0411\u0435\u0437\u044c\u0435. \u0422\u0430\u043a\u0438\u043c \u043e\u0431\u0440\u0430\u0437\u043e\u043c \u0446\u0435\u043b\u044b\u0435 \u0442\u0435\u043a\u0441\u0442\u043e\u0432\u044b\u0435 \u0441\u043b\u043e\u0438 \u0432 GIMP \u043f\u0440\u0435\u0434\u0441\u0442\u0430\u0432\u043b\u044f\u044e\u0442 \u0441\u043e\u0431\u043e\u0439 \u0432\u0435\u043a\u0442\u043e\u0440\u043d\u044b\u0435 \u043e\u0431\u044a\u0435\u043a\u0442\u044b. \u041f\u043e \u043c\u0438\u043c\u043e \u043e\u0442\u0434\u0435\u043b\u044c\u043d\u044b\u0445 \u0442\u0435\u043a\u0441\u0442\u043e\u0432\u044b\u0445 \u0441\u043b\u043e\u0451\u0432, \u0432 \u043a\u0430\u0436\u0434\u043e\u043c \u0438\u0437\u043e\u0431\u0440\u0430\u0436\u0435\u043d\u0438\u0438 GIMP \u043c\u043e\u0436\u043d\u043e \u0441\u043e\u0437\u0434\u0430\u0432\u0430\u0442\u044c \u043e\u0442\u0434\u0435\u043b\u044c\u043d\u044b\u0435 \u0441\u0442\u0440\u043e\u043a\u0438 \u0438 \u0432\u0435\u043a\u0442\u043e\u0440\u0430. \u0412\u043e\u0442 \u0441 \u043d\u0438\u043c\u0438 \u043c\u044b \u0441\u0435\u0433\u043e\u0434\u043d\u044f \u0438 \u0440\u0430\u0437\u0431\u0435\u0440\u0451\u043c\u0441\u044f.<\/p>\n

\u0412\u0435\u043a\u0442\u043e\u0440\u044b \u0438 \u0441\u0442\u0440\u043e\u043a\u0438.<\/h2>\n

Stroke<\/code> \u0438\u043b\u0438 \u043f\u043e \u043f\u0440\u043e\u0441\u0442\u043e\u043c\u0443 \u0441\u0442\u0440\u043e\u043a\u0430(\u0448\u0442\u0440\u0438\u0445), \u044d\u0442\u043e \u043a\u043e\u043d\u0442\u0443\u0440, \u0441\u043e\u0441\u0442\u043e\u044f\u0449\u0438\u0439 \u0438\u0437 \u043e\u0442\u0440\u0435\u0437\u043a\u043e\u0432 \u0411\u0435\u0437\u044c\u0435, \u043a\u043e\u0442\u043e\u0440\u044b\u0435 \u0432\u044b\u0440\u0430\u0436\u0430\u044e\u0442\u0441\u044f \u0443\u0437\u043b\u0430\u043c\u0438, \u0433\u0434\u0435 \u043a\u0430\u0436\u0434\u044b\u0439 \u0443\u0437\u0435\u043b \u043f\u0440\u0435\u0434\u0441\u0442\u0430\u0432\u043b\u044f\u0435\u0442 \u0441\u043e\u0431\u043e\u0439 \u0442\u0440\u0438 \u0442\u043e\u0447\u043a\u0438. \u0426\u0435\u043d\u0442\u0440\u0430\u043b\u044c\u043d\u0430\u044f \u0442\u043e\u0447\u043a\u0430 \u044d\u0442\u043e \u043d\u0430\u0447\u0430\u043b\u043e \u0438 \u043a\u043e\u043d\u0435\u0446 \u043e\u0442\u0440\u0435\u0437\u043a\u0430 \u043a\u043e\u043d\u0442\u0443\u0440\u0430, \u0442\u043e\u0447\u043a\u0430 \u043e\u0442\u043d\u043e\u0441\u044f\u0449\u0430\u044f\u0441\u044f \u043a \u043f\u0440\u0435\u0434\u044b\u0434\u0443\u0449\u0435\u043c\u0443 \u043e\u0442\u0440\u0435\u0437\u043a\u0443, \u044d\u0442\u043e «\u0440\u044b\u0447\u0430\u0433» \u043f\u043e\u0437\u0432\u043e\u043b\u044f\u044e\u0449\u0438\u0439 \u043c\u0430\u043d\u0438\u043f\u0443\u043b\u0438\u0440\u043e\u0432\u0430\u0442\u044c \u043f\u0440\u0435\u0434\u044b\u0434\u0443\u0449\u0438\u043c \u043e\u0442\u0440\u0435\u0437\u043a\u043e\u043c \u0431\u0435\u0437\u044c\u0435, \u0442\u043e\u0447\u043a\u0430 \u043e\u0442\u043d\u043e\u0441\u044f\u0449\u0430\u044f\u0441\u044f \u043a \u0441\u043b\u0435\u0434\u0443\u044e\u0449\u0435\u043c\u0443 \u043e\u0442\u0440\u0435\u0437\u043a\u0443. \u0422\u0430\u043a \u0436\u0435 \u0434\u043b\u044f \u0441\u0442\u0440\u043e\u043a\u0438 \u0441\u0443\u0449\u0435\u0441\u0442\u0432\u0443\u0435\u0442 \u0444\u043b\u0430\u0433 \u043e\u0431\u043e\u0437\u043d\u0430\u0447\u0430\u044e\u0449\u0438\u0439 \u0437\u0430\u043c\u043a\u043d\u0443\u0442\u044b\u0435 \u0441\u0442\u0440\u043e\u043a\u0438(\u043d\u0430\u0447\u0430\u043b\u043e \u0441\u043e\u0435\u0434\u0438\u043d\u044f\u0435\u0442\u0441\u044f \u0441 \u043a\u043e\u043d\u0446\u043e\u043c \u043a\u043e\u043d\u0442\u0443\u0440\u0430). \u041d\u0430\u0431\u043e\u0440 \u0442\u0430\u043a\u0438\u0445 \u0441\u0442\u0440\u043e\u043a (stroke<\/code>) \u043e\u0431\u0440\u0430\u0437\u0443\u0435\u0442 \u0432\u0435\u043a\u0442\u043e\u0440(vector<\/code>).<\/p>\n

\u0421\u043e\u0437\u0434\u0430\u043d\u0438\u0435 \u0438 \u0440\u0435\u0434\u0430\u043a\u0442\u0438\u0440\u043e\u0432\u0430\u043d\u0438\u0435 \u0432\u0435\u043a\u0442\u043e\u0440\u043e\u0432 \u0432 gimp<\/h2>\n

\u0412\u044b\u0431\u0438\u0440\u0430\u0435\u043c \u0438\u043d\u0441\u0442\u0440\u0443\u043c\u0435\u043d\u0442 «\u041a\u043e\u043d\u0442\u0443\u0440\u044b» \u0432 \u0440\u0435\u0436\u0438\u043c\u0435 \u0441\u043e\u0437\u0434\u0430\u043d\u0438\u044f<\/strong><\/code>.<\/strong> \u0418 \u043d\u0430\u0447\u0438\u043d\u0430\u0435\u043c \u043e\u0442\u043c\u0435\u0447\u0430\u0442\u044c \u0442\u043e\u0447\u043a\u0438 \u043a\u043e\u043d\u0442\u0443\u0440\u0430, \u0441\u043e\u0437\u0434\u0430\u0432\u0430\u044f \u043f\u043e\u0441\u043b\u0435\u0434\u043e\u0432\u0430\u0442\u0435\u043b\u044c\u043d\u043e\u0441\u0442\u044c \u0442\u043e\u0447\u0435\u043a. \u0414\u0430\u043b\u0435\u0435 \u043c\u043e\u0436\u043d\u043e \u0432 \u0442\u043e\u043c \u0436\u0435 \u0440\u0435\u0436\u0438\u043c\u0435 \u0432\u044b\u0434\u0435\u043b\u044f\u0442\u044c \u043c\u044b\u0448\u043a\u043e\u0439 \u0443\u0436\u0435 \u0441\u043e\u0437\u0434\u0430\u043d\u043d\u0443\u044e \u0442\u043e\u0447\u043a\u0443 \u0438 \u043f\u0435\u0440\u0435\u043c\u0435\u0449\u0430\u0442\u044c \u0435\u0451, \u0438\u0437\u043c\u0435\u043d\u044f\u044f \u043a\u043e\u043d\u0442\u0443\u0440. \u0414\u0435\u043b\u0430\u044f \u0442\u0435\u043a\u0443\u0449\u0435\u0439 \u043a\u0440\u0430\u0439\u043d\u044e\u044e \u0442\u043e\u0447\u043a\u0443 \u043c\u043e\u0436\u043d\u043e \u043f\u0440\u043e\u0434\u043e\u043b\u0436\u0430\u0442\u044c \u0441\u043e\u0437\u0434\u0430\u043d\u0438\u0435 \u0442\u0435\u043a\u0443\u0449\u0435\u0433\u043e \u043a\u043e\u043d\u0442\u0443\u0440\u0430. \u0410 \u043f\u0440\u0438 \u0432\u044b\u0434\u0435\u043b\u0435\u043d\u043d\u043e\u0439 \u0442\u043e\u0447\u043a\u0435 \u0432 \u0441\u0435\u0440\u0435\u0434\u0438\u043d\u0435 \u043a\u043e\u043d\u0442\u0443\u0440\u0430, \u043c\u043e\u0436\u043d\u043e \u043d\u0430\u0447\u0430\u0442\u044c \u0441\u043e\u0437\u0434\u0430\u043d\u0438\u0435 \u043d\u043e\u0432\u043e\u0433\u043e \u043a\u043e\u043d\u0442\u0443\u0440\u0430. \u041d\u0430\u0436\u0430\u0432 \u0432 \u044d\u0442\u043e\u043c \u0440\u0435\u0436\u0438\u043c\u0435 «Ctrl» \u0438 \u0432\u044b\u0431\u0440\u0430\u0432 \u043f\u0440\u043e\u0442\u0438\u0432\u043e\u043f\u043e\u043b\u043e\u0436\u043d\u044b\u0439 \u043a\u043e\u043d\u0435\u0446 \u043a\u043e\u043d\u0442\u0443\u0440\u0430 \u043c\u044b \u043c\u043e\u0436\u0435\u043c \u0437\u0430\u043c\u043a\u043d\u0443\u0442\u044c \u043a\u043e\u043d\u0442\u0443\u0440.<\/p>\n

\u041d\u0430\u0445\u043e\u0434\u044f\u0441\u044c \u0432 \u0440\u0435\u0436\u0438\u043c\u0435 \u043f\u0440\u0430\u0432\u043a\u0430<\/strong><\/code> \u043c\u043e\u0436\u043d\u043e \u0449\u0451\u043b\u043a\u043d\u0443\u0442\u044c \u043d\u0430 \u043f\u0440\u043e\u0442\u0438\u0432\u043e\u043f\u043e\u043b\u043e\u0436\u043d\u043e\u043c \u043a\u043e\u043d\u0446\u0435 \u043a\u043e\u043d\u0442\u0443\u0440\u0430 \u0438 \u0437\u0430\u043c\u043a\u043d\u0443\u0442\u044c \u043a\u043e\u043d\u0442\u0443\u0440. \u0422\u0430\u043a\u0436\u0435 \u0432 \u0440\u0435\u0436\u0438\u043c\u0435 \u043f\u0440\u0430\u0432\u043a\u0438<\/code> \u043c\u043e\u0436\u043d\u043e \u0449\u0451\u043b\u043a\u043d\u0443\u0442\u044c \u043d\u0430 \u043a\u043e\u043d\u0446\u0435 \u0434\u0440\u0443\u0433\u043e\u0433\u043e \u043a\u043e\u043d\u0442\u0443\u0440\u0430 \u0438 \u043e\u0431\u044a\u0435\u0434\u0438\u043d\u0438\u0442\u044c \u043a\u043e\u043d\u0442\u0443\u0440\u044b. \u0412 \u0440\u0435\u0436\u0438\u043c\u0435 \u041f\u0440\u0430\u0432\u043a\u0430<\/code> \u043c\u043e\u0436\u043d\u043e \u0438\u0437\u043c\u0435\u043d\u0438\u0442\u044c \u0444\u043e\u0440\u043c\u0443 \u043a\u043e\u043d\u0442\u0443\u0440\u0430. \u0421 \u043a\u0430\u0436\u0434\u043e\u0439 \u0442\u043e\u0447\u043a\u043e\u0439 \u043a\u043e\u043d\u0442\u0443\u0440\u0430 \u0441\u0432\u044f\u0437\u0430\u043d\u044b \u0434\u0432\u0435 \u0442\u043e\u0447\u043a\u0438 \u0440\u044b\u0447\u0430\u0433\u0430, \u043e\u0434\u0438\u043d \u0438\u0437 \u043a\u043e\u0442\u043e\u0440\u044b\u0445 (\u043f\u0435\u0440\u0432\u044b\u0439 \u0432 \u0441\u0442\u0440\u0443\u043a\u0442\u0443\u0440\u0435 \u0434\u0430\u043d\u043d\u044b\u0445) \u043e\u0442\u0432\u0435\u0447\u0430\u0435\u0442 \u0437\u0430 \u0444\u043e\u0440\u043c\u0443 \u043f\u0440\u0435\u0434\u0448\u0435\u0441\u0442\u0432\u0443\u044e\u0449\u0435\u0439 \u043b\u0438\u043d\u0438\u0438, \u0434\u0440\u0443\u0433\u043e\u0439 (\u043f\u043e\u0441\u043b\u0435\u0434\u043d\u0438\u0439 \u0432 \u0441\u0442\u0440\u0443\u043a\u0442\u0443\u0440\u0435 \u0434\u0430\u043d\u043d\u044b\u0445) \u0437\u0430 \u043f\u043e\u0441\u043b\u0435\u0434\u0443\u044e\u0449\u0443\u044e \u043b\u0438\u043d\u0438\u044e. \u0422\u0430\u043a\u0438\u043c \u043e\u0431\u0440\u0430\u0437\u043e\u043c \u0437\u0430 \u043a\u0430\u0436\u0434\u0443\u044e \u043b\u0438\u043d\u0438\u044e \u043e\u0442\u0432\u0435\u0442\u0441\u0442\u0432\u0435\u043d\u043d\u044b \u0434\u0432\u0435 \u0442\u043e\u0447\u043a\u0438, \u043d\u0430\u0447\u0430\u043b\u043e \u0438 \u043a\u043e\u043d\u0435\u0446, \u0438 \u0434\u0432\u0430 \u0440\u044b\u0447\u0430\u0433\u0430,\u0442.\u0435 \u0432\u0441\u0435\u0433\u043e \u0447\u0435\u0442\u044b\u0440\u0435 \u0442\u043e\u0447\u043a\u0438. \u041e\u043d\u0438 \u043e\u043f\u0440\u0435\u0434\u0435\u043b\u044f\u044e\u0442 \u0444\u043e\u0440\u043c\u0443 \u043a\u0443\u0431\u0438\u0447\u0435\u0441\u043a\u043e\u0439 \u043a\u0440\u0438\u0432\u043e\u0439 \u0411\u0435\u0437\u044c\u0435.<\/p>\n

\u0412 \u0440\u0435\u0436\u0438\u043c\u0435 \u041f\u0440\u0430\u0432\u043a\u0430<\/code> \u043d\u0430\u0436\u0430\u0432 \u043a\u043b\u0430\u0432\u0438\u0448\u0443 «Shift» \u043c\u043e\u0436\u043d\u043e \u0443\u0434\u0430\u043b\u044f\u0442\u044c \u043b\u0438\u0431\u043e \u0441\u043e\u0435\u0434\u0438\u043d\u0435\u043d\u0438\u0435 \u043c\u0435\u0436\u0434\u0443 \u0442\u043e\u0447\u043a\u0430\u043c\u0438, \u043b\u0438\u0431\u043e \u0441\u0430\u043c\u0438 \u0442\u043e\u0447\u043a\u0438, \u0441 \u043f\u043e\u043c\u043e\u0449\u044c\u044e \u0443\u043a\u0430\u0437\u0430\u0442\u0435\u043b\u044f \u043c\u044b\u0448\u0438.<\/p>\n

\u0422\u0430\u043a \u0436\u0435 \u0440\u0435\u0436\u0438\u043c\u044b \u0443\u043f\u0440\u0430\u0432\u043b\u044f\u044e\u0442\u0441\u044f \u043a\u043b\u0430\u0432\u0438\u0448\u0430\u043c\u0438 «Ctrl» — \u043f\u0435\u0440\u0435\u043a\u043b\u044e\u0447\u0430\u0435\u0442 \u0438\u0437 \u0440\u0435\u0436\u0438\u043c\u0430 \u0441\u043e\u0437\u0434\u0430\u043d\u0438\u044f<\/code> \u0432 \u0440\u0435\u0436\u0438\u043c \u041f\u0440\u0430\u0432\u043a\u0430<\/code>. \u0422\u0430\u043a\u0438\u043c \u043e\u0431\u0440\u0430\u0437\u043e\u043c \u043c\u043e\u0436\u043d\u043e \u0443\u0434\u0430\u043b\u044f\u0442\u044c \u0443\u0437\u043b\u044b \u0438\u0437 \u0440\u0435\u0436\u0438\u043c\u0430 \u0421\u043e\u0437\u0434\u0430\u043d\u0438\u044f<\/code> \u043d\u0430\u0436\u0438\u043c\u0430\u044f «Ctrl+Shift».<\/p>\n

\u041f\u043e\u0441\u043b\u0435\u0434\u043d\u0438\u0439 \u0440\u0435\u0436\u0438\u043c \u044d\u0442\u043e \u041f\u0435\u0440\u0435\u043c\u0435\u0449\u0435\u043d\u0438\u0435<\/strong><\/code> \u0438\u043b\u0438 \u043d\u0430\u0436\u0430\u0442\u0438\u0435 \u043a\u043b\u0430\u0432\u0438\u0448\u0438 «Alt». \u041f\u043e\u0437\u0432\u043e\u043b\u044f\u0435\u0442 \u0441\u0445\u0432\u0430\u0442\u0438\u0442\u044c \u043a\u043e\u043d\u0442\u0443\u0440 \u0438 \u043f\u0435\u0440\u0435\u043c\u0435\u0441\u0442\u0438\u0442\u044c \u0435\u0433\u043e \u0432 \u0437\u0430\u0434\u0430\u043d\u043d\u0443\u044e \u043f\u043e\u0437\u0438\u0446\u0438\u044e.<\/p>\n

\u041d\u0430 \u0431\u0430\u0437\u0435 \u043a\u043e\u043d\u0442\u0443\u0440\u0430 \u043c\u043e\u0436\u043d\u043e \u0441\u043e\u0437\u0434\u0430\u0442\u044c \u0432\u044b\u0434\u0435\u043b\u0435\u043d\u0438\u0435 — «\u0412\u044b\u0434\u0435\u043b\u0435\u043d\u0438\u0435 \u0438\u0437 \u043a\u043e\u043d\u0442\u0443\u0440\u0430» . \u041c\u043e\u0436\u043d\u043e \u0437\u0430\u043f\u043e\u043b\u043d\u0438\u0442\u044c \u0446\u0432\u0435\u0442\u043e\u043c \u0444\u0438\u0433\u0443\u0440\u0443 — «\u041e\u0442\u0440\u0430\u0437\u0438\u0442\u044c \u041a\u043e\u043d\u0442\u0443\u0440». \u041c\u043e\u0436\u043d\u043e \u043e\u0431\u0440\u0438\u0441\u043e\u0432\u0430\u0442\u044c \u043b\u0438\u043d\u0438\u044e \u0443\u0441\u0442\u0430\u043d\u043e\u0432\u043b\u0435\u043d\u043d\u044b\u043c \u0446\u0432\u0435\u0442\u043e\u043c \u0438 \u043a\u0438\u0441\u0442\u044c\u044e.<\/p>\n

\u0422\u0430\u043a\u0436\u0435 \u043a\u043e\u043d\u0442\u0443\u0440 \u043c\u043e\u0436\u043d\u043e \u0441\u043e\u0437\u0434\u0430\u0442\u044c \u0438\u0437 \u0432\u044b\u0434\u0435\u043b\u0435\u043d\u0438\u044f, \u0432\u043e \u0432\u043a\u043b\u0430\u0434\u043a\u0435 «\u0412\u044b\u0434\u0435\u043b\u0435\u043d\u0438\u0435» \u043f\u043e\u0441\u043b\u0435\u0434\u043d\u0438\u0439 \u043f\u0443\u043d\u043a\u0442 «\u0412 \u043a\u043e\u043d\u0442\u0443\u0440».<\/p>\n

\u0420\u0430\u0431\u043e\u0442\u0430 \u0441 \u0432\u0435\u043a\u0442\u043e\u0440\u0430\u043c\u0438 \u0438 \u0441\u0442\u0440\u043e\u043a\u0430\u043c\u0438 \u0438\u0437 Script-fu<\/h2>\n
\n\u0421\u043a\u0440\u044b\u0442\u044b\u0439 \u0442\u0435\u043a\u0441\u0442<\/summary>\n
\n
(define path-home (getenv \"HOME\")) (define path-lib (string-append path-home \"\/work\/gimp\/lib\/\")) (define path-work (string-append path-home \"\/work\/gimp\/\")) (load (string-append path-lib \"util.scm\")) (load (string-append path-lib \"defun.scm\")) (load (string-append path-lib \"struct2.scm\")) (load (string-append path-lib \"storage.scm\")) (load (string-append path-lib \"cyclic.scm\")) (load (string-append path-lib \"hashtable3.scm\")) ;;\u0445\u0435\u0448 \u043a\u043e\u0442\u043e\u0440\u044b\u0439 \u043c\u043e\u0436\u0435\u0442 \u0440\u0430\u0431\u043e\u0442\u0430\u0442\u044c \u0441 \u043e\u0431\u044a\u0435\u043a\u0442\u0430\u043c\u0438 \u0432 \u043a\u0430\u0447\u0435\u0441\u0442\u0432\u0435 \u043a\u043b\u044e\u0447\u0435\u0439! (load (string-append path-lib \"sort2.scm\")) (load (string-append path-lib \"tsort.scm\")) ;;(load (string-append path-lib \"cpl-sbcl.scm\")) (load (string-append path-lib \"cpl-mro.scm\")) ;;(load (string-append path-lib \"cpl-topext.scm\")) (load (string-append path-lib \"struct2ext.scm\")) (load (string-append path-lib \"queue.scm\")) (load (string-append path-lib \"obj5.scm\")) (load (string-append path-lib \"obj\/object.scm\"))  (load (string-append path-lib \"point.scm\")) (load (string-append path-lib \"tr2d.scm\")) (load (string-append path-lib \"contour.scm\")) (load (string-append path-lib \"img.scm\")) (load (string-append path-lib \"rect.scm\")) (load (string-append path-lib \"vect.scm\")) (load (string-append path-lib \"brush.scm\")) (load (string-append path-lib \"fig-obj4.scm\"))  (load (string-append path-lib \"bezier.scm\")) (load (string-append path-lib \"fig-obj3bz.scm\")) <\/code><\/pre>\n<\/div>\n<\/details>\n
\u0418\u0437\u043e\u0431\u0440\u0430\u0436\u0435\u043d\u0438\u0435 \u043c\u043e\u0436\u043d\u043e \u0441\u043e\u0437\u0434\u0430\u0442\u044c \u0438\u0437 \u043a\u043e\u043d\u0441\u043e\u043b\u0438 Script-fu.<\/p>\n
(define i1 (create-1-layer-img 640 480)) ;; \u0441\u043e\u0437\u0434\u0430\u0451\u043c \u0445\u043e\u043b\u0441\u0442 \u0434\u043b\u044f \u0440\u0438\u0441\u043e\u0432\u0430\u043d\u0438\u044f. <\/code><\/pre>\n
\u0414\u043e\u043f\u0443\u0441\u0442\u0438\u043c \u043c\u044b \u0441\u043e\u0437\u0434\u0430\u043b\u0438 \u0432\u043e\u0442 \u0442\u0430\u043a\u043e\u0439 \u0432\u043e\u0442 \u043a\u043e\u043d\u0442\u0443\u0440(\u0432\u0435\u043a\u0442\u043e\u0440) \u0441\u043e\u0441\u0442\u043e\u044f\u0449\u0438\u0439 \u0438\u0437 \u0434\u0432\u0443\u0445 \u0441\u0442\u0440\u043e\u043a(stroke).<\/p>\n
\"\u041a\u043e\u043d\u0442\u0443\u0440\u044b<\/p>\n
\u041a\u043e\u043d\u0442\u0443\u0440\u044b \u0431\u0435\u0437\u044c\u0435 \u0432 GIMP<\/figcaption><\/div>\n<\/figure>\n
\u0427\u0442\u043e\u0431\u044b \u043f\u043e\u043b\u0443\u0447\u0438\u0442\u044c \u0441\u043f\u0438\u0441\u043e\u043a \u043a\u043e\u043d\u0442\u0443\u0440\u043e\u0432 \u0411\u0435\u0437\u044c\u0435 \u043d\u0430 \u0438\u0437\u043e\u0431\u0440\u0430\u0436\u0435\u043d\u0438\u0438 \u043c\u043e\u0436\u043d\u043e \u0432\u043e\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u044c\u0441\u044f \u0444\u0443\u043d\u043a\u0446\u0438\u0435\u0439.<\/p>\n
;; \u043f\u043e\u043b\u0443\u0447\u0438\u0442\u044c \u0441\u043f\u0438\u0441\u043e\u043a \u0432\u0435\u043a\u0442\u043e\u0440\u043e\u0432 \u0432 \u0438\u0437\u043e\u0431\u0440\u0430\u0436\u0435\u043d\u0438\u0438 (\u0432\u0441\u0435\u0433\u043e \u043e\u0434\u0438\u043d \u0432\u0435\u043a\u0442\u043e\u0440 \u0441 id = 3) (gimp-image-get-vectors i1) ;;(1 #(3))  ;; \u043f\u043e\u043b\u0443\u0447\u0438\u0442\u044c \u0441\u0442\u0440\u043e\u043a\u0438 \u0438\u0437 \u0432\u0435\u043a\u0442\u043e\u0440\u0430 3, \u0432\u0441\u0435\u0433\u043e 2 \u0441\u0442\u0440\u043e\u043a\u0438 1 \u0438 2 (gimp-vectors-get-strokes 3) ;;(2 #(1 2))  ;;\u043f\u043e\u043b\u0443\u0447\u0438\u0442\u044c \u0442\u043e\u0447\u043a\u0438 \u0438\u0437 \u0441\u0442\u0440\u043e\u043a\u0438 1 \u0432\u0435\u043a\u0442\u043e\u0440\u0430 3 (gimp-vectors-stroke-get-points 3 1) ;; (0 30 #(200.0 12.0 113.0 204.0 79.0 394.0 275.0 335.0 275.0 335.0 275.0 335.0 329,0132792.0 ;;    287,992666.0 393.0 286.0 471,9329514.0 283,5418804.0 493.0 291.0 564.0 326.0 503.0 ;;    196.0 391.0 145.0 391.0 145.0 391.0 145.0) 1)  ;;\u043f\u043e\u043b\u0443\u0447\u0438\u0442\u044c \u0442\u043e\u0447\u043a\u0438 \u0438\u0437 \u0441\u0442\u0440\u043e\u043a\u0438 2 \u0432\u0435\u043a\u0442\u043e\u0440\u0430 3 (gimp-vectors-stroke-get-points 3 2) ;; (0 30 #(443.0 75.0 497.0 71.0 500.0 73.0 570.0 57.0 570.0 57.0 570.0 57.0 598.0 183.0 562.0 ;;         190.0 562.0 190.0 529,6023787.0 203,7115205.0 514.0 196.0 488,5900101.0 ;;         183,4410395.0  475.0 147.0 475.0 147.0 475.0 147.0) 1) <\/code><\/pre>\n
\u0420\u0430\u0431\u043e\u0442\u0430\u0442\u044c \u0441 \u0442\u0430\u043a\u0438\u043c\u0438 \u0434\u0430\u043d\u043d\u044b\u043c\u0438 \u043d\u0435\u0432\u043e\u0437\u043c\u043e\u0436\u043d\u043e \u043f\u043e\u044d\u0442\u043e\u043c\u0443 \u044f \u0441\u043e\u0437\u0434\u0430\u043b \u043f\u0440\u043e\u0441\u0442\u0443\u044e \u0441\u0442\u0440\u0443\u043a\u0442\u0443\u0440\u0443 \u0434\u043b\u044f \u0445\u0440\u0430\u043d\u0435\u043d\u0438\u044f \u0434\u0430\u043d\u043d\u044b\u0445 \u043e \u043a\u043e\u043d\u0442\u0443\u0440\u0435 \u0431\u0435\u0437\u044c\u0435.<\/p>\n
;;\u041a\u043e\u043d\u0442\u0443\u0440 \u0431\u0435\u0437\u044c\u0435. ;; \u043a\u043e\u043d\u0442\u0443\u0440 \u0431\u0435\u0437\u044c\u0435 \u0441\u043e\u0441\u0442\u043e\u044f\u0449\u0438\u0439 \u0438\u0437 \u0442\u043e\u0447\u0435\u043a \u0431\u0435\u0437\u044c\u0435(\u044d\u0442\u043e \u043d\u0435 \u043c\u0430\u0442\u0435\u043c\u0430\u0442\u0438\u0447\u0435\u0441\u043a\u043e\u0435 \u043f\u043e\u043d\u044f\u0442\u0438\u0435) ;; \u0438 \u0444\u043b\u0430\u0433\u0430 \u0437\u0430\u043c\u043a\u043d\u0443\u0442\u043e\u0441\u0442\u0438 \u043a\u043e\u043d\u0442\u0443\u0440\u0430 (struct bezier   (points closed)) ;;\u0442\u0440\u043e\u0439\u043a\u0430 \u0442\u043e\u0447\u0435\u043a \u0438\u0437 \u043a\u043e\u0442\u043e\u0440\u044b\u0445 \u0441\u043e\u0441\u0442\u043e\u0438\u0442 \u043a\u043e\u043d\u0442\u0443\u0440 \u0431\u0435\u0437\u044c\u0435, \u0446\u0435\u043d\u0442\u0440- \u043e\u0434\u043d\u0430 \u0438\u0437 \u0442\u043e\u0447\u0435\u043a \u043a\u043e\u043d\u0442\u0443\u0440\u0430 ;;\u043f\u0440\u0435\u0432- \u0440\u044b\u0447\u0430\u0433 \u0443\u043f\u0440\u0430\u0432\u043b\u044f\u044e\u0449\u0435\u0439 \u0432\u0445\u043e\u0434\u044f\u0449\u0435\u0439 \u043b\u0438\u043d\u0438\u0435\u0439 \u0431\u0435\u0437\u044c\u0435 \u0432 \u043a\u043e\u043d\u0442\u0443\u0440\u0435 ;;\u043d\u0435\u043a\u0441\u0442- \u0440\u044b\u0447\u0430\u043a \u0443\u043f\u0440\u0430\u0432\u043b\u044f\u044e\u0449\u0435\u0439 \u0438\u0441\u0445\u043e\u0434\u044f\u0449\u0435\u0439 \u043b\u0438\u043d\u0438\u0435\u0439 \u0431\u0435\u0437\u044c\u0435 \u0432 \u043a\u043e\u043d\u0442\u0443\u0440\u0435. (struct bezier-p (center prev next)) <\/code><\/pre>\n
\u0414\u043b\u044f \u0440\u0430\u0431\u043e\u0442\u044b \u0441 \u044d\u0442\u043e\u0439 \u0441\u0442\u0440\u0443\u043a\u0442\u0443\u0440\u043e\u0439 \u044f \u043d\u0430\u043f\u0438\u0441\u0430\u043b \u043d\u0435\u0441\u043a\u043e\u043b\u044c\u043a\u043e \u0444\u0443\u043d\u043a\u0446\u0438\u0439, \u0441\u043e\u0437\u0434\u0430\u044e\u0449\u0443\u044e \u0441\u0442\u0440\u0443\u043a\u0442\u0443\u0440\u0443 bezier<\/code> \u043f\u043e \u043f\u043e\u043b\u0443\u0447\u0430\u0435\u043c\u043e\u043c\u0443 \u0438\u0437 GIMP \u043c\u0430\u0441\u0441\u0438\u0432\u0443, \u0438 \u0432\u044b\u043f\u043e\u043b\u043d\u044f\u044e\u0449\u0443\u044e \u043e\u0431\u0440\u0430\u0442\u043d\u043e\u0435 \u043f\u0440\u0435\u043e\u0431\u0440\u0430\u0437\u043e\u0432\u0430\u043d\u0438\u0435, \u043f\u043e \u0438\u043c\u0435\u044e\u0449\u0435\u0439\u0441\u044f \u0441\u0442\u0440\u0443\u043a\u0442\u0443\u0440\u0435 bezier<\/code> \u0441\u043e\u0437\u0434\u0430\u044e\u0449\u0443\u044e \u043c\u0430\u0441\u0441\u0438\u0432 \u0447\u0438\u0441\u0435\u043b, \u043a\u043e\u0442\u043e\u0440\u044b\u0439 \u0444\u0443\u043d\u043a\u0446\u0438\u0438 GIMP \u043c\u043e\u0433\u0443\u0442 \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u044c \u0434\u043b\u044f \u043f\u043e\u0441\u0442\u0440\u043e\u0435\u043d\u0438\u044f \u0441\u0442\u0440\u043e\u043a \u0438 \u0432\u0435\u043a\u0442\u043e\u0440\u043e\u0432 \u043d\u0430 \u0438\u0437\u043e\u0431\u0440\u0430\u0436\u0435\u043d\u0438\u0438.<\/p>\n
;;points \u0434\u043e\u043b\u0436\u0435\u043d \u0431\u044b\u0442\u044c \u0441\u043f\u0438\u0441\u043a\u043e\u043c \u0442\u043e\u0447\u0435\u043a bezier-p (defun (make-bezier points &key (closed 0))    (if (and  (pair? points)              (bezier-p? (car points)))        (bezier! points closed)        #f))  ;;\u0438\u0437 \u043c\u0430\u0441\u0441\u0438\u0432\u0430 \u043f\u043e\u043b\u0443\u0447\u0435\u043d\u043d\u043e\u0433\u043e \u0438\u0437 GIMP \u043f\u043e\u043b\u0443\u0447\u0430\u0435\u043c \u0441\u043f\u0438\u0441\u043e\u043a \u0442\u043e\u0447\u0435\u043a \u0431\u0435\u0437\u044c\u0435; \u0442.\u0435 \u0442\u0440\u043e\u0435\u043a ;;\u0438\u0437 \u043a\u043e\u0442\u043e\u0440\u044b\u0445 \u0441\u043e\u0441\u0442\u043e\u0438\u0442 \u043a\u043e\u043d\u0442\u0443\u0440  (define (parse-stroke-points arr)    (let* ((nums       (vector-length arr))           (num-points (\/ nums 6))           (rez        '()))       (if (exact? num-points)           (for (i 0 (- num-points 1))              (let ((ind (* i 6)))                 (set! rez                    (cons                     (bezier-p!                      (p! (vector-ref arr (+ ind 2)) (vector-ref arr (+ ind 3)))                      (p! (vector-ref arr (+ ind 0)) (vector-ref arr (+ ind 1)))                      (p! (vector-ref arr (+ ind 4)) (vector-ref arr (+ ind 5)))                      ) rez))))           rez)       (reverse rez)))  ;;\u0438\u0437 \u0441\u043f\u0438\u0441\u043a\u0430 \u0442\u043e\u0447\u0435\u043a \u0431\u0435\u0437\u044c\u0435 \u043f\u043e\u043b\u0443\u0447\u0430\u0435\u043c \u043c\u0430\u0441\u0441\u0438\u0432 \u043a\u043e\u043e\u0440\u0434\u0438\u043d\u0430\u0442 \u0434\u043b\u044f \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u043d\u0438\u044f \u0432 \u0444\u0443\u043d\u043a\u0446\u0438\u044f\u0445 ;;\u0433\u0438\u043c\u043f\u0430 \u0434\u043b\u044f \u0440\u0438\u0441\u043e\u0432\u0430\u043d\u0438\u044f strokes - \u043a\u043e\u043d\u0442\u0443\u0440\u043e\u0432 \u0431\u0435\u0437\u044c\u0435. (define (make-stroke-points lst)    (let* ((num-points (length lst))           (nums       (* num-points 6))           (arr        (make-vector nums))           (i          0))       (for-list (el lst)         (vector-set! arr (+ i 0) (p-x (bezier-p-prev el)))         (vector-set! arr (+ i 1) (p-y (bezier-p-prev el)))         (vector-set! arr (+ i 2) (p-x (bezier-p-center el)))         (vector-set! arr (+ i 3) (p-y (bezier-p-center el)))         (vector-set! arr (+ i 4) (p-x (bezier-p-next el)))         (vector-set! arr (+ i 5) (p-y (bezier-p-next el)))         (set! i (+ i 6)))       arr)) <\/code><\/pre>\n
\u0418 \u0442\u0435\u043f\u0435\u0440\u044c \u043c\u043e\u0436\u043d\u043e \u043d\u0430\u043f\u0438\u0441\u0430\u0442\u044c \u0444\u0443\u043d\u043a\u0446\u0438\u0438 \u043f\u043e\u043b\u0443\u0447\u0430\u044e\u0449\u0438\u0435 \u0438\u0437 \u0438\u0437\u043e\u0431\u0440\u0430\u0436\u0435\u043d\u0438\u044f GIMP \u0441\u0442\u0440\u043e\u043a\u0438 \u0438 \u0441\u043e\u0437\u0434\u0430\u044e\u0449\u0438\u0435 \u0441\u0442\u0440\u0443\u043a\u0442\u0443\u0440\u0443 bezier<\/code>. \u042f \u043d\u0430\u043f\u0438\u0441\u0430\u043b \u0432\u0441\u0435\u0433\u043e \u0434\u0432\u0435 \u0444\u0443\u043d\u043a\u0446\u0438\u0438, \u043f\u043e\u043b\u0443\u0447\u0438\u0442\u044c<\/strong> \u0438\u0437 \u0430\u043a\u0442\u0438\u0432\u043d\u043e\u0433\u043e \u0432\u0435\u043a\u0442\u043e\u0440\u0430<\/strong> \u043f\u0435\u0440\u0432\u0443\u044e \u0441\u0442\u0440\u043e\u043a\u0443 \u0438 \u043f\u0440\u043e\u0441\u0442\u043e \u043f\u043e\u043b\u0443\u0447\u0438\u0442\u044c \u0438\u0437 \u0438\u0437\u043e\u0431\u0440\u0430\u0436\u0435\u043d\u0438\u044f \u0437\u0430\u0434\u0430\u043d\u043d\u0443\u044e \u0441\u0442\u0440\u043e\u043a\u0443 \u0437\u0430\u0434\u0430\u043d\u043d\u043e\u0433\u043e \u0432\u0435\u043a\u0442\u043e\u0440\u0430<\/strong>.<\/p>\n
;;\u0441\u043e\u0437\u0434\u0430\u0442\u044c \u043a\u0440\u0438\u0432\u0443\u044e \u0431\u0435\u0437\u044c\u0435 \u0438\u0437 \u0438\u043c\u0435\u044e\u0449\u0435\u0433\u043e\u0441\u044f \u0430\u043a\u0442\u0438\u0432\u043d\u043e\u0433\u043e \u0432\u0435\u043a\u0442\u043e\u0440\u0430 \u043d\u0430 \u0438\u0437\u043e\u0431\u0440\u0430\u0436\u0435\u043d\u0438\u0438 (define (make-bezier-from-img img)    (let* ((v (car (gimp-image-get-active-vectors img)))           (strokes (gimp-vectors-get-strokes v)))       (if (> (car strokes) 0)           (let* ((stroke-id (vector-ref (cadr strokes) 0))                  (points    (gimp-vectors-stroke-get-points v stroke-id)))              (make-bezier (parse-stroke-points (caddr points))                           :closed (cadddr points)))))    )  (define (make-bezier-from-img-by-id img vec stroke-id) (let ((points    (gimp-vectors-stroke-get-points vec stroke-id)))    (make-bezier (parse-stroke-points (caddr points))                           :closed (cadddr points))))  <\/code><\/pre>\n
\u0412\u043e\u0442 \u043a\u0430\u043a \u0438\u043c\u0438 \u043c\u043e\u0436\u043d\u043e \u0432\u043e\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u044c\u0441\u044f:<\/p>\n
(define b1 (make-bezier-from-img i1)) ;;#(bezier (#(bezier-p #(p 113.0 204.0) #(p 200.0 12.0) #(p 79.0 394.0))  ....  (define b2 (make-bezier-from-img-by-id i1 3 2)) ;;#(bezier (#(bezier-p #(p 497.0 71.0) #(p 443.0 75.0) #(p 500.0 73.0)) ;;#(bezier-p #(p 570.0 57.0) #(p 570.0 57.0) #(p 570.0 57.0)) .... <\/code><\/pre>\n
\u0422\u0430\u043a\u0438\u043c \u043e\u0431\u0440\u0430\u0437\u043e\u043c \u0441\u0442\u0440\u043e\u043a\u0438 \u0438 \u0432\u0435\u043a\u0442\u043e\u0440\u0430 GIMP \u043c\u043e\u0433\u0443\u0442 \u0441\u043b\u0443\u0436\u0438\u0442\u044c \u0437\u0430\u043c\u0435\u0447\u0430\u0442\u0435\u043b\u044c\u043d\u044b\u043c \u0441\u0440\u0435\u0434\u0441\u0442\u0432\u043e\u043c \u0412\u0412\u041e\u0414\u0410<\/strong> \u0434\u0430\u043d\u043d\u044b\u0445<\/strong> \u0432 Script-fu \u0438 \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u044c\u0441\u044f \u0432 \u0441\u0430\u043c\u044b\u0445 \u0440\u0430\u0437\u043b\u0438\u0447\u043d\u044b\u0445 \u0446\u0435\u043b\u044f\u0445.<\/p>\n
\u0414\u043b\u044f \u0440\u0430\u0431\u043e\u0442\u044b \u0441 \u0430\u0431\u0441\u0442\u0440\u0430\u043a\u0446\u0438\u0435\u0439 \u043a\u043e\u043d\u0442\u0443\u0440\u0430 \u0441\u043e\u0441\u0442\u043e\u044f\u0449\u0435\u0433\u043e \u0438\u0437 \u043e\u0442\u0440\u0435\u0437\u043a\u043e\u0432 \u0431\u0435\u0437\u044c\u0435 \u044f \u043d\u0430\u043f\u0438\u0441\u0430\u043b \u043d\u0435\u0441\u043a\u043e\u043b\u044c\u043a\u043e \u0444\u0443\u043d\u043a\u0446\u0438\u0439: \u0434\u0432\u0443\u043c\u0435\u0440\u043d\u043e\u0433\u043e \u043f\u0440\u0435\u043e\u0431\u0440\u0430\u0437\u043e\u0432\u0430\u043d\u0438\u044f \u043a\u043e\u043d\u0442\u0443\u0440\u0430 \u0431\u0435\u0437\u044c\u0435 \u0438 \u043e\u043f\u0440\u0435\u0434\u0435\u043b\u0435\u043d\u0438\u044f \u0435\u0433\u043e \u0433\u0430\u0431\u0430\u0440\u0438\u0442\u043e\u0432.<\/p>\n
;;\u0442\u0440\u0430\u043d\u0441\u0444\u043e\u0440\u043c\u0430\u0446\u0438\u044f \u0442\u043e\u0447\u043a\u0438 \u0432\u0445\u043e\u0434\u044f\u0449\u0435\u0439 \u0432 \u043a\u043e\u043d\u0442\u0443\u0440 \u0431\u0435\u0437\u044c\u0435 (define (bezier-p-tr2d bp tr)    (bezier-p!     (p-tr2d (bezier-p-center bp) tr)     (p-tr2d (bezier-p-prev   bp) tr)     (p-tr2d (bezier-p-next   bp) tr)))  ;; \u043f\u0440\u0435\u043e\u0431\u0440\u0430\u0437\u043e\u0432\u0430\u043d\u0438\u0435 \u043a\u043e\u043d\u0442\u0443\u0440\u0430 \u0431\u0435\u0437\u044c\u0435(\u0432\u0441\u0435\u0445 \u0442\u043e\u0447\u0435\u043a \u0441\u043f\u0438\u0441\u043a\u0430) \u0441 \u043f\u043e\u043c\u043e\u0449\u044c\u044e \u043c\u0430\u0442\u0440\u0438\u0446\u044b tr (define (translate-bezier bc tr)    (bezier!     (map      (lambda (p)         (bezier-p-tr2d p tr))      (bezier-points bc))     (bezier-closed bc))) <\/code><\/pre>\n
\u0413\u0430\u0431\u0430\u0440\u0438\u0442\u044b \u0443 \u043a\u0440\u0438\u0432\u043e\u0439 \u0431\u0435\u0437\u044c\u0435 \u043d\u0435\u0447\u0451\u0442\u043a\u0438\u0435 \u0438 \u0442\u0440\u0443\u0434\u043d\u043e \u043e\u043f\u0440\u0435\u0434\u0435\u043b\u0438\u043c\u044b\u0435, \u043c\u043e\u0436\u043d\u043e \u0440\u0430\u0431\u043e\u0442\u0430\u0442\u044c \u0441 \u0442\u043e\u0447\u043a\u0430\u043c\u0438 \u043e\u043f\u0440\u0435\u0434\u0435\u043b\u044f\u044e\u0449\u0438\u0439 \u0433\u0430\u0431\u0430\u0440\u0438\u0442 \u043e\u0434\u043d\u043e\u0433\u043e \u043e\u0442\u0440\u0435\u0437\u043a\u0430 \u0431\u0435\u0437\u044c\u0435, \u0430 \u043c\u043e\u0436\u043d\u043e \u0440\u0430\u0431\u043e\u0442\u0430\u0442\u044c \u0441 \u0446\u0435\u043d\u0442\u0440\u0430\u043b\u044c\u043d\u044b\u043c\u0438 \u0442\u043e\u0447\u043a\u0430\u043c\u0438, \u043d\u0435 \u043e\u0431\u0440\u0430\u0449\u0430\u044f \u0432\u043d\u0438\u043c\u0430\u043d\u0438\u044f \u043d\u0430 \u0442\u043e \u0447\u0442\u043e \u043b\u0438\u043d\u0438\u044f \u0431\u0435\u0437\u044c\u0435 \u044d\u0442\u043e \u043d\u0435 \u043f\u0440\u044f\u043c\u0430\u044f, \u0430 \u043a\u0440\u0438\u0432\u0430\u044f(\u043a\u0430\u043a \u043f\u0440\u0430\u0432\u0438\u043b\u043e) \u0438 \u0435\u0451 \u0433\u0430\u0431\u0430\u0440\u0438\u0442\u044b \u043d\u0435 \u043e\u043f\u0440\u0435\u0434\u0435\u043b\u044f\u044e\u0442\u0441\u044f \u043a\u0440\u0430\u0439\u043d\u0438\u043c\u0438 \u0442\u043e\u0447\u043a\u0430\u043c\u0438 \u043d\u0430\u0447\u0430\u043b\u0430 \u0438 \u043a\u043e\u043d\u0446\u0430 \u043b\u0438\u043d\u0438\u0438.<\/p>\n
\n\u0440\u0430\u0431\u043e\u0442\u0430 \u0441 \u0433\u0430\u0431\u0430\u0440\u0438\u0442\u0430\u043c\u0438<\/summary>\n
\n
;;\u043c\u0438\u043d\u0438\u043c\u0430\u043b\u044c\u043d\u0430\u044f \u043a\u043e\u043e\u0440\u0434\u0438\u043d\u0430\u0442\u0430 \u0442\u0440\u043e\u0439\u043a\u0438 \u0442\u043e\u0447\u0435\u043a \u0443\u0437\u043b\u0430 \u0431\u0435\u0437\u044c\u0435 (define (min-bezier-all-p bp)    (let ((min-x (p-x (bezier-p-center bp)))          (min-y (p-y (bezier-p-center bp))))       (if (< (p-x (bezier-p-prev bp)) min-x)           (set! min-x (p-x (bezier-p-prev bp))))       (if (< (p-y (bezier-p-prev bp)) min-y)           (set! min-y (p-y (bezier-p-prev bp))))       (if (< (p-x (bezier-p-next bp)) min-x)           (set! min-x (p-x (bezier-p-next bp))))       (if (< (p-y (bezier-p-next bp)) min-y)           (set! min-y (p-y (bezier-p-next bp))))       (p! min-x min-y)))  ;;\u043c\u0430\u043a\u0441\u0438\u043c\u0430\u043b\u044c\u043d\u0430\u044f \u043a\u043e\u043e\u0440\u0434\u0438\u043d\u0430\u0442\u0430 \u0442\u0440\u043e\u0439\u043a\u0438 \u0442\u043e\u0447\u0435\u043a \u0443\u0437\u043b\u0430 \u043a\u043e\u043d\u0442\u0443\u0440\u0430 \u0431\u0435\u0437\u044c\u0435 (define (max-bezier-all-p bp)    (let ((max-x (p-x (bezier-p-center bp)))          (max-y (p-y (bezier-p-center bp))))       (if (> (p-x (bezier-p-prev bp)) max-x)           (set! max-x (p-x (bezier-p-prev bp))))       (if (> (p-y (bezier-p-prev bp)) max-y)           (set! max-y (p-y (bezier-p-prev bp))))       (if (> (p-x (bezier-p-next bp)) max-x)           (set! max-x (p-x (bezier-p-next bp))))       (if (> (p-y (bezier-p-next bp)) max-y)           (set! max-y (p-y (bezier-p-next bp))))       (p! max-x max-y)))   ;;\u0445\u043e\u0442\u044f \u044d\u0442\u0438 \u0444\u0443\u043d\u043a\u0446\u0438\u0438 \u043c\u043e\u0436\u043d\u043e \u0431\u044b\u043b\u043e \u0431\u044b \u0438 \u043f\u0435\u0440\u0435\u0434\u0435\u043b\u0430\u0442\u044c \u0434\u043b\u044f \u0443\u0447\u0451\u0442\u0430 \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u0439 \u0442\u043e\u043b\u044c\u043a\u043e \u0446\u0435\u043d\u0442\u0440\u0430\u043b\u044c\u043d\u043e\u0439 ;;\u0442\u043e\u0447\u043a\u0438!!!  ;;\u043c\u0438\u043d\u0438\u043c\u0430\u043b\u044c\u043d\u0430\u044f \u043a\u043e\u043e\u0440\u0434\u0438\u043d\u0430\u0442\u0430 \u0442\u0440\u043e\u0439\u043a\u0438 \u0442\u043e\u0447\u0435\u043a \u0443\u0437\u043b\u0430 \u0431\u0435\u0437\u044c\u0435  (define min-bezier-p (lambda (p) (bezier-p-center p)))     ;;\u043c\u0430\u043a\u0441\u0438\u043c\u0430\u043b\u044c\u043d\u0430\u044f \u043a\u043e\u043e\u0440\u0434\u0438\u043d\u0430\u0442\u0430 \u0442\u0440\u043e\u0439\u043a\u0438 \u0442\u043e\u0447\u0435\u043a \u0443\u0437\u043b\u0430 \u043a\u043e\u043d\u0442\u0443\u0440\u0430 \u0431\u0435\u0437\u044c\u0435 (define max-bezier-p (lambda (p) (bezier-p-center p))) ;;\u0441\u0447\u0438\u0442\u0430\u0435\u043c \u0447\u0442\u043e \u043c\u0438\u043d\u0438\u043c\u0430\u043b\u044c\u043d\u0430\u044f \u0438 \u043c\u0430\u043a\u0441\u0438\u043c\u0430\u043b\u044c\u043d\u0430\u044f \u0442\u043e\u0447\u043a\u0430, \u044d\u0442\u043e \u0432\u0441\u0435\u0433\u0434\u0430 \u0446\u0435\u043d\u0442\u0440\u0430\u043b\u044c\u043d\u0430\u044f \u0442\u043e\u0447\u043a\u0430 ;;\u0443\u0437\u043b\u0430 \u0431\u0435\u0437\u044c\u0435!!!  ;;\u043c\u0438\u043d\u0438\u043c\u0430\u043b\u044c\u043d\u0430\u044f \u043f\u043e\u0437\u0438\u0446\u0438\u044f \u043a\u043e\u043d\u0442\u0443\u0440\u0430 \u0431\u0435\u0437\u044c\u0435 (defun (min-bezier bc &key (min-p min-bezier-p))    (let* ((contour (bezier-points bc))           (tmp-p  (min-p (car contour)))           (min-x  (p-x tmp-p))           (min-y  (p-y tmp-p)))       (do ((cur (cdr contour) (cdr cur)))             ((null? cur) (p! min-x min-y))          (let ((cur-p (min-p (car cur))))             (if (< (p-x cur-p) min-x)                 (set! min-x (p-x cur-p)))             (if (< (p-y cur-p) min-y)                 (set! min-y (p-y cur-p)))             )          )))  ;;\u043c\u0430\u043a\u0441\u0438\u043c\u0430\u043b\u044c\u043d\u0430\u044f \u043f\u043e\u0437\u0438\u0446\u0438\u044f \u043a\u043e\u043d\u0442\u0443\u0440\u0430 \u0431\u0435\u0437\u044c\u0435 (defun (max-bezier bc &key (max-p max-bezier-p))    (let* ((contour (bezier-points bc))           (tmp-p   (max-p (car contour)))           (max-x   (p-x tmp-p))           (max-y   (p-y tmp-p)))      (do ((cur (cdr contour) (cdr cur)))          ((null? cur) (p! max-x max-y))        (let ((cur-p (max-p (car cur))))          (if (> (p-x cur-p) max-x)              (set! max-x (p-x cur-p))              ())          (if (> (p-y cur-p) max-y)              (set! max-y (p-y cur-p))              ())          )        )))   (define (gabarite-bezier-all bc)    (let ((min-p  (min-bezier bc :min-p min-bezier-all-p))          (max-p  (max-bezier bc :max-p max-bezier-all-p)))       (p! (- (p-x max-p) (p-x min-p))           (- (p-y max-p) (p-y min-p)))             ))  (define (gabarite-bezier bc)    (let ((min-p  (min-bezier bc))          (max-p  (max-bezier bc)))       (p! (- (p-x max-p) (p-x min-p))           (- (p-y max-p) (p-y min-p)))             ))  ;;\u0442\u0440\u0430\u043d\u0441\u0444\u043e\u0440\u043c\u0430\u0446\u0438\u044f \u043a\u043e\u043d\u0442\u0443\u0440\u0430 \u0431\u0435\u0437\u044c\u0435 \u0432 \u043d\u0430\u0447\u0430\u043b\u043e \u043a\u043e\u043e\u0440\u0434\u0438\u043d\u0430\u0442.\u0443\u0441\u043b\u043e\u0432\u043d\u0430\u044f, \u0442.\u043a \u044d\u0442\u043e \u043d\u0435 \u0442\u043e\u0447\u043d\u044b\u0435 \u043a\u043e\u043e\u0440\u0434\u0438\u043d\u0430\u0442\u044b (define (bezier-to-origin bc)    (let ((p-min (min-bezier bc)))       ;;(prn \"p-min: \" p-min \"\\n\")       (translate-bezier bc                    (make-tr2d-move (- (p-x p-min)) (- (p-y p-min)))))) <\/code><\/pre>\n<\/div>\n<\/details>\n
\u0422\u0430\u043a\u0436\u0435 \u044f \u043d\u0430\u043f\u0438\u0441\u0430\u043b \u043f\u0430\u0440\u0443 \u0444\u0443\u043d\u043a\u0446\u0438\u0439 \u0434\u043b\u044f \u0440\u0430\u0437\u043c\u0435\u0449\u0435\u043d\u0438\u044e \u043a\u043e\u043d\u0442\u0443\u0440\u043e\u0432 \u043a\u0440\u0438\u0432\u044b\u0445 \u0431\u0435\u0437\u044c\u0435 \u043d\u0430 \u0438\u0437\u043e\u0431\u0440\u0430\u0436\u0435\u043d\u0438\u0435.<\/p>\n
;;\u043f\u043e\u043c\u0435\u0449\u0430\u0435\u0442 \u043a\u043e\u043d\u0442\u0443\u0440 \u0431\u0435\u0437\u044c\u0435 \u043d\u0430 \u0438\u0437\u043e\u0431\u0440\u0430\u0436\u0435\u043d\u0438\u0435 \u0441\u043e\u0437\u0434\u0430\u0432\u0430\u044f \u0432\u0435\u043a\u0442\u043e\u0440 \u0438 \u0447\u0435\u0440\u0442\u0443(\u0441\u0442\u0440\u043e\u0447\u043a\u0443) (defun (bezier-to-image img bc &key (name \"work vector\"))   (let* ((num-points (length (bezier-points bc)))          (points     (make-stroke-points (bezier-points bc)))          ;;(v (car (gimp-vectors-new img name)))          (tmp1 (prn \"v:\" v \", len: \" (vector-length points) \", p: \" points \"\\n\"))          (stroke-id (gimp-vectors-stroke-new-from-points                      v 0                      (vector-length points) points                      (bezier-closed bc))))     (gimp-image-add-vectors img v 0)     (cons v stroke-id)))  (defun (bezier-to-image-by-id img bc vec)   (let* ((num-points (length (bezier-points bc)))          (points     (make-stroke-points (bezier-points bc)))          (stroke-id (gimp-vectors-stroke-new-from-points                      vec 0                      (vector-length points) points                      (bezier-closed bc))))     (cons vec stroke-id)))<\/code><\/pre>\n
\u041f\u0440\u0438\u043c\u0435\u0440 \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u043d\u0438\u044f<\/h2>\n
\u0427\u0442\u043e \u0431\u044b \u043f\u0440\u043e\u0434\u0435\u043c\u043e\u043d\u0441\u0442\u0440\u0438\u0440\u043e\u0432\u0430\u0442\u044c \u0440\u0430\u0431\u043e\u0442\u0443 \u0444\u0443\u043d\u043a\u0446\u0438\u0439 \u0432\u0441\u0442\u0430\u0432\u043a\u0438 \u0441\u0442\u0440\u043e\u043a \u0438 \u0432\u0435\u043a\u0442\u043e\u0440\u043e\u0432 \u0432 \u0438\u0437\u043e\u0431\u0440\u0430\u0436\u0435\u043d\u0438\u0435 GIMP, \u0434\u0430\u0432\u0430\u0439\u0442\u0435 \u0443\u0436\u0435 \u043f\u043e\u043b\u0443\u0447\u0435\u043d\u043d\u044b\u0435 \u0438\u0437 GIMP \u043a\u043e\u043d\u0442\u0443\u0440\u044b \u0411\u0435\u0437\u044c\u0435 \u043d\u0435\u043c\u043d\u043e\u0433\u043e \u043c\u043e\u0434\u0438\u0444\u0438\u0446\u0438\u0440\u0443\u0435\u043c \u0438 \u0432\u0441\u0442\u0430\u0432\u0438\u043c \u043e\u0431\u0440\u0430\u0442\u043d\u043e \u0432 GIMP.<\/p>\n
\u041f\u0435\u0440\u0432\u044b\u0439 \u043a\u043e\u043d\u0442\u0443\u0440 \u0443\u043c\u0435\u043d\u044c\u0448\u0438\u043c \u0432 \u0434\u0432\u0430 \u0440\u0430\u0437\u0430 \u0438 \u0441\u043c\u0435\u0441\u0442\u0438 \u0435\u0433\u043e \u043f\u043e\u043b\u043e\u0436\u0435\u043d\u0438\u0435 \u0442\u043e\u0436\u0435 \u0443\u043c\u0435\u043d\u044c\u0448\u0438\u0432 \u043f\u043e\u0437\u0438\u0446\u0438\u044e \u043a\u043e\u043d\u0442\u0443\u0440\u0430 \u0432 \u0434\u0432\u0430 \u0440\u0430\u0437\u0430. \u0418 \u043f\u043e\u043c\u0435\u0441\u0442\u0438\u043c \u0435\u0433\u043e \u0432 \u0443\u0436\u0435 \u0438\u043c\u0435\u044e\u0449\u0438\u0439\u0441\u044f \u0432\u0435\u043a\u0442\u043e\u0440 3.<\/p>\n
(define min-b1 (min-bezier      b1)) ;;#(p 113.0 145.0) (define gab-b1 (gabarite-bezier b1)) ;;#(p 451.0 190.0) (define min-b1-new (p-tr2d min-b1 (make-tr2d-scale 0.5 0.5))) ;;#(p 56,5.0 72,5.0)   (define b1t (translate-bezier b1        (comb-tr2d (make-tr2d-move (- (p-x min-b1)) (- (p-y min-b1))) ;;\u0432 \u043d\u0430\u0447\u0430\u043b\u043e (make-tr2d-scale 0.5 0.5)                          ;;\u043c\u0430\u0441\u0448\u0442\u0430\u0431\u0438\u0440\u0443\u0435\u043c (make-tr2d-move (p-x min-b1-new) (p-y min-b1-new))))) ;;\u0432 \u043d\u043e\u0432\u0443\u044e \u0442\u043e\u0447\u043a\u0443. ;;#(bezier (#(bezier-p #(p 56,5.0 102.0) #(p 100.0 6.0) ...  (bezier-to-image-by-id i1 b1t 3) ;;(3 3)# <\/code><\/pre>\n
\"\u0420\u0435\u0437\u0443\u043b\u044c\u0442\u0430\u0442<\/p>\n
\u0420\u0435\u0437\u0443\u043b\u044c\u0442\u0430\u0442 \u0432\u0441\u0442\u0430\u0432\u043a\u0438 \u043a\u043e\u043d\u0442\u0443\u0440\u0430 \u0431\u0435\u0437\u044c\u0435 \u0432 \u0438\u0437\u043e\u0431\u0440\u0430\u0436\u0435\u043d\u0438\u0435 GIMP<\/figcaption><\/div>\n<\/figure>\n
\u0412\u0442\u043e\u0440\u043e\u0439 \u043a\u043e\u043d\u0442\u0443\u0440 \u043f\u043e\u0432\u0435\u0440\u043d\u0451\u043c \u043d\u0430 90 \u0433\u0440\u0430\u0434\u0443\u0441\u043e\u0432 \u0438 \u043f\u0435\u0440\u0435\u043c\u0435\u0441\u0442\u0438\u043c \u0432 \u0446\u0435\u043d\u0442\u0440 \u0438\u0437\u043e\u0431\u0440\u0430\u0436\u0435\u043d\u0438\u044f. \u0410 \u0441\u0430\u043c \u043a\u043e\u043d\u0442\u0443\u0440 \u0431\u0435\u0437\u044c\u0435 \u043f\u043e\u043c\u0435\u0441\u0442\u0438\u043c \u0432 \u043d\u043e\u0432\u044b\u0439 \u0432\u0435\u043a\u0442\u043e\u0440.<\/p>\n
(define min-b2 (min-bezier      b2)) ;;#(p 475.0 57.0) (define gab-b2 (gabarite-bezier b2)) ;;#(p 95.0 139.0) (define min-b2-new (p-tr2d (p! (car (gimp-image-width  i1))        (car (gimp-image-height i1)))    (make-tr2d-scale 0.5 0.5))) ;;(p 320.0 240.0)   (define b2t (translate-bezier b2        (comb-tr2d (make-tr2d-move (- (p-x min-b2)) (- (p-y min-b2))) ;;\u0432 \u043d\u0430\u0447\u0430\u043b\u043e (make-tr2d-rot 90)                                 ;;\u043f\u043e\u0432\u043e\u0440\u0430\u0447\u0438\u0432\u0430\u0435\u043c (make-tr2d-move (p-x min-b2-new) (p-y min-b2-new))))) ;;\u0432 \u043d\u043e\u0432\u0443\u044e \u0442\u043e\u0447\u043a\u0443. ;;#(bezier (#(bezier-p #(p 306.0 262.0) #(p 302.0 208.0) ...  (bezier-to-image i1 b2t :name \"My new vector\") <\/code><\/pre>\n
\"\u0420\u0435\u0437\u0443\u043b\u044c\u0442\u0430\u0442<\/p>\n
\u0420\u0435\u0437\u0443\u043b\u044c\u0442\u0430\u0442 \u0432\u0441\u0442\u0430\u0432\u043a\u0438 \u043a\u043e\u043d\u0442\u0443\u0440\u043e\u0432 \u0431\u0435\u0437\u044c\u0435 \u0432 \u0438\u0437\u043e\u0431\u0440\u0430\u0436\u0435\u043d\u0438\u0435 GIMP<\/figcaption><\/div>\n<\/figure>\n
\u0417\u0430\u043a\u043b\u044e\u0447\u0435\u043d\u0438\u0435.<\/h2>\n
\u0412\u0435\u043a\u0442\u043e\u0440\u043d\u044b\u0435 \u0432\u043e\u0437\u043c\u043e\u0436\u043d\u043e\u0441\u0442\u0438 \u0433\u0440\u0430\u0444\u0438\u0447\u0435\u0441\u043a\u043e\u0433\u043e \u0440\u0435\u0434\u0430\u043a\u0442\u043e\u0440\u0430 GIMP \u0441\u0435\u0440\u044c\u0451\u0437\u043d\u043e \u0443\u043b\u0443\u0447\u0448\u0430\u044e\u0442 \u0435\u0433\u043e \u0444\u0443\u043d\u043a\u0446\u0438\u043e\u043d\u0430\u043b\u044c\u043d\u043e\u0441\u0442\u044c  \u043f\u0440\u0438 \u043f\u043e\u0441\u0442\u0440\u043e\u0435\u043d\u0438\u0438 \u0438\u0437\u043e\u0431\u0440\u0430\u0436\u0435\u043d\u0438\u0439. \u0418\u0445 \u043c\u043e\u0436\u043d\u043e \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u044c \u0438 \u043a\u0430\u043a \u0441\u0440\u0435\u0434\u0441\u0442\u0432\u043e \u0432\u0437\u0430\u0438\u043c\u043e\u0434\u0435\u0439\u0441\u0442\u0432\u0438\u044f \u0441\u043e \u0441\u043a\u0440\u0438\u043f\u0442\u0430\u043c\u0438 Script-fu, \u0430 \u0442\u0430\u043a\u0436\u0435 \u043d\u0435\u043f\u043e\u0441\u0440\u0435\u0434\u0441\u0442\u0432\u0435\u043d\u043d\u043e \u043f\u0440\u0438 \u043f\u043e\u0441\u0442\u0440\u043e\u0435\u043d\u0438\u0438 \u0438\u0437\u043e\u0431\u0440\u0430\u0436\u0435\u043d\u0438\u0439 \u0438\u0437 Script-fu.<\/p>\n<\/div>\n<\/div>\n<\/div>\n
<\/div>\n

 \u0441\u0441\u044b\u043b\u043a\u0430 \u043d\u0430 \u043e\u0440\u0438\u0433\u0438\u043d\u0430\u043b \u0441\u0442\u0430\u0442\u044c\u0438  https:\/\/habr.com\/ru\/articles\/937152\/<\/a><\/p>\n","protected":false},"excerpt":{"rendered":"
<\/div>\n
\n
\n
\n
\n
\u0411\u0438\u0431\u043b\u0438\u043e\u0442\u0435\u043a\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u0439 \u043a Script-fu<\/a><\/p>\n
\u0412\u0432\u0435\u0434\u0435\u043d\u0438\u0435<\/h2>\n
\u041d\u0435\u0442 \u0432 \u044d\u0442\u043e\u0439 \u0441\u0442\u0430\u0442\u044c\u0435 \u044f \u043d\u0435 \u0431\u0443\u0434\u0443 \u0440\u0430\u0441\u0441\u043a\u0430\u0437\u044b\u0432\u0430\u0442\u044c \u043e \u043a\u043b\u0430\u0441\u0441\u0430\u0445 «\u0412\u0435\u043a\u0442\u043e\u0440», \u0442\u0435\u043c\u043e\u0439 \u043c\u043e\u0435\u0433\u043e \u0440\u0430\u0441\u0441\u043c\u043e\u0442\u0440\u0435\u043d\u0438\u044f \u0431\u0443\u0434\u0435\u0442 \u0433\u0440\u0430\u0444\u0438\u0447\u0435\u0441\u043a\u0438\u0439 \u044d\u043b\u0435\u043c\u0435\u043d\u0442 \u0438\u0437\u043e\u0431\u0440\u0430\u0436\u0435\u043d\u0438\u044f \u0432 GIMP, \u043f\u043e\u0434 \u043d\u0430\u0437\u0432\u0430\u043d\u0438\u0435\u043c vector<\/code> \u0438 \u0435\u0433\u043e \u0441\u043e\u0441\u0442\u0430\u0432\u043b\u044f\u044e\u0449\u0438\u0435 \u043f\u043e\u0434 \u043d\u0430\u0437\u0432\u0430\u043d\u0438\u0435\u043c stroke<\/code>.<\/p>\n
\u041a\u043e\u0433\u0434\u0430 \u0442\u043e, \u043e\u0447\u0435\u043d\u044c \u0434\u0430\u0432\u043d\u043e, \u0441\u0447\u0438\u0442\u0430\u043b\u043e\u0441\u044c \u0447\u0442\u043e \u0433\u0440\u0430\u0444\u0438\u0447\u0435\u0441\u043a\u0438\u0435 \u0440\u0435\u0434\u0430\u043a\u0442\u043e\u0440\u044b \u0434\u0435\u043b\u044f\u0442\u0441\u044f \u043d\u0430 \u0440\u0430\u0441\u0442\u0440\u043e\u0432\u044b\u0435 \u0438 \u0432\u0435\u043a\u0442\u043e\u0440\u043d\u044b\u0435. \u041a \u0432\u0435\u043a\u0442\u043e\u0440\u043d\u044b\u043c \u043e\u0442\u043d\u043e\u0441\u0438\u043b\u0438\u0441\u044c Coreldraw, Adobe Illustrator, Inkscape \u0438 \u0440\u0430\u0431\u043e\u0442\u0430\u043b\u0438 \u043e\u043d\u0438 \u043d\u0435 \u0441 \u043e\u0442\u0434\u0435\u043b\u044c\u043d\u044b\u043c\u0438 \u043f\u0438\u043a\u0441\u0435\u043b\u0430\u043c\u0438 \u0438\u0437\u043e\u0431\u0440\u0430\u0436\u0435\u043d\u0438\u0439, \u0430 \u0441 \u044d\u043b\u0435\u043c\u0435\u043d\u0442\u0430\u043c\u0438 \u043d\u0430\u0437\u044b\u0432\u0430\u0435\u043c\u044b\u043c\u0438 \u0432\u0435\u043a\u0442\u043e\u0440\u0430\u043c\u0438, \u043a\u043e\u0442\u043e\u0440\u044b\u0435 \u043c\u043e\u0436\u043d\u043e \u043f\u0440\u0435\u0432\u0440\u0430\u0449\u0430\u0442\u044c, \u0441 \u043f\u043e\u043c\u043e\u0449\u044c\u044e \u043c\u0430\u043d\u0438\u043f\u0443\u043b\u044f\u0446\u0438\u0439 \u0432 \u0434\u0443\u0433\u0438 \u0440\u0430\u0437\u043b\u0438\u0447\u043d\u043e\u0439 \u0444\u043e\u0440\u043c\u044b, \u043d\u0430\u0437\u044b\u0432\u0430\u0435\u043c\u044b\u043c\u0438 \u043a\u0440\u0438\u0432\u044b\u043c\u0438 \u0411\u0435\u0437\u044c\u0435<\/strong>. \u041a \u0440\u0430\u0441\u0442\u0440\u043e\u0432\u044b\u043c \u0436\u0435 \u043e\u0442\u043d\u043e\u0441\u0438\u043b\u0438\u0441\u044c Photoshop, Paint \u0438 \u0442\u043e\u0442 \u0436\u0435 GIMP. \u0412 \u044d\u0442\u0438\u0445 \u0440\u0435\u0434\u0430\u043a\u0442\u043e\u0440\u0430\u0445 \u043e\u0442\u0441\u0443\u0442\u0441\u0442\u0432\u043e\u0432\u0430\u043b\u0430 \u043a\u0430\u043a\u0430\u044f \u043b\u0438\u0431\u043e \u0433\u0435\u043e\u043c\u0435\u0442\u0440\u0438\u044f \u0438 \u0438\u0437\u043e\u0431\u0440\u0430\u0436\u0435\u043d\u0438\u044f \u043f\u0440\u0435\u0434\u0441\u0442\u0430\u0432\u043b\u044f\u043b\u0438 \u0441\u043e\u0431\u043e\u0439 \u043d\u0430\u0431\u043e\u0440\u044b \u043e\u0442\u0434\u0435\u043b\u044c\u043d\u044b\u0445 \u0442\u043e\u0447\u0435\u043a — \u043f\u0438\u043a\u0441\u0435\u043b\u043e\u0432. \u041d\u043e \u0432\u0440\u0435\u043c\u044f \u043d\u0435 \u0441\u0442\u043e\u0438\u0442 \u043d\u0430 \u043c\u0435\u0441\u0442\u0435 \u0438 \u044d\u043b\u0435\u043c\u0435\u043d\u0442\u044b \u0440\u0430\u0441\u0442\u0440\u043e\u0432\u043e\u0433\u043e \u0440\u0435\u0434\u0430\u043a\u0442\u0438\u0440\u043e\u0432\u0430\u043d\u0438\u044f \u043f\u0440\u043e\u043d\u0438\u043a\u0430\u043b\u0438 \u0432 \u0440\u0435\u0434\u0430\u043a\u0442\u043e\u0440\u044b, \u043a\u043e\u0442\u043e\u0440\u044b\u0435 \u0441\u0447\u0438\u0442\u0430\u043b\u0438\u0441\u044c \u0432\u0435\u043a\u0442\u043e\u0440\u043d\u044b\u043c\u0438 \u0438 \u043d\u0430\u043e\u0431\u043e\u0440\u043e\u0442, \u044d\u043b\u0435\u043c\u0435\u043d\u0442\u044b \u0432\u0435\u043a\u0442\u043e\u0440\u043d\u044b\u0445 \u0440\u0435\u0434\u0430\u043a\u0442\u043e\u0440\u043e\u0432 \u043f\u0435\u0440\u0435\u043d\u043e\u0441\u0438\u043b\u0438\u0441\u044c \u0432 \u0440\u0430\u0441\u0442\u0440\u043e\u0432\u044b\u0435 \u0433\u0440\u0430\u0444\u0438\u0447\u0435\u0441\u043a\u0438\u0435 \u0440\u0435\u0434\u0430\u043a\u0442\u043e\u0440\u044b. \u041f\u0440\u0438\u043c\u0435\u0440\u043e\u043c \u0442\u043e\u043c\u0443 \u044f\u0432\u043b\u044f\u0435\u0442\u0441\u044f GIMP.<\/p>\n
\u041f\u0440\u0435\u0434\u0441\u0442\u0430\u0432\u043b\u0435\u043d\u0438\u0435 \u043e \u0442\u043e\u043c, \u0447\u0442\u043e GIMP  \u0442\u043e \u0440\u0430\u0441\u0442\u0440\u043e\u0432\u044b\u0439 \u0433\u0440\u0430\u0444\u0438\u0447\u0435\u0441\u043a\u0438\u0439 \u0440\u0435\u0434\u0430\u043a\u0442\u043e\u0440 \u0434\u0430\u0432\u043d\u043e \u0443\u0436\u0435 \u0443\u0441\u0442\u0430\u0440\u0435\u043b\u043e. \u0422\u0435\u043a\u0441\u0442\u043e\u0432\u044b\u0439 \u0441\u043b\u043e\u0439, \u0434\u0430 \u0438 \u0432\u0441\u044f \u0440\u0430\u0431\u043e\u0442\u0430 \u0441\u043e \u0448\u0440\u0438\u0444\u0442\u0430\u043c\u0438 \u0432 GIMP\u0435 \u044d\u0442\u043e \u0440\u0430\u0431\u043e\u0442\u0430 \u0441 \u0432\u0435\u043a\u0442\u043e\u0440\u043d\u044b\u043c\u0438 \u043e\u0431\u044a\u0435\u043a\u0442\u0430\u043c\u0438 \u043f\u0440\u0435\u0434\u0441\u0442\u0430\u0432\u043b\u044f\u044e\u0449\u0438\u043c\u0438 \u0441\u043e\u0431\u043e\u0439 \u043a\u0440\u0438\u0432\u044b\u0435 \u0411\u0435\u0437\u044c\u0435. \u0422\u0430\u043a\u0438\u043c \u043e\u0431\u0440\u0430\u0437\u043e\u043c \u0446\u0435\u043b\u044b\u0435 \u0442\u0435\u043a\u0441\u0442\u043e\u0432\u044b\u0435 \u0441\u043b\u043e\u0438 \u0432 GIMP \u043f\u0440\u0435\u0434\u0441\u0442\u0430\u0432\u043b\u044f\u044e\u0442 \u0441\u043e\u0431\u043e\u0439 \u0432\u0435\u043a\u0442\u043e\u0440\u043d\u044b\u0435 \u043e\u0431\u044a\u0435\u043a\u0442\u044b. \u041f\u043e \u043c\u0438\u043c\u043e \u043e\u0442\u0434\u0435\u043b\u044c\u043d\u044b\u0445 \u0442\u0435\u043a\u0441\u0442\u043e\u0432\u044b\u0445 \u0441\u043b\u043e\u0451\u0432, \u0432 \u043a\u0430\u0436\u0434\u043e\u043c \u0438\u0437\u043e\u0431\u0440\u0430\u0436\u0435\u043d\u0438\u0438 GIMP \u043c\u043e\u0436\u043d\u043e \u0441\u043e\u0437\u0434\u0430\u0432\u0430\u0442\u044c \u043e\u0442\u0434\u0435\u043b\u044c\u043d\u044b\u0435 \u0441\u0442\u0440\u043e\u043a\u0438 \u0438 \u0432\u0435\u043a\u0442\u043e\u0440\u0430. \u0412\u043e\u0442 \u0441 \u043d\u0438\u043c\u0438 \u043c\u044b \u0441\u0435\u0433\u043e\u0434\u043d\u044f \u0438 \u0440\u0430\u0437\u0431\u0435\u0440\u0451\u043c\u0441\u044f.<\/p>\n
\u0412\u0435\u043a\u0442\u043e\u0440\u044b \u0438 \u0441\u0442\u0440\u043e\u043a\u0438.<\/h2>\n
Stroke<\/code> \u0438\u043b\u0438 \u043f\u043e \u043f\u0440\u043e\u0441\u0442\u043e\u043c\u0443 \u0441\u0442\u0440\u043e\u043a\u0430(\u0448\u0442\u0440\u0438\u0445), \u044d\u0442\u043e \u043a\u043e\u043d\u0442\u0443\u0440, \u0441\u043e\u0441\u0442\u043e\u044f\u0449\u0438\u0439 \u0438\u0437 \u043e\u0442\u0440\u0435\u0437\u043a\u043e\u0432 \u0411\u0435\u0437\u044c\u0435, \u043a\u043e\u0442\u043e\u0440\u044b\u0435 \u0432\u044b\u0440\u0430\u0436\u0430\u044e\u0442\u0441\u044f \u0443\u0437\u043b\u0430\u043c\u0438, \u0433\u0434\u0435 \u043a\u0430\u0436\u0434\u044b\u0439 \u0443\u0437\u0435\u043b \u043f\u0440\u0435\u0434\u0441\u0442\u0430\u0432\u043b\u044f\u0435\u0442 \u0441\u043e\u0431\u043e\u0439 \u0442\u0440\u0438 \u0442\u043e\u0447\u043a\u0438. \u0426\u0435\u043d\u0442\u0440\u0430\u043b\u044c\u043d\u0430\u044f \u0442\u043e\u0447\u043a\u0430 \u044d\u0442\u043e \u043d\u0430\u0447\u0430\u043b\u043e \u0438 \u043a\u043e\u043d\u0435\u0446 \u043e\u0442\u0440\u0435\u0437\u043a\u0430 \u043a\u043e\u043d\u0442\u0443\u0440\u0430, \u0442\u043e\u0447\u043a\u0430 \u043e\u0442\u043d\u043e\u0441\u044f\u0449\u0430\u044f\u0441\u044f \u043a \u043f\u0440\u0435\u0434\u044b\u0434\u0443\u0449\u0435\u043c\u0443 \u043e\u0442\u0440\u0435\u0437\u043a\u0443, \u044d\u0442\u043e «\u0440\u044b\u0447\u0430\u0433» \u043f\u043e\u0437\u0432\u043e\u043b\u044f\u044e\u0449\u0438\u0439 \u043c\u0430\u043d\u0438\u043f\u0443\u043b\u0438\u0440\u043e\u0432\u0430\u0442\u044c \u043f\u0440\u0435\u0434\u044b\u0434\u0443\u0449\u0438\u043c \u043e\u0442\u0440\u0435\u0437\u043a\u043e\u043c \u0431\u0435\u0437\u044c\u0435, \u0442\u043e\u0447\u043a\u0430 \u043e\u0442\u043d\u043e\u0441\u044f\u0449\u0430\u044f\u0441\u044f \u043a \u0441\u043b\u0435\u0434\u0443\u044e\u0449\u0435\u043c\u0443 \u043e\u0442\u0440\u0435\u0437\u043a\u0443. \u0422\u0430\u043a \u0436\u0435 \u0434\u043b\u044f \u0441\u0442\u0440\u043e\u043a\u0438 \u0441\u0443\u0449\u0435\u0441\u0442\u0432\u0443\u0435\u0442 \u0444\u043b\u0430\u0433 \u043e\u0431\u043e\u0437\u043d\u0430\u0447\u0430\u044e\u0449\u0438\u0439 \u0437\u0430\u043c\u043a\u043d\u0443\u0442\u044b\u0435 \u0441\u0442\u0440\u043e\u043a\u0438(\u043d\u0430\u0447\u0430\u043b\u043e \u0441\u043e\u0435\u0434\u0438\u043d\u044f\u0435\u0442\u0441\u044f \u0441 \u043a\u043e\u043d\u0446\u043e\u043c \u043a\u043e\u043d\u0442\u0443\u0440\u0430). \u041d\u0430\u0431\u043e\u0440 \u0442\u0430\u043a\u0438\u0445 \u0441\u0442\u0440\u043e\u043a (stroke<\/code>) \u043e\u0431\u0440\u0430\u0437\u0443\u0435\u0442 \u0432\u0435\u043a\u0442\u043e\u0440(vector<\/code>).<\/p>\n
\u0421\u043e\u0437\u0434\u0430\u043d\u0438\u0435 \u0438 \u0440\u0435\u0434\u0430\u043a\u0442\u0438\u0440\u043e\u0432\u0430\u043d\u0438\u0435 \u0432\u0435\u043a\u0442\u043e\u0440\u043e\u0432 \u0432 gimp<\/h2>\n
\u0412\u044b\u0431\u0438\u0440\u0430\u0435\u043c \u0438\u043d\u0441\u0442\u0440\u0443\u043c\u0435\u043d\u0442 «\u041a\u043e\u043d\u0442\u0443\u0440\u044b» \u0432 \u0440\u0435\u0436\u0438\u043c\u0435 \u0441\u043e\u0437\u0434\u0430\u043d\u0438\u044f<\/strong><\/code>.<\/strong> \u0418 \u043d\u0430\u0447\u0438\u043d\u0430\u0435\u043c \u043e\u0442\u043c\u0435\u0447\u0430\u0442\u044c \u0442\u043e\u0447\u043a\u0438 \u043a\u043e\u043d\u0442\u0443\u0440\u0430, \u0441\u043e\u0437\u0434\u0430\u0432\u0430\u044f \u043f\u043e\u0441\u043b\u0435\u0434\u043e\u0432\u0430\u0442\u0435\u043b\u044c\u043d\u043e\u0441\u0442\u044c \u0442\u043e\u0447\u0435\u043a. \u0414\u0430\u043b\u0435\u0435 \u043c\u043e\u0436\u043d\u043e \u0432 \u0442\u043e\u043c \u0436\u0435 \u0440\u0435\u0436\u0438\u043c\u0435 \u0432\u044b\u0434\u0435\u043b\u044f\u0442\u044c \u043c\u044b\u0448\u043a\u043e\u0439 \u0443\u0436\u0435 \u0441\u043e\u0437\u0434\u0430\u043d\u043d\u0443\u044e \u0442\u043e\u0447\u043a\u0443 \u0438 \u043f\u0435\u0440\u0435\u043c\u0435\u0449\u0430\u0442\u044c \u0435\u0451, \u0438\u0437\u043c\u0435\u043d\u044f\u044f \u043a\u043e\u043d\u0442\u0443\u0440. \u0414\u0435\u043b\u0430\u044f \u0442\u0435\u043a\u0443\u0449\u0435\u0439 \u043a\u0440\u0430\u0439\u043d\u044e\u044e \u0442\u043e\u0447\u043a\u0443 \u043c\u043e\u0436\u043d\u043e \u043f\u0440\u043e\u0434\u043e\u043b\u0436\u0430\u0442\u044c \u0441\u043e\u0437\u0434\u0430\u043d\u0438\u0435 \u0442\u0435\u043a\u0443\u0449\u0435\u0433\u043e \u043a\u043e\u043d\u0442\u0443\u0440\u0430. \u0410 \u043f\u0440\u0438 \u0432\u044b\u0434\u0435\u043b\u0435\u043d\u043d\u043e\u0439 \u0442\u043e\u0447\u043a\u0435 \u0432 \u0441\u0435\u0440\u0435\u0434\u0438\u043d\u0435 \u043a\u043e\u043d\u0442\u0443\u0440\u0430, \u043c\u043e\u0436\u043d\u043e \u043d\u0430\u0447\u0430\u0442\u044c \u0441\u043e\u0437\u0434\u0430\u043d\u0438\u0435 \u043d\u043e\u0432\u043e\u0433\u043e \u043a\u043e\u043d\u0442\u0443\u0440\u0430. \u041d\u0430\u0436\u0430\u0432 \u0432 \u044d\u0442\u043e\u043c \u0440\u0435\u0436\u0438\u043c\u0435 «Ctrl» \u0438 \u0432\u044b\u0431\u0440\u0430\u0432 \u043f\u0440\u043e\u0442\u0438\u0432\u043e\u043f\u043e\u043b\u043e\u0436\u043d\u044b\u0439 \u043a\u043e\u043d\u0435\u0446 \u043a\u043e\u043d\u0442\u0443\u0440\u0430 \u043c\u044b \u043c\u043e\u0436\u0435\u043c \u0437\u0430\u043c\u043a\u043d\u0443\u0442\u044c \u043a\u043e\u043d\u0442\u0443\u0440.<\/p>\n
\u041d\u0430\u0445\u043e\u0434\u044f\u0441\u044c \u0432 \u0440\u0435\u0436\u0438\u043c\u0435 \u043f\u0440\u0430\u0432\u043a\u0430<\/strong><\/code> \u043c\u043e\u0436\u043d\u043e \u0449\u0451\u043b\u043a\u043d\u0443\u0442\u044c \u043d\u0430 \u043f\u0440\u043e\u0442\u0438\u0432\u043e\u043f\u043e\u043b\u043e\u0436\u043d\u043e\u043c \u043a\u043e\u043d\u0446\u0435 \u043a\u043e\u043d\u0442\u0443\u0440\u0430 \u0438 \u0437\u0430\u043c\u043a\u043d\u0443\u0442\u044c \u043a\u043e\u043d\u0442\u0443\u0440. \u0422\u0430\u043a\u0436\u0435 \u0432 \u0440\u0435\u0436\u0438\u043c\u0435 \u043f\u0440\u0430\u0432\u043a\u0438<\/code> \u043c\u043e\u0436\u043d\u043e \u0449\u0451\u043b\u043a\u043d\u0443\u0442\u044c \u043d\u0430 \u043a\u043e\u043d\u0446\u0435 \u0434\u0440\u0443\u0433\u043e\u0433\u043e \u043a\u043e\u043d\u0442\u0443\u0440\u0430 \u0438 \u043e\u0431\u044a\u0435\u0434\u0438\u043d\u0438\u0442\u044c \u043a\u043e\u043d\u0442\u0443\u0440\u044b. \u0412 \u0440\u0435\u0436\u0438\u043c\u0435 \u041f\u0440\u0430\u0432\u043a\u0430<\/code> \u043c\u043e\u0436\u043d\u043e \u0438\u0437\u043c\u0435\u043d\u0438\u0442\u044c \u0444\u043e\u0440\u043c\u0443 \u043a\u043e\u043d\u0442\u0443\u0440\u0430. \u0421 \u043a\u0430\u0436\u0434\u043e\u0439 \u0442\u043e\u0447\u043a\u043e\u0439 \u043a\u043e\u043d\u0442\u0443\u0440\u0430 \u0441\u0432\u044f\u0437\u0430\u043d\u044b \u0434\u0432\u0435 \u0442\u043e\u0447\u043a\u0438 \u0440\u044b\u0447\u0430\u0433\u0430, \u043e\u0434\u0438\u043d \u0438\u0437  \u043a\u043e\u0442\u043e\u0440\u044b\u0445 (\u043f\u0435\u0440\u0432\u044b\u0439 \u0432 \u0441\u0442\u0440\u0443\u043a\u0442\u0443\u0440\u0435 \u0434\u0430\u043d\u043d\u044b\u0445) \u043e\u0442\u0432\u0435\u0447\u0430\u0435\u0442 \u0437\u0430 \u0444\u043e\u0440\u043c\u0443 \u043f\u0440\u0435\u0434\u0448\u0435\u0441\u0442\u0432\u0443\u044e\u0449\u0435\u0439 \u043b\u0438\u043d\u0438\u0438, \u0434\u0440\u0443\u0433\u043e\u0439 (\u043f\u043e\u0441\u043b\u0435\u0434\u043d\u0438\u0439 \u0432 \u0441\u0442\u0440\u0443\u043a\u0442\u0443\u0440\u0435 \u0434\u0430\u043d\u043d\u044b\u0445) \u0437\u0430 \u043f\u043e\u0441\u043b\u0435\u0434\u0443\u044e\u0449\u0443\u044e \u043b\u0438\u043d\u0438\u044e. \u0422\u0430\u043a\u0438\u043c \u043e\u0431\u0440\u0430\u0437\u043e\u043c \u0437\u0430 \u043a\u0430\u0436\u0434\u0443\u044e \u043b\u0438\u043d\u0438\u044e \u043e\u0442\u0432\u0435\u0442\u0441\u0442\u0432\u0435\u043d\u043d\u044b \u0434\u0432\u0435 \u0442\u043e\u0447\u043a\u0438, \u043d\u0430\u0447\u0430\u043b\u043e \u0438 \u043a\u043e\u043d\u0435\u0446, \u0438  \u0434\u0432\u0430 \u0440\u044b\u0447\u0430\u0433\u0430,\u0442.\u0435 \u0432\u0441\u0435\u0433\u043e \u0447\u0435\u0442\u044b\u0440\u0435 \u0442\u043e\u0447\u043a\u0438. \u041e\u043d\u0438 \u043e\u043f\u0440\u0435\u0434\u0435\u043b\u044f\u044e\u0442 \u0444\u043e\u0440\u043c\u0443 \u043a\u0443\u0431\u0438\u0447\u0435\u0441\u043a\u043e\u0439 \u043a\u0440\u0438\u0432\u043e\u0439 \u0411\u0435\u0437\u044c\u0435.<\/p>\n
\u0412 \u0440\u0435\u0436\u0438\u043c\u0435 \u041f\u0440\u0430\u0432\u043a\u0430<\/code> \u043d\u0430\u0436\u0430\u0432 \u043a\u043b\u0430\u0432\u0438\u0448\u0443 «Shift» \u043c\u043e\u0436\u043d\u043e \u0443\u0434\u0430\u043b\u044f\u0442\u044c \u043b\u0438\u0431\u043e \u0441\u043e\u0435\u0434\u0438\u043d\u0435\u043d\u0438\u0435 \u043c\u0435\u0436\u0434\u0443 \u0442\u043e\u0447\u043a\u0430\u043c\u0438, \u043b\u0438\u0431\u043e \u0441\u0430\u043c\u0438 \u0442\u043e\u0447\u043a\u0438, \u0441 \u043f\u043e\u043c\u043e\u0449\u044c\u044e \u0443\u043a\u0430\u0437\u0430\u0442\u0435\u043b\u044f \u043c\u044b\u0448\u0438.<\/p>\n
\u0422\u0430\u043a \u0436\u0435 \u0440\u0435\u0436\u0438\u043c\u044b \u0443\u043f\u0440\u0430\u0432\u043b\u044f\u044e\u0442\u0441\u044f \u043a\u043b\u0430\u0432\u0438\u0448\u0430\u043c\u0438 «Ctrl» — \u043f\u0435\u0440\u0435\u043a\u043b\u044e\u0447\u0430\u0435\u0442 \u0438\u0437 \u0440\u0435\u0436\u0438\u043c\u0430 \u0441\u043e\u0437\u0434\u0430\u043d\u0438\u044f<\/code> \u0432 \u0440\u0435\u0436\u0438\u043c \u041f\u0440\u0430\u0432\u043a\u0430<\/code>. \u0422\u0430\u043a\u0438\u043c \u043e\u0431\u0440\u0430\u0437\u043e\u043c \u043c\u043e\u0436\u043d\u043e \u0443\u0434\u0430\u043b\u044f\u0442\u044c \u0443\u0437\u043b\u044b \u0438\u0437 \u0440\u0435\u0436\u0438\u043c\u0430  \u0421\u043e\u0437\u0434\u0430\u043d\u0438\u044f<\/code> \u043d\u0430\u0436\u0438\u043c\u0430\u044f «Ctrl+Shift».<\/p>\n
\u041f\u043e\u0441\u043b\u0435\u0434\u043d\u0438\u0439 \u0440\u0435\u0436\u0438\u043c \u044d\u0442\u043e \u041f\u0435\u0440\u0435\u043c\u0435\u0449\u0435\u043d\u0438\u0435<\/strong><\/code> \u0438\u043b\u0438 \u043d\u0430\u0436\u0430\u0442\u0438\u0435 \u043a\u043b\u0430\u0432\u0438\u0448\u0438 «Alt». \u041f\u043e\u0437\u0432\u043e\u043b\u044f\u0435\u0442 \u0441\u0445\u0432\u0430\u0442\u0438\u0442\u044c \u043a\u043e\u043d\u0442\u0443\u0440 \u0438 \u043f\u0435\u0440\u0435\u043c\u0435\u0441\u0442\u0438\u0442\u044c \u0435\u0433\u043e \u0432 \u0437\u0430\u0434\u0430\u043d\u043d\u0443\u044e \u043f\u043e\u0437\u0438\u0446\u0438\u044e.<\/p>\n
\u041d\u0430 \u0431\u0430\u0437\u0435 \u043a\u043e\u043d\u0442\u0443\u0440\u0430 \u043c\u043e\u0436\u043d\u043e \u0441\u043e\u0437\u0434\u0430\u0442\u044c \u0432\u044b\u0434\u0435\u043b\u0435\u043d\u0438\u0435 — «\u0412\u044b\u0434\u0435\u043b\u0435\u043d\u0438\u0435 \u0438\u0437 \u043a\u043e\u043d\u0442\u0443\u0440\u0430» . \u041c\u043e\u0436\u043d\u043e \u0437\u0430\u043f\u043e\u043b\u043d\u0438\u0442\u044c \u0446\u0432\u0435\u0442\u043e\u043c \u0444\u0438\u0433\u0443\u0440\u0443 — «\u041e\u0442\u0440\u0430\u0437\u0438\u0442\u044c \u041a\u043e\u043d\u0442\u0443\u0440». \u041c\u043e\u0436\u043d\u043e \u043e\u0431\u0440\u0438\u0441\u043e\u0432\u0430\u0442\u044c \u043b\u0438\u043d\u0438\u044e \u0443\u0441\u0442\u0430\u043d\u043e\u0432\u043b\u0435\u043d\u043d\u044b\u043c \u0446\u0432\u0435\u0442\u043e\u043c \u0438 \u043a\u0438\u0441\u0442\u044c\u044e.<\/p>\n
\u0422\u0430\u043a\u0436\u0435 \u043a\u043e\u043d\u0442\u0443\u0440 \u043c\u043e\u0436\u043d\u043e \u0441\u043e\u0437\u0434\u0430\u0442\u044c \u0438\u0437 \u0432\u044b\u0434\u0435\u043b\u0435\u043d\u0438\u044f, \u0432\u043e \u0432\u043a\u043b\u0430\u0434\u043a\u0435 «\u0412\u044b\u0434\u0435\u043b\u0435\u043d\u0438\u0435» \u043f\u043e\u0441\u043b\u0435\u0434\u043d\u0438\u0439 \u043f\u0443\u043d\u043a\u0442 «\u0412 \u043a\u043e\u043d\u0442\u0443\u0440».<\/p>\n
\u0420\u0430\u0431\u043e\u0442\u0430 \u0441 \u0432\u0435\u043a\u0442\u043e\u0440\u0430\u043c\u0438 \u0438 \u0441\u0442\u0440\u043e\u043a\u0430\u043c\u0438 \u0438\u0437 Script-fu<\/h2>\n
\n\u0421\u043a\u0440\u044b\u0442\u044b\u0439 \u0442\u0435\u043a\u0441\u0442<\/summary>\n
\n
(define path-home (getenv \"HOME\")) (define path-lib (string-append path-home \"\/work\/gimp\/lib\/\")) (define path-work (string-append path-home \"\/work\/gimp\/\")) (load (string-append path-lib \"util.scm\")) (load (string-append path-lib \"defun.scm\")) (load (string-append path-lib \"struct2.scm\")) (load (string-append path-lib \"storage.scm\")) (load (string-append path-lib \"cyclic.scm\")) (load (string-append path-lib \"hashtable3.scm\")) ;;\u0445\u0435\u0448 \u043a\u043e\u0442\u043e\u0440\u044b\u0439 \u043c\u043e\u0436\u0435\u0442 \u0440\u0430\u0431\u043e\u0442\u0430\u0442\u044c \u0441 \u043e\u0431\u044a\u0435\u043a\u0442\u0430\u043c\u0438 \u0432 \u043a\u0430\u0447\u0435\u0441\u0442\u0432\u0435 \u043a\u043b\u044e\u0447\u0435\u0439! (load (string-append path-lib \"sort2.scm\")) (load (string-append path-lib \"tsort.scm\")) ;;(load (string-append path-lib \"cpl-sbcl.scm\")) (load (string-append path-lib \"cpl-mro.scm\")) ;;(load (string-append path-lib \"cpl-topext.scm\")) (load (string-append path-lib \"struct2ext.scm\")) (load (string-append path-lib \"queue.scm\")) (load (string-append path-lib \"obj5.scm\")) (load (string-append path-lib \"obj\/object.scm\"))  (load (string-append path-lib \"point.scm\")) (load (string-append path-lib \"tr2d.scm\")) (load (string-append path-lib \"contour.scm\")) (load (string-append path-lib \"img.scm\")) (load (string-append path-lib \"rect.scm\")) (load (string-append path-lib \"vect.scm\")) (load (string-append path-lib \"brush.scm\")) (load (string-append path-lib \"fig-obj4.scm\"))  (load (string-append path-lib \"bezier.scm\")) (load (string-append path-lib \"fig-obj3bz.scm\")) <\/code><\/pre>\n<\/div>\n<\/details>\n
\u0418\u0437\u043e\u0431\u0440\u0430\u0436\u0435\u043d\u0438\u0435 \u043c\u043e\u0436\u043d\u043e \u0441\u043e\u0437\u0434\u0430\u0442\u044c \u0438\u0437 \u043a\u043e\u043d\u0441\u043e\u043b\u0438 Script-fu.<\/p>\n
(define i1 (create-1-layer-img 640 480)) ;; \u0441\u043e\u0437\u0434\u0430\u0451\u043c \u0445\u043e\u043b\u0441\u0442 \u0434\u043b\u044f \u0440\u0438\u0441\u043e\u0432\u0430\u043d\u0438\u044f. <\/code><\/pre>\n
\u0414\u043e\u043f\u0443\u0441\u0442\u0438\u043c \u043c\u044b \u0441\u043e\u0437\u0434\u0430\u043b\u0438 \u0432\u043e\u0442 \u0442\u0430\u043a\u043e\u0439 \u0432\u043e\u0442 \u043a\u043e\u043d\u0442\u0443\u0440(\u0432\u0435\u043a\u0442\u043e\u0440) \u0441\u043e\u0441\u0442\u043e\u044f\u0449\u0438\u0439 \u0438\u0437 \u0434\u0432\u0443\u0445 \u0441\u0442\u0440\u043e\u043a(stroke).<\/p>\n
\n
\u041a\u043e\u043d\u0442\u0443\u0440\u044b \u0431\u0435\u0437\u044c\u0435 \u0432 GIMP<\/figcaption><\/div>\n<\/figure>\n
\u0427\u0442\u043e\u0431\u044b \u043f\u043e\u043b\u0443\u0447\u0438\u0442\u044c \u0441\u043f\u0438\u0441\u043e\u043a \u043a\u043e\u043d\u0442\u0443\u0440\u043e\u0432 \u0411\u0435\u0437\u044c\u0435 \u043d\u0430 \u0438\u0437\u043e\u0431\u0440\u0430\u0436\u0435\u043d\u0438\u0438 \u043c\u043e\u0436\u043d\u043e \u0432\u043e\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u044c\u0441\u044f \u0444\u0443\u043d\u043a\u0446\u0438\u0435\u0439.<\/p>\n
;; \u043f\u043e\u043b\u0443\u0447\u0438\u0442\u044c \u0441\u043f\u0438\u0441\u043e\u043a \u0432\u0435\u043a\u0442\u043e\u0440\u043e\u0432 \u0432 \u0438\u0437\u043e\u0431\u0440\u0430\u0436\u0435\u043d\u0438\u0438 (\u0432\u0441\u0435\u0433\u043e \u043e\u0434\u0438\u043d \u0432\u0435\u043a\u0442\u043e\u0440 \u0441 id = 3) (gimp-image-get-vectors i1) ;;(1 #(3))  ;; \u043f\u043e\u043b\u0443\u0447\u0438\u0442\u044c \u0441\u0442\u0440\u043e\u043a\u0438 \u0438\u0437 \u0432\u0435\u043a\u0442\u043e\u0440\u0430 3, \u0432\u0441\u0435\u0433\u043e 2 \u0441\u0442\u0440\u043e\u043a\u0438 1 \u0438 2 (gimp-vectors-get-strokes 3) ;;(2 #(1 2))  ;;\u043f\u043e\u043b\u0443\u0447\u0438\u0442\u044c \u0442\u043e\u0447\u043a\u0438 \u0438\u0437 \u0441\u0442\u0440\u043e\u043a\u0438 1 \u0432\u0435\u043a\u0442\u043e\u0440\u0430 3 (gimp-vectors-stroke-get-points 3 1) ;; (0 30 #(200.0 12.0 113.0 204.0 79.0 394.0 275.0 335.0 275.0 335.0 275.0 335.0 329,0132792.0 ;;    287,992666.0 393.0 286.0 471,9329514.0 283,5418804.0 493.0 291.0 564.0 326.0 503.0 ;;    196.0 391.0 145.0 391.0 145.0 391.0 145.0) 1)  ;;\u043f\u043e\u043b\u0443\u0447\u0438\u0442\u044c \u0442\u043e\u0447\u043a\u0438 \u0438\u0437 \u0441\u0442\u0440\u043e\u043a\u0438 2 \u0432\u0435\u043a\u0442\u043e\u0440\u0430 3 (gimp-vectors-stroke-get-points 3 2) ;; (0 30 #(443.0 75.0 497.0 71.0 500.0 73.0 570.0 57.0 570.0 57.0 570.0 57.0 598.0 183.0 562.0 ;;         190.0 562.0 190.0 529,6023787.0 203,7115205.0 514.0 196.0 488,5900101.0 ;;         183,4410395.0  475.0 147.0 475.0 147.0 475.0 147.0) 1) <\/code><\/pre>\n
\u0420\u0430\u0431\u043e\u0442\u0430\u0442\u044c \u0441 \u0442\u0430\u043a\u0438\u043c\u0438 \u0434\u0430\u043d\u043d\u044b\u043c\u0438 \u043d\u0435\u0432\u043e\u0437\u043c\u043e\u0436\u043d\u043e \u043f\u043e\u044d\u0442\u043e\u043c\u0443 \u044f \u0441\u043e\u0437\u0434\u0430\u043b \u043f\u0440\u043e\u0441\u0442\u0443\u044e \u0441\u0442\u0440\u0443\u043a\u0442\u0443\u0440\u0443 \u0434\u043b\u044f \u0445\u0440\u0430\u043d\u0435\u043d\u0438\u044f \u0434\u0430\u043d\u043d\u044b\u0445 \u043e \u043a\u043e\u043d\u0442\u0443\u0440\u0435 \u0431\u0435\u0437\u044c\u0435.<\/p>\n
;;\u041a\u043e\u043d\u0442\u0443\u0440 \u0431\u0435\u0437\u044c\u0435. ;; \u043a\u043e\u043d\u0442\u0443\u0440 \u0431\u0435\u0437\u044c\u0435 \u0441\u043e\u0441\u0442\u043e\u044f\u0449\u0438\u0439 \u0438\u0437 \u0442\u043e\u0447\u0435\u043a \u0431\u0435\u0437\u044c\u0435(\u044d\u0442\u043e \u043d\u0435 \u043c\u0430\u0442\u0435\u043c\u0430\u0442\u0438\u0447\u0435\u0441\u043a\u043e\u0435 \u043f\u043e\u043d\u044f\u0442\u0438\u0435) ;; \u0438 \u0444\u043b\u0430\u0433\u0430 \u0437\u0430\u043c\u043a\u043d\u0443\u0442\u043e\u0441\u0442\u0438 \u043a\u043e\u043d\u0442\u0443\u0440\u0430 (struct bezier   (points closed)) ;;\u0442\u0440\u043e\u0439\u043a\u0430 \u0442\u043e\u0447\u0435\u043a \u0438\u0437 \u043a\u043e\u0442\u043e\u0440\u044b\u0445 \u0441\u043e\u0441\u0442\u043e\u0438\u0442 \u043a\u043e\u043d\u0442\u0443\u0440 \u0431\u0435\u0437\u044c\u0435, \u0446\u0435\u043d\u0442\u0440- \u043e\u0434\u043d\u0430 \u0438\u0437 \u0442\u043e\u0447\u0435\u043a \u043a\u043e\u043d\u0442\u0443\u0440\u0430 ;;\u043f\u0440\u0435\u0432- \u0440\u044b\u0447\u0430\u0433 \u0443\u043f\u0440\u0430\u0432\u043b\u044f\u044e\u0449\u0435\u0439 \u0432\u0445\u043e\u0434\u044f\u0449\u0435\u0439 \u043b\u0438\u043d\u0438\u0435\u0439 \u0431\u0435\u0437\u044c\u0435 \u0432 \u043a\u043e\u043d\u0442\u0443\u0440\u0435 ;;\u043d\u0435\u043a\u0441\u0442- \u0440\u044b\u0447\u0430\u043a \u0443\u043f\u0440\u0430\u0432\u043b\u044f\u044e\u0449\u0435\u0439 \u0438\u0441\u0445\u043e\u0434\u044f\u0449\u0435\u0439 \u043b\u0438\u043d\u0438\u0435\u0439 \u0431\u0435\u0437\u044c\u0435 \u0432 \u043a\u043e\u043d\u0442\u0443\u0440\u0435. (struct bezier-p (center prev next)) <\/code><\/pre>\n
\u0414\u043b\u044f \u0440\u0430\u0431\u043e\u0442\u044b \u0441 \u044d\u0442\u043e\u0439 \u0441\u0442\u0440\u0443\u043a\u0442\u0443\u0440\u043e\u0439 \u044f \u043d\u0430\u043f\u0438\u0441\u0430\u043b \u043d\u0435\u0441\u043a\u043e\u043b\u044c\u043a\u043e \u0444\u0443\u043d\u043a\u0446\u0438\u0439, \u0441\u043e\u0437\u0434\u0430\u044e\u0449\u0443\u044e \u0441\u0442\u0440\u0443\u043a\u0442\u0443\u0440\u0443 bezier<\/code> \u043f\u043e \u043f\u043e\u043b\u0443\u0447\u0430\u0435\u043c\u043e\u043c\u0443 \u0438\u0437 GIMP \u043c\u0430\u0441\u0441\u0438\u0432\u0443, \u0438 \u0432\u044b\u043f\u043e\u043b\u043d\u044f\u044e\u0449\u0443\u044e \u043e\u0431\u0440\u0430\u0442\u043d\u043e\u0435 \u043f\u0440\u0435\u043e\u0431\u0440\u0430\u0437\u043e\u0432\u0430\u043d\u0438\u0435, \u043f\u043e \u0438\u043c\u0435\u044e\u0449\u0435\u0439\u0441\u044f \u0441\u0442\u0440\u0443\u043a\u0442\u0443\u0440\u0435 bezier<\/code> \u0441\u043e\u0437\u0434\u0430\u044e\u0449\u0443\u044e \u043c\u0430\u0441\u0441\u0438\u0432 \u0447\u0438\u0441\u0435\u043b, \u043a\u043e\u0442\u043e\u0440\u044b\u0439 \u0444\u0443\u043d\u043a\u0446\u0438\u0438 GIMP \u043c\u043e\u0433\u0443\u0442 \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u044c \u0434\u043b\u044f \u043f\u043e\u0441\u0442\u0440\u043e\u0435\u043d\u0438\u044f \u0441\u0442\u0440\u043e\u043a \u0438 \u0432\u0435\u043a\u0442\u043e\u0440\u043e\u0432 \u043d\u0430 \u0438\u0437\u043e\u0431\u0440\u0430\u0436\u0435\u043d\u0438\u0438.<\/p>\n
;;points \u0434\u043e\u043b\u0436\u0435\u043d \u0431\u044b\u0442\u044c \u0441\u043f\u0438\u0441\u043a\u043e\u043c \u0442\u043e\u0447\u0435\u043a bezier-p (defun (make-bezier points &key (closed 0))    (if (and  (pair? points)              (bezier-p? (car points)))        (bezier! points closed)        #f))  ;;\u0438\u0437 \u043c\u0430\u0441\u0441\u0438\u0432\u0430 \u043f\u043e\u043b\u0443\u0447\u0435\u043d\u043d\u043e\u0433\u043e \u0438\u0437 GIMP \u043f\u043e\u043b\u0443\u0447\u0430\u0435\u043c \u0441\u043f\u0438\u0441\u043e\u043a \u0442\u043e\u0447\u0435\u043a \u0431\u0435\u0437\u044c\u0435; \u0442.\u0435 \u0442\u0440\u043e\u0435\u043a ;;\u0438\u0437 \u043a\u043e\u0442\u043e\u0440\u044b\u0445 \u0441\u043e\u0441\u0442\u043e\u0438\u0442 \u043a\u043e\u043d\u0442\u0443\u0440  (define (parse-stroke-points arr)    (let* ((nums       (vector-length arr))           (num-points (\/ nums 6))           (rez        '()))       (if (exact? num-points)           (for (i 0 (- num-points 1))              (let ((ind (* i 6)))                 (set! rez                    (cons                     (bezier-p!                      (p! (vector-ref arr (+ ind 2)) (vector-ref arr (+ ind 3)))                      (p! (vector-ref arr (+ ind 0)) (vector-ref arr (+ ind 1)))                      (p! (vector-ref arr (+ ind 4)) (vector-ref arr (+ ind 5)))                      ) rez))))           rez)       (reverse rez)))  ;;\u0438\u0437 \u0441\u043f\u0438\u0441\u043a\u0430 \u0442\u043e\u0447\u0435\u043a \u0431\u0435\u0437\u044c\u0435 \u043f\u043e\u043b\u0443\u0447\u0430\u0435\u043c \u043c\u0430\u0441\u0441\u0438\u0432 \u043a\u043e\u043e\u0440\u0434\u0438\u043d\u0430\u0442 \u0434\u043b\u044f \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u043d\u0438\u044f \u0432 \u0444\u0443\u043d\u043a\u0446\u0438\u044f\u0445 ;;\u0433\u0438\u043c\u043f\u0430 \u0434\u043b\u044f \u0440\u0438\u0441\u043e\u0432\u0430\u043d\u0438\u044f strokes - \u043a\u043e\u043d\u0442\u0443\u0440\u043e\u0432 \u0431\u0435\u0437\u044c\u0435. (define (make-stroke-points lst)    (let* ((num-points (length lst))           (nums       (* num-points 6))           (arr        (make-vector nums))           (i          0))       (for-list (el lst)         (vector-set! arr (+ i 0) (p-x (bezier-p-prev el)))         (vector-set! arr (+ i 1) (p-y (bezier-p-prev el)))         (vector-set! arr (+ i 2) (p-x (bezier-p-center el)))         (vector-set! arr (+ i 3) (p-y (bezier-p-center el)))         (vector-set! arr (+ i 4) (p-x (bezier-p-next el)))         (vector-set! arr (+ i 5) (p-y (bezier-p-next el)))         (set! i (+ i 6)))       arr)) <\/code><\/pre>\n
\u0418 \u0442\u0435\u043f\u0435\u0440\u044c \u043c\u043e\u0436\u043d\u043e \u043d\u0430\u043f\u0438\u0441\u0430\u0442\u044c \u0444\u0443\u043d\u043a\u0446\u0438\u0438 \u043f\u043e\u043b\u0443\u0447\u0430\u044e\u0449\u0438\u0435 \u0438\u0437 \u0438\u0437\u043e\u0431\u0440\u0430\u0436\u0435\u043d\u0438\u044f GIMP \u0441\u0442\u0440\u043e\u043a\u0438 \u0438 \u0441\u043e\u0437\u0434\u0430\u044e\u0449\u0438\u0435 \u0441\u0442\u0440\u0443\u043a\u0442\u0443\u0440\u0443 bezier<\/code>. \u042f \u043d\u0430\u043f\u0438\u0441\u0430\u043b \u0432\u0441\u0435\u0433\u043e \u0434\u0432\u0435 \u0444\u0443\u043d\u043a\u0446\u0438\u0438, \u043f\u043e\u043b\u0443\u0447\u0438\u0442\u044c<\/strong> \u0438\u0437 \u0430\u043a\u0442\u0438\u0432\u043d\u043e\u0433\u043e \u0432\u0435\u043a\u0442\u043e\u0440\u0430<\/strong> \u043f\u0435\u0440\u0432\u0443\u044e \u0441\u0442\u0440\u043e\u043a\u0443 \u0438 \u043f\u0440\u043e\u0441\u0442\u043e \u043f\u043e\u043b\u0443\u0447\u0438\u0442\u044c \u0438\u0437 \u0438\u0437\u043e\u0431\u0440\u0430\u0436\u0435\u043d\u0438\u044f \u0437\u0430\u0434\u0430\u043d\u043d\u0443\u044e \u0441\u0442\u0440\u043e\u043a\u0443 \u0437\u0430\u0434\u0430\u043d\u043d\u043e\u0433\u043e \u0432\u0435\u043a\u0442\u043e\u0440\u0430<\/strong>.<\/p>\n
;;\u0441\u043e\u0437\u0434\u0430\u0442\u044c \u043a\u0440\u0438\u0432\u0443\u044e \u0431\u0435\u0437\u044c\u0435 \u0438\u0437 \u0438\u043c\u0435\u044e\u0449\u0435\u0433\u043e\u0441\u044f \u0430\u043a\u0442\u0438\u0432\u043d\u043e\u0433\u043e \u0432\u0435\u043a\u0442\u043e\u0440\u0430 \u043d\u0430 \u0438\u0437\u043e\u0431\u0440\u0430\u0436\u0435\u043d\u0438\u0438 (define (make-bezier-from-img img)    (let* ((v (car (gimp-image-get-active-vectors img)))           (strokes (gimp-vectors-get-strokes v)))       (if (> (car strokes) 0)           (let* ((stroke-id (vector-ref (cadr strokes) 0))                  (points    (gimp-vectors-stroke-get-points v stroke-id)))              (make-bezier (parse-stroke-points (caddr points))                           :closed (cadddr points)))))    )  (define (make-bezier-from-img-by-id img vec stroke-id) (let ((points    (gimp-vectors-stroke-get-points vec stroke-id)))    (make-bezier (parse-stroke-points (caddr points))                           :closed (cadddr points))))  <\/code><\/pre>\n
\u0412\u043e\u0442 \u043a\u0430\u043a \u0438\u043c\u0438 \u043c\u043e\u0436\u043d\u043e \u0432\u043e\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u044c\u0441\u044f:<\/p>\n
(define b1 (make-bezier-from-img i1)) ;;#(bezier (#(bezier-p #(p 113.0 204.0) #(p 200.0 12.0) #(p 79.0 394.0))  ....  (define b2 (make-bezier-from-img-by-id i1 3 2)) ;;#(bezier (#(bezier-p #(p 497.0 71.0) #(p 443.0 75.0) #(p 500.0 73.0)) ;;#(bezier-p #(p 570.0 57.0) #(p 570.0 57.0) #(p 570.0<\/code><\/pre>\n<\/div>\n<\/div>\n<\/div>\n<\/div>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[],"tags":[],"class_list":["post-470742","post","type-post","status-publish","format-standard","hentry"],"_links":{"self":[{"href":"https:\/\/savepearlharbor.com\/index.php?rest_route=\/wp\/v2\/posts\/470742","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/savepearlharbor.com\/index.php?rest_route=\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/savepearlharbor.com\/index.php?rest_route=\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/savepearlharbor.com\/index.php?rest_route=\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/savepearlharbor.com\/index.php?rest_route=%2Fwp%2Fv2%2Fcomments&post=470742"}],"version-history":[{"count":0,"href":"https:\/\/savepearlharbor.com\/index.php?rest_route=\/wp\/v2\/posts\/470742\/revisions"}],"wp:attachment":[{"href":"https:\/\/savepearlharbor.com\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=470742"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/savepearlharbor.com\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=470742"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/savepearlharbor.com\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=470742"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}