# Theme by Guillaume Cocatre-Zilgien <gcocatre@gmail.com>
# CC-BY-SA

# Disable status bar
%wd
# Backdrop
%X(-)

# Status bar: emphasize volume when > 0dB, storage activity, and battery level when < 10%
# Rockbox bug/quirk: %?if() evaluates the number that's being tested to (number + 1).
# Example: '14-Nimbus' will return true when tested to be equal to 15.
# So here when I'm testing whether the font is '> 15', I'm really testing if the font size is strictly superior to 14, not 15.

# Volume
%?if(%ss(0, 2, %St(font), number), >, 15)<%?if(%pv, >, 0)<%Vd(volumehigh19)|%Vd(volume19)>|%?if(%pv, >, 0)<%Vd(volumehigh14)|%Vd(volume14)>>

%Vl(volumehigh14,10,4,102,16,-)
%Vf(ffe60f)
%ac%pv dB

%Vl(volume14,10,4,102,16,-)
%Vf(0de2e5)
%ac%pv dB

%Vl(volumehigh19,10,1,102,19,-)
%Vf(ffe60f)
%ac%pv dB

%Vl(volume19,10,1,102,19,-)
%Vf(0de2e5)
%ac%pv dB

# Storage
%V(112,6,15,9,-)
%?if(%lh, =, h)<%x(storageactivity,storageactivity.bmp,0,0)|>

# Battery
%?if(%ss(0, 2, %St(font), number), >, 15)<%?if(%bc, =, c)<%Vd(batterycharging19)|%?if(%bp, =, p)<%Vd(batteryac19)|%?if(%bl, <, 10)<%Vd(batterylow19)|%Vd(battery19)>>>|%?if(%bc, =, c)<%Vd(batterycharging14)|%?if(%bp, =, p)<%Vd(batteryac14)|%?if(%bl, <, 10)<%Vd(batterylow14)|%Vd(battery14)>>>>

%Vl(batterycharging14,127,4,103,16,-)
%Vf(ffe60f)
%ac+%bl%%

%Vl(batteryac14,127,4,103,16,-)
%Vf(ffe60f)
%ac*%bl%%

%Vl(batterylow14,127,4,103,16,-)
%Vf(ffe60f)
%ac%bl%%

%Vl(battery14,127,4,103,16,-)
%Vf(0de2e5)
%ac%bl%%

%Vl(batterycharging19,127,1,103,19,-)
%Vf(ffe60f)
%ac+%bl%%

%Vl(batteryac19,127,1,103,19,-)
%Vf(ffe60f)
%ac*%bl%%

%Vl(batterylow19,127,1,103,19,-)
%Vf(ffe60f)
%ac%bl%%

%Vl(battery19,127,1,103,19,-)
%Vf(0de2e5)
%ac%bl%%

# Menu
%Vi(-,10,30,220,252,-)

# Progress Bar
%?mp<|%Vd(progressbar)>
%Vl(progressbar,0,288,240,2,-)
%pb(0,0,240,2,progressbar.bmp)

# Cover Artwork
%V(4,294,22,22,-)
%Cl(0,0,22,22,c,c)
%Cd

# Metadata

# Bottom bar: display date, or song metadata, or radio name/frequency
# Playback stopped
%?if(%mp, =, 1)<%?if(%ss(0, 2, %St(font), number), >, 15)<%Vd(date19)|%Vd(date14)>|>
# Playback not stopped, playing music
%?if(%mp, >, 1)<%?if(%mp, <=, 7)<%?if(%ss(0, 2, %St(font), number), >, 15)<%Vd(metadata19)|%Vd(metadata14)>%Vd(play)|>|>
# Playback not stopped, listening to the radio
%?if(%mp, >, 1)<%?if(%mp, >=, 8)<%?if(%ss(0, 2, %St(font), number), >, 15)<%Vd(radio19)|%Vd(radio14)>%Vd(play)|>|>

# Song Metadata
%Vl(metadata14,34,298,179,22,-)
%Vf(0de2e5)
%s%al%?it<“%it”|%fn>%?ia<%, by %ia|>

%Vl(metadata19,34,295,179,25,-)
%Vf(0de2e5)
%s%al%?it<“%it”|%fn>%?ia<%, by %ia|>

# Radio Name or Frequency
%Vl(radio14,34,298,179,22,-)
%Vf(0de2e5)
%s%al%?Tn<%Tn|%?ty<%ty|%tf FM>>

%Vl(radio19,34,295,179,25,-)
%Vf(0de2e5)
%s%al%?Tn<%Tn|%?ty<%ty|%tf FM>>

# Play Status
%Vl(play,219,296,17,17,-)
%xl(playmode,playmode.bmp,0,0,12)%xd(playmode,%mp,0)

# Date
%Vl(date14,34,298,136,22,-)
%Vf(0de2e5)
%s%al%ca, %cb %ce, %cY

%Vl(date19,34,295,116,25,-)
%Vf(0de2e5)
%s%al%cY/%cm/%cd

# Time
%Vl(date14,170,298,60,22,-)
%Vf(0de2e5)
%s%ar%?cf<%cH:%cM|%cl:%cM %cP>

%Vl(date19,150,295,80,25,-)
%Vf(0de2e5)
%s%ar%?cf<%cH:%cM|%cl:%cM %cP>