RB螺紋鋼期貨交易網
捉妖紅金綠指標公式源碼分享：
N:=5;M:=3;
{DRAWGBKLAST(C?>?0,'$RGB(60,60,60)$RGB(0,0,0)$0');
DRAWGBKLAST((("RSI.RSI2")?>?("RSI.RSI3"))?AND?(("RSI.RSI3")?>?(60.5)),'$RGB(0,0,0)$RGB(100,100,100)$1');}
VAR0:=((EMA(C,5))?*?7?+?(EMA(C,10))?*?3)?/?10;
VAR1:=IF((YEAR)?>=?(2025),0,1);
VAR2:=EMA(EMA(L,21)?+?(6.8)?*?(STD(L,2)),55);
VAR3:=EMA(((C?/?(VAR2))?*?((1.88)?*?C?+?L?+?O))?/?(2.75),3);
VAR4:=(((VAR3)?-?(VAR2))?/?(VAR2))?/?2;
VAR5:=(EMA((VAR3)?-?((VAR4)?*?(VAR3)),5))?*?(VAR1);
黃金軌道:(IF((VAR0)?>?(VAR5),VAR0,VAR5))?*?(VAR1),LINETHICK2,COLORYELLOW;
上軌:IF(((VAR5)?<?(VAR0))?AND?((VAR5)?<?(C?*?(0.15))),(EMA(C,300))?-?(3?*?(STD(C,300))),VAR5),LINETHICK2,COLORYELLOW;
IF((VAR5)?>?(VAR0),上軌,DRAWNULL),COLOR00FF00,LINETHICK2;
開口XG:BARSLASTCOUNT(黃金軌道!=上軌)=1,NODRAW;
DRAWICON(開口XG,MIN(上軌,黃金軌道)*0.96,11);
VAR6:=(REF(C,1))?*?(0.95);
VAR7:=(REF(C,3))?*?(0.875);
VAR8:=MIN(VAR6,VAR7);
VAR9:=((SMA(MAX(C?-?(REF(C,1)),0),9,1))?/?(SMA(ABS(C?-?(REF(C,1))),9,1)))?*?(100);
VAR10:=(((SMA(MAX(C?-?(REF(C,1)),0),24,1))?/?(SMA(ABS(C?-?(REF(C,1))),24,1)))?*?(100))?*?(VAR1);
IF((((VAR8)?=?(VAR6))?AND?((VAR0)?>?(VAR5)))?AND?((VAR10)?>?(64.5)),上軌,DRAWNULL),COLORWHITE,LINETHICK2;
{STICKLINE((VAR6)?=?(VAR8),C,O,2.5,0),COLORBLUE;
STICKLINE((VAR6)?=?(VAR8),H,L,0,0),COLORBLUE;}
VAR11:=(EMA(DMA(((2.15)?*?C?+?L?+?H)?/?4,(ABS((((3.48)?*?C?+?H?+?L)?/?4)?-?(EMA(C,20))))?/?(EMA(C,20))),200))?*?(0.968?+?15?/?(100));
{DRAWTEXT(((CROSS((HHV(H,13))?-?(((HHV(H,13))?-?(LLV(L,13)))?*?(0.382)),VAR5))?AND?(C?>?(VAR5)))?AND?(H?>?(VAR11)),VAR5,'買入'),LINETHICK2,COLORWHITE;}
VAR12:=MA(C,26)?+?2?*?(STD(C,26));
VAR13:=((SMA(MAX(C?-?(REF(C,1)),0),14,1))?/?(SMA(ABS(C?-?(REF(C,1))),14,1)))?*?(100);
VAR14:=(EMA(C,60)?+?EMA(C,120)?+?EMA(C,240)?+?EMA(C,480))?/?4;
VAR15:=VAR14?+?(1.91)?*?(STD(VAR14,3));
VAR16:=(EMA(VAR15,12))?*?(1.23);
STICKLINE((((VAR10)?>=?(64.5))?AND?((VAR13)?>=?65))?AND?((MA(C,1))?>?(VAR16)),C,O,3,0),COLORRED;
STICKLINE((((VAR10)?>=?65)?AND?(C?=?O))?AND?((MA(C,1))?>?(VAR16)),C,O,3,0),COLORRED;
STICKLINE((((VAR10)?>?65)?AND?((VAR13)?>=?65))?AND?((MA(C,1))?>?(VAR16)),H,L,0,0),COLORRED;
STICKLINE(((((VAR10)?>=?(64.5))?AND?((VAR13)?>=?65))?AND?((VAR13)?>?(VAR10)))?AND?(C?<?上軌),O,L,0,0),COLORRED;
STICKLINE(((((VAR10)?>=?(64.5))?AND?((VAR13)?>=?65))?AND?((VAR13)?>?(VAR10)))?AND?(C?<?上軌),C,H,0,0),COLORRED;
VAR17:=(MA(C,3)?+?MA(C,6)?+?MA(C,12)?+?MA(C,24))?/?4;
{VAR17?+?3?*?(STD(VAR17,10)),LINETHICK3;}
IF((VAR0)?>?(VAR5),VAR17?+?3?*?(STD(VAR17,10)),DRAWNULL),COLORFF00FF,LINETHICK1;
{VAR18:=(((((((((SMA(MAX(C?-?(REF(C,1)),0),24,1))?/?(SMA(ABS(C?-?(REF(C,1))),24,1)))?*?(100))?>?65)?AND?((VAR0)?>?(EMA(C,13))))?AND?((EMA(C,13))?>?(EMA(C,55))))?AND?((VAR12)?>?(REF(VAR12,1))))?AND?(C?>?(EMA((H?+?L?+?C)?/?3,13))))?AND?((MA(C,5))?>?(MA(C,10))))?AND?((CROSS(HHV(C,5),(MA(H,10))?*?(1?+?5?/?(100))))?AND?((((C?-?(REF(C,1)))?/?(REF(C,1)))?*?(100))?>?(6.5)));
DRAWTEXT((VAR18)?>?0,L,'漲停追擊'),LINETHICK1,COLORYELLOW;}
VAR19:=(EMA((C?-?(REF(C,1)))?/?(REF(C,3)),8))?*?(100);
DRAWTEXT(((((((((C?>=?((REF(C,1))?*?(1.095)))?AND?(C?=?O))?AND?(L?<?C))?AND?(C?>?(VAR5)))?AND?((VAR19)?<=?6))?AND?((VAR19)?>?1))?>?0)?AND?((VAR9)?>?(VAR10)))?AND?((VAR9)?>?(64.5)),C,'T字戰法'),COLORYELLOW;
VAR20:=((((VAR10)?>=?(64.5))?AND?((VAR13)?>=?65))?AND?(C?>?(VAR16)))?AND?(C?>?((MA(H,30))?*?(1?+?15?/?(100))));
IF(((((VAR0)?>?(VAR5))?AND?((VAR20)?>?0))?AND?((VAR17?+?3?*?(STD(VAR17,10)))?>?(REF(VAR17?+?3?*?(STD(VAR17,10)),1))))?AND?((VAR17?+?3?*?(STD(VAR17,10)))?>?(HHV(MA(C,5),60))),VAR17?+?3?*?(STD(VAR17,10)),DRAWNULL),COLORFF00FF,LINETHICK3;
{DRAWTEXT((((VAR6)?=?(VAR8))?AND?(C?>?(MA(C,20))))?AND?((MA(C,5))?>?(MA(C,20))),L,'反彈'),COLORWHITE;}
VAR22:=EMA(EMA(EMA(EMA(EMA((C?-?(REF(C,1)))?/?(REF(C,3)),8),2),2),2),3);
{DRAWTEXT(FILTER(((CROSS(EMA((C?-?(REF(C,1)))?/?(REF(C,3)),8),VAR22)))?>?0,10),L,'抄底'),COLORYELLOW;}
DRAWTEXT_FIX(1,0,0.9,0,'所屬板塊:')COLOR00FFFF;
Z1:=STRCAT(HYBLOCK,'?');
Z2:=STRCAT(Z1,DYBLOCK);
Z3:=STRCAT(Z2,'?');
DRAWTEXT_FIX(ISLASTBAR,0.1,0.9,0,STRCAT(Z3,GNBLOCK)),COLOR00FFFF;
VAR23:=(REF((C?-?(REF(C,1)))?/?(REF(C,1)),1))?*?(100);
STICKLINE(((((C?>=?((REF(C,1))?*?(1.095)))?AND?(C?=?O))?AND?(L?<?C))?AND?((VAR19)?>?1))?>?0,C,O,5,0),COLORWHITE;
STICKLINE(((((C?>=?((REF(C,1))?*?(1.095)))?AND?(C?=?O))?AND?(L?<?C))?AND?((VAR19)?>?1))?>?0,L,C,0,0),COLORWHITE;
STICKLINE(CROSS(VAR9,21),O,C,4,1),COLORWHITE;
VAR24:=COUNT((((C?-?(REF(C,1)))?/?(REF(C,1)))?*?(100))?>?8,120);
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.145,0,0,VAR24),COLORYELLOW;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0,0,0,'【股票活躍度】?'),COLORYELLOW;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.16,0,0,'級:?'),COLORYELLOW;
VAR25:=C?*?V;
VAR26:=EMA(((EMA(VAR25,3))?/?(EMA(V,3))?+?(EMA(VAR25,6))?/?(EMA(V,6))?+?(EMA(VAR25,12))?/?(EMA(V,12))?+?(EMA(VAR25,24))?/?(EMA(V,24)))?/?4,13);
VAR27:=(1.06)?*?(VAR26);
DRAWTEXT(((((C?-?(REF(C,1)))?/?(REF(C,1)))?*?(100))?>?(5.5))?AND?(CROSS((L?/?((H?+?REF(C,1)?+?O)?/?3))?*?C,EMA((EMA(C,9))?*?(1.14),5))),EMA(L?-?(0.15),1),'▲'),COLORF00FF0;
STICKLINE((((((C?-?(REF(C,1)))?/?(REF(C,1)))?*?(100))?>?(8.5))?AND?(CROSS(MA(C,1),(EMA(H,10))?*?(1?+?5?/?(100)))))?AND?(CROSS(MA(C,1),VAR27)),(L?+?H?+?O)?/?3,O,3,0),COLORRED;
STICKLINE((((((C?-?(REF(C,1)))?/?(REF(C,1)))?*?(100))?>?(8.5))?AND?(CROSS(MA(C,1),(EMA(H,10))?*?(1?+?5?/?(100)))))?AND?(CROSS(MA(C,1),VAR27)),(L?+?H?+?O)?/?3,C,3,0),COLORFF0099;
VAR28:=((C?-?(LLV(L,9)))?/?((HHV(H,9))?-?(LLV(L,9))))?*?(100);
VAR29:=SMA(VAR28,3,1);
VAR30:=SMA(VAR29,3,1);
VAR31:=(3?*?(VAR29))?-?(2?*?(VAR30));
VAR32:=((H?-?L)?/?(REF(C,1)))?*?(100);
VAR33:=((C?-?O)?/?(REF(C,1)))?*?(100);
VAR34:=((O?-?L)?/?(REF(C,1)))?*?(100);
VAR35:=((H?-?C)?/?(REF(C,1)))?*?(100);
VAR36:=(VAR32)?/?(1.5);
STICKLINE(((((((VAR32)?>?7)?AND?((VAR36)?>?(4.5)))?AND?((VAR35)?<?(5.5)))?AND?((VAR35)?<?(VAR34)))?AND?(BETWEEN(VAR33,-2.5,2.5)))?AND?((VAR31)?<?(100)),O,H,0,0),COLORRED;
STICKLINE(((((((VAR32)?>?7)?AND?((VAR36)?>?(4.5)))?AND?((VAR35)?<?(5.5)))?AND?((VAR35)?<?(VAR34)))?AND?(BETWEEN(VAR33,-2.5,2.5)))?AND?((VAR31)?<?(100)),O,C,3.5,0),COLORRED;
STICKLINE(((((((VAR32)?>?7)?AND?((VAR36)?>?(4.5)))?AND?((VAR35)?<?(5.5)))?AND?((VAR35)?<?(VAR34)))?AND?(BETWEEN(VAR33,-2.5,2.5)))?AND?((VAR31)?<?(100)),C,L,0,0),COLORF00FF0;
DRAWTEXT(((((VAR32)?>?2)?AND?((VAR34)?>?(VAR33)))?AND?(H?=?C))?AND?(((((((C?>=?((REF(C,1))?*?(1.095)))?AND?(L?<?C))?AND?((VAR19)?<=?6))?AND?((VAR19)?>?1))?AND?((VAR9)?>?(VAR10)))?AND?((VAR9)?>?64))?>?0),L,'錘法→'),COLORYELLOW;
STICKLINE((((((REF(((C?-?(REF(C,1)))?/?(REF(C,1)))?*?(100),1))?<?-4)?AND?((REF(VAR32,1))?>?5))?AND?(O?>?(REF(C,1))))?AND?((((C?-?(REF(C,1)))?/?(REF(C,1)))?*?(100))?>?3))?AND?(O?<?(REF(O,1))),C,C,5,0),COLORYELLOW;
STICKLINE((((((REF(((C?-?(REF(C,1)))?/?(REF(C,1)))?*?(100),1))?<?-4)?AND?((REF(VAR32,1))?>?5))?AND?(O?>?(REF(C,1))))?AND?((((C?-?(REF(C,1)))?/?(REF(C,1)))?*?(100))?>?3))?AND?(O?<?(REF(O,1))),O,O,5,0),COLORYELLOW;
STICKLINE((((((REF(((C?-?(REF(C,1)))?/?(REF(C,1)))?*?(100),1))?<?-4)?AND?((REF(VAR32,1))?>?5))?AND?(O?>?(REF(C,1))))?AND?((((C?-?(REF(C,1)))?/?(REF(C,1)))?*?(100))?>?3))?AND?(O?<?(REF(O,1))),L,O,0,0),COLORYELLOW;
STICKLINE((((((REF(((C?-?(REF(C,1)))?/?(REF(C,1)))?*?(100),1))?<?-4)?AND?((REF(VAR32,1))?>?5))?AND?(O?>?(REF(C,1))))?AND?((((C?-?(REF(C,1)))?/?(REF(C,1)))?*?(100))?>?3))?AND?(O?<?(REF(O,1))),C,O,3,0),COLORYELLOW;
{DRAWTEXT(CROSS(COST(95),EMA(COST(95),10)),COST(95),'異'),COLORGREEN;}
壓線:HHV(MA(C,N),60),COLORGREEN;
大壓線:HHV(MA(H,M),120),COLORGREEN;
IF((大壓線)?>?(REF(大壓線,1)),大壓線,DRAWNULL),COLORYELLOW,LINETHICK1;
IF(C?>?壓線,壓線,DRAWNULL),COLOR00FFFF,LINETHICK1;
DRAWTEXT(ISLASTBAR,壓線,'?←小壓力'),COLORGREEN;
DRAWTEXT(ISLASTBAR,大壓線,'?←大壓力'),COLORGREEN;
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.145,0.1,0,VAR19),COLORYELLOW;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0,0.1,0,'【強度關注2級以上】?'),COLORYELLOW;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.2,0.1,0,'級:?'),COLORYELLOW;
天界:(EMA(H,11))?*?(1?+?(5.2)?/?(100)),NODRAW;
VAR37:=((L?+?H)?/?2);
VAR38:=(EMA((O?+?C?+?L?+?H)?/?4,1));
VAR39:=(EMA((C?+?L?+?H)?/?3,1));
}
STICKLINE(((C?>?((MA(H,30))?*?(1?+?18?/?(100))))?AND?(C?>?(VAR5)))?AND?((VAR10)?>?(64.5)),VAR39,VAR37,3,0),COLORWHITE;
{==================波段無敵======================}
波段:EMA(C,5),COLORWHITE,LINETHICK1;
紅升1:IF(波段>REF(波段,1),波段,DRAWNULL),COLORFF00FF,LINETHICK2;
綠降1:IF(波段<REF(波段,1),波段,DRAWNULL),COLOR00FF01,LINETHICK1;
評論前必須登錄！
立即登錄 注冊