通达信金牛与庄共舞源码

HH:=HHV(HIGH,15);
 LL:=LLV(LOW,15);
 HH1:=BARSLAST((HH > REF(HH,1)));
 LL1:=BARSLAST((LL < REF(LL,1)));
空头:IF((HH1 > LL1),HH,DRAWNULL),LINETHICK2,COLORGREEN;
多头:IF((HH1 < LL1),LL,DRAWNULL),LINETHICK2,COLORRED;
 {PARTLINE((HH1 < LL1),LL),COLORYELLOW;
 PARTLINE((HH1 > LL1),HH),COLORBLUE;}
 STICKLINE(LL1>=HH1,LOW,HIGH,0,1),COLORRED;
 STICKLINE(LL1>=HH1,CLOSE,OPEN,3.2,2),COLORRED;
 STICKLINE(LL1<HH1,LOW,HIGH,0,1),COLORGREEN;
 STICKLINE(LL1<HH1,CLOSE,OPEN,3.2,2),COLORGREEN;
 STICKLINE(CROSS(HH1,LL1),OPEN,CLOSE,3.2,0),COLORGREEN;
 STICKLINE(CROSS(LL1,HH1),OPEN,CLOSE,3.2,0),COLORRED;
 STICKLINE((CLOSE>OPEN) AND (LL1<HH1),CLOSE,OPEN,3.2,2)COLORGREEN;
 STICKLINE((CLOSE>OPEN) AND (LL1>=HH1),CLOSE,OPEN,3.2,2)COLORRED;
 STICKLINE((CLOSE<OPEN) AND (LL1<HH1),CLOSE,OPEN,3.2,0)COLORGREEN;
 STICKLINE((CLOSE<OPEN) AND (LL1>=HH1),CLOSE,OPEN,3.2,0)COLORRED;
 {STICKLINE((HH1 < LL1),O,C,4,1),COLORRED;
 STICKLINE((HH1 < LL1),C,H,0.1,1),COLORRED;
 STICKLINE((HH1 < LL1),O,L,0.1,1),COLORRED;
 STICKLINE((HH1 > LL1),O,C,4,0),COLORCYAN;
 STICKLINE((HH1 > LL1),H,C,0.1,1),COLORCYAN;
 STICKLINE((HH1 > LL1),O,L,0.1,1),COLORCYAN;}
 DRAWTEXT(CROSS(HH1,LL1),HH,'空');
DRAWTEXT(CROSS(LL1,HH1),LL,'多');
 {DRAWTEXT(((HH1 < REF(HH1,1)) AND (HH1 < LL1)),LOW,'♂加多');
DRAWTEXT(((LL1 < REF(LL1,1)) AND (HH1 > LL1)),HIGH,'♀加空');};