$puts(artist.path,'D:\Alben\ArtistImages\'%artist%'\artist.jpg')


$if(%gb_isplaying%,
$set_pen(038-052-255,1)
$set_pen(30-120-2305,1)
$set_brush(098-112-255)
$set_brush(30-120-230)
$round_rect(8,16,$eval(%gb_width%-17),$eval(%gb_height%-9),5,5)
,)

$if(%gb_mouse_over%,
$if(%gb_focused%,
$draw_image(19,19,$eval(%gb_width%-40),$eval(%gb_width%-38),'./images/ibiza/cover/noartist.png',255,nokeepaspect)
$draw_image(20,22,$eval(%gb_width%-40),$eval(%gb_width%-80),$get(artist.path),255,nokeepaspect)
,
$draw_image(19,19,$eval(%gb_width%-40),$eval(%gb_width%-38),'./images/ibiza/cover/noartist.png',255,nokeepaspect)
$draw_image(20,22,$eval(%gb_width%-40),$eval(%gb_width%-80),$get(artist.path),255,nokeepaspect)
)
,
$draw_image(19,19,$eval(%gb_width%-40),$eval(%gb_width%-38),'./images/ibiza/cover/noartist.png',255,nokeepaspect)
$draw_image(20,20,$eval(%gb_width%-40),$eval(%gb_width%-80),$get(artist.path),255,nokeepaspect)
)

$draw_image(07,11,$eval(%gb_width%-18),$eval(%gb_height%-1),./images/ibiza/bg/polaroid2.png,220,,0)


$if(%gb_focused%,
$set_font(BigNoodleTitling,10)
$set_font_color(000000C0)
$calc_text(%album artist%)
$draw_text(%album artist%,10,$ifgreater(%gb_calc_width%,10,112,122),$eval(%gb_width%-20),18,center,vcenter)
,
$set_font(BigNoodleTitling,10)
$set_font_color(00000000)
$calc_text(%album artist%)
$draw_text(%album artist%,10,$ifgreater(%gb_calc_width%,10,112,122),$eval(%gb_width%-20),18,center,vcenter)
)

$puts(cover.path,$directory_path(%path%)/folder.jpg)
$puts(artist.path,'D:\Alben\ArtistImages\'%artist%'\artist.jpg')


$drawrect(0,0,%_width%,%_height%,000-000-000-255,,)

$puts(box.w,$div($mul(%_width%,7),9))
$puts(box.h,$div($mul($get(box.w),9),10))
$puts(box.x,$sub($div(%_width%,2),$div($get(box.w),2)))
$puts(box.y,10)

$imageabs($get(box.x),$get(box.y),520,470,'./images/ibiza/gb/case-bg.png',nodisplay,,255)
$imageabs($get(box.x),$get(box.y),$get(box.w),$get(box.h),'./images/ibiza/gb/case-bg.png',nokeepaspect,,255)

$puts(cover.size,$div($mul(%_width%,57),90))
$puts(cover.x,$add($sub($div(%_width%,2),$div($div($mul(%_width%,57),90),2)),$div($mul(%_width%,5),180)))
$puts(cover.y,$add($get(box.y),$div($mul(%_width%,23),720)))

$imageabs($get(cover.x),$get(cover.y),400,400,$get(cover.path),nodisplay,,255)
$imageabs($get(cover.x),$get(cover.y),$get(cover.size),$get(cover.size),$get(cover.path),nokeepaspect,,255)

$imageabs($get(box.x),$get(box.y),520,470,'./images/ibiza/gb/case-ov.png',nodisplay nokeepaspect,,255)
$imageabs($get(box.x),$get(box.y),$get(box.w),$get(box.h),'./images/ibiza/gb/case-ov.png',nokeepaspect,,255)

// Play - Pause cover button
$imagebutton($get(cover.x),$get(cover.y),$get(cover.size),$get(cover.size),,,COMMAND:'Playback/Play or Pause';REFRESH,,)


// Artist Photo

//$ifgreater(%_height%,$div($mul(%_width%,155),100),

$puts(pola.w,$div($mul(%_width%,10),11))
$puts(pola.h,$div($mul($get(pola.w),67),100))
$puts(pola.x,$sub($div(%_width%,3),$div($get(pola.w),3)))
$puts(ydelta,$div($mul(%_width%,10),50))
$puts(pola.y,$add($add($get(box.y),$get(box.h)),$get(ydelta)))

$puts(photo.w,$div($mul(%_width%,14),17))
$puts(photo.h,$div($mul($get(photo.w),73),110))
$puts(photo.x,$sub($div(%_width%,2),$div($get(photo.w),2)))
$puts(ydelta,$div($mul(%_width%,8),140))
$puts(photo.y,$add($get(pola.y),$get(ydelta)))

$imageabs($get(photo.x),$get(photo.y),400,300,'./images/ibiza/cover/noartist.png',nodisplay,,255)
$imageabs($get(photo.x),$get(photo.y),$get(photo.w),$get(photo.h),'./images/ibiza/cover/noartist.png',nokeepaspect,,255)
$imageabs($get(photo.x),$get(photo.y),400,300,$get(artist.path),nodisplay,,255)
$imageabs($get(photo.x),$get(photo.y),$get(photo.w),$get(photo.h),$get(artist.path),nokeepaspect,,255)
$imageabs($get(pola.x),$get(pola.y),400,300,'./images/ibiza/bg/polaroid2.png',nodisplay nokeepaspect,,255)
$imageabs($get(pola.x),$get(pola.y),$get(pola.w),$get(pola.h),'./images/ibiza/bg/polaroid2.png',nokeepaspect,,220)


$puts(font.size,$div($mul(%_width%,3),60))
$font(BigNoodleTitling,$get(font.size))

$puts(txt.w,$div($mul(%_width%,4),5))
$puts(txt.h,$div($mul($get(pola.h),75),100))
$puts(txt.x,$sub($div(%_width%,2),$div($get(photo.w),2)))
$ifgreater($gettextwidth(%artist%),$add($get(txt.w),10),
$puts(ydelta,$div($mul($get(pola.h),70),100))
,
$puts(ydelta,$div($mul($get(pola.h),80),100))
)
$puts(txt.y,$add($get(pola.y),$get(ydelta)))

$drawtextex(%artist%,$get(txt.x),$get(txt.y),$get(txt.w),$get(txt.h),0-0-0, hcenter wrap)

//,)