以下是冲破云霄源码主图
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;
评论(0)