C/C++ www.gszb.com 股票公式指标网提供 Code复制内容到剪贴板
- {薛斯通道主图 M1: 80,120,102 M2: 2,20,7 N: 1,1000,120}
- AAA:=MA((2*CLOSE+HIGH+LOW)/4,5);
- 通道1:AAA*M1/100;
- 通道2:AAA*(200-M1)/100;
- CCC:=ABS((2*CLOSE+HIGH+LOW)/4-MA(CLOSE,20))/MA(CLOSE,20);
- DDD:=DMA(CLOSE,CCC);
- 通道3:(1+M2/100)*DDD;
- 通道4:(1-M2/100)*DDD;
- {BBI}
- 涨:IF(MA(BBI,1)>REF(MA(BBI,1),1),MA(BBI,1),DRAWNULL),COLORRED,LINETHICK2;
- 平:IF(MA(BBI,1)=REF(MA(BBI,1),1),MA(BBI,1),DRAWNULL),COLOR00FFFF,LINETHICK3;
- 跌:IF(MA(BBI,1)<REF(MA(BBI,1),1),MA(BBI,1),DRAWNULL),COLORGREEN,LINETHICK2;
-
- K:=BARSLAST(CURRBARSCOUNT=N);
- GD:=CONST(IF(ISLASTBAR=1,HHV(H,K),0));
- DD:=CONST(IF(ISLASTBAR=1,LLV(L,K),0));
- KJ:=GD-DD;
- GD4:=IF(CURRBARSCOUNT<=N/2,GD,DRAWNULL);
- 平衡:IF(CURRBARSCOUNT<=N,DD+KJ/2,DRAWNULL),COLOR00FFFF,NODRAW;
- 压力:IF(CURRBARSCOUNT<=N,GD-KJ*0.191,DRAWNULL),COLORFF00FF,NODRAW;
- 支撑:IF(CURRBARSCOUNT<=N,DD+KJ*0.191,DRAWNULL),COLOR00FF00,NODRAW;
- 高:IF(CURRBARSCOUNT<=N,GD,DRAWNULL),COLOR00FFFF,POINTDOT;
- 低:IF(CURRBARSCOUNT<=N,DD,DRAWNULL),COLOR00FF00,POINTDOT;
- 低涨:IF(CURRBARSCOUNT<=N,(C/LLV(LOW,K)-1)*100,DRAWNULL),COLOR0000FF,NODRAW;
- 天数:BARSLAST(L=DD),COLORCYAN,NODRAW;
- MCST:DMA((AMOUNT/(VOL*100)),VOL/CAPITAL),COLORWHITE,POINTDOT,LINETHICK4;
- {以下设置主图显示方式}
- STICKLINE(CURRBARSCOUNT=N,GD,DD,0,-1),COLORGREEN;
- STICKLINE(CURRBARSCOUNT=N/2,GD,DD,0,-1),COLORGREEN;
- STICKLINE(CURRBARSCOUNT=1,GD,DD,0,-1),COLORGREEN;
- STICKLINE(CURRBARSCOUNT<=N,平衡,平衡,3,-1),COLORWHITE;
- STICKLINE(CURRBARSCOUNT<=N/2,压力,压力,3,-1),COLORRED;
- STICKLINE(CURRBARSCOUNT<=N/2,支撑,支撑,3,-1),COLORGREEN;
- {彩色K线}
- TYX3:=MA(REF(HHV((C+L+O+H)/4,30),1),3);
- TYX4:=MA((C+L+O+H)/4,13);
- TYX5:=EMA((C+L+O+H)/4,21);
- {空心红}
- STICKLINE(C<TYX5 AND C>O,H,L,0,0),COLORRED;
- STICKLINE(C<TYX5 AND C>O,C,O,3,1),COLORRED;
- {深绿}
- STICKLINE(C<TYX5 AND C<O,H,L,0,0),COLOR007700;
- STICKLINE(C<TYX5 AND C<O,C,O,3,0),COLOR005500;
- STICKLINE(C<TYX5 AND C<O,C,O,2,0),COLOR006600;
- STICKLINE(C<TYX5 AND C<O,C,O,1,0),COLOR007700;
- {蓝}
- STICKLINE(C>TYX5 AND C<O,H,L,0,0),COLORFFDD44;
- STICKLINE(C>TYX5 AND C<O,C,O,3,0 ),COLORFF7700;
- STICKLINE(C>TYX5 AND C<O,C,O,2,0 ),COLORFFAA22;
- STICKLINE(C>TYX5 AND C<O,C,O,1 ,0 ),COLORFFDD44;
- {黄}
- STICKLINE(C>TYX5 AND C>O,H,L,0,0 ),COLOR00EEFF;
- STICKLINE(C>TYX5 AND C>O,C,O,3,0 ),COLOR00AAFF;
- STICKLINE(C>TYX5 AND C>O,C,O,2,0 ),COLOR00CCFF;
- STICKLINE(C>TYX5 AND C>O,C,O,1,0 ),COLOR00EEFF;
- {粉红}
- STICKLINE(C>TYX4 AND C>O,H,L,0,0),COLORFF66AA;
- STICKLINE(C>TYX4 AND C>O,C,O,3,0 ),COLORFF11FF;
- STICKLINE(C>TYX4 AND C>O,C,O,2,0 ),COLORFF44FF;
- STICKLINE(C>TYX4 AND C>O,C,O,1,0 ),COLORFF66FF;
- {亮灰}
- STICKLINE(C>TYX4 AND C<O,H,L,0,0),COLOR999999;
- STICKLINE(C>TYX4 AND C<O,C,O,3,0),COLOR555555;
- STICKLINE(C>TYX4 AND C<O,C,O,2,0),COLOR777777;
- STICKLINE(C>TYX4 AND C<O,C,O,1,0),COLOR999999;
- {深红}
- STICKLINE(C>TYX3 AND C>O,H,L,0,0),COLOR0000DD;
- STICKLINE(C>TYX3 AND C>O,C,O,3,0),COLOR000099;
- STICKLINE(C>TYX3 AND C>O,C,O,2,0),COLOR0000BB;
- STICKLINE(C>TYX3 AND C>O,C,O,1,0),COLOR0000DD;
- {涨跌停K线}
- STICKLINE((C-REF(C,1))*100/REF(C,1)>=(10-0.01*100/REF(C,1)),OPEN,CLOSE,1,0),COLORYELLOW;
- STICKLINE((REF(C,1)-C)*100/REF(C,1)>=(10-0.01*100/REF(C,1)),OPEN,CLOSE,1,0),COLORWHITE;
- {突破}
- STICKLINE(REF(COUNT(C<TYX3,5)=5,1) AND C>TYX3 AND C>O,C,O,1,0),COLOR00CCFF;
