奇狐社區論壇

總頁數 (2): « 1 [2]
在這個頁面顯示本主題全部的 23 個文章

奇狐社區論壇 (http://www.chiefox.com.tw/bbs/index.php)
- 問題交流 (http://www.chiefox.com.tw/bbs/forumdisplay.php?forumid=28)
-- 請問 (http://www.chiefox.com.tw/bbs/showthread.php?threadid=7786)

由 jeng 在 2008-08-11 12:52 發表:

版主對不起因我沒說清楚,我是想若要透過
"單季每股盈餘"及
"年度每股盈餘"
來選股作為參考
而非單單按 [F10] 功能一個一個的查看

由 cgjj 在 2008-08-11 13:07 發表:

引用:
最初由 jeng 發表
版主對不起因我沒說清楚,我是想若要透過
"單季每股盈餘"及
"年度每股盈餘"
來選股作為參考
而非單單按 [F10] 功能一個一個的查看

您是要用進期最末的數據選嗎?

由 jeng 在 2008-08-11 13:23 發表:

非常謝謝版主熱心的回覆,
我是要抓F10中的
單季每股盈餘
2008/1 3.4元
2007/4 3.8元
2007/3 3.1元
2007/2 2.0元
年度每股盈餘
2007 10.6元
2006 7.1元
2005 7.3元
2004 3.1元
的各種數字

由 cgjj 在 2008-08-11 13:39 發表:

引用:
最初由 jeng 發表
非常謝謝版主熱心的回覆,
我是要抓F10中的
單季每股盈餘
2008/1 3.4元
2007/4 3.8元
2007/3 3.1元
2007/2 2.0元
年度每股盈餘
2007 10.6元
2006 7.1元
2005 7.3元
2004 3.1元
的各種數字

還是沒有說明你要如何用來選股?
例如:
用最近一次的單季每股盈餘來選股

由 jeng 在 2008-08-11 13:45 發表:

非常不好意思,沒有表達清楚,
我是要"單季每股盈餘"的"所有資料,"可以知道前4季的"總"獲利
也要"年度每股盈餘 "的"所有資料,"可以知道以往的獲利情形

由 cgjj 在 2008-08-11 15:40 發表:

引用:
最初由 jeng 發表
非常不好意思,沒有表達清楚,
我是要"單季每股盈餘"的"所有資料,"可以知道前4季的"總"獲利
也要"年度每股盈餘 "的"所有資料,"可以知道以往的獲利情形

原碼:


//若值為 -99999 表示無數據

PN:=F10FIND('單季每股盈餘',1);

VARIABLE:GP[4]=0,單季[4]:=-99999;

if PN<>-1 then begin

  USTR:=F10TEXT(PN,0); SP:=0;

  for i=1 to 4 do begin

    SP:=STRFIND(USTR,'/',SP+1);

    GP[i]:=SP;

  end;

  for i=1 to 4 do begin

    SP:=STRFIND(USTR,'元',GP[i]+1);

    if SP>0 and i<4 then begin

       if SP>GP[i+1] then SP:=0;

    end;

    if SP>0 then begin

      單季[i]:=STRTONUM(STRMID(USTR,GP[i]+2,SP-2));

    end;

  end;

end;

單1:單季[1];

單2:單季[2];

單3:單季[3];

單4:單季[4];

由 cgjj 在 2008-08-11 15:41 發表:

//若值為 -99999 表示無數據
PN:=F10FIND('年度每股盈餘',1)+15;
VARIABLE:GP[4]=0,年度[4]:=-99999;
if PN<>-1 then begin
USTR:=F10TEXT(PN,0); SP:=0;
for i=1 to 4 do begin
年度[i]:=STRTONUM(STRMID(USTR,(i-1)*16+5,7));
end;
end;
年1:年度[1];
年2:年度[2];
年3:年度[3];
年4:年度[4];

由 jeng 在 2008-08-11 16:29 發表:

非常謝謝版主的熱心回答,真是感激不盡

全部時間均為台灣時間, 現在時間為17:12

總頁數 (2): « 1 [2]
在這個頁面顯示本主題全部的 23 個文章