alias playlist {
set %mp3 $$sdir(1,mp3 dir,1)
var %loop = 1
var %num = 1
remini mp3.ini MP3
while (%loop < $findfile(%mp3,*.mp3,0)) {
writeini mp3.ini MP3 %num $sound($findfile(%mp3,*.mp3,%loop)).artist - $sound($findfile(%mp3,*.mp3,%loop)).title $chr(167) " $+ $findfile(%mp3,*.mp3,%loop) $+ "
inc %loop 1
inc %num 1
}
}