如何利用stata编写自己的第一个程序

2020-12-28  本文已影响0人  松柏林stata

1. 命令实现过程

把程序实现过程保存为ado格式,并命令为music。注意ado文件命令必须与程序命令保持一致。

capture program drop music
program define music   //定义程序命令名称为music
    version 10.0
syntax anything  (name = choose ) [,S(namelist)]       //程序语法
 if  "`choose'"=="歌单"{                              //
view browse  "https://music.163.com/#/discover/playlist"   //如果用户输入: music  歌单,则打开歌单
}
 else if  "`choose'"=="电台"{
view browse  "https://music.163.com/#/discover/djradio"  //如果用户输入: music  电台,则打开电台
}
else if  "`choose'"=="排行榜"{
view browse  "https://music.163.com/#/discover/toplist"    //如果用户输入: music  排行榜,则打开排行榜
}
 else if  "`choose'"=="主页"{  
view browse  "https://music.163.com/"        //如果用户输入: music  主页,则打开主页
}
 else if  "`choose'"=="日推"{
view browse  "https://music.163.com/#/discover/recommend/taste"  //如果用户输入: music  日推,则打开日推
}
else if  "`s'"== "单曲"{
view browse  "https://music.163.com/#/search/m/?s=`choose'&type=1"
}    //利用选择性s()来搜索音乐。如果用户输入: music  周杰伦, s(单曲),则搜索周杰伦单曲
else if "`s'" == "歌手"{
view browse  "https://music.163.com/#/search/m/?s=`choose'&type=100"
}  //搜索歌手
else if "`s'" == "歌单"{
view browse  "https://music.163.com/#/search/m/?s=`choose'&type=1000"
}  //搜索歌单 
else {
    disp as error `"运行失败,请重新输入"'
    exit 601
} 
end

2. 命令放置

把保存为ado格式的程序文件stata可运行的文件夹内。
首先在stata输入:adopath ,查找ado可运行的文件夹。然后把music.ado文件放在以下任意一个文件夹。

ado可运行的文件夹

3. 命令运行

music 日推
music 日推
music 周杰伦,s(单曲)
music 周杰伦,s(单曲)
上一篇 下一篇

猜你喜欢

热点阅读