// ----- GLOBAL-FONT ----- $font(%do.font.name%,%do.font.size%,) // ----- BACKGROUND ----- $fillrect(0,0,%ps_width%,%ps_height%,%do.colour%) // ----- PANEL MANAGEMENT ----- $puts(txt.h,$gettextheight()) $puts(h.off,$add($get(txt.h),$div(%ps_height%,50))) $puts(panel.h,$sub(%ps_height%,$get(h.off))) $movepanel(0,0,0,$ifequal(%do.scr.scroll%,1,%ps_width%,$add(%ps_width%,17)),$get(panel.h)) $movepanel(1,0,0,$ifequal(%do.scr.scroll%,1,%ps_width%,$add(%ps_width%,17)),$get(panel.h)) $movepanel(2,0,0,$ifequal(%do.scr.scroll%,1,%ps_width%,$add(%ps_width%,17)),$get(panel.h)) $movepanel(3,0,0,%ps_width%,$get(panel.h)) $movepanel(4,0,0,%ps_width%,$get(panel.h)) $showpanel(0,$ifequal(%do.playlist.switch%,1,1,0)) $showpanel(1,$ifequal(%do.playlist.switch%,2,$ifequal(%do.cf.switch%,0,1,0),)) $showpanel(2,$ifequal(%do.playlist.switch%,3,1,0)) $showpanel(3,$ifequal(%do.playlist.switch%,4,1,0)) $showpanel(4,$ifequal(%do.playlist.switch%,2,$ifequal(%do.cf.switch%,1,1,0),)) // ----- ARTIST PICTURE LAYER ----- $ifequal(%do.playlist.switch%,1, $if(%ps_isplaying%, $drawimage(0,0,%ps_width%,$get(panel.h),%do.artist.pic%,wc,,%do.artist.alpha%) ),) $ifequal(%do.playlist.switch%,3, $if(%ps_isplaying%, $drawimage(0,0,%ps_width%,$get(panel.h),%do.artist.pic%,wc,,%do.artist.alpha%) ),) // ----- BUTTON-VARIABLES ----- $puts(btn.y,$sub(%ps_height%,$get(txt.h))) $puts(w1,$gettextwidth($getcaption(0))) $puts(w2,$gettextwidth($getcaption(1))) $puts(w3,$gettextwidth($getcaption(2))) $puts(w4,$gettextwidth($getcaption(3))) $puts(w5,$gettextwidth(Now)) $puts(w6,$gettextwidth(Find)) $puts(w7,$gettextwidth(Clear)) $puts(w8,$gettextwidth(Scroll)) // ----- BUTTONS ----- $textbutton(0,0,0,0,,,,,) $ifequal(%do.playlist.switch%,1,$textbutton($sub($div(%ps_width%,16),$div($get(w1),2)),$get(btn.y),$get(w1),$get(txt.h),,,COMMAND:$ifequal(%do.elp.group%,0,View/ELPlaylist/Expand all groups,View/ELPlaylist/Collapse all groups);REFRESH,,),) $textbutton($sub($div(%ps_width%,16),$div($get(w1),2)),$get(btn.y),$get(w1),$get(txt.h),$getcaption(0),$getcaption(0),SETGLOBAL:$ifequal(%do.playlist.switch%,1,do.elp.group:$ifequal(%do.elp.group%,0,1,0),do.playlist.switch:1);REFRESH,fontcolor:$ifequal(%do.playlist.switch%,1,%do.btn.xcol%,%do.btn.ncol%),fontcolor:$ifequal(%do.playlist.switch%,1,51-153-255,%do.btn.hcol%)) $ifequal(%do.playlist.switch%,2,$textbutton($sub($muldiv(%ps_width%,3,16),$div($get(w2),2)),$get(btn.y),$get(w2),$get(txt.h),,,SETGLOBAL:do.cf.switch:$ifequal(%do.cf.switch%,1,0,1);REFRESH,,),) $textbutton($sub($muldiv(%ps_width%,3,16),$div($get(w2),2)),$get(btn.y),$get(w2),$get(txt.h),$getcaption(1),$getcaption(1),SETGLOBAL:$ifequal(%do.playlist.switch%,2,cf.switch:$ifequal(%do.cf.switch%,0,1,0),do.playlist.switch:2);REFRESH,fontcolor:$ifequal(%do.playlist.switch%,2,%do.btn.xcol%,%do.btn.ncol%),fontcolor:$ifequal(%do.playlist.switch%,2,51-153-255,%do.btn.hcol%)) $ifequal(%do.playlist.switch%,3,$textbutton($sub($muldiv(%ps_width%,5,16),$div($get(w3),2)),$get(btn.y),$get(w3),$get(txt.h),,,COMMAND:$ifequal(%do.esp.group%,0,View/EsPlaylist/Go to up-layer,View/EsPlaylist/Go to down-layer);REFRESH,,),) $textbutton($sub($muldiv(%ps_width%,5,16),$div($get(w3),2)),$get(btn.y),$get(w3),$get(txt.h),$getcaption(2),$getcaption(2),SETGLOBAL:$ifequal(%do.playlist.switch%,3,do.esp.group:$ifequal(%do.esp.group%,0,1,0),do.playlist.switch:3);REFRESH,fontcolor:$ifequal(%do.playlist.switch%,3,%do.btn.xcol%,%do.btn.ncol%),fontcolor:$ifequal(%do.playlist.switch%,3,51-153-255,%do.btn.hcol%)) $textbutton($sub($muldiv(%ps_width%,7,16),$div($get(w4),2)),$get(btn.y),$get(w4),$get(txt.h),$getcaption(3),$getcaption(3),SETGLOBAL:do.playlist.switch:4;REFRESH,fontcolor:$ifequal(%do.playlist.switch%,4,%do.btn.xcol%,%do.btn.ncol%),fontcolor:$ifequal(%do.playlist.switch%,4,%do.btn.xcol%,%do.btn.hcol%)) $textbutton($sub($muldiv(%ps_width%,9,16),$div($get(w5),2)),$get(btn.y),$get(w5),$get(txt.h),Now,Now,COMMAND:View/Playlist view/Activate now playing;REFRESH,fontcolor:%do.btn.ncol%,fontcolor:%do.btn.hcol%) $textbutton($sub($muldiv(%ps_width%,11,16),$div($get(w6),2)),$get(btn.y),$get(w6),$get(txt.h),Find,Find,COMMAND:Edit/Search;REFRESH,fontcolor:%do.btn.ncol%,fontcolor:%do.btn.hcol%) $textbutton($sub($muldiv(%ps_width%,13,16),$div($get(w7),2)),$get(btn.y),$get(w7),$get(txt.h),Clear,Clear,COMMAND:Edit/Clear;REFRESH,fontcolor:%do.btn.ncol%,fontcolor:%do.btn.hcol%) $textbutton($sub($muldiv(%ps_width%,15,16),$div($get(w8),2)),$get(btn.y),$get(w8),$get(txt.h),Scroll,Scroll,SETGLOBAL:do.scr.scroll:$ifequal(%do.scr.scroll%,0,1,0);REFRESH,fontcolor:%do.btn.ncol%,fontcolor:%do.btn.hcol%)