IF NumOfBracket_3<>0 THEN
_rotz=-270
cx=b
cy=a
DEL 1 УДАЛИТЬ - дублируется в вызываемой подпрограмме 10
GOSUB 10
ENDIF
IF NumOfBracket_4<>0 THEN
_rotz=180
cx=a
cy=b
DEL 1 УДАЛИТЬ - дублируется в вызываемой подпрограмме 10
GOSUB 10
ENDIF
ENDIF
END
!! *** Haunch Length
unID=100 УДАЛИТЬ – Дублирование unID: 100
HOTSPOT2 cx/2,cy/2, unID,Bracket_length,1+128 : unID=unID+1
HOTSPOT2 cx/2+Bracket_length,cy/2, unID,Bracket_length,2 : unID=unID+1
HOTSPOT2 cx/2-1,cy/2, unID,Bracket_length,3 : unID=unID+1
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
Удачи!