依照這樣的概念,XS團隊寫了一個選股程式,設定5年之內可以回本,可以挑到哪些股票呢?程式碼如下:
1.Value1=GetField("股東權益報酬率","Y");//抓取股東權益報酬率,最新1年。
2.Value2=GetField("股價淨值比","D");//抓取股價淨值比,最近1個交易日。
3.Value3=Value2 /(Value1/100);//將股價淨值比除以股東權益報酬率,算出回本年限。
4.Input:ratio(5,"回本年限");//輸入回本年限,預設值為5年。
5.If Value1>0 and Value3<ratio then ret=1;//假如股東權益報酬率大於零,而且回本年限小於5年,則選出股票。
6.OutPutField(1,Value1,0,"股東權益報酬率");//輸出股東權益報酬率。
7.OutPutField(2,Value2,1股價淨值比");//輸出股價淨值比。
8.OutPutField(3,Value3,1,"回本年限");//輸出回本年限。
用這個程式交易語言,將預設值設為5年,8月14日挑到的股票有14檔(詳見圖1)。
這種程式選股的算法,並沒有考慮到公司未來的成長性,不過,由於選出的檔數不多,因此,可以再逐一檢梘符合條件個股的成長性。有些公司股性不好或冷門股,導致股價比較「委屈」,但是,從股東權益報酬率的角度出發,透過這個方法,就可以找出那些價值被低估的股票。