**** Sound System ****
dialog PA {
title "By: ArabStars & Peter"
size -1 -1 83 56
option dbu
button "Mp3 Player", 1, 20 10 45 12
button "Ram Player", 2, 20 27 45 12
button "Ok", 3, 8 42 70 10,ok center
box "Sound System", 4, 1 1 82 55
}
on *:Dialog:PA:sclick:2:{ Set %Ram $dir="Choose a Ram,Play it" [ %ramz $+ \*.ram ] | if ( %ram !== $null ) { Run %Ram | if ($server != $null) && ($chan(0) != 0) Ame Listen To $nopath(%Ram) , Size $round($calc($lof(%ram) / 1048576 ),2) $+ .KB , Ram SysTem 
else echo 1 -a *** $me Listen To $nopath(%Ram) , Size $round($calc($lof(%ram) / 1048576 ),2) $+ .KB , Ram SysTem
} }
on *:Dialog:PA:sclick:1:{ Set %Mp3 $dir="Choose a MP3,Play it" [ %mp3z $+ \*.Mp3 ] | if ( %mp3 !== $null ) { splay %Mp3 | if ($server != $null) && ($chan(0) != 0) Ame Listen To $nopath(%Mp3) , Size $mp3(%MP3).bitrate , Time: $duration($calc($mp3(%MP3).length / 1000)) MP3 SysTem 
else echo 1 -a *** $me Listen To $nopath(%Mp3) , Size $mp3(%MP3).bitrate , Time: $duration($calc($mp3(%MP3).length / 1000)) MP3 SysTem } }

menu Channel {
-
Mp3\Ram:dialog -m PA PA
}
**** Sound System ****