冲破云霄源码主图

XOPEN:=(REF(Open,1)+REF(Close,1))/2;
 XCLOSE:=(HIGH+LOW+CLOSE+OPEN)/4;
 XHIGH:=MAX(XOPEN,XCLOSE,high);
 XLOW:=MIN(XOPEN,XCLOSE,low);

STICKLINE(Xclose>Xopen,Xclose ,Xopen ,8 ,1 ),colorred;
 STICKLINE(Xclose<=Xopen,Xclose ,Xopen ,8 ,0 ),colorffff66;
 STICKLINE(Xclose>Xopen,Xhigh ,Xclose ,0.5 ,0 ),colorred;
 STICKLINE(Xclose>Xopen,Xopen ,Xlow ,0.5 ,0 ),colorred;
 STICKLINE(Xclose<=Xopen,Xopen ,Xhigh ,0.5 ,0 ),colorffff66;
 STICKLINE(Xclose<=Xopen,Xclose ,Xlow ,0.5 ,0 ),colorffff66;

蜡烛图

XOPEN:=(REF(Open,1)+REF(Close,1))/2;
 XCLOSE:=(HIGH+LOW+CLOSE+OPEN)/4;
 XHIGH:=MAX(XOPEN,XCLOSE,high);
 XLOW:=MIN(XOPEN,XCLOSE,low);

STICKLINE(Xclose>Xopen,Xclose ,Xopen ,8 ,1 ),colorred;
 STICKLINE(Xclose<=Xopen,Xclose ,Xopen ,8 ,0 ),colorffff66;
 STICKLINE(Xclose>Xopen,Xhigh ,Xclose ,0.5 ,0 ),colorred;
 STICKLINE(Xclose>Xopen,Xopen ,Xlow ,0.5 ,0 ),colorred;
 STICKLINE(Xclose<=Xopen,Xopen ,Xhigh ,0.5 ,0 ),colorffff66;
 STICKLINE(Xclose<=Xopen,Xclose ,Xlow ,0.5 ,0 ),colorffff66;