Skip to content

Latest commit

 

History

History
33 lines (21 loc) · 813 Bytes

Bouncing.md

File metadata and controls

33 lines (21 loc) · 813 Bytes
Raw

Zurück

Sechste Aufgabe

Verändere folgendes Programm (Bouncing.elm):

scene _ t =
  let
    h = 50 * t
  in
    group
    [ path [ (-200,-20), (200,-20) ]
    , circle 20 |> move (0,h)
    ]

main = display (-200,-100) (200,200) scene (Just (FPS 50))

so dass ein auf und ab springender Ball zu sehen ist, wie etwa hier.

Zusatz: Erweitere das Programm so, dass zur "Springbewegung" auch noch eine horizontale Bewegung kommt, indem der Ball der Position des Mauszeigers nach links bzw. rechts folgt.

Weiter

(Datei, @share-elm)