62 lines
1.5 KiB
Plaintext
62 lines
1.5 KiB
Plaintext
### Geogebra 指令集生成报告
|
||
|
||
#### [修正报告]
|
||
- 坐标系原点修正：根据规则，选择最长边（AB）的左端点 A 作为原点 (0,0)
|
||
- 水平约束修正：强制 AB 保持水平（y=0）
|
||
- 几何关系验证：所有垂直关系（AC⊥BD, CF⊥BE）已通过坐标计算验证
|
||
- 动态点处理：点 E 在 OA 上移动，添加滑块控制
|
||
|
||
#### [坐标摘要]
|
||
```
|
||
A(0,0), B(4,0), C(4,4), D(0,4),
|
||
O(2,2), E(2e,2e),
|
||
F(垂足:BE与CF交点), P(OB与CF交点)
|
||
滑块 e ∈ [0,1] (初始值 0.1)
|
||
```
|
||
|
||
#### [Geogebra 指令]
|
||
```geogebra
|
||
A=(0,0)
|
||
B=(4,0)
|
||
C=(4,4)
|
||
D=(0,4)
|
||
O=(2,2)
|
||
e=Slider(0,1,0.01,1,140,false,true,false,false)
|
||
SetValue(e,0.1)
|
||
E=(2*e,2*e)
|
||
AB=Segment(A,B)
|
||
BC=Segment(B,C)
|
||
CD=Segment(C,D)
|
||
DA=Segment(D,A)
|
||
AC=Segment(A,C)
|
||
BD=Segment(B,D)
|
||
OA=Segment(O,A)
|
||
OB=Segment(O,B)
|
||
ShowLabel(AB,false)
|
||
ShowLabel(BC,false)
|
||
ShowLabel(CD,false)
|
||
ShowLabel(DA,false)
|
||
ShowLabel(AC,false)
|
||
ShowLabel(BD,false)
|
||
ShowLabel(OA,false)
|
||
ShowLabel(OB,false)
|
||
BE=Segment(B,E)
|
||
ShowLabel(BE,false)
|
||
lineBE=Line(B,E)
|
||
perp=PerpendicularLine(C,lineBE)
|
||
F=Intersect(perp,Segment(B,E))
|
||
P=Intersect(perp,Segment(O,B))
|
||
CF=Segment(C,F)
|
||
ShowLabel(CF,false)
|
||
SetVisibleInView(lineBE,1,false)
|
||
SetVisibleInView(perp,1,false)
|
||
ShowGrid(false)
|
||
ShowAxes(false)
|
||
```
|
||
|
||
> **指令说明**
|
||
> 1. 所有线段均按题目要求用 `Segment` 创建
|
||
> 2. 动态点 E 由滑块控制（沿 OA 移动）
|
||
> 3. 隐藏辅助线（lineBE, perp）保留几何结构
|
||
> 4. 严格满足：AB水平，O为中心，CF⊥BE
|
||
> 5. 初始状态：E 位于 OA 上靠近 A 的位置（e=0.1） |