献给喜欢主图的朋友们--飞狐主图改的通达信。

AAA:=C-O;
 BBB:=MA(V/C,4);
 CCC:=REF(AAA,1);
 DDD:=V/C;
 DRAWGBK(CLOSE>0, RGB(1,340,226), RGB(511,685,395),0,0,1);
 VAR1:=(2*C+H+L)/4;
 VAR2:=MA(VAR1,5);
 VAR3:=MA(VAR1,21);
 VAR4:=MA(VAR1,60);
 MA(C,7)COLORFFFF00;
 MA(C,9)COLORFFFF00;
 MA(C,11)COLORFFFF00;
 MA(C,13)COLORFFFF00;
 MA(C,15)COLORFFFF00;
 MA(C,17)COLORFFFF00;
 MA(C,19)COLORFFFF00;
 MA(C,21)COLORFFFF00;
 MA(C,23)COLORFFFF00;
 MA(C,25)COLORFFFF00;
 MA(C,27)COLORFFFF00;
 MA(C,29)COLORFFFF00;
 MA(C,31)COLORFFFF00;
 MA(C,33)COLORFFFF00;
 MA(C,35)COLORFFFF00;
 MA(C,37)COLORFFFF00;
 MA(C,39)COLORFFFF00;
 MA(C,41)COLORFFFF00;
 MA(C,43)COLORFFFF00;
 MA(C,45)COLORFFFF00;
 MA(C,47)COLORFFFF00;
 MA(C,49)COLORFFFF00;
 MA(C,51)COLORFFFF00;
 MA(C,53)COLORFFFF00;
 MA(C,55)COLORFFFF00;
 MA(C,57)COLORFFFF00;
 MA(C,59)COLORFFFF00;
 MA(C,61)COLORFFFF00;
 MA(C,63)COLORFFFF00;
 MA(C,65)COLORFFFF00;
 MA(C,67)COLORFFFF00;
 MA(C,69)COLORFFFF00;
 MA(C,71)COLORFFFF00;
 MA(C,73)COLORFFFF00;
 MA(C,75)COLORFFFF00;
 MA(C,77)COLORFFFF00;
 MA(C,79)COLORFFFF00;
 MA(C,81)COLORFFFF00;
 MA(C,83)COLORFFFF00;
 MA(C,85)COLORFFFF00;
 MA(C,87)COLORFFFF00;
 MA(C,89)COLORFFFF00;
 MA(C,91)COLORFFFF00;
 MA(C,93)COLORFFFF00;
 MA(C,95)COLORFFFF00;
 MA(C,97)COLORFFFF00;
 MA(C,99)COLORFFFF00;
 MA(C,101)COLORFFFF00;
 MA(C,103)COLORFFFF00;
 MA(C,105)COLORFFFF00;
 MA(C,107)COLORFFFF00;
 MA(C,109)COLORFFFF00;
 MA(C,111)COLORFFFF00;
 MA(C,113)COLORFFFF00;
 MA(C,115)COLORFFFF00;
 STICKLINE(VAR1>=VAR2,CLOSE,OPEN,6,0),COLORFF00FF;
 STICKLINE(VAR1>=VAR2,HIGH,LOW,0,0),COLORFF00FF;
 STICKLINE(VAR1<VAR2,CLOSE,OPEN,6,0),COLORWHITE;
 STICKLINE(VAR1<VAR2,HIGH,LOW,0,0),COLORWHITE;
 STICKLINE(VAR1<=VAR3 AND VAR1>OPEN,CLOSE,OPEN,6,0),COLORYELLOW;
 STICKLINE(VAR1<=VAR3 AND VAR1>OPEN,HIGH,LOW,0,0) COLORYELLOW;
 STICKLINE(VAR1>=VAR4 AND VAR1>OPEN,CLOSE,OPEN,6,0),COLORRED;
 STICKLINE(VAR1>=VAR4 AND VAR1>OPEN,HIGH,LOW,0,0) COLORRED;
 STICKLINE(VAR1>=VAR4 AND VAR1<OPEN,CLOSE,OPEN,6,0),COLOR646464;
 STICKLINE(VAR1>=VAR4 AND VAR1<OPEN,HIGH,LOW,0,0) COLOR646464;
 DRAWICON(CROSS(EMA((CLOSE+O+H+L)/4,5),MA((CLOSE+O+H+L)/4,20)),MA((CLOSE+O+H+L)/4,20),4);
 PLOYLINE(MA((CLOSE+O+H+L)/4,20)>=REF(MA((CLOSE+O+H+L)/4,20),1),MA((CLOSE+O+H+L)/4,20)),COLORYELLOW,LINETHICK2;