通达信杨守东先生的{天狼优化主图部分源码贴图}

[复制链接]
查看68 | 回复0 | 2021-8-20 14:18:23 | 显示全部楼层 |阅读模式

以下是通达信杨守东先生的{天狼优化主图部分源码贴图}(无源码的请下载附件导入)

B1:=MA(C,1);
 B2:=SMA(SMA(SMA(B1,2,1),2,1),2,1);
 SMA2:=MA(B2,3);
 IF(B2>SMA2,B2,DRAWNULL),COLORRED,LINETHICK4;
 IF(B2<SMA2,B2,DRAWNULL);
 SNAKEA:HHV(MA(B2,1),13),COLORYELLOW;
 VAR1A:=(2*CLOSE+HIGH+LOW)/4;
 VAR2A:=MA(VAR1A,7);
 VAR3A:=VAR2A-MA(VAR1A,7/2)<0;
 VAR4A:=VAR2A-MA(VAR1A,7/2)>0;
 VAR5A:=BARSLAST(VAR3A);
 VAR6A:=0-BARSLAST(VAR4A);
 VAR7A:=IF(VAR3A<=0,VAR5A,VAR6A);
 STICKLINE(SNAKEA>B2 AND B2>SMA2,SNAKEA,B2,0,0),COLORBLUE;
 A13:=EMA(CLOSE,55);
 A14:=MA(CLOSE,75);
 A15:=EMA(A14,3);
 A16:=EMA(A15,3);
 A17:=(HIGH + LOW) / 5;
 A18:=(MA(A17,4)) - (MA(A17,34));
 A19:=CROSS(A18,0);
 A20:=CROSS(0,A18);
 A21:=BARSLAST(A19);
 A22:=BARSLAST(A20);
 A23:=REF(A19,1);
 A24:=REF(A20,1);
 A25:=BARSLAST(A23);
 A26:=BARSLAST(A24);
 A27:=IF((A25 < A26),(REF((HHV(HIGH,2)),A25)),(REF((LLV(LOW,2)),A26)));
 A28:=(((REF(CLOSE,1)) <= (REF(A27,1))) AND (CLOSE > A27)) AND (A21 < A22);
 A29:=(((REF(CLOSE,1)) >= (REF(A27,1))) AND (CLOSE < A27)) AND (A22 < A21);
 A30:=A28 AND ((COUNT(A28,A21)) = 1);
 A31:=A29 AND ((COUNT(A29,A22)) = 1);
 A32:=A30 AND ((REF(BARSLAST(A31),1)) < (REF(BARSLAST(A30),1)));
 A33:=A31 AND ((REF(BARSLAST(A31),1)) > (REF(BARSLAST(A30),1)));
 DRAWTEXT(A32,SMA2*0.99,'←═≒∝'),COLORYELLOW;
 AC:=AMOUNT/(VOL);
 YY:=MA(AC,13);
 LLL:=(C-YY)/YY*100;
 MIDC := MA(CLOSE,22);
 UPPERC:= MIDC + 2*STD(C,22);
 LOWERC:= MIDC - 2*STD(C,22);
 BBA:=(C-LOWERC)/(UPPERC-LOWERC);
 BBC:=FORCAST(BBA,3);
 LIFENGCYC:=(REF(LLL,1)<-15 AND REF(BBA,1)<0 AND LLL>REF(LLL,1));
 STICKLINE(LIFENGCYC>0,C,O,2,0),COLOR10ABFF;
 DRAWTEXT(LIFENGCYC>0,LOW*0.99,'☆'),COLORDD00DD;
 VAR326:=IF(CLOSE>REF(CLOSE,1),88,0);
 VAR327:=IF(CLOSE/REF(CLOSE,1)>1.050 AND HIGH/CLOSE<1.010 AND VAR326>0, 91, 0);
 {DRAWTEXT(VAR327>90,LOW*0.968,'追涨'),COLORYELLOW;}
止损:REF(HHV(H,13),1)*0.95,COLORGREEN,DOTLINE;
 A002:STICKLINE(CURRBARSCOUNT=1 AND C>=REF(C,1),止损,止损*0.9996,15,0),COLORGREEN;
 DRAWTEXT(CURRBARSCOUNT=1,止损*0.996,'止损线'),COLORGREEN;
 DRAWTEXT_FIX(1,0.01,0.02,0,'★================操盘纪律===================★'),COLORRED;
 DRAWTEXT_FIX(1,0.14,0.06,0,'T+0 操 作'),COLORFFFFFF;
 DRAWTEXT_FIX(1,0.01,0.08,0,'|'),COLOR0000FF;
 DRAWTEXT_FIX(1,0.01,0.11,0,'| '),COLOR0000FF;
 DRAWTEXT_FIX(1,0.32,0.08,0,'| '),COLOR0000FF;
 DRAWTEXT_FIX(1,0.32,0.11,0,'| '),COLOR0000FF;
 DRAWTEXT_FIX(1,0.01,0.16,0,'★================坚决执行===================★'),COLORRED;
 A1:=REF(O,1);
 A2:=ABS((REF(C,1)-A1)/A1);
 A3:=ABS((REF(H,1)-A1)/A1);
 A4:=ABS((REF(L,1)-A1)/A1);
 BU1:=ABS((A2+A3+A4)/3);
 BU2:=O*BU1;
预测今低:=O-BU2;
预测今高:=O+BU2;
 DRAWTEXT_FIX(1,0.04,0.10,0,'预测今低:'),COLOR8080FF,LINETHICK1;
 DRAWNUMBER_FIX(1,0.10,0.10,0,CONST(预测今低)),COLOR8080FF;
 DRAWTEXT_FIX(1,0.15,0.10,0,'元'),COLOR8080FF,LINETHICK1;
 DRAWTEXT_FIX(1,0.18,0.10,0,'预测今高:'),COLOR8080FF,LINETHICK1;
 DRAWNUMBER_FIX(1,0.24,0.10,0,CONST(预测今高)),COLOR8080FF;
 DRAWTEXT_FIX(1,0.29,0.10,0,'元'),COLOR8080FF,LINETHICK1;
 A01:DRAWLINE(HIGH>=HHV(HIGH,5),HIGH,LOW<=LLV(LOW,5),LOW,0);
 B01:DRAWLINE(LOW<=LLV(LOW,5),LOW,HIGH>=HHV(HIGH,5),HIGH,0);
 A02:DRAWLINE(HIGH>=HHV(HIGH,13),HIGH,LOW<=LLV(LOW,13),LOW,0),COLORCYAN;
 B02:DRAWLINE(LOW<=LLV(LOW,13),LOW,HIGH>=HHV(HIGH,13),HIGH,0);
 A03:DRAWLINE(HIGH>=HHV(HIGH,34),HIGH,LOW<=LLV(LOW,34),LOW,0);
 B03:DRAWLINE(LOW<=LLV(LOW,34),LOW,HIGH>=HHV(HIGH,34),HIGH,0);
 A04:DRAWLINE(HIGH>=HHV(HIGH,55),HIGH,LOW<=LLV(LOW,55),LOW,0);
 B04:DRAWLINE(LOW<=LLV(LOW,55),LOW,HIGH>=HHV(HIGH,55),HIGH,0);

62100959.jpg

62100959.jpg

回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则