A = (1, 0)
O = (0, 0)
L_1 = Sequence(Rotate[A, ((n * 15))°], n, 1, 23, 1)
B = Point(L_1)
C = Point(L_1)
D = Point(L_1)