矩形旋转

GeoGebra 命令及参数

1. Vector(B_1, X) → u
2. Vector(B_1, Y) → v
3. OrthogonalLine(view, yAxis) → a_1
4. OrthogonalLine(view, xAxis) → b
5. Vector(B_1, Z) → w
6. Sequence((x(O), y(O)) - (Radius * (((sin(0°) * sin(i°)) * w) + ((cos(0°) * sin(i°)) * u) - (cos(i°) * v))), i, 0, k, n) → liste1
7. Translate(O, Vector[(Height * w)]) → F
8. Sequence((x(F), y(F)) - (Radius * (((sin(0°) * sin(i°)) * w) + ((cos(0°) * sin(i°)) * u) - (cos(i°) * v))), i, 0, k, n) → liste5
9. Sequence(Polygon[O, Element[liste1, i], Element[liste5, i], F], i, 0, Rotate) → liste6
10. CurveCartesian(x(F - (Radius * (((0 * sin(i)) * w) + (sin(i) * u) - (cos(i) * v)))), y(F - (Radius * (((0 * sin(i)) * w) + (sin(i) * u) - (cos(i) * v)))), i, 0, 6.283185307179586) → f
11. CurveCartesian(x(O - (Radius * (((0 * sin(i)) * w) + (sin(i) * u) - (cos(i) * v)))), y(O - (Radius * (((0 * sin(i)) * w) + (sin(i) * u) - (cos(i) * v)))), i, 0, 6.283185307179586) → d
12. Polygon(O, F, Element[liste5, Rotate], Element[liste1, Rotate]) → poly2, m, p, q, s
13. Segment(F, O) → f_1