選股
ROA = 稅後淨利 / 總資產
-> 運用資產賺錢的能力
流動比例 = 流動資產 / 流動負債
-> 以短期資產償還短期負債的能力
資產週轉率 = 銷售收入 / 總資產
-> 營運效率
// 以季為腳本執行頻率
if barfreq<>"Q" then raiseruntimeerror("請改成用季頻率");
variable:count(0);
count=0; // 以計數器累加符合條件的分數
// 取得各條件所需欄位
value1=GetField("資產報酬率","Q");
value2=GetField("來自營運之現金流量","Q");
value3=GetField("本期稅後淨利","Q");
value4=GetField("長期負債","Q");
value5=GetField("流動比率","Q");
value6=GetField("加權平均股數","Q");
value7=GetField("資產報酬率","Q");
value8=GetField("營業毛利率","Q");
value9=GetField("總資產週轉率(次)","Q");
value10=GetFieldDate("營業毛利率","Q");
{
獲利性:
1. 當年度 ROA > 0
2. 當年度的營業現金流 > 0
3. 當年度的營業現金流大於淨利
}
if value1>0 then count=count+1;
if value2>0 then count=count+1;
if value2>value3 then count=count+1;
{
安全性:
4. 當年度長期負債金額小於上一年度
5. 當年度流動比例(流動資產/流動負債)大於上一年度
6. 上一年度沒有發行新股
}
if value4<value4[4] then count=count+1;
if value5>value5[4] then count=count+1;
if value6=value6[1] then count=count+1;
{
成長性:
7. 當年度的總資產報酬率大於上一個年度的總資產報酬率
8. 當前毛利率大於上一年度
9. 當前資產週轉率大於上一年度
}
if value7>value7[4] then count=count+1;
if value8>value8[4] then count=count+1;
if value9=value9[4] then count=count+1;
input: Fscorelimit(9); // 將分數輸入設為input
if count>=Fscorelimit then ret=1;
outputfield(1,count,0,"Fscoure");
outputfield(2,value10,0,"財報日期");