on *:dialog:play:sclick:3: { set %dir $shortfn($sdir(c:,"Elije un directorio")) | lista }
on *:dialog:play:sclick:6: {
if (!$did(1).sel) && ($inmp3 == $false) { echo 2 -a *** Por favor, selecciona una canción de la lista y luego haga clic en Play | return }
if ($did($dname,6).text = PLAY) {
did -ra $dname 6 STOP
set %track $did(1).sel
splay $findfile(%dir,*.mp3,%track)
did -c play 1 %track
data
did -ra $dname 9 $remove($nopath($inmp3.fname),.mp3)
}
else { did -r $dname 9 | splay stop | did -ra $dname 6 PLAY }
}
alias -l data {
if (!$chan(0)) { echo -a PLAY: $remove($nopath($insong.fname),.mp3) }
else { /ame PLAY: $remove($nopath($insong.fname),.mp3) }
}