\textsf{|\|\|\|\|\|\|\|\|\|\|\}

\textsf{------------------------------------------------------------------------}

$\textsf{Los geht's!}$

$\textsf{Neues Bild}$

$\textsf{Zurück}$

$\textsf\bold{Nochmal!}$

$\textsf{Eingabefelder löschen}$

$\textsf{Lösung anzeigen}$

0123456789,. 

$\textsf{Setze auf Start}$

$\textsf\bold{Nochmal!}$

PStart = (9.489206691146709, 5.903824217709173)
PCurrent = (9.489206691146709, 5.903824217709173)
moved: PCurrent ≠ PStart
A3 = (8.037999097813621, 2.9795626781851)
B3: A3 + (0.38, 0)
A4: B3
B4: A4 + (0.38, 0)
A5: B4
B5: A5 + (0.38, 0)
A6: B5
maxstep: 3
resx: 820
resy: 600
step = 1 (slider from 1 to maxstep, step 1)
showBtnLos = false
showBtnBack = true
showBtnNext = true
showBtnNochmal = false
listfixed: {moved, moved, moved}
fixed: moved
exnum = 1 (slider from 1 to maxexnum, step 1)
maxexnum: 3
input1 = NaN
input2 = NaN
attemptCount1 = 0
attemptCount2 = 0
correct2: input1 ≟ input2
showBtnSolution1 = false
showBtnSolution2: false
Eingabefeld1 = Textfield(input1)
Eingabefeld2 = Textfield(input2)
correct1: input1 ≟ input2
inputCorrect: Length[KeepIf[¬(temp ∈ TextToUnicode[erlaubteZeichen]), temp, TextToUnicode[Text[Eingabefeld1]]]] ≟ 0 ∧ Length[KeepIf[¬(temp ∈ TextToUnicode[erlaubteZeichen]), temp, TextToUnicode[Text[Eingabefeld2]]]] ≟ 0
P0: (0, 0)
sizepic = 11.9 (slider from -5 to 20)
A1 = (5.560736587436086, 6.705365493792921)
B1 = (6.630913991919182, 5.635188089309823)
C1 = (6.630913991919182, 7.755724798192998)
A2 = (6.115643389760655, 6.705365493792921)
B2 = (6.611095891836162, 6.170276791551371)
C2: (6.65, 7.26027)
A8 = (2.0727509728245175, 3.0786531786002014)
A9: (1.47821, 2.66)
A10: (2.64748, 2.66)
A11: (0.95, 2.25)
A12: (2.1, 2.25)
A13: (3.24202, 2.25)
A14: (0.32876, 1.85)
A15: (1.43857, 1.85)
A16: (2.64748, 1.85)
A17: (3.75729, 1.85)
B6: A6 + (0.38, 0)
A7: B6
C3: (8.45418, 3.65338)
C4: C3 + B3 - A3
C5: C4 + B4 - A4
C6: C5 + B5 - A5
C7: C6 + B6 - A6
B7: A7 + (0.38, 0)
B8: A8 + (1.15, 0)
C8: A8 + (0, 0.36)
B9: A9 + (1.15, 0)
C9: A9 + (0, 0.36)
B10: A10 + (1.15, 0)
B11: A11 + (1.15, 0)
B12: A12 + (1.15, 0)
B13: A13 + (1.15, 0)
B14: A14 + (1.15, 0)
B15: A15 + (1.15, 0)
B16: A16 + (1.15, 0)
B17: A17 + (1.15, 0)
C10: A10 + (0, 0.36)
C11: A11 + (0, 0.36)
C12: A12 + (0, 0.36)
C13: A13 + (0, 0.36)
C14: A14 + (0, 0.36)
C15: A15 + (0, 0.36)
C16: A16 + (0, 0.36)
C17: A17 + (0, 0.36)
PCenter: PCurrent + (1.3, 2.4)
spyRadius: 1.3
spyGlass = Polygon(Sequence[Rotate[PCenter + (spyRadius - 0.05, 0), K, PCenter], K, 0, 360°, 0.5])
PCurrent2 = Point(Line[PCurrent, xAxis])
allVisibleParallelograms: {}
D1: Midpoint[B1, C1] - (0.5, 0)
D2 = Midpoint(B2, C2)
D3 = Midpoint(B3, C3)
D4 = Midpoint(B4, C4)
D5 = Midpoint(B5, C5)
D6 = Midpoint(B6, C6)
D7 = Midpoint(B7, C7)
D8 = Midpoint(B8, C8)
D9 = Midpoint(B9, C9)
D10 = Midpoint(B10, C10)
D11 = Midpoint(B11, C11)
D12 = Midpoint(B12, C12)
D13 = Midpoint(B13, C13)
D14 = Midpoint(B14, C14)
D15 = Midpoint(B15, C15)
D16 = Midpoint(B16, C16)
D17 = Midpoint(B17, C17)
E2 = Distance(D2, PCenter)
E3 = Distance(D3, PCenter)
E4 = Distance(D4, PCenter)
E5 = Distance(D5, PCenter)
E6 = Distance(D6, PCenter)
E7 = Distance(D7, PCenter)
E8 = Distance(D8, PCenter)
E9 = Distance(D9, PCenter)
E10 = Distance(D10, PCenter)
E11 = Distance(D11, PCenter)
E12 = Distance(D12, PCenter)
E13 = Distance(D13, PCenter)
E14 = Distance(D14, PCenter)
E15 = Distance(D15, PCenter)
E16 = Distance(D16, PCenter)
E17 = Distance(D17, PCenter)
distancesCurrent = Element({CellRange(E1,E17,"numeric"), CellRange(E21,E30,"numeric"), CellRange(E31,E49,"numeric")}, exnum)
tolerance: 0.15
displayIndex = IndexOf(Min[distancesCurrent], distancesCurrent)
F1: Midpoint[B1, C1] + (0.5, 0)
E1 = Min(Distance[D1, PCenter], Distance[F1, PCenter])
A20 = (4.087699119847573, 3.3046025292644736)
A21 = (2.341347047923793, 3.040619076531809)
A22: (2.62564, 1.62)
A23: (4.69689, 1.62)
A24 = (0.8589784287326763, 1.5785568767816653)
A25 = (0.45285003991319234, 1.5988632962226397)
A26 = (5.285777866865051, 3.6091988208790866)
B20: A20 + (3.7, 0)
B21: A21 + (2.95, 0)
B22: A22 + (0.3, 0)
B23: A23 + (0.3, 0)
B24 = (2.3210406284828187, 3.3249089487054477)
B25: A25 + (0.4, 0)
B26 = (6.280792419472786, 1.537944037899717)
C20: A20 + (0, 3.75)
C21: A21 + (0, 2.9)
C22: A22 + (0, 1.4)
C23: A23 + (0, 1.4)
C24: A24 + (0, 0.3)
C25: A25 + (0, 0.3)
C26: A26 + (0, 0.7)
D20 = Midpoint(B20, C20)
D21 = Midpoint(B21, C21)
D22 = Midpoint(B22, C22)
D23 = Midpoint(B23, C23)
D24 = Midpoint(B24, C24)
D25 = Midpoint(B25, C25)
D26 = Midpoint(B26, C26)
E21 = Distance(D21, PCenter)
E22 = Distance(D22, PCenter)
E23 = Distance(D23, PCenter)
E24 = Distance(D24, PCenter)
E25 = Distance(D25, PCenter)
E26 = Distance(D26, PCenter)
currLocationsA20: {A20 + (0.4, 3), A20 + (0.4, 1), A20 + (2, 0.7), A20 + (3.4, 1), A20 + (3.4, 3), A20 + (2, 3.5)}
E20 = Min(Zip[Distance[A, PCurrent], A, currLocationsA20])
distanceCheck = Zip(Z ≤ tolerance, Z, distancesCurrent)
allPointsA = Element({CellRange(A1,A17,"point"), CellRange(A21,A30,"point"), CellRange(A31,A49,"point")}, exnum)
allPointsB = Element({CellRange(B1,B17,"point"), CellRange(B21,B30,"point"), CellRange(B31,B49,"point")}, exnum)
allPointsC = Element({CellRange(C1,C17,"point"), CellRange(C21,C30,"point"), CellRange(C31,C49,"point")}, exnum)
allParallelograms = Zip(Polygon[M, N, O, O + Vector[N, M]], M, allPointsC, N, allPointsA, O, allPointsB)
allVisibleParallels = Zip(IntersectPath[Z, spyGlass], Z, allParallelograms)
displayParallelogram: allVisibleParallels(displayIndex)
displayOutline: displayParallelogram
A27 = (8.595724235743845, 4.462068437400004)
A28 = (7.438258327608316, 1.4973311990177662)
A29 = (11.134026665865619, 1.5176376184587403)
A30 = (8.940933366240406, 2.2080558794518637)
B27: A27 + (1.85, 0)
C27: A27 + (0, 0.4)
B28: A28 + (0.45, 0)
B29: A29 + (0.45, 0)
C28: (8.54, 4.44176)
C29: C28 + (1.5, 0)
B30: A30 + (1.1, 0)
C30: A30 + (0, 0.13)
D27 = Midpoint(B27, C27)
D28 = Midpoint(B28, C28)
D29 = Midpoint(B29, C29)
D30 = Midpoint(B30, C30)
E27 = Distance(D27, PCenter)
E28 = Distance(D28, PCenter)
E29 = Distance(D29, PCenter)
E30 = Distance(D30, PCenter)
A31 = (5.9558897084172, 6.898838770316906)
A32: (5.95588970841721, 6.89883877031691)
A33: (5.95588970841721, 6.89883877031691)
A34: (5.95588970841721, 6.89883877031691)
A35: (5.95588970841721, 6.89883877031691)
A36: (5.95588970841721, 6.89883877031691)
A37: (5.95588970841721, 6.89883877031691)
A38: (5.95588970841721, 6.89883877031691)
A39 = (3.5597322143822443, 5.132180278952149)
A40 = (7.052436358229806, 5.172793117834098)
A41 = (2.158589272955025, 2.167443040569914)
A44 = (4.676585283635825, 2.167443040569914)
A45 = (7.397645488726368, 2.167443040569914)
A46 = (7.722548199781954, 3.365521787587393)
A47 = (8.57541781630287, 3.0609254959727794)
A48 = (8.880014107917484, 2.7969420432401146)
A49 = (8.291127944129233, 2.4720393321845275)
B31 = (6.341711677795709, 6.53332322037937)
B32 = (5.9355832889762254, 6.350565445410602)
B33 = (5.549761319597716, 6.553629639820344)
B34 = (5.407616383510896, 6.878532350875932)
B35 = (5.590374158479664, 7.2440479008134675)
B36 = (5.9355832889762254, 7.4471120952232095)
B37 = (6.341711677795709, 7.284660739695417)
B38 = (6.483856613882528, 6.898838770316906)
B44 = (5.103020091896283, 2.3908136544206307)
B45 = (9.712577304997426, 2.187749460010888)
B46 = (8.027144491396568, 3.365521787587393)
B47 = (8.880014107917484, 3.0609254959727794)
B48 = (9.184610399532097, 2.7563292043581664)
B49 = (8.555111396861896, 2.4720393321845275)
C31: (6.48385661388254, 6.89883877031691)
C32: (6.34171167779572, 6.53332322037938)
C33: (5.93558328897623, 6.35056544541061)
C34: (5.54976131959772, 6.55362963982035)
C35: (5.40761638351090, 6.87853235087594)
C36: (5.59037415847967, 7.24404790081348)
C37: (5.93558328897623, 7.44711209522322)
C38: (6.34171167779572, 7.28466073969542)
B39: A39 + (1.2, 0)
C39: A39 + (0, 1.2)
C40 = (7.438258327608316, 6.249033348205732)
C42 = (2.7474754367432763, 4.035633629139542)
C43 = (3.1942166644447085, 4.137165726344413)
C44 = (3.7018771504690635, 3.8934886930527224)
C45 = (7.397645488726368, 3.9137951124936965)
C46 = (8.027144491396568, 3.6498116597610317)
C47 = (8.291127944129233, 3.324908948705444)
C48 = (9.164303980091123, 3.0609254959727794)
C49 = (8.047450910837542, 2.7360227849171923)
B40: A40 + (0.8, 0)
B41: A41 + (0.55, 0)
A42: A41 + (0.55, 0)
A43: A42 + (0.45, 0)
B42: A42 + (0.45, 0)
B43: A43 + (0.5, 0)
C41: A41 + (0, 2.3)
D31 = Midpoint(B31, C31)
D32 = Midpoint(B32, C32)
D33 = Midpoint(B33, C33)
D34 = Midpoint(B34, C34)
D35 = Midpoint(B35, C35)
D36 = Midpoint(B36, C36)
D37 = Midpoint(B37, C37)
D38 = Midpoint(B38, C38)
D39 = Midpoint(B39, C39)
D40 = Midpoint(B40, C40)
D41 = Midpoint(B41, C41)
D42 = Midpoint(B42, C42)
D43 = Midpoint(B43, C43)
D44 = Midpoint(B44, C44)
D45 = Midpoint(B45, C45)
D46 = Midpoint(B46, C46)
D47 = Midpoint(B47, C47)
D48 = Midpoint(B48, C48)
D49 = Midpoint(B49, C49)
E31 = Distance(D31, PCenter)
E32 = Distance(D32, PCenter)
E33 = Distance(D33, PCenter)
E34 = Distance(D34, PCenter)
E35 = Distance(D35, PCenter)
E36 = Distance(D36, PCenter)
E37 = Distance(D37, PCenter)
E38 = Distance(D38, PCenter)
E39 = Distance(D39, PCenter)
E40 = Distance(D40, PCenter)
E41 = Distance(D41, PCenter)
E42 = Distance(D42, PCenter)
E43 = Distance(D43, PCenter)
E44 = Distance(D44, PCenter)
E45 = Distance(D45, PCenter)
E46 = Distance(D46, PCenter)
E47 = Distance(D47, PCenter)
E48 = Distance(D48, PCenter)
E49 = Distance(D49, PCenter)
currLocations = Element({CellRange(D1,D17,"point"), CellRange(D21,D30,"point"), CellRange(D31,D49,"point")}, exnum)
excount: 1
listExnum = Join(Sequence[Shuffle[{1, 2, 3}], m, 1, 35])
questionCount: 0
names: {"Quadrat", "Rechteck", "Parallelogramm", "Raute"}
G1: 1
G2: 1
G3: 3
G4: 3
G5: 3
G6: 3
G7: 3
G8: 2
G9: 2
G10: 2
G11: 2
G12: 2
G13: 2
G14: 2
G15: 2
G16: 2
G17: 2
H1: 1
H2: 2
H3: 2
H4: 3
H5: 2
H6: 3
H7: 2
H8: 3
H9: 3
H10: 2
I1: 4
I15: 2
I16: 3
I17: 3
I18: 3
I19: 3
I2: 4
I3: 4
I4: 4
I5: 4
I6: 4
I7: 4
I8: 4
I9: 1
I10: 3
I11: 2
I12: 2
I13: 2
I14: 2
H11: 0
H12: 0
H13: 0
H14: 0
H15: 0
H16: 0
H17: 0
H18: 0
H19: 0
G18: 0
G19: 0
m1: {{G1, H1, I1}, {G2, H2, I2}, {G3, H3, I3}, {G4, H4, I4}, {G5, H5, I5}, {G6, H6, I6}, {G7, H7, I7}, {G8, H8, I8}, {G9, H9, I9}, {G10, H10, I10}, {G11, H11, I11}, {G12, H12, I12}, {G13, H13, I13}, {G14, H14, I14}, {G15, H15, I15}, {G16, H16, I16}, {G17, H17, I17}, {G18, H18, I18}, {G19, H19, I19}}
case: m1(displayIndex, exnum)
Text3: "\textsf{" + (LaTeX[names(case)]) + ""
pics: {"auf der Baustelle", "auf dem Spielplatz", "auf dem Regal"}
Text1: "\textsf{Bewege die Lupe, um " + (LaTeX[pics(exnum)]) + " besondere Figuren zu entdecken."