AMIP Announcer

By Ayon on Mar 23, 2010

I think is the most compact and still powerfull amip announcer existing. It gives you access to every single amip variable that is on only one line of code, and a complete menu for controlling winamp, the script settings and amip configuration software.

When loaded you should type the following just to set the variables

/set %amip.style describe | set %amip.string is playing {s} • {pm}:{ps} / {min}:{sec} • {br}Kbps/{sr}KHz/{mode}

menu channel {
  $iif(!$isdde(mplug),$style(2)) Winamp
  .Announce:np
  .Search playlist:dde mplug search
  .-
  .Play:dde mplug control play
  .Pause:dde mplug control pause
  .Stop:dde mplug control stop
  .Next:dde mplug control >
  .Previous:dde mplug control <
  .$iif($dde(mplug,var_shuffle) == on, $style(1)) Shuffle:dde mplug setshuffle $iif($dde(mplug,var_shuffle) == on,off,on)
  .$iif($dde(mplug,var_repeat) == on, $style(1)) Repeate:dde mplug setrepeat $iif($dde(mplug,var_repeat) == on,off,on)
  .-
  .Settings
  ..Announce type
  ...$iif(%amip.style == describe,$style(1)) /describe:set %amip.style describe
  ...$iif(%amip.style == msg,$style(1)) /msg:set %amip.style msg
  ..-
  ..Display pattern:set %amip.string $$input(Enter the announce display pattern.,eyi,Announce display pattern,%amip.string)
  .AMIP Configurator:dde mplug options
}

alias np $iif(!$isdde(mplug),echo -at Error $chr(155) Winamp is not running.,$iif(!$dde(mplug,var_playing),echo -at Error $chr(155) Winamp is not playing.,$hget(general,mp3.style) $active $regsubex(%amip.string,/\{([^\{\}]*)\}/g, $iif(($dde(mplug,var_\1)) || ($dde(mplug,var_\1) == 00), $dde(mplug,var_\1), \1))))

Comments

Sign in to comment.
saban   -  May 22, 2010

nice script!:)

 Respond  
Are you sure you want to unfollow this person?
Are you sure you want to delete this?
Click "Unsubscribe" to stop receiving notices pertaining to this post.
Click "Subscribe" to resume notices pertaining to this post.