修正的本業本益比算法：

1．對應當年度已公佈的該檔股票全年EPS，估算出「當年度"本業EPS"」，再求取「當年度"本業本益比"」。

本業EPS(估算值)，估算法；
若 營業利益率*(1-稅率) > 稅後淨利率，
則 本業EPS=實際EPS

若 營業利益率*(1-稅率) < 稅後淨利率，那代表公司的稅後淨利來源並不全來自本業，
則 本業EPS=實際EPS*(營業利益率*(1-稅率)/稅後淨利率)

PS：稅率：[1-(稅後淨利/稅前淨利)]*100%

^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
2023年前，已公佈的資料採用上述算法；
2024年，因數據皆未完全公佈，則簡化為「使用者自行輸入本業EPS預估值」，求得「本業本益比」，待2024全年數據公佈後，軟體在修正為本業本益比算法。

2．標示出「年度本業EPS、年度本業本益比、年度稅率、年度最高本業本益比、年度最低本業本益比」。
PS：2024年，年度稅率未知，是否可用類似「##」符號代表未知，若不行則採用顯示2023年度稅率。


財報解析研究是無涯的邊際，會想採用這方法，是想更直觀的了解一家公司本業是否賺錢，可善用本業EPS、本業本益比尋找優質好公司，並且在看財經報導時，可以更容易的用過往的數據與末來美好的憧憬去判斷公司走向。


使用奇狐愈深入，發現奇狐真的很用心，而且在數據方面很注重正確性；
股票財報：規畫分類良好，並貼心的註記重要數據公式，方便使用。
股票籌碼：重要相關數據皆已收錄且公式化呈現，查詢方便。
選擇權：優質的分析畫面呈現方式，基本與進階功能都實作出來，使用者可輕鬆求得想要的數據。
期貨籌碼：已將相關數據整理成公式呈現出來，查詢方便。
技術分析：現行內建的指標公式，已經很足夠，而且還細分某些指標的不同版本；只要程式功力夠，天馬行空的想法、畫面弄得如山水畫都沒問題；但還是簡單就好，能抓到老鼠比較重要。
善用奇狐論壇與On_line Help，可以解決很多使用上的疑難雜症。

引用:

---

最初由 m3energy 發表
修正的本業本益比算法：

1．對應當年度已公佈的該檔股票全年EPS，估算出「當年度"本業EPS"」，再求取「當年度"本業本益比"」。

本業EPS(估算值)，估算法；
若 營業利益率*(1-稅率) > 稅後淨利率，
則 本業EPS=實際EPS

若 營業利益率*(1-稅率) < 稅後淨利率，那代表公司的稅後淨利來源並不全來自本業，
則 本業EPS=實際EPS*(營業利益率*(1-稅率)/稅後淨利率)

PS：稅率：[1-(稅後淨利/稅前淨利)]*100%

^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
2023年前，已公佈的資料採用上述算法；
2024年，因數據皆未完全公佈，則簡化為「使用者自行輸入本業EPS預估值」，求得「本業本益比」，待2024全年數據公佈後，軟體在修正為本業本益比算法。

2．標示出「年度本業EPS、年度本業本益比、年度稅率、年度最高本業本益比、年度最低本業本益比」。
PS：2024年，年度稅率未知，是否可用類似「##」符號代表未知，若不行則採用顯示2023年度稅率。


財報解析研究是無涯的邊際，會想採用這方法，是想更直觀的了解一家公司本業是否賺錢，可善用本業EPS、本業本益比尋找優質好公司，並且在看財經報導時，可以更容易的用過往的數據與末來美好的憧憬去判斷公司走向。


使用奇狐愈深入，發現奇狐真的很用心，而且在數據方面很注重正確性；
股票財報：規畫分類良好，並貼心的註記重要數據公式，方便使用。
股票籌碼：重要相關數據皆已收錄且公式化呈現，查詢方便。
選擇權：優質的分析畫面呈現方式，基本與進階功能都實作出來，使用者可輕鬆求得想要的數據。
期貨籌碼：已將相關數據整理成公式呈現出來，查詢方便。
技術分析：現行內建的指標公式，已經很足夠，而且還細分某些指標的不同版本；只要程式功力夠，天馬行空的想法、畫面弄得如山水畫都沒問題；但還是簡單就好，能抓到老鼠比較重要。
善用奇狐論壇與On_line Help，可以解決很多使用上的疑難雜症。

---

原碼:
FEPS:9.99 linethick; //為全年EPS尚未公告處所採用的值(自定義預估值，請自行調改)

CkBK:=INBLOCK('上市指數')+INBLOCK('上櫃指數');
CkMT:=MARKETLABEL='TW' or MARKETLABEL='TO';
CK:=CkMT and CkBK=0;
DRAWTEXTEX(CK=0,1,500,450,'當前商品不適用，本指標僅適用於個股。') COLORMAGENTA ALIGN0;
if CK=0 then exit;

DYM:=FLOOR(SEQDATA('','OPREFF','DATE')/100)+190000; //資料年月
Err:=lbound(DYM)=0 or lbound(SEQDATA('','FIN','DATE'))=0;
DRAWTEXTEX(Err,1,500,450,'本商品目前無相關資料存在。若尚未獲取資料，請與伺服器連線！') colorFF00FF ALIGN0;
if Err then exit;

Err:=SEQDATA('','OPREFF','DATE','Last')<>SEQDATA('','FIN','DATE','Last');
DRAWTEXTEX(Err,1,500,450,'季營運績效與財務報表資料目前更新暫未同步！') colorFF00FF ALIGN0;
if Err then exit;

未還權收盤價:=SEQDATA('','DAY','CLOSE'); //此價可在日線或日線以上週期中使用(其他價不行)
KYM:=FLOOR(tradedate/100)+190000; //K棒年月
DMM:=MOD(DYM,100);//資料月份
KYZ:=MOD(KYM,100)=12 and refx(KYM,1)>KYM or islastbar; //年度終K
KYF:=ref(KYZ,1) or barpos=1; //年度首K

稅前淨利:=SEQDATA('','FIN','I_BTAX');
稅後淨利:=SEQDATA('','FIN','I_NI');
稅率:=1-(稅後淨利/稅前淨利);
營業利益率:=SEQDATA('','OprEff','AccOperIncome');
稅後淨利率:=SEQDATA('','OprEff','AccEAIT');
EPS1:=SEQDATA('','FIN','I_EPS');
EPS2:=EPS1*(營業利益率*(1-稅率)/稅後淨利率);
本業EPS:=if(營業利益率*(1-稅率)>稅後淨利率,EPS1,EPS2);

//以灰色背景標示全年EPS尚未公告處(亦即採自定義預估值處)
LSP:=barslast(DMM=12);Mark:=0;
if lbound(LSP)>0 then Mark:=barpos>=datacount-LSP[datacount]+1;
STICKLINEPY(Mark,0,999,10,0) color777777;

//以該年度全年EPS(最終本業EPS)，填滿該年度相應K棒
年度本業EPS:SETVAL(KYM=DYM and KYZ,本業EPS,-barslast(KYF),本業EPS) linethick;
//於末端全年EPS尚未公告處添加自定義預估值
年度本業EPS:=if(Mark,FEPS,年度本業EPS);

年度本業本益比:(未還權收盤價/年度本業EPS)*(年度本業EPS>0) linethick2; 
DLB:=BARSSINCE(DYM>=201303); StKNo:=lbound(DLB);
if StKNo>0 then x:=SETLBOUND(年度本業本益比,StKNo);

年度稅率:SETVAL(KYM=DYM and KYZ,稅率,-barslast(KYF),稅率) linethick;
年度稅率:=if(Mark,-99,年度稅率);

KYFSP:=barslast(KYF);
年度最高本業本益比:HHV(年度本業本益比,KYFSP+1) linethick;
年度最低本業本益比:LLV(年度本業本益比,KYFSP+1) linethick;

感謝總版主的協助，謝謝。
會先檢驗相關數據，尋思如何更完善。