home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga Format CD 28
/
amigaformatcd28.iso
/
-readerstuff-
/
barry_beukhof
/
mpagui_mui
/
savelist.rexx
< prev
next >
Wrap
OS/2 REXX Batch file
|
1998-04-29
|
308b
|
16 lines
/* Save MPAgui List */
options results
address MPAgui
MUIA_List_Entries = 0x80421654
aslrequest TITLE """"Enter Name fo MPAgui playlist""""
if open('PlayList', result, 'w') = 1 then do
list ID LIST1 ATTRS MUIA_List_Entries
do i = 0 to result - 1
list ID LIST1 POS i
writeln('PlayList', result)
end
return