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("%zhexuan/音乐列表",sss.sz)
        .把音乐列表写入文件
        .uls(1,yy,"smyyzt.iyu",-1,-2)
        .设置列表显示内容
        tw("音乐扫描完成")
        endutw()
        uigo("zjm.iyu")
    }
}