通達信強烈買入賣出主圖指標公式分享，這么多參數也太全太強了！

通達信強烈買入賣出主圖指標公式分享：
現手買:=BUYVOL*DYNAINFO(7)*100/10000 COLOR0000FF,NODRAW;
現手賣:=SELLVOL*DYNAINFO(7)*100/10000 COLOR00FF00,NODRAW;
合:=ABS(現手買)+ABS(現手賣)COLOR80FFFF,NODRAW;
差:=ABS(現手買)-ABS(現手賣)COLOR80FFFF,NODRAW;
MPB1:=ABS(現手買)/合*100;
MPB2:=ABS(現手賣)/合*100;
TESTSKIP(NOT(現手買 OR 現手賣 OR 合 OR 差 OR MPB1 OR MPB2)!=0);
DRAWRECTREL(100,1000,400,940,RGB(190,190,190));
DRAWRECTREL(100,995,400,945,RGB(200,200,200));
DRAWRECTREL(100,990,400,950,RGB(210,210,210));
DRAWRECTREL(100,985,400,955,RGB(220,220,220));
DRAWRECTREL(100,980,400,960,RGB(230,230,230));
DRAWRECTREL(100,975,400,965,RGB(240,240,240));
DRAWRECTREL(100,970,400,970,RGB(250,250,250));
DRAWRECTREL(250-現手賣*200/合,1000,250,940,RGB(0,128,0));
DRAWRECTREL(250-現手賣*200/合,995,250,945,RGB(0,148,0));
DRAWRECTREL(250-現手賣*200/合,990,250,950,RGB(0,168,0));
DRAWRECTREL(250-現手賣*200/合,985,250,955,RGB(0,188,0));
DRAWRECTREL(250-現手賣*200/合,980,250,960,RGB(0,208,0));
DRAWRECTREL(250-現手賣*200/合,975,250,965,RGB(0,228,0));
DRAWRECTREL(250-現手賣*200/合,970,250,970,RGB(0,248,0));
DRAWRECTREL(250,1000,250+現手買*200/合,940,RGB(128,0,0));
DRAWRECTREL(250,995,250+現手買*200/合,945,RGB(148,0,0));
DRAWRECTREL(250,990,250+現手買*200/合,950,RGB(168,0,0));
DRAWRECTREL(250,985,250+現手買*200/合,955,RGB(188,0,0));
DRAWRECTREL(250,980,250+現手買*200/合,960,RGB(208,0,0));
DRAWRECTREL(250,975,250+現手買*200/合,965,RGB(228,0,0));
DRAWRECTREL(99.8,1000.2,99.8,939.8,RGB(250,250,0));{左}
DRAWRECTREL(400.2,939.8,400.2,1000.2,RGB(250,250,0));{右}
DRAWRECTREL(99.8,939.8,400.2,939.8,RGB(250,250,0));{上}
DRAWRECTREL(250,1000,250,940,RGB(250,250,0));{中}
DRAWTEXT_FIX(1,0.38,0.9,0,STRCAT(STRCAT('',CON2STR(現手買,1)),'萬')),COLORFF00FF;
DRAWTEXT_FIX(1,0.08,0.9,0,STRCAT(STRCAT('',CON2STR(現手賣,1)),'萬')),COLORFFFF00;
DRAWTEXT_FIX(CURRBARSCOUNT=1 AND(差)>0,0.21,0.9,0,STRCAT(' ',STRCAT(CON2STR(差,1),'萬'))) COLORFF00FF;
DRAWTEXT_FIX(CURRBARSCOUNT=1 AND(差)<0,0.21,0.9,0,STRCAT(' ',STRCAT(CON2STR(差,1),'萬'))) COLOR00FFFF;
DRAWTEXT_FIX(CURRBARSCOUNT=1 AND(差)=0,0.21,0.9,0,STRCAT(' ',STRCAT(CON2STR(差,1),'萬'))) COLORFFFF00;
DRAWTEXT_FIX(1,0.048,0.95,0,STRCAT(STRCAT(' ',CON2STR(MPB2,1)),'%%')),COLORFFFF00;
DRAWTEXT_FIX(1,0.408,0.95,0,STRCAT(STRCAT('',CON2STR(MPB1,1)),'%%')),COLORFF00FF;
代碼1:=CODELIKE('000625');{分別在年、月、日及買入價位、買入股數等處填入實際數據}
買入時間1:=YEAR{年}=2013 AND MONTH{月}=5 AND DAY{日}=22;
買入價位1:=10.65;
買入股數1:=100;
天數1:=BARSLAST(買入時間1);
{第二只個股，填入代碼、買入時間、價位及股數}
代碼2:=CODELIKE('0');{在[0]位置處填寫個股代碼}
買入時間2:=YEAR{年}=2013 AND MONTH {月}=0 AND DAY{日}=0;
買入價位2:=0;
買入股數2:=0;
天數2:=BARSLAST(買入時間2);
{第三只個股，填入代碼、買入時間、價位及股數}
代碼3:=CODELIKE('0');
買入時間3:=YEAR{年}=0 AND MONTH{月}=0 AND DAY{日}=0;
買入價位3:=0;
買入股數3:=0;
天數3:=BARSLAST(買入時間3);
{1}
買入個股時間1:=IF(代碼1,買入時間1,0);
買入價格1:=IF(買入個股時間1,買入價位1,0);
買入價1:=REF(買入價位1,BARSLAST(買入個股時間1));
現價1:=IF(BARSLAST(買入個股時間1)+1>=1,CONST(C),0);
最高價條件1:=IF(BARSLAST(買入個股時間1)+1>=1,H=HHV(H,BARSLAST(買入個股時間1)+1),0);
最高價橫線1:=IF(BARSLAST(最高價條件1)>=0 AND BARSLAST(買入個股時間1)+1>=1,CONST(REF(H,BARSLAST(最高價條件1))),0);
最低價條件1:=IF(BARSLAST(買入個股時間1)+1>=1,L=LLV(L,BARSLAST(買入個股時間1)+1),0);
最低價橫線1:=IF(BARSLAST(最低價條件1)+1>=1 AND BARSLAST(買入個股時間1)+1>=1,
CONST(REF(L,BARSLAST(最低價條件1))),0);
{2}
買入個股時間2:=IF(代碼2,買入時間2,0);
買入價格2:=IF(買入個股時間2,買入價位2,0);
買入價2:=REF(買入價位2,BARSLAST(買入個股時間2));
現價2:=IF(BARSLAST(買入個股時間2)+1>=1,CONST(C),0);
最高價條件2:=IF(BARSLAST(買入個股時間2)+1>=1,H=HHV(H,BARSLAST(買入個股時間2)+1),0);
最高價橫線2:=IF(BARSLAST(最高價條件2)+1>=1 AND BARSLAST(買入個股時間2)+1>=1,
CONST(REF(H,BARSLAST(最高價條件2))),0);
最低價條件2:=IF(BARSLAST(買入個股時間2)+1>=1,L=LLV(L,BARSLAST(買入個股時間2)+1),0);
最低價橫線2:=IF(BARSLAST(最低價條件2)+1>=1 AND BARSLAST(買入個股時間2)+1>=1,
CONST(REF(L,BARSLAST(最低價條件2))),0);
{3}
買入個股時間3:=IF(代碼3,買入時間3,0);
買入價格3:=IF(買入個股時間3,買入價位3,0);
買入價3:=REF(買入價位3,BARSLAST(買入個股時間3));
現價3:=IF(BARSLAST(買入個股時間3)+1>=1,CONST(C),0);
最高價條件3:=IF(BARSLAST(買入個股時間3)+1>=1,H=HHV(H,BARSLAST(買入個股時間3)+1),0);
最高價橫線3:=IF(BARSLAST(最高價條件3)+1>=1 AND BARSLAST(買入個股時間3)>=0,
CONST(REF(H,BARSLAST(最高價條件3))),0);
最低價條件3:=IF(BARSLAST(買入個股時間3)+1>=1,L=LLV(L,BARSLAST(買入個股時間3)+1),0);
最低價橫線3:=IF(BARSLAST(最低價條件3)+1>=1 AND BARSLAST(買入個股時間3)+1>=1,
CONST(REF(L,BARSLAST(最低價條件3))),0);
持股數量【股】:IF(代碼1,買入股數1,IF(代碼2,買入股數2,IF(代碼3,買入股數3,DRAWNULL))),NODRAW;
持股天數:IF(代碼1,天數1,IF(代碼2,天數2,IF(代碼3,天數3,DRAWNULL))),NODRAW;
最高價:=IF(代碼1,最高價橫線1,IF(代碼2,最高價橫線2,IF(代碼3,最高價橫線3,DRAWNULL))),COLOR00FFFF,LINETHICK2;
最低價:=IF(代碼1,最低價橫線1,IF(代碼2,最低價橫線2,IF(代碼3,最低價橫線3,DRAWNULL))),COLORFF0000,LINETHICK2;
買入價:IF(代碼1,買入價1,IF(代碼2,買入價2,IF(代碼3,買入價3,DRAWNULL))),COLORFF00FF,LINETHICK4;
現價:IF(代碼1,現價1,IF(代碼2,現價2,IF(代碼3,現價3,DRAWNULL))),COLORFFFF00,LINETHICK2;
買入時間:=IF(代碼1,買入時間1,IF(代碼2,買入時間2,IF(代碼3,買入時間3,DRAWNULL)));
股數:=IF(代碼1,買入股數1,IF(代碼2,買入股數2,IF(代碼3,買入股數3,DRAWNULL)));
DRAWBAND(現價,RGB(150,0,0),買入價,RGB(0,180,180));
DRAWBAND(買入價,RGB(0,180,180),買入價,RGB(0,180,180));
DRAWBAND(現價,RGB(180,0,180),現價,RGB(180,0,180));
DRAWKLINE(H,O,L,C);
OZ:=DYNAINFO(3)*0.85,COLOR0000FF;
RSVV:=(CLOSE-LLV(LOW,10))/(HHV(HIGH,10)-LLV(LOW,10))*100;
VARB2:=(RSVV/2+22)*1;
VAR1T:=EMA(VOL,13);
VAR2T:=EMA(AMOUNT,13);
VAR3T:=((VAR2T /VAR1T) / 100);
VAR4T:=(((CLOSE -VAR3T) / VAR3T) * 100);
VAR5T:=((VAR4T < (0)) AND ZXNH),COLORRED;
VAR6T:=VAR5T AND RSVV<VARB2-2;
DRAWICON(VAR6T>0,L*0.995,34);
DRAWTEXT(VAR6T>0,L*0.99,'買'),COLOR00FFFF;
K:=(C+H+L)/3;
D:=EMA(K,4);
VAR1X:=REF(EMA(K,4),1)COLORMAGENTA,LINETHICK2;
VARXX:=(EMA(K,4)-VAR1X)/VAR1X*100,NODRAW;
VAR2X:IF(VARXX>=0,REF(EMA(K,4),BARSLAST(CROSS(VARXX,0))+1),DRAWNULL)COLORFF00FF,LINETHICK2;
VAR3X:IF(VARXX<0,REF(EMA(K,4),BARSLAST(CROSS(0,VARXX))+1),DRAWNULL)COLOR00FF00,LINETHICK2;
STICKLINE(VARXX>=0,VAR2X,VAR1X,0,0)COLORFF00FF;
STICKLINE(VARXX<0,VAR3X,VAR1X,0,0)COLOR00FF00;
STICKLINE(CROSS(VARXX,0),C,O,2,0)COLORYELLOW;
STICKLINE(CROSS(0,VARXX),C,O,2,0)COLORGREEN;
操盤線:VAR1X,COLORFF00FF,LINETHICK4;
IF(VARXX<0,VAR1X,DRAWNULL)COLOR00FF00,LINETHICK4;
D1:=YEAR AND MONTH AND DAY;
AA1:=STRCAT(CON2STR(YEAR,0),'年');
AA2:=STRCAT(CON2STR(MONTH,0),'月');
AA3:=STRCAT(CON2STR(DAY,0),'日');
AA4:=STRCAT('【',IF(WEEKDAY=1,'一',IF(WEEKDAY=2,'二',IF(WEEKDAY=3,'三','日'))));
AA5:=STRCAT(STRCAT(STRCAT(AA1,AA2),STRCAT(AA3,AA4)),'】');
DRAWTEXT_FIX(D1,0.78,0,0,AA5),COLORFFFF00;
現贏利:=(現價-買入價)/買入價*100;
金額:=買入價*現贏利*股數/100;
WW3:=STRCAT(STRCAT(STRCAT(STRCAT(STRCAT('【','現贏利'),'】'),':'),CON2STR(現贏利,2)),'');
WW4:=STRCAT(STRCAT(STRCAT(STRCAT(STRCAT('【','現虧損'),'】'),':'),CON2STR(現贏利,2)),'');
WW5:=STRCAT(STRCAT(STRCAT(STRCAT(STRCAT('【','利潤'),'】'),':'),CON2STR(金額,0)),'元');
WW6:=STRCAT(STRCAT(STRCAT(STRCAT(STRCAT('【','虧損'),'】'),':'),CON2STR(金額,0)),'元');
DRAWTEXT_FIX(HHV(H,80)=最高價 AND 現價>=買入價,0.64,1,0,WW3),COLORRED;
DRAWTEXT_FIX(ISLASTBAR AND (HHV(H,80)>最高價 OR HHV(H,80)<最高價) AND 最高價>0 AND
現價>=買入價,0.67,1,0,WW3),COLORRED;
DRAWTEXT_FIX(HHV(H,80)=最高價 AND 現價<買入價,0.64,1,0,WW4),COLORGREEN;
DRAWTEXT_FIX(ISLASTBAR AND (HHV(H,80)>最高價 OR HHV(H,80)<最高價) AND 最高價>0 AND
現價<買入價,0.67,1,0,WW4),COLORGREEN;
DRAWTEXT_FIX(HHV(H,80)=最高價 AND 現價>=買入價,0.8,1,0,WW5),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR AND (HHV(H,80)>最高價 OR HHV(H,80)<最高價) AND 最高價>0 AND
現價>=買入價,0.83,1,0,WW5),COLORYELLOW;
DRAWTEXT_FIX(HHV(H,80)=最高價 AND 現價<買入價,0.8,1,0,WW6),COLORWHITE;
DRAWTEXT_FIX(ISLASTBAR AND (HHV(H,80)>最高價 OR HHV(H,80)<最高價) AND 最高價>0 AND
現價<買入價,0.83,1,0,WW6),COLORWHITE;
DRAWNUMBER(ISLASTBAR,C,C),COLOR00FFFF;