异动特停主图指标-通达信

M:=3;

创业板:=INBLOCK(‘创业板‘) OR INBLOCK(‘科创板‘);
深圳股:=INBLOCK(‘深证A股‘);
异动A:=(C/REF(C,2)-1)*100-("399107$C"/REF("399107$C",2)-1)*100;
异动B:=(C/REF(C,3)-1)*100-("399107$C"/REF("399107$C",3)-1)*100;
异动A1:=IF(创业板,异动A＞29.99,异动A＞19.99);
异动B1:=IF(创业板,异动B＞39.99,异动B＞19.99);
异动:=IF(异动A1,1,IF(异动B1,1,0));
异动价A:=(("399107$C"/REF("399107$C",2)) + 0.2) * REF(C,2);{2天就异动}
异动价B:=(("399107$C"/REF("399107$C",3)) + 0.2) * REF(C,3);{3天才异动}
异动价:=IF(异动A1,异动价A,异动价B);
第一次异动:=IF(异动=1 AND 深圳股=1 AND EXISTR(异动=1,M,1)=0,1,0);
第二次异动:=FILTER(IF(BARSLAST(第一次异动)＜=3 AND 深圳股=1 AND 异动A1 AND EXISTR(第一次异动=1,M,2),1,IF( 异动B1 AND BARSLAST(第一次异动)＜=3 AND EXISTR(第一次异动=1,M,3),1,0)),M);
第三次异动:=FILTER(IF(BARSLAST(第二次异动)＜=3 AND 深圳股=1 AND 异动A1 AND EXISTR(第二次异动 = 1,M,2),1,IF(BARSLAST(第二次异动)＜=3 AND 异动B1 AND EXISTR(第二次异动 = 1,M,3),1,0)),M);
第四次异动:=FILTER(IF(BARSLAST(第三次异动)＜=3 AND 深圳股=1 AND 异动A1 AND EXISTR(第三次异动 = 1,M,2),1,IF(BARSLAST(第三次异动)＜=3 AND 异动B1 AND EXISTR(第三次异动 = 1,M,3),1,0)),M);
第五次异动:=FILTER(IF(BARSLAST(第四次异动)＜=3 AND 深圳股=1 AND 异动A1 AND EXISTR(第四次异动 = 1,M,2),1,IF(BARSLAST(第四次异动)＜=3 AND 异动B1 AND EXISTR(第四次异动 = 1,M,3),1,0)),M);
第六次异动:=FILTER(IF(BARSLAST(第五次异动)＜=3 AND 深圳股=1 AND 异动A1 AND EXISTR(第五次异动 = 1,M,2),1,IF(BARSLAST(第五次异动)＜=3 AND 异动B1 AND EXISTR(第五次异动 = 1,M,3),1,0)),M);
STICKLINE(PERIOD=5 AND 深圳股=1 AND 第一次异动=1 ,异动价,异动价,-1,1),COLORGREEN;
STICKLINE(PERIOD=5 AND 深圳股=1 AND 第二次异动=1,异动价,异动价,-1,1),COLORGREEN;
STICKLINE(PERIOD=5 AND 深圳股=1 AND 第三次异动=1,异动价,异动价,-1,1),COLORGREEN;
STICKLINE(PERIOD=5 AND 深圳股=1 AND 第四次异动=1,异动价,异动价,-1,1),COLORGREEN;
STICKLINE(PERIOD=5 AND 深圳股=1 AND 第五次异动=1,异动价,异动价,-1,1),COLORGREEN;
STICKLINE(PERIOD=5 AND 深圳股=1 AND 第六次异动=1,异动价,异动价,-1,1),COLORGREEN;
DRAWTEXT(第四次异动=1,异动价,‘-------触发第四次异动‘)COLORMAGENTA;
DRAWTEXT(第五次异动=1,异动价,‘-------触发第五次异动‘)COLORMAGENTA;
DRAWTEXT(第六次异动=1,异动价,‘-------触发第六次异动‘)COLORMAGENTA;
STICKLINE(CURRBARSCOUNT＜=1 AND PERIOD=5 AND 深圳股=1 AND BARSLAST(异动)＜=3,异动价A,异动价A,-1,1),COLORYELLOW;
YD:=第四次异动 OR 第一次异动 OR 第二次异动 OR 第三次异动 OR 第四次异动 OR 第五次异动 OR 第六次异动;
STICKLINE(YD,L*0.995,L*0.95,1.5,1),COLORMAGENTA;
STICKLINE(YD,L*0.994,L*0.975,1.2,0),COLORGREEN;
STICKLINE(YD,L*0.97,L*0.95,1.5,0),COLORMAGENTA;
DRAWNUMBER(第一次异动,L*0.97,1)COLORWHITE;
DRAWNUMBER(第二次异动,L*0.97,2)COLORWHITE;
DRAWNUMBER(第三次异动,L*0.97,3)COLORWHITE;
DRAWNUMBER(第四次异动,L*0.97,4)COLORWHITE;
DRAWNUMBER(第五次异动,L*0.97,5)COLORWHITE;
DRAWNUMBER(第六次异动,L*0.97,6)COLORWHITE;
STICKLINE(YD AND O＜H,O*1.008,O,3.2,0),COLOR0055AA;
STICKLINE(YD AND O＜H,O*1.008,O,2.8,0),COLOR0066BB;
STICKLINE(YD AND O＜H,O*1.008,O,2,0),COLOR0077CC;
STICKLINE(YD AND O＜H,O*1.008,O,1.2,0),COLOR00AAFF;
STICKLINE(YD AND O＜H,O*1.008,O,0.3,0),COLOR00FFFF;