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
  }
}