Все супер, только цифры 7 и 9 неправильные. Необходимо поправить со строки 100
// ПРАВО ВЕРХ
Если ТекЦифра = 0
ИЛИ ТекЦифра = 1
ИЛИ ТекЦифра = 2
ИЛИ ТекЦифра = 4
//ИЛИ ТекЦифра = 7
ИЛИ ТекЦифра = 8
ИЛИ ТекЦифра = 9 Тогда
НарисоватьЛинию(Макет, Х0 + РазмерРебра, У0, 0, РазмерРебра, ТолщинаЛинии);
КонецЕсли;
// ЦЕНТР
Если ТекЦифра = 3
ИЛИ ТекЦифра = 4
ИЛИ ТекЦифра = 5
ИЛИ ТекЦифра = 6
ИЛИ ТекЦифра = 8
ИЛИ ТекЦифра = 9 Тогда
НарисоватьЛинию(Макет, Х0, У0+РазмерРебра, РазмерРебра, 0, ТолщинаЛинии);
КонецЕсли;
// ВЕРХ ПОПЕРЕЧНАЯ
Если ТекЦифра = 1
ИЛИ ТекЦифра = 3
ИЛИ ТекЦифра = 7
ИЛИ ТекЦифра = 6 Тогда
НарисоватьЛинию(Макет, Х0+РазмерРебра, У0, -РазмерРебра, РазмерРебра, ТолщинаЛинии);
КонецЕсли;
//ЛЕВО НИЗ
Если ТекЦифра = 0
ИЛИ ТекЦифра = 6
ИЛИ ТекЦифра = 7
ИЛИ ТекЦифра = 8 Тогда
НарисоватьЛинию(Макет, Х0, У0+РазмерРебра, 0, РазмерРебра, ТолщинаЛинии);
КонецЕсли;
//ПРАВО НИЗ
Если ТекЦифра = 0
ИЛИ ТекЦифра = 1
ИЛИ ТекЦифра = 4
ИЛИ ТекЦифра = 5
ИЛИ ТекЦифра = 6
//ИЛИ ТекЦифра = 7
ИЛИ ТекЦифра = 8
//ИЛИ ТекЦифра = 9
Тогда
НарисоватьЛинию(Макет, Х0+РазмерРебра, У0+РазмерРебра, 0, РазмерРебра, ТолщинаЛинии);
КонецЕсли;
// НИЗ
Если ТекЦифра = 0
ИЛИ ТекЦифра = 2
ИЛИ ТекЦифра = 5
ИЛИ ТекЦифра = 6
ИЛИ ТекЦифра = 8
//ИЛИ ТекЦифра = 9
Тогда
НарисоватьЛинию(Макет, Х0, У0+РазмерРебра*2, РазмерРебра, 0, ТолщинаЛинии);
КонецЕсли;
//НИЗ ПОПЕРЕЧНАЯ
Если ТекЦифра = 2
ИЛИ ТекЦифра = 3
ИЛИ ТекЦифра = 9
Тогда
НарисоватьЛинию(Макет, Х0+РазмерРебра, У0+РазмерРебра, -РазмерРебра, РазмерРебра, ТолщинаЛинии);
КонецЕсли;
Показать