Forums Scripts & Popups if $did = 6 { did -r mp3 11 | var %x = $findfile

how do you create a playlist like this open a dialog with youre mp3dir and loadmp3s and at the right an empty one and a button between them like this " >> " and transport left mp3s to the right (left must remain in left dialog)
and then play them when clicked play playlist

and how do i do this :

var %x = $findfile(%mp3dir,*mp3,0,did -a mp3 11 $nopath($1-)) }

instead of scanning mp3 dir i want the sucker to read the mp3.txt file and read that in the list

* create a dialog gui with two listboxes and a few buttons (I use list ID,x y w h,sort extsel hsbar)
* when the button is pressed, read the lines in the left box one at a time and write them to the right box.
Something along the lines of:



Parts in red need to be fixed up.

learn to use the helpfile.

alias foob {
var %x = 1, %max = $lines(mp3.txt)
while (%x <= %max) {
did -a mp3 11 $nopath($read(mp3.txt,%x))
inc %x
}
}

$findfile doesn't read textfiles dude. try typing /help /loadbuf or /help /filter in your mirc. you could use either one. heck, you could even write a loop with $read, but I really suggest /loadbuf or /filter

using /loadbuf or /filter is definitely faster, but not as flexible. if he wants to make use of $nopath() (and based on his first post, he does), then $read is a more viable option.

Thank you all for youre fast replys : )
Its al usefull thanks

perhaps. problem comes when he wants to actually play these files. if he has them in different directories, and doesn't specify those, he'll need $findfile to find em again. My script actually saves the fullpath in a file, and when called upon I loadbuf it to a custom window and dump the window to the dialog without filepaths. it's the long way around, but especially on large playlists it's still gonna be faster than a $read loop directly

not necessarily. he wouldn't have to use findfile if the mp3.txt kept the full paths to the files. he could just /splay $read(mp3.txt,w,$+(*,$did(mp3,11).sel)) to return the right filename.

alias /test { dialog -m test test | did -r test 1 | var %x = $findfile(%mp3dir,*mp3,0,did -a test 1 $nopath($1-)) }
alias f1 test

dialog test {
title "moo"
size -1 -1 121 57
option dbu
list 1, 4 2 50 50, size
list 2, 68 2 50 50, size
button ">>", 3, 55 3 13 12
button "ok", 4, 58 32 8 12, ok
}





on *:DIALOG:test:SCLICK:3: {
; find how many lines are selected
var %i = $did($dname,1,0).sel
var %j = 1
; loop through them while
(%j <= %i) {
did -a $dname 2 $did($dname,1,$did($dname,2,%j).sel)
inc %j
}
}

on *:dialog:test:sclick:*: {
if $did = 3 { .splay pause }
if $did = 4 { .splay stop }
if $did = 5 { .splay resume }
if $did = 6 { did -r test 11 | var %x = $read(system\mp3test.txt,did -a test 11 $nopath($1-)) | /foob }
}




alias foob {
var %x = 1, %max = $lines(system\mp3.txt)
while (%x <= %max) {
did -a mp3 2 $nopath($read(system\mp3.txt,%x))
inc %x
}
}

now i have this but it gives this error:
[04:07pm] [Unknown command (%J]

replace:
on *:DIALOG:test:SCLICK:3: {
; find how many lines are selected
var %i = $did($dname,1,0).sel
var %j = 1
; loop through them while
(%j <= %i) {
did -a $dname 2 $did($dname,1,$did($dname,2,%j).sel)
inc %j
}
}

with:

on *:DIALOG:test:SCLICK:3: {
; find how many lines are selected
var %i = $did($dname,1,0).sel
var %j = 1
; loop through them
while (%j <= %i) {
did -a $dname 2 $did($dname,1,$did($dname,2,%j).sel)
inc %j
}
}

instead of just copying/pasting our code, why not try and learn from it? or, hey, even reading it before asking why it doesn't work!

anyway, the problem is on the 6th line of yout sclick event. you're missing a 'while' statement in front of your test.

edit: look, even phoenix knew what the problem was! hhos

alias /test { dialog -m test test | did -r test 1 | var %x = $findfile(%mp3dir,*mp3,0,did -a test 1 $nopath($1-)) }
alias f1 test

dialog test {
title "moo"
size -1 -1 121 57
option dbu
list 1, 4 2 50 50, size
list 2, 68 2 50 50, size
button ">>", 3, 55 3 13 12
button "ok", 4, 58 32 8 12, ok
}

on *:dialog:test:sclick:3: {
; find how many lines are selected
var %i = $did($dname,1,0).sel
var %j = 1
; loop through them
while (%j <= %i) {
did -a $dname 2 $did($dname,1,$did($dname,2,%j).sel)
inc %j
}
}

thanks pheonix first the right list did nothing no it does a thing { flipping } :P
have a file selected and if i press >> first time white press 10 times than the first name of the mp3 dir appeared and then 10 times more the second did :P
how to solve that? i cant find a clue

sorry i dont understand what you're asking for :tongue:

that mp3 from the left list go to the right list with this '>>' button
(left mp3s must stay there) that selected mp3 on left copied to the list on the right

You're right, but my point was that the way I described will be faster when you are dealing with large playlists. mIRC isn't the fastest when it comes to reading files.

oh, agreed.

Dr4g0n: far as I can tell from your last post you are asking exactly the same as you did originally, which makes me wonder why you maimed the working code you were given...

Lemme give you a hint:

In your last post of code you have the following line:



Compare that VERY VERY CLOSELY with the code I gave you. You screwed up translating my line to yours....

lolll
:P i have it
thank u very mch