DSlayerZX
500+ Head-Fier
- Joined
- Oct 23, 2006
- Posts
- 833
- Likes
- 23
Alright, I spend some time a while ago, copy, paste, and then modify some code and created this
Quote:
Yes, I realized that the last line has some code missing but amazingly, it still works... so...
But here is my problem
For my setting, Ｉwant to display the current -dB that I am using on Foobar2000 in the box next to where "local Drive" is located at.
Also, the play mode, if I change to anything besides, Cont, the letters became white anyone know how to fix that?
The track play history, it always display date, month, then year... I tried to fix it to Month, Date, year, but no effect, can anyone help me modify that.
At the end, sometimes on the track info bar, when the info on the track gets too long, it will go out of the box, can anyone help me fix that. thank you
Appreciate your help @@
Quote:
| // Globals $puts(active,$rgb(60,250,60)) $puts(back,$rgb(0,100,134)) $puts(alt_font_fix,-2) $puts(glass_intensity,5) $puts(window,61) $puts(windowsize,61) $puts(scrollback,1) $puts(symbolinfo,1) $puts(alt_font,Arial) $puts(alt_font_size,10) $puts(alt_font_options,) $puts(alt_font_fix,) $puts(decreaserange,180) $puts(font_options,) $puts(fp,1) $puts(lp,1) $puts(pt,1) $puts(write_tags,) $puts(ratingX,470) $puts(ratingY,45) ////////////////////////////////////////Rating///////////////////////////////////////////////////// $if($get(write_tags),$puts(rating,%rating%),$puts( rating,$cinfo(RATING))) $if($greater($get(rating),5),$puts(rating,5)) $if($greater(0,$get(rating)),$puts(rating,0)) $alignabs(490,45,%_width%,%_height%,,) $font(wingdings,12,$get(font_options),250-250-250) $get(active)$repeat($char(171),$get(rating)) $get(back)$repeat($char(171),$sub(5,$get(rating))) //////////////////////////////////AutoRating/////////////////////////////////////////// $if($get(write_tags),$puts(rating,%rating%),$puts( rating,$cinfo(RATING))) $if($get(rating),, $puts(fix,$div($cwb_datediff(%cwb_systemdatetime%, %first_played%), $get(decreaserange))) $puts(rating,$sub($add(%play_count%,%play_counter% ),$get(fix)))) $if($greater($get(rating),5),$puts(rating,5)) $if($greater(0,$get(rating)),$puts(rating,0)) $alignabs(490,45,%_width%,%_height%,,) $font(wingdings,12,$get(font_options),250-250-250) $get(active)$repeat($char(171),$get(rating)) $get(back)$repeat($char(171),$sub(5,$get(rating))) ////////////////////////////////////////////////Rating buttons////////////////////////////////////////////////////////// $button($add($get(ratingX),23),$get(ratingY),0,0,1 2,17,,,$if($get(write_tags),r1,'Heart 1'),) $button($add($get(ratingX),37),$get(ratingY),0,0,1 2,17,,,$if($get(write_tags),r2,'Heart 2'),) $button($add($get(ratingX),51),$get(ratingY),0,0,1 2,17,,,$if($get(write_tags),r3,'Heart 3'),) $button($add($get(ratingX),65),$get(ratingY),0,0,1 2,17,,,$if($get(write_tags),r4,'Heart 4'),) $button($add($get(ratingX),79),$get(ratingY),0,0,1 2,17,,,$if($get(write_tags),r5,'Heart 5'),) // Background ///////////////////////////////////////////Draw Borders///////////////////////////////////////// $drawrect(5,3,680,120,brushColor-null penColor-100-100-100) //border $drawrect(10,23,46,39,brushColor-null penColor-100-100-100) //track number $drawrect(60,23,36,39,brushColor-null penColor-100-100-100) //playback order $drawrect(100,23,110,39,brushColor-null penColor-100-100-100) //play time $drawrect(214,23,45,20,brushColor-null penColor-100-100-100) //track time $drawrect(214,45,45,17,brushColor-null penColor-100-100-100) //play/pause $drawrect(263,23,154,39,brushColor-null penColor-100-100-100) //encoding info $drawrect(421,23,210,39,brushColor-null penColor-100-100-100) //play record, rating $drawrect(636,23,44,73,brushColor-null penColor-100-100-100) //decimal gradation progress bar $drawrect(10,66,621,30,brushColor-null penColor-100-100-100) //track info $drawrect(335,100,345,18,brushColor-null penColor-100-100-100)//nothing so far //Tagged //$alignabs(338, 103,%_width%,%_height%,,) $alignabs(350, 103,%_width%,%_height%,,) $font(lcdmono,10,bold$get(font_options),250-250-250) // PerTrack /////////////////////////Stereo Encoding Tagtype RG/////////////////////////////////////// $alignabs(20,8,%_width%,%_height%,,) $font(arial,8,bolditalic$get(font_options),250-250-250) $if($stricmp(%channels%,8ch),$get(active),$get(bac k))7.1 $if($stricmp(%channels%,7ch),$get(active),$get(bac k))$char(32)6.1 $if($stricmp(%channels%,6ch),$get(active),$get(bac k))$char(32)5.1$char(32) $if($stricmp(%__mp3_stereo_mode%,JOINT STEREO),$get(active)JOINT STEREO $get(back)$char(32)MONO, $if($stricmp(%channels%,stereo),$get(back)JOINT $get(active)STEREO $get(back)$char(32)MONO, $get(back)JOINT STEREO $if($stricmp(%channels%,MONO),$get(active)$char(32 )MONO, $get(back)$char(32)MONO))) $if($stricmp($info(encoding),lossy),$get(active) LOSSY$get(back) LOSSLESS, $get(back) LOSSY$get(active) LOSSLESS) $if($or($stricmp(%codec_profile%,CBR), $and($stricmp($info(extrainfo),),$stricmp(%codec_p rofile%,?), $stricmp($info(encoding),lossy)), $stricmp(%codec%,wma)),$get(active),$get(back)) CBR $if($or($stricmp(%codec%,musepack),$and($stricmp(% codec%,aac),$get(str)), $info(extrainfo),$strstr(%codec_profile%,VBR)),$ge t(active),$get(back)) VBR $if($stricmp(%codec%,vorbis),$get(active),$get(bac k)) ABR $if($strstr($info(tagtype),id3v1),$get(active),$ge t(back)) ID3V1 $if($strstr($info(tagtype),id3v2),$get(active),$ge t(back)) ID3V2 $if($strstr($info(tagtype),apev2),$get(active),$ge t(back)) APEV2 $if($stricmp(%codec%,vorbis),$get(active),$get(bac k)) VC $if($stricmp(%codec%,flac),$get(active),$get(back) ) FLAC $if($or( %__replaygain_album_gain%,%__replaygain_track_gain %) ,$get(active),$get(back)) R-GAINED /////////////////////////////////////////Tracknumber/////////////////////////////////////////////// $alignabs(12,21,%_width%,%_height%,,) $font(7 Segment,30,$get(font_options),250-250-250) $get(back)$char(56)$char(56) $alignabs(12,21,%_width%,%_height%,,) $get(active)$substr([%tracknumber%],1,2) ///////////////////////////////////////////Playback order//////////////////////////////////////// $alignabs(64,25,%_width%,%_height%,,) $font(wingdings 3,10,bold,) $if($strstr(%cwb_playback_order%,Repeat),$get(acti ve),$get(back))$char(78) $if($strstr(%cwb_playback_order%,Shuffle),$get(act ive),$get(back))$char(70)$char(32)$char(10) $alignabs(65,35,%_width%,%_height%,,) $if($strstr(%cwb_playback_order%,Default),$get(act ive),$get(back))$char(34)$char(34) $alignabs(60,49,36,%_height%,center,) $font(lcdmono2,8,bold,)$get(active) $if($strstr(%cwb_playback_order%,albums),album) $if($strstr(%cwb_playback_order%,directories),dir) $if($strstr(%cwb_playback_order%,Default),CONT) $alignabs(58,49,36,%_height%,center,) $if($strstr(%cwb_playback_order%,playlist), ALL) $alignabs(56,49,45,%_height%,center,) $if($strstr(%cwb_playback_order%,track),track) //////////////////////////////////////////Buttons//////////////////////////////////////////////////// //$drawrect(63,25,15,13,brushColor-null penColor-100-100-100) $button2(63,25,0,0,15,13,,, $if($stricmp(%cwb_playback_order%,'Repeat (track)'),'Repeat (playlist)','Repeat (track)'),) //$drawrect(77,25,15,13,brushColor-null penColor-100-100-100) $button2(77,25,0,0,15,13,,, $if($stricmp(%cwb_playback_order%,'Shuffle (tracks)'),'Shuffle (albums)', $if($stricmp(%cwb_playback_order%,'Shuffle (albums)'),'Shuffle (directories)', 'Shuffle (tracks)')),) //$drawrect(63,37,29,11,brushColor-null penColor-100-100-100) $button2(63,37,0,0,29,11,,,default,) //////////////////////////////////////////Time Total//////////////////////////////////////////////// $if(%_time_total%, $puts(total,$num($div( %length_seconds%,60),2): $num($mod( %length_seconds%,60),2)) ,$puts(total,__:__)) $alignabs(216,25,%_width%,%_height%,,) $font(7 Segment,12,$get(font_options),250-250-250) $get(back)$char(56)$char(56):$char(56)$char(56) $alignabs(216,25,%_width%,%_height%,,) $get(active)$get(total) /////////////////////////////////////////Play Pause/////////////////////////////////////////////// $alignabs(222,43,%_width%,%_height%,,) $font(webdings,12,$get(font_options),250-250-250) $if(%ispaused%,$get(active),$get(back))$char(59) $font(arial,10,$get(font_options),250-250-250) $if($not(%ispaused%),$get(active),$get(back))$char (9658) //////////////////////////////////////////Codec/////////////////////////////////////////////////// $alignabs(267,27,90,%_height%,left,) $font(lcdmono,10,bold$get(font_options),250-250-250) $get(active)$if($stricmp($substr(%codec%,1,7),wind ows),WMA, $if($strstr($info(tool),LAME),lame mp3,$lower([%codec%]))) ///////////////////////////////Bitrate Samplerate Compression File size///////////////////////// $alignabs(306,45,%_width%,%_height%,,) $font(lcdmono,10,$get(font_options),250-250-250) $font(lcdmono,10,$get(font_options),250-250-250) $get(active)$char(32)[%samplerate%] $font(arial,7,$get(font_options),250-250-250)$get(active) Hz $char(32)$char(32) $font(lcdmono,10,$get(font_options),)$get(active) $if(%isplaying%, $div(%filesize%,1048576)'.'$substr($muldiv(%filesi ze%,100,1048576),2,2)) $font(arial,7,$get(font_options),)$get(active)$cha r(32)MB //////////////////////////////////////////Source//////////////////////////////////////////////////// $puts(str,1) $alignabs(15,103,%_width%,%_height%,,) $font(arial,7,bolditalic$get(font_options),250-250-250) $if($stricmp(ftp,$substr(%path%,1,3)),$get(active) ,$get(back))NET DRIVE $char(32)$char(32) $if($stricmp(\,$substr(%path%,1,1)),$get(active),$ get(back))REMOTE PC $char(32)$char(32) $if($stricmp($substr(%path%,1,4),http),$get(active )STREAMING$puts(str,), $get(back)STREAMING)$char(32)$char(32) $if($or($not($stricmp($strchr($get(removable),$sub str(%path%,1,1)),0)), $stricmp(%codec%,CDDA)),$get(active)REMOVABLE, $get(back)REMOVABLE)$char(32)$char(32) $if($and($stricmp($strchr($get(removable),$substr( %path%,1,1)),0), $stricmp($stricmp(\,$substr(%path%,1,1)),),$stricm p($stricmp(ftp,$substr(%path%,1,3)),), $not($stricmp(%codec%,CDDA)),$not($stricmp($substr (%path%,1,4),http))), $get(active)LOCAL DRIVE,$get(back)LOCAL DRIVE) // PerSecond /////////////////////////////////////////Playback Time///////////////////////////////////////////// $puts(min,$div( %playback_time_seconds%,60)) $if($stricmp($len($get(min)),1),$puts(min,0$get(mi n))) $puts(sec,$mod( %playback_time_seconds%,60)) $if($stricmp($len($get(sec)),1),$puts(sec,0$get(se c))) $font(7 Segment,30,,) $alignabs(102,21,%_width%,%_height%,,)$get(back) $char(56)$char(56):$char(56)$char(56) $alignabs(102,21,%_width%,%_height%,,)$get(active) $get(min):$get(sec) ///////////////////////////////Bitrate Samplerate Compression File size///////////////////////// $alignabs(267,45,%_width%,%_height%,,) $font(lcdmono,10,$get(font_options),250-250-250) $get(active)[%bitrate%] $font(arial,7,$get(font_options),250-250-250)$get(active)Kb/s //////////////////////////////////////Progress Bar///////////////////////////////////////////// $font(lcd2,30,$get(font_options),250-250-250) $puts(symbol,_) $alignabs(639,-10,%_width%,%_height%,,) #LINEHEIGHT,6# $puts(percent,$num($muldiv(%_time_elapsed_seconds% ,100, %_time_total_seconds%),3)) $if($stricmp($substr($get(percent),1,1),0),$puts(b ack1,$get(back)) $puts(percent,$char(32)$substr($get(percent),2,3)) ,$puts(back1,$get(active))) $repeat($get(back1)$get(symbol)$char(10),$sub(9,$s ubstr($get(percent),2,2))) $get(active)$repeat($get(symbol)$char(10),$substr( $get(percent),2,2)) $alignabs(659,-10,%_width%,%_height%,,) #LINEHEIGHT,6# $repeat($get(back1)$get(symbol)$char(10),$sub(9,$s ubstr($get(percent),3,3))) $get(active)$repeat($get(symbol)$char(10),$substr( $get(percent),3,3)) $alignabs(648,60,%_width%,%_height%,,) #LINEHEIGHT,20#$char(32)$char(10) $font(lcdmono,10,$get(font_options),250-250-250) $if($and(%isplaying%,%_time_total%), $get(active)$get(percent),$get(active)$char(32)0) $font(arial,6,$get(font_options),250-250-250)$get(active) '%' ////////////////////////////////////////Playback statistics///////////////////////////////////////////// $alignabs(425,33,%_width%,%_height%,,top) $if($greater($add($get(fp),$get(lp),$get(pt)),0), $ifequal($put(yoo,$div($mod(%_time_elapsed_seconds %, $mul(4,$add($get(fp),$get(lp),$get(pt)))),4)),0, $if($get(lp),$puts(header,lp) $if(%last_played%,$puts(info,%last_played%),), $if($get(fp),$puts(header,fp) $if(%first_played%,$puts(info,%first_played%),), $puts(header,pt)$puts(info,x $add(%play_count%,%play_counter%)))) , $select($get(yoo), $if($stricmp($add($get(fp),$get(lp)),1), $puts(header,pt)$puts(info,x $add(%play_count%,%play_counter%)), $if($get(fp),$puts(header,fp) $if(%first_played%,$puts(info,%first_played%),))), $puts(header,pt)$puts(info,x $add(%play_count%,%play_counter%)))) $if($stricmp($get(header),pt), $alignabs(425,33,%_width%,%_height%,,top) $font(lcdmono2,9,bold$get(font_options),)$get(acti ve) pt: $get(info), $alignabs(425,33,%_width%,%_height%,,top) $font(lcdmono2,9,bold$get(font_options),)$get(acti ve)$puts(ago,1)$get(header): $if($get(info), $puts(dtr,$cwb_datediff(%cwb_systemdatetime%,$get( info))) $puts(years,$div($get(dtr),365)) $puts(rest,$mod($get(dtr),365)) $puts(days,$mod($get(rest),30)) $puts(month,$div($get(rest),30)) $if($greater($get(years),0),$get(years) y) $if($greater($get(years),1),s) $if($and($greater($get(month),0),$stricmp($get(day s),0)), and) $if($greater($get(month),0), $get(month) month) $if($and($greater($get(days),0),$greater($add($get (years),$get(month)),0)), and) $if($greater($get(days),1), $get(days) days, $if($and($stricmp($get(days),1),$stricmp($add($get (years),$get(month)),0)), yesterday $puts(ago,), $if($and($stricmp($get(days),0),$get(info), $stricmp($add($get(years),$get(month)),0)), today$puts(ago,), $if($and($stricmp($get(days),1),$greater($add($get (years),$get(month)),0)), 1 day) )))$if($get(ago), ago), never ) $get(active)$if($get(info),$if($get(YY_MM_DD), ' ('[$substr($get(info),1,4).$substr($get(info),6,7).$s ubstr($get(info),9,10)]')', ' ('[$substr($get(info),9,10).$substr($get(info),6,7).] $substr($get(info),1,4)')'),)), $font(lcdmono2,9,bold$get(font_options),)$get(acti ve) $get(active) HSD build 1.8.1) ////////////////////////////////////////Track info/////////////////////////////////////////////// $alignabs(30,$add($div(%_height%,5),49),%_width%,% _height%,,) $puts(title, ['"'%title%'"'][ - %artist%]['/'%album%] ['('%date%')']) $if($get(symbolinfo), $if($or($stricmp($substr($ascii($get(title)),2,2), ?), $stricmp($substr($ascii($get(title)),6,6),?)),$cha r(10) $alignabs(30,$add($div(%_height%,5),49,$get(alt_fo nt_fix)),%_width%,%_height%,,) $font($get(alt_font),$get(alt_font_size),$get(alt_ font_options)$get(font_options) ,250-250-250)$repeat($char(10),31), $puts(title, $lower($replace($upper($get(title)),-,$char(8208),&,+,À,a,Á,a,Â,a,Ã,a,Ä,ae,Å,a, Æ,ae,Ç,c,È,e,É,e,Ê,e,Ë,e,Ì,i,Í,i,Î,i,Ï,i,Ò,o,Ó,o,Ô ,o,Õ,o,Ö,oe,Ù,u,Ú,u,Û,u,Ü,ue, ß,ss))) $puts(alt_font_fix,0) $font(lcd2,12,bold$get(font_options),250-250-250)$repeat($char(10),35)), $alignabs(30,$add($div(%_height%,5),49,$get(alt_fo nt_fix)),%_width%,%_height%,,) $font($get(alt_font),$get(alt_font_size),$get(alt_ font_options) $get(font_options),250-250-250)$repeat($char(10),32))$get(active) $if($greater($len($get(title)),$get(window)), $if($stricmp($mod($len($get(title)),2),1), $puts(title,$pad($get(title),$add($len($get(title) ),1))),) $puts(shift,$sub($len($get(title)),$get(window))) $if($get(scrollback), $puts(mod,$mod(%_time_elapsed_seconds%,$add($mul($ get(shift),2),2))) $if($greater(3,$get(mod)),$substr($get(title),1,$g et(window)), $puts(mod,$sub($get(mod),2))$puts(flag,$get(mod)) $if($greater($add($get(shift),1),$get(mod)), $substr($get(title),$add(1,$get(mod)),$add($get(wi ndow),$get(mod))), $substr($get(title),$sub($mul($get(shift),2),$get( mod),-1), $add($get(window),$sub($mul($get(shift),2),$get(mo d),0))))), $puts(mod,$mod(%_time_elapsed_seconds%,$add($get(s hift),2))) $if($greater(3,$get(mod)),$substr($get(title),1,$g et(window)), $puts(mod,$sub($get(mod),2))$puts(flag,$get(mod)) $substr($get(title),$add(1,$get(mod)),$add($get(wi ndow),$get(mod))))), $alignabs(30,$add($div(%_height%,5),49,$get(alt_fo nt_fix)),520,%_height%, $if($get(center),center),top) $get(active)$get(title)) $font(arial,10,$get(font_o |
Yes, I realized that the last line has some code missing but amazingly, it still works... so...
But here is my problem
For my setting, Ｉwant to display the current -dB that I am using on Foobar2000 in the box next to where "local Drive" is located at.
Also, the play mode, if I change to anything besides, Cont, the letters became white anyone know how to fix that?
The track play history, it always display date, month, then year... I tried to fix it to Month, Date, year, but no effect, can anyone help me modify that.
At the end, sometimes on the track info bar, when the info on the track gets too long, it will go out of the box, can anyone help me fix that. thank you
Appreciate your help @@
