X-MAS Animation mit imc FAMOS

Animation 2019

This Seasonal graphic was drawn with imc FAMOS.

 

Download the sequence

 

The imc FAMOS sequence used to create the animation can be downloaded via the following button.

FAMOS_MerryChristmas.seq

;*******************************************************************

 

;                    Feliz Navidad 
;*******************************************************************
;             Te deseamos una Feliz Navidad
;                          y
;                      un feliz año nuevo
;
;                  imc Prueba & Medición
;*******************************************************************

;----------------------------------------------------------------
; const
;----------------------------------------------------------------

;----- winter-color
color:sky = RGB( 0, 144, 255)
color:stars = RGB( 255, 255, 255)
color:BigMountain = RGB( 255, 255, 255)
color:Mountain = RGB( 176, 192, 255)
color:SmallMountain = RGB( 0, 96, 192)
color:BackTrees = RGB( 0, 28, 128)
color:FoodHills = RGB( 0, 28, 160)
color:gras = RGB( 0, 80, 128)
color:sea = RGB( 0, 28, 160)
color:waterLine = RGB( 255, 53, 0)
color:snow = RGB( 255, 255, 255)
color:earth = RGB( 0, 76, 43)
color:tree = RGB( 34, 160, 0)
color:treelights = RGB( 255, 0, 0)

;----- View
LineType:Bar = 5
LineType:Dots = 3
LineType:line = 1
LineType:No = 0
LineType:VertLine = 4
LineType:Bar3d = 7
LineType:Interpolation = 8


;----- Summer Color
; try it yourself :-)


;----------------------------------------------------------------
; some Measurement Signals
;----------------------------------------------------------------
base = Rampe(0,0.1,2* pi * 100)

sky       = base * 0 + 6

BigMountain        = Sin( base * 0.2) * 0.8 + 4.0
Mountain            = sin( base * 0.6) * 0.5 + 3.0 + (sin( base * 0.05))*0.8
SmallMountain        = sin( base * 0.3) * 0.5 + 2.2 + (sin( base * 0.05))*0.8
BackTrees             = sin( base * 5.0) * 0.7 + 2.3 + (1-sin( base * 0.05))*0.8
FoodHills            = sin( base * 0.1) * 0.3 + 2.0
Gras                  = sin( base * 6.0) * 0.1 + 1.8 + (1-sin( base * 0.05)) * 0.3
sea                   = base * 0 + 1.6
waterLine            = base * 0 + 1.6
Earth                = sin( base * 11.0) * 0.02 + 0.1 + (1-sin( base * 0.04)) * 1.8

snow  = random( 60, 0, 0, 1, 0 ) *1.3
stars = random( 60, 1, 0, 0, 0 ) + 4

;----- tree
a = Ramp( 0, 0.01, 1000)
a = a/max( a)
b = max( a)-a
a = Binde( a, b)
t = sin( a*3.14*30)*0.1
t = xOff( t, 5)

a=e^a-1
a=e^a-1

tree = a + a*t
tree = xOff( tree, 5)
tree_Line = tree

;----- treeLigths
a = alle0( t)
a = Tast( a, 2)
b = Wert( tree, a)
treelights = XYvon( a, b)

;----------------------------------------------------------------
; color
;----------------------------------------------------------------
SetColor( sky,             color:sky)
SetColor( stars,             Color:Stars)
SetColor( BigMountain,     Color:BigMountain)
SetColor( Mountain,         Color:Mountain)
SetColor( SmallMountain, Color:SmallMountain)
SetColor( BackTrees,     Color:BackTrees)
SetColor( FoodHills,     Color:FoodHills)
SetColor( gras,             Color:gras)
SetColor( sea,             Color:sea)
SetColor( waterLine,     Color:waterLine)
SetColor( snow,             Color:snow)
SetColor( earth,             Color:earth)
SetColor( tree,             Color:tree)
SetColor( treelights,     Color:treelights)

;----------------------------------------------------------------
; Painting
;----------------------------------------------------------------
Merry_Christmas = empty
CwNewWindow( Merry_Christmas, "show")

CwNewChannel( "first line", sky)
CwLineSet( "type", LineType:Bar)

CwAxisSet( "Range", 4)
CwAxisSet( "min", 0)
CwAxisSet( "max", 5)


CwNewChannel( "first line", stars)
CwLineSet( "type", LineType:Dots)

CwNewChannel( "first line", BigMountain)
CwLineSet( "type", LineType:Bar)

CwNewChannel( "first line", Mountain)
CwLineSet( "type", LineType:Bar)

CwNewChannel( "first line", SmallMountain)
CwLineSet( "type", LineType:Bar)

CwNewChannel( "first line", FoodHills)
CwLineSet( "type", LineType:Bar)

CwNewChannel( "first line", BackTrees)
CwLineSet( "type", LineType:Bar)

CwNewChannel( "first line", gras)
CwLineSet( "type", LineType:Bar)

CwNewChannel( "first line", sea)
CwLineSet( "type", LineType:Bar)

CwNewChannel( "first line", WaterLine)

CwNewChannel( "first line", snow)
CwLineSet( "type", LineType:Dots)

CwNewChannel( "first line", earth)
CwLineSet( "type", LineType:Bar)

CwNewChannel( "first line", tree)
CwLineSet( "type", LineType:Bar)

CwNewChannel( "first line", TreeLights)
CwLineSet( "type", LineType:no)
CwLineSet( "symbol", 8)

CwNewChannel( "first line", Merry_Christmas )
Top