Sample: Scrolling Background

Source Code

'-------------------------------------------------
' Source code for sample: Scrolling Background
'-------------------------------------------------
DIM logo AS IMAGE

logo = IMAGE "amiga_logo", (_MIDDLEX, 200)
ANIM logo, "blink", 5000

' Try different directions.
BGIMAGE "bg_amiga_64", "move-up", 2
SLEEP 5000
BGIMAGE "bg_amiga_64", "move-right", 2
SLEEP 5000
BGIMAGE "bg_amiga_64", "move-down", 2
SLEEP 5000
BGIMAGE "bg_amiga_64", "move-left", 2
SLEEP 5000

' No scrolling, no blinking
BGIMAGE "bg_amiga_64"
STOP ANIM logo
ALPHA logo, 100


Go back to list of Samples.