四十八分钟综合主图的妙用(通达信公式 源码 主图 K线图)

[复制链接]
查看49 | 回复0 | 2022-6-27 20:26:08 | 显示全部楼层 |阅读模式

上次发了一个80分钟主图指标,是对60到120分钟的修饰;今天再给大家发一个48分钟主图,对30到60分钟主图的修饰;48分钟是把全天240分钟分成了5份,也就是说把日K线分拆为5根K线,日、80分、48分的组合同时符合费波拉契线时间窗的1、3、5规律。近期各大指数在小周期上(30、60、80、120)均无明显的压力线显示,而在48分钟图上惊奇的发现沪指、深成指、创业板、上证50及券商指数和银hang指数等均在48分钟周期上生命线附近受阻回落,有效的帮助我们在小周期上判断压力位起到了一定的帮助。想进一步编写选股的朋友可以利用主图发挥您的智慧编一个帮您自己喜欢的选股公式,我就不发了。

生命线:MA(C,60),COLORRED;
IF(C>=生命线,生命线,DRAWNULL),COLORRED,LINETHICK2;
IF(C<生命线,生命线,DRAWNULL),COLORBLUE,LINETHICK2;
MA5:MA(C,5)COLORMAGENTA;
MA10:MA(C,10)COLORLIGREEN;
MA25:MA(C,25)COLORLIRED;
选股1:=CROSS(C,MA5) AND CROSS(C,MA10) AND CROSS(C,MA25);
DRAWICON(选股1,L*0.997,5);
{http://www.70822.com}
A1:=C>REF(C,4);
NT:=BARSLASTCOUNT(A1);
TJ11:=NT=9;
TJ13:=ISLASTBAR AND BETWEEN(NT,5,8);
AY:=(BACKSET(TJ11>0,9) OR BACKSET(TJ13>0,NT))*NT;
DRAWTEXT(AY>0,H*1.002,VAR2STR(AY,0)),COLORRED;
DRAWTEXT(NT=9,H*1.002,'9'),COLORBLUE;
B1:=C<REF(C,4);
NT0:=BARSLASTCOUNT(B1);
TJ21:=NT0=9 ;
TJ23:=ISLASTBAR AND BETWEEN(NT0,5,8);
AY1:=(BACKSET(TJ21>0,9) OR BACKSET(TJ23>0,NT0))*NT0;
DRAWTEXT(AY1>0,L*0.99,VAR2STR(AY1,0)),COLORBLACK;
DRAWTEXT(NT0=9,L*0.99,'9'),COLORLIMAGENTA;

{======行业概念======}
Z11:=STRCAT(DYBLOCK,' ');
Z22:=STRCAT(Z11,HYBLOCK);
Z33:=STRCAT(Z22,' ');
Z44:=STRCAT(Z33,GNBLOCK);
Z55:=STRCAT(Z44,' ');
Z66:=STRCAT(Z55,FGBLOCK);
DRAWTEXT_FIX(ISLASTBAR,0.10,0.99,0,STRCAT(Z66,ZHBLOCK)),COLORBLUE;
DRAWTEXT_FIX(1,0.1,0.9,0,STRCAT('【自定板块】:',ZDBLOCK)),COLORMAGENTA;


{顶底指标}
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:=SMA(RSV,3,1)COLORRED,LINETHICK1;
D:=SMA(K,3,1)COLORBLUE,LINETHICK1;
J:=3*K-2*D,COLORLICYAN,LINETHICK2;
DRAWICON(J<100 AND REF(J,1)>100,H,2);
J值上拐:=IF(CROSS(J,0),1,0),COLORBLACK,NODRAW;
DRAWTEXT(J值上拐,L*0.99,'底'),COLORRED; 

TC1:=IF(H=HHV(H,48),H,DRAWNULL);
TC2:=CONST(BARSLAST(TC1=H))+1;
UPPER:=CONST(IF(TC2=1,H,REF(H,TC2-1)));
BC1:=IF(L=LLV(L,48),L,DRAWNULL);
BC2:=CONST(BARSLAST(BC1=L))+1;
LOWER:=CONST(IF(BC2=1,L,REF(L,BC2-1)));
LP:=CURRBARSCOUNT<=BC2 AND L=LOWER;{低点定位}
HP:=CURRBARSCOUNT<=TC2 AND H=UPPER;{高点定位}
DRAWTEXT(LP,L*0.99,'↖波段底'),COLORLIGREEN;{波段底文字提示}
DRAWTEXT(HP,H*1.0051,'←波段顶'),COLORMAGENTA;{波段顶文字提示};



20195242302470808.png

20195242302470808.png

20195242303657062.png

20195242303657062.png

20195242305251560.png

20195242305251560.png

20195242305972077.png

20195242305972077.png

p20195242305972077.jpg

p20195242305972077.jpg

20195242301138500.rar

1.32 KB, 下载次数: 0

售价: 3 金钱  [记录]  [购买]

20195242301138500.rar

回复

使用道具 举报

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

本版积分规则