通达信公式（通达信主图公式）

掘进公式(掘进主图公式)

新闻里已经有朋友问能不能分享一下纠结刷的源代码。现在分享一下，在里面加上时间段和换手率。但是纠缠理论博大精深，目前市面上还没有准确的源代码。这个源码有明显的缺点，仅供纠结爱好者学习。

关于绕线刷的源代码

n:= 510010；

振幅:=0，1，1；

统计:=0，1，1；

局部低点预选A: = Backset (LLV (L，10 * n) ref (HHV (H，10 * n-1)，1)，10 * n-1)；

局部高点预选B:=BACKSET(局部高点预选A=0且REF(局部高点预选A，1)=1，2)；

局部高点预选C:=IF(局部高点预选B=1且REF(局部高点预选B，1)=0，1，0)；

判断:=IF(L>REF(H，1)，1，IF(HREF (1)和LLV(L，1 +1)REF (1)和HHV(H，1 +1)>REF(HHV(H，1 +1)

储备B:=IF(局部高点预选C=1且REF(低点日前，1)=4或HHV(缺口判断，低点日前)=1)，1，0)；

高预留:=IF((高预留A=1或高预留B=1或判断=1)且H>REF(L，低前一天+1)，1，0)；

预判A:=IF((从前高日判断A:=IF(局部低点预判C=-1和REF(从前高日，1)REF(大值期，从前高日+1)和小值期> REF(小值期，从前低日)，。

低A:=IF(局部低预选C=-1和REF(来自前高点日，1)>REF(来自前低点日，1)和LLV(L，来自前高点日+1)REF(大值期，来自前高点日A)，1，0)；

保留XA:=IF(局部高点预选C=1且REF (a，1距前低日)> ref (a，1距前高日)> HHV (h，a+1距前低日)> ref (HHV (h，a+1距前低日)，1，0)；

预留高点XB:=IF(局部高点预选C=1且REF (a，1天前)= 4或HHV(缺口判断，a天前)=1)，1，0)；

高预约X:=IF((高预约XA=1或高预约XB=1或判断X=1)且H>REF(前一天的L，a+1)，1，0)；

预判XA:=IF((判断XA:=IF自前高点日A)(预判局部低点C=-1和REF(自前高点日A，1)REF(大周期，自前高点日A+1)和小周期> REF(小周期，自前低点日A)

低XA:=IF(局部低预选C=-1和REF(来自前高点日A，1)>REF(来自前低点日A，1)和LLV(L，来自前高点日A+1)REF(大值期，来自前高点日y A)，1，0)；

保持高位YXA:=IF(局部高点预选C=1且REF(来自前低日YA，1)>REF(来自前高日YA，1)> HHV(H，来自前低日YA+1)>REF(HHV(H，来自前低日YA+1)，1，0)；

预留的YXB:=IF(局部高点预选C=1且REF (YA，1)=4或HHV(缺口判断，YA)=1)，1，0)；

高预留YX:=IF((高预留YXA=1或高预留YXB=1或判断YX=1)且H>REF(L，ya+1来自前一日)，1，0)；

判断YXA:=IF(判断YXA:=IF(预选局部低点C=-1和REF (YA，1距前高日)REF(大值期，ya+1距前高日)和小值期> REF(大值期，YA距前高日)和小值期> REF(小值期，低距前

低留YXA:=IF(局部低点预选C=-1和REF(来自前高天YA，1)>REF(来自前低天YA，1)和LLV(L，来自前高天YA+1)LLV(H，内下+1)；

Upper: =COUNT(L>=REF(L，1)，Upper和outer) > 2，COUNT(H>=REF(H，1)，upper和inner)> 2；

包括:=伯爵(H2和伯爵(L2；

A:=顶部的周期和上、下、上、外的强度> 3；

B:=底部周期和较低强度和较低夹杂物和较低外> 3；

Top: = top A且H=HHV(H，BARSLAST (bottom B))且bars last(bottom B)> 3；

Bottom: = bottom B且L=LLV(L，BARSLAST (top A))且bars last(top A)> 3；

C1:=DRAWLINE (top，h，bottom，L，0)；

C2:=DRAWLINE (bottom，L，top，H，0)；

GD:=C2=C1和top

DD:=C2=C1和底部；

CC:=DD或GD；

变化:if (dd = 1，l，if (gd = 1，h，画空))，圆圈圆点，颜色黄色；

交易时段:BARSLAST(CC)+1，NODRAW

间隔周转率:总和(AMO。AMOW/10000，交易周期)，NODRAW{1亿}

区间换手:IF(CC=0，SUM(HSL。HSL，交易周期)，0)，有色，无抽奖；{%}

范围增加:C/REF(C，交易周期)*100-100，NODRAW，COLORWHITE{%}

高点换手:=VARCAT(VARCAT(\'变\'，var2str (sum (hsl。hsl，barlastest (gd)+1)，2)，\' % \')；

低点换手:=VARCAT(VARCAT(\'变\'，var2str (sum (hsl。hsl，bar last(DD)+1)，2)，\' % \')；

音程振幅:if (GD > 0，-(ref (h，小节最后(GD))/l * 100-100)，h/ref (l，小节最后(DD)) * 100-100)，颜色黄色，无平局；

高落差A:=IF(振幅= 1，-(ref (h，BarsLast (GD))/l * 100-100)，c/ref (c，bars last(GD)+1)* 100-100)；

低增量A:=IF(振幅= 1，h/ref (l，barlastest (DD)) * 100-100，c/ref (c，bar lastest(DD)+1)* 100-100)；

高落差:=IF(振幅=1，VARCAT(VARCAT(\'振动\'，VAR2STR(高落差A，2))，\' % \')，VARCAT(VARCAT(\'振幅\'，VAR2STR(高落差A，2))，\' % \')；

低增:=IF(振幅=1，VARCAT(VARCAT(\'振动\'，VAR2STR(低增A，2))，\' % \')，VARCAT(VARCAT(\'振幅\'，VAR2STR(低增A，2))，\' % \')；

高点时间:=VARCAT(VARCAT (\'transaction \'，VAR2STR(BARSLAST(GD)+1，0)，\' day \')；

低点时间:=VARCAT(VARCAT (\'transaction \'，VAR2STR(BARSLAST(DD)+1，0))，\' days \')；

周:= varcat (varcat(\'，if (weekday = 1，\'一\'，IF(WEEKDAY=2，\'二\'，IF(WEEKDAY=3，\'三\'，IF(WEEKDAY=4，\'四\'，IF(WEEKDAY=5，)

date:= varcat(varcat(varcat(varcat(varcat(var 2 str(year，0)，\' year \')、VAR2STR(MONTH，0))、VAR2STR(DAY，0))、\' DAY \')、week)；

价格:=VARCAT(VAR2STR(极，2)，\'元\')；

Date: =VARCAT(日期，价格)；

高点显示:=VARCAT(VARCAT(低点时间，低涨幅)，低点换手)；

低点显示:=VARCAT(VARCAT(高点时间，高落差)，高点换手)；

ST:=NAMELIKE(\'ST\')=1或NAMELIKE(\'ST\')=1或NAMELIKE(\'SST\')=1或NAMELIKE(\'S*ST\')=1或NAMELIKE(\' S ST \')= 1；

明涨停:if (ST = 1，ZT价格(C，0.05)，ZT价格(C，0.1))，有色，无平局；

明限:if (ST = 1，dt价(c，0.05)，dt价(c，0.1))，色绿，无平局；

DRAWBAND(C1，RGB(0，0，0)，C1，RGB(0，0，0))，COLORGREEN，DOTLINE

DRAWBAND(C2，RGB(0，0，0)，C2，RGB(0，0，0))，COLORRED，DOTLINE

DRAWTEXT(GD=1且statistics =1，H，高点显示)，DRAWABOVE，COLORRED

DRAWTEXT(DD=1且statistics =1，L，低点显示)，DRAWABOVE，COLORGREEN

DRAWTEXT(GD=1且statistics =1，H*0.93，日期价格)，DRAWABOVE

DRAWTEXT(DD=1且statistics =1，L，日期价格)；

以上就是由优质生活领域创作者 嘉文社百科网小编 整理编辑的，如果觉得有帮助欢迎收藏转发~