斜截式直线作图

GeoGebra 命令及参数

1. Sequence(-12, -1) → negInt
2. Sequence(1, 12) → posInt
3. Line(A, B) → myLine
4. Sequence(-8, 8) → possYInt
5. RandomElement(If[reset ≟ true, possYInt]) → b
6. LaTeX(If[m ≟ 1, "", If[m ≟ -1, "-", If[m > 0, FractionText[m], "-" + (FractionText[abs(m)])]]]) → slope
7. LaTeX(If[b ≟ 0, "y=" + slope + "x", If[b > 0, "y=" + slope + "x+" + b, "y=" + slope + "x" + b]]) → graphLine
8. Vector((x(A), y(B)), B) → run
9. Vector(A, (x(A), y(B))) → rise
10. Segment(A, (x(A), y(B))) → riseLabel
11. Segment((x(A), y(B)), B) → runLabel
12. If(checked ≟ true ∧ myLine ≟ correctLine, true, false) → isCorrect
13. If(qCount ≟ 0, 0, (Score * 100 / ((qCount * pointsPerQ)))) → percentCorrect
14. Text(RandomElement[CorrectTexts]) → Correct
15. Text(If[Intersect[myLine, y = 0] ≟ (b, 0), Element[FeedbackTexts, 3], If[Slope[myLine] ≟ mReciprocal, Element[FeedbackTexts, 1], If[Slope[myLine] ≟ (-m), Element[FeedbackTexts, 2], RandomElement[IncorrectTexts]]]]) → Incorrect