nieuwe opties:
/mp3show -laat alle geblokeerde channels zien-
/mp3stop <hier channel dat geblokt moet worden> -zorgt dat een amsg niet meer naar die channel gaat-
/mp3go <hier een channel waar de amsg weer naar toe mag> -zorgt dat een amsg weer naar die channel gaat-
een shuffle knop
na een liedje gaat hij automatisch door
een skip knop
als een liedje op pauze staat, en je drukt op de play knop, gaat hij weer door met het liedje
een dubbelklik commando (speelt het liedje gewoon af)
het script, voledig in remote:
Menu * {
-
JJR iPod!:/dialog -md eMP3 eMP3
-
}
alias wtfz { var %x = 1
while ($did(emp3,2,%x)) {
if (!$did(emp3,2,$calc(%x + 1))) {
set %naabedie " $+ $readini(mp3player.ini,Directory,Playlist1) $+ $did(emp3,2,$r(1,%x)) $+ .mp3 $+ "
halt }
inc %x
}
}
Dialog eMP3 {
Title "iPod V1.2 by Edie"
size -1 -1 150 150
option dbu
Button "Nieuwe afspeellijst", 1, 20 1 110 14
List 2, 20 20 110 100, vsbar
Button "Play", 8, 13 115 30 10
Button "Pauze", 10, 43 115 30 10
Button "Stop", 9, 103 115 30 10
Button "+", 50, 35 129 10 10
Edit "1", 51, 47 129 50 10, center read
Button "-", 52, 100 129 10 10
Check "Amsg", 123, 45 140 23 12
Check "Mute", 124, 75 140 23 12
button "Skip", 3, 73 115 30 10 , center
check "Shuffle", 6, 105 140 25 12
link "Thnx to Dani l11", 133, 1 143 40 10
}
on *:dialog:eMP3:sclick:6:{
if ($did(6).state == 1) { wtfz }
if ($did(6).state == 0) { inext }
}
on *:dialog:emp3:sclick:3:{
splay -p %naabedie
if ($did(123).state == 1) { iamsg }
if ($did(6).state == 1) { /wtfz }
if ($did(6).state == 0) { /inext }
}
on *:mp3end:{
splay -p %naabedie
if ($did(emp3,123).state) { iamsg }
if ($did(emp3,6).state == 1) { /wtfz }
else { inext }
}
ON *:DIALOG:emp3:init:*:{
noop $findfile($readini(mp3player.ini,directory,Playlist1),*.mp3,0,did -a eMP3 2 $nopath($left($1-,-4)))
did -ra $dname 51 $int($calc(( $vol(master) / 65535) * 100)) $+ %
did -c $dname 123
}
on *:Dialog:eMP3:sclick:1: {
did -r eMp3 2
.writeini mp3player.ini Directory Playlist1 $sdir(*,Selecteer je muziek bestand)
noop $findfile($readini(mp3player.ini,directory,Playlist1),*.mp3,0,did -a emp3 2 $nopath($left($1-,-4)))
}
on *:Dialog:emp3:dclick:2:{ if ($insong.pause) {
splay resume
halt
}
splay -p $qt($findfile($readini(mp3player.ini,Directory,Playlist1),$+(*,$did(2).seltext,.mp3),1,))
if ($did(EMP3,123).state == 1) { /iamsg }
if ($did(6).state == 1) { /wtfz | halt }
inext
}
ON *:DIALOG:eMP3:sclick:8:{ if ($did(EMP3,123).state == 1) { iamsg }
splay -p $qt($findfile($readini(mp3player.ini,Directory,Playlist1),$+(*,$did(2).seltext,.mp3),1,))
if ($did(6).state == 1) { /wtfz | halt }
inext
}
ON *:DIALOG:eMP3:Sclick:9:{
/splay stop
}
on *:dialog:eMP3:sclick:50:{
/vol -v $calc( $vol(master) + 5000)
did -ra $dname 51 $int($calc(( $vol(master) / 65535) * 100)) $+ %
}
on *:dialog:eMP3:sclick:123: {
if ($did(EMP3,123).state == 0) { set %Amsg Lmao }
if ($did(EMP3,123).state == 1) { set %Amsg On }
}
ON *:DIALOG:eMP3:sclick:124:{
if ($did(eMP3,124).state == 0) { vol -vu2
did -ra $dname 51 $int($calc(( $vol(master) / 65535) * 100)) $+ %
}
if ($did(eMP3,124).state == 1) { vol -vu1
did -ra $dname 51 0%
}
}
on *:dialog:eMP3:sclick:52:{
/vol -v $calc( $vol(master) - 5000)
did -ra $dname 51 $int($calc(( $vol(master) / 65535) * 100)) $+ %
}
ON *:DIALOG:eMP3:sclick:*:{
if ($did == 10) { /splay pause }
if ($did == 11) { /splay resume }
}
alias inext { var %x = 1
while ($did(eMP3,2,%x)) {
if (!$did(emp3,2,$calc(%x + 1))) {
set %naabedie " $+ $readini(mp3player.ini,Directory,Playlist1) $+ $did(emp3,2,1) $+ .mp3 $+ "
halt
}
if ($did(eMP3,2,%x) == $remove($nopath($insong.fname),.mp3)) {
set %naabedie $qt($+($readini(mp3player.ini,Directory,Playlist1),$did(emp3,2,$calc(%x + 1)),.mp3))
halt
}
inc %x
}
}
alias mp3stop { if ($1 == $null) { //echo 4vul een channel in | halt }
if ($left($1,1) != $chr(35)) { //echo 4Ongeldige channel | halt }
set %stop [ $+ [ $1 ] ] blaat
//echo 4een amsg gaat nu niet meer naar $1
}
alias mp3show { //echo 4De channels waar een halt op staat:
var %x = 1
while ($var(stop*,%x)) {
echo -a 4 $+ $right($v1,-5)
inc %x }
}
alias mp3go { if ($1 == $null) { //echo 4vul een channel in | halt }
if ($left($1,1) != $chr(35)) { //echo 4Ongeldige channel | halt }
if (%stop [ $+ [ $1 ] ] == $null) { //echo 4Er staat geen halt op die channel | halt }
unset %stop [ $+ [ $1 ] ]
//echo 4een amsg gaat nu weer naar $1
}
alias iamsg { var %x = 1
while ($chan(%x) <= $chan(0)) {
if (%stop [ $+ [ $chan(%x) ] ] == $null) { msg $chan(%x) ×»(Edie's MP3)«× $remove($nopath($insong.fname),.mp3) }
inc %x
}
}