相關標簽: 紅機構強游資指標公式 、 通達信龍虎榜副圖指標 、 秒殺一切妖股指標公式源碼 、 通達信知名游資指標公式 、 通達信 知名游資 副圖 、 主力散戶資金線指標 、 頂級主力監測指標 、 主圖游資進場指標源碼 、 強游資指標公式源碼 、 主力吸籌完畢啟動指標 、 提前預知主力拉升指標 、 通達信紅機構強游資指標 、

?

什么都不要說
上圖， 上源碼

覺得可以給點幣，不行就當沒看見，新手望見諒。

本圖不做任何買賣推薦，后果自負。

?

原理解析：
VAR1賦值:100*(收盤價-34日內收盤價的最低值)/(34日內最高價的最高值-34日內最低價的最低值)的5日簡單移動平均-20 VAR2賦值:2*VAR1的絕對值 VAR3賦值:100-3*(收盤價-75日內最低價的最低值)/(75日內最高價的最高值-75日內最低價的最低值)*100的20日[1日權重]移動平均+2*(收盤價-75日內最低價的最低值)/(75日內最高價的最高值-75日內最低價的最低值)*100的20日[1日權重]移動平均的15日[1日權重]移動平均 VAR4賦值:100-3*(開盤價-75日內最低價的最低值)/(75日內最高價的最高值-75日內最低價的最低值)*100的20日[1日權重]移動平均+2*(開盤價-75日內最低價的最低值)/(75日內最高價的最高值-75日內最低價的最低值)*100的20日[1日權重]移動平均的15日[1日權重]移動平均 VAR5賦值:(最高價+最低價+收盤價)/3 VAR6賦值:(VAR5-VAR5的14日簡單移動平均)/(0.015*VAR5的14日平均絕對偏差) VAR7賦值:(VAR5-VAR5的70日簡單移動平均)/(0.015*VAR5的70日平均絕對偏差) VAR8賦值:如果VAR6>=150ANDVAR6<200ANDVAR7>=150ANDVAR7<200,返回10,否則返回0 VAR9賦值:如果VAR6<=-150ANDVAR6>-200ANDVAR7<=-150ANDVAR7>-200,返回-10,否則返回VAR8 VARA賦值:(收盤價-收盤價的13日簡單移動平均)/收盤價的13日簡單移動平均*100 VARB賦值:100-VARA的絕對值 VARC賦值:3*(大盤的收盤價-75日內大盤的最低價的最低值)/(75日內大盤的最高價的最高值-75日內大盤的最低價的最低值)*100的20日[1日權重]移動平均-2*(大盤的收盤價-75日內大盤的最低價的最低值)/(75日內大盤的最高價的最高值-75日內大盤的最低價的最低值)*100的20日[1日權重]移動平均的15日[1日權重]移動平均 VARD賦值:3*(大盤的開盤價-75日內大盤的最低價的最低值)/(75日內大盤的最高價的最高值-75日內大盤的最低價的最低值)*100的20日[1日權重]移動平均-2*(大盤的開盤價-75日內大盤的最低價的最低值)/(75日內大盤的最高價的最高值-75日內大盤的最低價的最低值)*100的20日[1日權重]移動平均的15日[1日權重]移動平均 VARE賦值:1日前的最低價*0.9 VARF賦值:最低價*0.9 VAR10賦值:(VARF*成交量(手)+VARE*(當前流通股本(手)-成交量(手)))/當前流通股本(手) VAR11賦值:VAR10的30日指數移動平均 VAR12賦值:VAR11-收盤價 VAR13賦值:1日前的收盤價 VAR14賦值:收盤價-VAR13和0的較大值的7日[1日權重]移動平均/收盤價-VAR13的絕對值的7日[1日權重]移動平均*100 VAR15賦值:收盤價-VAR13和0的較大值的13日[1日權重]移動平均/收盤價-VAR13的絕對值的13日[1日權重]移動平均*100 VAR16賦值:收盤價的有效數據周期數 VAR17賦值:收盤價-1日前的收盤價和0的較大值的6日[1日權重]移動平均/收盤價-1日前的收盤價的絕對值的6日[1日權重]移動平均*100 VAR18賦值:((-100)*(60日內最高價的最高值-收盤價)/(60日內最高價的最高值-60日內最低價的最低值)+50)*2 VAR19賦值:(收盤價-15日內最低價的最低值)/(15日內最高價的最高值-15日內最低價的最低值)*100 VAR1A賦值:(VAR19的4日[1日權重]移動平均-50)*2 VAR1B賦值:VAR1A的3日[1日權重]移動平均 VAR1C賦值:(大盤的收盤價-14日內大盤的最低價的最低值)/(14日內大盤的最高價的最高值-14日內大盤的最低價的最低值)*100 VAR1D賦值:VAR1C的4日[1日權重]移動平均 VAR1E賦值:VAR1D的3日[1日權重]移動平均 VAR1F賦值:(30日內最高價的最高值-收盤價)/收盤價*100 VAR20賦值:如果VAR17<=25ANDVAR18<-95ANDVAR1F>20ANDVAR1B<-30ANDVAR1E<30ANDVAR12>=-0.25ANDVAR14<22ANDVAR15<28ANDVAR16>50,返回80,否則返回0 輸出情報: VAR3 輸出天線: 如果VARB<90,返回VARB,否則返回100 輸出紅軍: 如果VAR1>0,返回VAR1,否則返回0, LINESTICK 輸出綠軍: 如果VAR1<0,返回VAR2,否則返回0, LINESTICK 輸出導彈: VAR20 輸出預警系統: 如果VAR7>=200ANDVAR6>=150,返回15,否則返回如果VAR7<=-200ANDVAR6<=-150,返回-15,否則返回VAR9+60 當滿足條件VAR3>=1日前的VAR4時,在VAR3和VAR4位置之間畫柱狀線,寬度為8,0不為0則畫空心柱. 當滿足條件VAR3<1日前的VAR4時,在VAR3和VAR4位置之間畫柱狀線,寬度為8,0不為0則畫空心柱. VAR21賦值:收盤價>收盤價的20日簡單移動平均 AND 收盤價的20日簡單移動平均>=1日前的收盤價的20日簡單移動平均 VAR22賦值:收盤價<收盤價的20日簡單移動平均 AND 收盤價的20日簡單移動平均<1日前的收盤價的20日簡單移動平均 VAR23賦值:紅軍>50 AND 預警系統>60 AND 天線=100 VAR24賦值:紅軍>48 AND 預警系統>60 AND 天線<100 VAR25賦值:綠軍>38 AND 預警系統<55 VAR26賦值:導彈>50 AND 天線<90 VAR27賦值:VAR3<1日前的VAR4 AND 成交量(手)>1日前的成交量(手) AND 收盤價>1日前的收盤價 VAR28賦值:VAR3>=1日前的VAR4 AND 收盤價<1日前的收盤價 AND 預警系統=60 AND 導彈=0 AND 綠軍>=1日前的綠軍 AND VARC<1日前的VARD 當滿足條件VAR21ANDCOUNT(VAR21,30)=1時,在100位置書寫文字,畫洋紅色 當滿足條件VAR22ANDCOUNT(VAR22,30)=1時,在90位置書寫文字,畫綠色 當滿足條件VAR23ANDCOUNT(VAR23,30)=1時,在70位置書寫文字,畫綠色 當滿足條件VAR24ANDCOUNT(VAR24,30)=1時,在80位置書寫文字,畫黃色 當滿足條件VAR25ANDCOUNT(VAR25,30)=1時,在50位置書寫文字,COLOR00FF00 當滿足條件VAR26ANDCOUNT(VAR26,30)=1時,在30位置書寫文字,畫紅色 當滿足條件VAR27ANDCOUNT(VAR27,30)=1時,在40位置書寫文字,畫青色 當滿足條件VAR28ANDCOUNT(VAR28,30)=1時,在20位置書寫文字,畫綠色

?

?來源:程序化99（ www.tumamayizhan.com ）

源碼：

?

?

VAR1:=MA(100*(CLOSE-LLV(CLOSE,34))/(HHV(HIGH,34)-LLV(LOW,34)),5)-20;VAR2:=2*ABS(VAR1);VAR3:=100-3*SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)+2*SMA(SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1);VAR4:=100-3*SMA((OPEN-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)+2*SMA(SMA((OPEN-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1);VAR5:=(HIGH+LOW+CLOSE)/3;VAR6:=(VAR5-MA(VAR5,14))/(0.015*AVEDEV(VAR5,14));VAR7:=(VAR5-MA(VAR5,70))/(0.015*AVEDEV(VAR5,70));VAR8:=IF(VAR6>=150 AND VAR6<200 AND VAR7>=150 AND VAR7<200,10,0);VAR9:=IF(VAR6<=-150 AND VAR6>-200 AND VAR7<=-150 AND VAR7>-200,-10,VAR8);VARA:=(CLOSE-MA(CLOSE,13))/MA(CLOSE,13)*100;VARB:=100-ABS(VARA);VARC:=3*SMA((INDEXC-LLV(INDEXL,75))/(HHV(INDEXH,75)-LLV(INDEXL,75))*100,20,1)-2*SMA(SMA((INDEXC-LLV(INDEXL,75))/(HHV(INDEXH,75)-LLV(INDEXL,75))*100,20,1),15,1);VARD:=3*SMA((INDEXO-LLV(INDEXL,75))/(HHV(INDEXH,75)-LLV(INDEXL,75))*100,20,1)-2*SMA(SMA((INDEXO-LLV(INDEXL,75))/(HHV(INDEXH,75)-LLV(INDEXL,75))*100,20,1),15,1);VARE:=REF(LOW,1)*0.9;VARF:=LOW*0.9;VAR10:=(VARF*VOL+VARE*(CAPITAL-VOL))/CAPITAL;VAR11:=EMA(VAR10,30);VAR12:=VAR11-CLOSE;VAR13:=REF(CLOSE,1);VAR14:=SMA(MAX(CLOSE-VAR13,0),7,1)/SMA(ABS(CLOSE-VAR13),7,1)*100;VAR15:=SMA(MAX(CLOSE-VAR13,0),13,1)/SMA(ABS(CLOSE-VAR13),13,1)*100;VAR16:=BARSCOUNT(CLOSE);VAR17:=SMA(MAX(CLOSE-REF(CLOSE,1),0),6,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),6,1)*100;VAR18:=((-100)*(HHV(HIGH,60)-CLOSE)/(HHV(HIGH,60)-LLV(LOW,60))+50)*2;VAR19:=(CLOSE-LLV(LOW,15))/(HHV(HIGH,15)-LLV(LOW,15))*100;VAR1A:=(SMA(VAR19,4,1)-50)*2;VAR1B:=SMA(VAR1A,3,1);VAR1C:=(INDEXC-LLV(INDEXL,14))/(HHV(INDEXH,14)-LLV(INDEXL,14))*100;VAR1D:=SMA(VAR1C,4,1);VAR1E:=SMA(VAR1D,3,1);VAR1F:=(HHV(HIGH,30)-CLOSE)/CLOSE*100;VAR20:=IF(VAR17<=25 AND VAR18<-95 AND VAR1F>20 AND VAR1B<-30 AND VAR1E<30 AND VAR12>=-0.25 AND VAR14<22 AND VAR15<28 AND VAR16>50,80,0);情報: VAR3;天線: IF(VARB<90,VARB,100);紅軍: IF(VAR1>0,VAR1,0), LINESTICK;綠軍: IF(VAR1<0,VAR2,0), LINESTICK;導彈: VAR20;預警系統: IF(VAR7>=200 AND VAR6>=150,15,IF(VAR7<=-200 AND VAR6<=-150,-15,VAR9))+60;STICKLINE(VAR3>=REF(VAR4,1),VAR3,VAR4,8,0);STICKLINE(VAR3<REF(VAR4,1),VAR3,VAR4,8,0);VAR21:=CLOSE>MA(CLOSE,20) AND MA(CLOSE,20)>=REF(MA(CLOSE,20),1);VAR22:=CLOSE<MA(CLOSE,20) AND MA(CLOSE,20)<REF(MA(CLOSE,20),1);VAR23:=紅軍>50 AND 預警系統>60 AND 天線=100;VAR24:=紅軍>48 AND 預警系統>60 AND 天線<100;VAR25:=綠軍>38 AND 預警系統<55;VAR26:=導彈>50 AND 天線<90;VAR27:=VAR3<REF(VAR4,1) AND VOL>REF(VOL,1) AND CLOSE>REF(CLOSE,1);VAR28:=VAR3>=REF(VAR4,1) AND CLOSE<REF(CLOSE,1) AND 預警系統=60 AND 導彈=0 AND 綠軍>=REF(綠軍,1) AND VARC<REF(VARD,1);DRAWTEXT(VAR21 AND COUNT(VAR21,30)=1,100,'上升通道！'),COLORMAGENTA;DRAWTEXT(VAR22 AND COUNT(VAR22,30)=1,90,'下降通道！ '),COLORGREEN;DRAWTEXT(VAR23 AND COUNT(VAR23,30)=1,70,'上漲過急！ '),COLORGREEN;DRAWTEXT(VAR24 AND COUNT(VAR24,30)=1,80,'莊家出貨！ '),COLORYELLOW;DRAWTEXT(VAR25 AND COUNT(VAR25,30)=1,50,'不必殺跌!'),COLOR00FF00;DRAWTEXT(VAR26 AND COUNT(VAR26,30)=1,30,'堅決搶反彈'),COLORRED;DRAWTEXT(VAR27 AND COUNT(VAR27,30)=1,40,'大資金進場！'),COLORCYAN;DRAWTEXT(VAR28 AND COUNT(VAR28,30)=1,20,'見頂回落'),COLORGREEN;{程序化交易 www.tumamayizhan.com }
{程序化交易 www.tumamayizhan.com }

?

公式導入教程: 【通達信公式源碼導入方法教程】 【同花順公式源碼導入方法教程】 【大智慧新一代公式源碼導入方法教程】

?