“帶式挖掘機”同大新指數編制思路（1）。

退休的老父親是老股東，是標準的“韭菜”，性格倔強。 我自以為有幾十年的經驗，可是我連進門都沒進門，都是無效的經驗，就像在職場上一樣，我做基礎工作機器很多年了，沒有思考，沒有積累，沒有成長，就算花了很長時間，也拿不到晉公升，因為這麼多年的時間根本就沒有經驗。 不過，他開心是件好事。

這幾年每次回老家，他總會問我，什麼好，最近聽說了什麼，能不能買一些，然後我跟他解釋了很多。 從他的表情，我知道他是在裝懂，我也笑了，他很開心。 所以我一直有個想法，結合他的**喜好，為他編制乙個勝率超過70%的同大新指數系統。

我的想法是，整個指標體系由四個子系統組成：排名指標、選股指標、主副圖表指標和雷達監測指標。 目前，它被稱為“帶式挖掘機”。 既然是老年人使用的，功能不能太複雜，同時需要直觀。

四個子系統具有不同的作用，其中排名指標主要用於檢視整體趨勢，幫助確定方向並協助選股。 選股指標主要幫助日線水平的**池建設，主副圖表指標用於**的觀察，雷達監控指標用於分時**買賣交易訊號的提示。 發展順序是主次圖表指標、選股指標、排名指標、雷達監測指標。 這四個子系統相互關聯，並不斷優化以滿足公平要求。

基於以上思路，首先設計了主圖表指標子系統。 該子系統由五個模組組成，分別是：模組1：基礎資料指標;

模組2：財務分析評分指標;

模組3：技術分析指標;

模組4：趨勢分析指標;

模組5：短期股價**指標;

在這五個模組之前，還設定了乙個用於全域性引數設定的模組，用於引數定義。 每個模組的來源都值得從之前對指標的分析和邏輯思路中學習。

全域性引數設定同大信**如下圖所示：

模組 1：基本資料指標**，如下圖所示

具體**如下，因為是老父親用的，所以每句**後面都註明了行**的意思：

drawgbk(c>o,rgb(10,0,0),rgb(0,0,0),1,2,1);drawkline(h,o,l,c);生命線馬（C，30），圓點，顏色FF00FF; 估計當天的成本 if（c>ref（c，1），（3*h+4*c+3*open+2*l） 12，（2*h+4*c+3*open+3*l） 12）; 扇區 = strcat（'[扇區]。',strcat(strcat(strcat('[行業]—',hyblock),strcat('[地區]—',dyblock)),strcat('[概念]—'，gnblock）））總股本 = strcat（strcat（.）'總股本',con2str(totalcapital/1000000,2)),'十億');流通托盤 = strcat（strcat（.）'迴圈盤',con2str(capital/1000000,2)),'十億');全流量=strcat（strcat（'流通',con2str(capital/totalcapital*100,2)),'％');市值=strcat（strcat（.）.'浮動市值',con2str((capital/1000000)*c,2)),'十億');上市日期 = strcat（'上市日期',con2str(hhv((barscount(c)=0)*(date+19000000),0),0));股票市值 = strcat（'[股本的市值]。'，strcat（strcat（strcat（strcat（strcat（strcat（strcat（total share float）， full circulation）， 市值）， 上市日期））; 市盈率 = strcat（'市盈率',con2str(c/finance(33),2));P/S = strcat（'市銷率',con2str(c/(finance(20)/finance(1)),2));市淨率 = strcat（'市淨率',con2str(c/finance(34),2));淨資產回報率 = strcat（'淨資產回報率',con2str(finance(33)/finance(34)*100,2));毛利率 = strcat（'毛利率',con2str((finance(20)-finance(21))/finance(20)*100,2));淨利潤率 = strcat（'淨利率',con2str(finance(30)/finance(20)*100,2));主利潤率 = strcat（'主要利潤率',con2str(finance(23)/finance(20)*100,2));當前效能 = strcat（'[當前效能]。'，strcat（strcat（strcat（strcat（strcat（strcat（strcat（strcat（strcat（stcat（P/E）， 市淨率， 淨利率）， 毛利率）， 淨利率）， 主利潤率））; drawtext_fix(islastbar,0.005,0.02,0，板），顏色黃色;drawtext_fix(islastbar,0.005,0.07,0，市值），色澤;drawtext_fix(islastbar,0.005,0.12,0，當前結果），colormagenta;drawtext_fix(1,0.005,0.17,0,'利潤率：'),coloryellow;drawnumber_fix(1,0.06,0.17,0,const(winner(c )*100)),coloryellow;drawnumber_fix(1,0.15,0.17,0,const(dynainfo(37)*100)),coloryellow;drawtext_fix (1,0.12,0.17,0,'倒手'),coloryellow;drawnumber_fix(1,0.25,0.17,0,const(dynainfo(17)))coloryellow;drawtext_fix (1,0.22,0.17,0,'體積比'),coloryellow;drawtext_fix (1,0.30,0.17,0,'增加'),coloryellow;drawnumber_fix(1,0.33,0.17,0,const(dynainfo(14)*100)),colorred;drawnumber_fix(1,0.33,0.17,0,if(const(dynainfo(14)*100)<0,const(dynainfo(14)*100),drawnull)),colorgreen;

後續模組源**將在另乙個完成後乙個共享。

end】