扫描本地音乐
2023-01-24 09:16:15 最后更新
tw("扫描音乐需要较长时间,请耐心等候∩_∩")
.文件夹
s yy1="mp1"
s yy2="mp2"
s yy3="mp3"
s yy4="wma"
s yy5="wav"
s yy6="mid"
s yy7="aac"
s yy8="mpg"
s yy9="mpeg"
s yy10="flac"
s yy11="m4a"
.音乐文件后缀名
fe("/storage/emulated/0",sf1)
f(sf1==true)
{
s lj="/storage/emulated/0;"
}
fe("/storage/sdcard1",sf2)
f(sf2==true)
{
s lj="/storage/sdcard1;"
}
f(sf1==true && sf2==true)
{
s lj="/storage/emulated/0;/storage/sdcard1"
}
sl(lj,";",a1)
.文件路径
t()
{
for(a3;a1)
{
.循环赋值文件路径
ufnsui()
.线程中更新界面
{
us(sss.smyy,"text",a3)
.设置控件2显示当前扫描的路径
}
.ss(lj1+"/"+a2,a3)
.循环拼接得出文件路径
f(a3 ?* ".")
{
.前面有个点的是隐藏文件,不用理它,还可以减轻扫描强度
}
else
{
fi(a3,sf1)
.获取路径是文件还是文件夹
f(sf1==true)
.判断路径是文件还是文件夹
{
f(a3 ? ".")
{
.判断文件夹里面是不是包含有一个点,有的话不用理它
}
else
{
.扫描……
fl(a3,b1)
.文件列表
for(b2;b1)
{
.循环赋值文件路径
ufnsui()
.线程中更新界面
{
us(sss.smyy,"text",b2)
.设置控件2显示当前扫描的路径
}
ss(a3+"/"+b2,b3)
.循环拼接得出文件路径
f(b3 ?* ".")
{
.前面有个点的是隐藏文件,不用理它,还可以减轻扫描强度
}
else
{
fi(b3,sf2)
.获取路径是文件还是文件夹
f(sf2==true)
.判断路径是文件还是文件夹
{
f(b3 ? ".")
{
.判断文件夹里面是不是包含有一个点,有的话不用理它
}
else
{
.扫描……
fl(b3,c1)
.文件列表
for(c2;c1)
{
.循环赋值文件路径
ufnsui()
.线程中更新界面
{
us(sss.smyy,"text",c2)
.设置控件2显示当前扫描的路径
}
ss(b3+"/"+c2,c3)
.循环拼接得出文件路径
f(c3 ?* ".")
{
.前面有个点的是隐藏文件,不用理它,还可以减轻扫描强度
}
else
{
fi(c3,sf2)
.获取路径是文件还是文件夹
f(sf2==true)
.判断路径是文件还是文件夹
{
f(c3 ? ".")
{
.判断文件夹里面是不是包含有一个点,有的话不用理它
}
else
{
.扫描……
fl(c3,d1)
.文件列表
for(d2;d1)
{
.循环赋值文件路径
ufnsui()
.线程中更新界面
{
us(sss.smyy,"text",d2)
.设置控件2显示当前扫描的路径
}
ss(c3+"/"+d2,d3)
.循环拼接得出文件路径
f(d3 ?* ".")
{
.前面有个点的是隐藏文件,不用理它,还可以减轻扫描强度
}
else
{
fi(d3,sf2)
.获取路径是文件还是文件夹
f(sf2==true)
.判断路径是文件还是文件夹
{
f(d3 ? ".")
{
.判断文件夹里面是不是包含有一个点,有的话不用理它
}
else
{
.扫描……
fl(d3,e1)
.文件列表
for(e2;e1)
{
.循环赋值文件路径
ufnsui()
.线程中更新界面
{
us(sss.smyy,"text",e2)
.设置控件2显示当前扫描的路径
}
ss(d3+"/"+e2,e3)
.循环拼接得出文件路径
f(e3 ?* ".")
{
.前面有个点的是隐藏文件,不用理它,还可以减轻扫描强度
}
else
{
fi(e3,sf2)
.获取路径是文件还是文件夹
f(sf2==true)
.判断路径是文件还是文件夹
{
f(e3 ? ".")
{
.判断文件夹里面是不是包含有一个点,有的话不用理它
}
else
{
.扫描……
}
}
else
{
f(e3  *?  yy1|| e3  *?  yy2|| e3  *?  yy3|| e3  *?  yy4|| e3  *?  yy5|| e3  *?  yy6|| e3  *?  yy7|| e3  *?  yy8|| e3  *?  yy9|| e3  *?  yy10||  e3 *? yy11)
{
ss(sss.sz+e3+"\n",sss.sz)
ula(yy,1=e2,2=e3)
syso(e3)
.是音乐的话赋值列表显示
}
else
{
.不是音乐的话不用理它
}
}
}
}
}
}
else
{
f(d3  *?  yy1|| d3  *?  yy2|| d3  *?  yy3|| d3  *?  yy4|| d3  *?  yy5|| d3  *?  yy6|| d3  *?  yy7|| d3  *?  yy8|| d3  *?  yy9|| d3  *?  yy10||  d3 *? yy11)
{
ss(sss.sz+d3+"\n",sss.sz)
ula(yy,1=d2,2=d3)
syso(d3)
.是音乐的话赋值列表显示
}
else
{
.不是音乐的话不用理它
}
}
}
}
}
}
else
{
f(c3  *?  yy1|| c3  *?  yy2|| c3  *?  yy3|| c3  *?  yy4|| c3  *?  yy5|| c3  *?  yy6|| c3  *?  yy7|| c3  *?  yy8|| c3  *?  yy9|| c3  *?  yy10||  c3 *? yy11)
{
ss(sss.sz+c3+"\n",sss.sz)
ula(yy,1=c2,2=c3)
syso(c3)
.是音乐的话赋值列表显示
}
else
{
.不是音乐的话不用理它
}
}
}
}
}
}
else
{
f(b3  *?  yy1|| b3  *?  yy2|| b3  *?  yy3|| b3  *?  yy4|| b3  *?  yy5|| b3  *?  yy6|| b3  *?  yy7|| b3  *?  yy8|| b3  *?  yy9|| b3  *?  yy10||  b3 *? yy11)
{
ss(sss.sz+b3+"\n",sss.sz)
ula(yy,1=b2,2=b3)
syso(b3)
.是音乐的话赋值列表显示
}
else
{
.不是音乐的话不用理它
}
}
}
}
}
}
else
{
f(a3  *?  yy1|| a3  *?  yy2|| a3  *?  yy3|| a3  *?  yy4|| a3  *?  yy5|| a3  *?  yy6|| a3  *?  yy7|| a3  *?  yy8|| a3  *?  yy9|| a3  *?  yy10||  a3 *? yy11)
{
ss(sss.sz+a3+"\n",sss.sz)
ula(yy,1=a2,2=a3)
syso(a3)
.是音乐的话赋值列表显示
}
else
{
.不是音乐的话不用理它
}
}
}
}
ufnsui()
{
fw("%捡破烂的小屁孩/欧欧音播/音乐列表",sss.sz)
.把音乐列表写入文件
.uls(1,yy,"smyyzt.iyu",-1,-2)
.设置列表显示内容
tw("音乐扫描完成")
endutw()
uigo("zjm.iyu")
}
}