Chinaunix首页 | 论坛 | 博客
  • 博客访问: 129188
  • 博文数量: 31
  • 博客积分: 1420
  • 博客等级: 上尉
  • 技术积分: 335
  • 用 户 组: 普通用户
  • 注册时间: 2007-05-29 14:04
文章分类

全部博文(31)

文章存档

2014年(1)

2013年(1)

2011年(4)

2010年(2)

2008年(23)

我的朋友
最近访客

分类: PERL

2013-12-23 10:29:49

0、典型脚本示例

点击(此处)折叠或打开

  1. //函数方法以$开头,如$puts 变量声明并赋值
  2. //系统变量以%%包围,如%el_row_height%

  3. //坑爹的只支持整数,要获得小数的,得先乘以后除
  4. //如下,要乘以1.75,得先乘35后除20 -_-!
  5. $puts(imgwidth,$div($mul($mul(%ART.ROW%,%el_row_height%),35),20))
  6. $puts(art.size,$get(imgwidth))
  7. $puts(text.left,$add(10,$mul(%ART.MARGIN%,2),$get(art.size)))
  8. $puts(text.color,255-255-255)

  9. $puts(len.width,$add(4,$gettextwidth(%length%)))
  10. $puts(text.right,$add(%el_width%,-$get(len.width)))
  11. $puts(effect,$ifequal(%ON.SHADOW%,1,glow:0:48-48-48:3 offset:1:2,))
  12. $puts(effect2,glow:2:99-99-99:1 offset:0:0)

  13. ///////Track Info///////
  14. //$drawstring:格式并在指定位置输出字符串
  15. //%x% %y%:直接连接字符串作为新的字符串
  16. //$if2(x,y):如果x为空则显示y
  17. //$replace:字符串替换
  18. $setcoordinate(1) //x,y,r,b mode
  19. $drawstring(%title% ← %artist%,$add($get(text.left),40),0,$get(text.right),%el_height%,$get(text.color),left vcenter nowrap elipchar,$get(effect2))
  20. $drawstring($if2($replace(%rating%,5,?),) %length%,0,0,$sub(%el_width%,4),%el_height%,$get(text.color),vcenter right elipchar,$get(effect2))

  21. //$if:判断真伪、虚实
  22. $if($not(%el_isplaying%),
  23. $drawstring(%tracknumber%,$get(text.left),0,$add($get(text.left),40),%el_height%,$get(text.color),vcenter,$get(effect2))
  24. ,
  25. $setcoordinate(0)
  26. $if(%ispaused%,
  27. $imageabs($add($get(text.left),3),5,,,
  28. %el_foobar2000_path%\skins\NeoAshen\EL\el_pause.png
  29. ,,,,glow:4:255-255-255)
  30. ,
  31. $imageabs($add($get(text.left),2),4,,,
  32. %el_foobar2000_path%\skins\NeoAshen\EL\el_play.png
  33. ,,,,glow:4:255-255-255)
  34. )
  35. )

  36. $setcoordinate(0)

  37. ///////Album Art///////
  38. $enabledraw(1)
  39. $puts(art.top,$add($select(%ON.ART.IN.GROUP%,%el_row_height%),%ART.MARGIN%))
  40. $puts(art.left,%ART.MARGIN%)
  41. $setworldtransform($add(2,-%ON.ART.IN.GROUP%))
  42. //$imageabs:加载图片
  43. $imageabs($get(art.left),$get(art.top),$get(art.size),$get(art.size),%el_group_first_path%,artreader,,,$get(effect))


1、我的发布版本:Foobar2000 Ver. of AllanYan NJU 99EE (左:可视化  右:主窗口)


2、歌词动态显示窗口 Foobar2000 Ver. of AllanYan NJU 99EE


3、Foobar2000 开发环境(左下:布局 右下:脚本)
阅读(1118) | 评论(0) | 转发(0) |
给主人留下些什么吧!~~