【神獒系列之二神獒龍虎副圖指標(biāo) 圖文說明 (附公式源碼

鬼舞十七 2014-11-26

展開全文

神獒龍虎-----監(jiān)控主力進出源碼時間限制已經(jīng)解除

{㊣神獒龍虎}
DRAWGBK((CLOSE > 0),STRIP(RGB(4,1,28),RGB(4,1,35),0));
{a1:=1(IF((DATE <= 1091025),1,1)) * (IF((CURRENTDATE <= 1091025),1,1;}
a1:=1;
a2:=1 - (BIGORDER(1,1));
a3:=1 - (BIGORDER(2,1));
a4:=((BIGORDER(1,3)));
a5:=((BIGORDER(2,3)));
a6:=BIGORDER(1,2);
a7:=BIGORDER(2,2);
資金進出比:(((ORDER(2) - ORDER(1)) / CAPITAL) * 2000) * a1,color3d;
散戶:((((a2 - a3) * VOL) / CAPITAL) * 500) * a1,linethick0,ColorFF7400;
a8:=(BIGORDER(1,1)) - a6;
a9:=(BIGORDER(2,1)) - a7;
中戶:((((a9 - a8) * VOL) / CAPITAL) * 500) * a1,linethick0,ColorFF7400;
大戶:((((a6 - a7) * VOL) / CAPITAL) * 500) * a1,linethick0,colorRed;
a4:=((BIGORDER(1,3)));
a5:=((BIGORDER(2,3)));
機構(gòu):((((a4 - a5) * VOL) / CAPITAL) * 500) * a1,linethick0,colorYellow;
STICKLINE((散戶 <= 0),0,(0 - 散戶),6,0),Color3B3BFF;
STICKLINE((散戶 >= 0),0,(0 - 散戶),6,0),ColorFFDD00;
STICKLINE((大戶 >= 0),0,大戶,4,0),colorRed;
STICKLINE((大戶 < 0),0,大戶,4,0),ColorFF6F00;
STICKLINE((機構(gòu) <= 0),0,機構(gòu),2,0),ColorFF0000;
STICKLINE((機構(gòu) >= 0),0,機構(gòu),2,0),colorYellow;
a10:=EMA((((((SUM(a6,2)) - (SUM(a7,2))) * VOL) / CAPITAL) * 500),3);
DRAWTEXT((((((SUM(大戶,2)) > 3) AND (大戶 > 1)) OR (大戶 > 1.5)) OR (機構(gòu) > 0.7)),-1,'增'),colorRed;
DRAWTEXT((((((SUM(大戶,2)) > 3) AND (大戶 > 1)) OR (大戶 > 1.5)) OR (機構(gòu) > 0.7)),-1.5,'倉'),colorRed;
a11:=(大戶 > 0.03) OR (資金進出比 > 0);
連續(xù)增倉天數(shù):LAST((a11 > 0)) * a1,linethick0;
周倉量:((SUM(((a6 * VOL) - (a7 * VOL)),5)) / CAPITAL) * 100,linethick1,colorYellow;
月倉量:((SUM(((a6 * VOL) - (a7 * VOL)),20)) / CAPITAL) * 100,linethick2,colorMagenta;
a12:=((CLOSE - (LLV(LOW,9))) / ((HHV(HIGH,9)) - (LLV(LOW,9)))) * 100;
a13:=SMA(a12,3,1);
a14:=SMA(a13,3,1);
a15:=CROSS(a13,a14);
a16:=CROSS(a14,a13);
a17:=CLOSE - (REF(CLOSE,1));
a18:=(100 * (EMA((EMA(a17,9)),9))) / (EMA((EMA(ABS(a17),9)),9));
a19:=MA(a18,5);
a20:=CROSS(a19,a18);
a21:=CROSS(a18,a19);
a22:=((SMA((MAX(a17,0)),5,1)) / (SMA(ABS(a17),5,1))) * 100;
a23:=((CLOSE - (MA(CLOSE,25))) / (MA(CLOSE,25))) * 100;
a24:=((CLOSE - CYC(13)) / CYC(13)) * 100;
a25:=((REF(HIGH,1)) + (REF(LOW,1))) / 2;
a26:=(MA(CLOSE,20)) + (2 * (STD(CLOSE,20)));
a27:=IF((CLOSE < 800),((AMOUNT / VOL) / 100),((((CLOSE * 2) + HIGH) + LOW) / 4));
a28:=((EMA((MA(a27,3)),3)) + (WMA(a27,5))) / 2;
a29:=REF(a28,1);
a30:=BARSCOUNT(CLOSE);
a31:=IF((a30 = 1),0,(((a28 - a29) / a29) * 100));
DRAWTEXT((((((a22 >= 90) AND (a23 >= 13)) AND (大戶 <= -0.7)) AND (a13 > 80)) AND (CLOSE < OPEN)),2.5,'▼2/3倉出');
DRAWTEXT((((((REF(大戶,1)) >= (HHV(大戶,10))) AND (大戶 >= (LLV(大戶,10)))) AND ((REF(大戶,1)) > 2.5)) AND (大戶 < -2.5)),1.5,'◤反下'),colorGreen;
DRAWTEXT((((((a31 >= 4) AND (a23 >= 25)) AND (大戶 <= -0.3)) AND (a13 >= 80)) AND (CLOSE < OPEN)),2,'▼1/3倉出');
DRAWTEXT(((((a31 >= 4.5) AND (a23 >= 16)) AND (大戶 <= -0.7)) AND (a22 >= 80)),1.5,'▼1/3倉出');
DRAWTEXT((((((a31 >= 4) AND (a23 >= 28)) AND (大戶 <= 0)) AND (a22 >= 90)) AND (a13 >= 90)),1.5,'▼1/3倉出');
DRAWTEXT((((a31 >= 6) AND (大戶 <= 0)) AND (CLOSE < OPEN)),1.5,'▼出局');
a32:=(((HIGH - LOW) / (REF(CLOSE,1))));
a33:=(COUNT(((a32 < 0.05) AND (a32 > 0)),3)) = 3;
a34:=a33 AND (連續(xù)增倉天數(shù) > 2);
a35:=((HHV(HIGH,3)) - (LLV(LOW,3))) / (REF(CLOSE,3));
DRAWTEXT(((a33 AND ((連續(xù)增倉天數(shù) > 3) OR (a10 > 3))) AND ((COUNT((CLOSE > (REF(CLOSE,1))),3)) >= 3)),1.5,'◆出擊');
a36:=SUM(大戶,3);
a37:=(a35 < 0.07) AND ((連續(xù)增倉天數(shù) > 2) AND (a36 > 2.2));
DRAWTEXT(a37,2,'◆阻擊');
a38:=(CLOSE < (REF(CLOSE,1))) AND (((散戶 < -2) OR (大戶 > 1)) OR (機構(gòu) > 0.7));
DRAWTEXT(a38,2.5,'洗'),Color00F0FF;
DRAWTEXT(a38,2,'盤'),Color00F0FF;
DRAWTEXT(((a16 AND (大戶 < -0.3)) AND (a22 > 85)),2,'↓賣'),Color00F0FF;
DRAWTEXT(((a24 < -12) AND ((大戶 >= 0.7) OR ((機構(gòu) > 0.6) AND (大戶 >= 0.1)))),3.5,'↑進'),colorMagenta;
STICKLINE(((((大戶 < -5) AND ((CLOSE > OPEN) OR (CLOSE < OPEN))) AND (a13 >= 80)) AND (a23 > 10)),0,大戶,5,0),Color009A00;
STICKLINE(((大戶 < -2) AND (a31 > 3)),(((0 AND (a14 >= 80)) AND (a23 > 17)) AND (a22 > 80)),大戶,5,0),Color00E000;
STICKLINE(((((大戶 < -1.5) AND (a31 > 3.5)) AND (a23 > 10)) AND (a22 > 70)),0,大戶,5,0),colorGreen;
STICKLINE((((大戶 < 1) AND (a31 < -3.5)) AND (a22 < 20)),0,大戶,5,0),colorMagenta;
DRAWTEXT(((((大戶 > 1) AND (機構(gòu) > 0.3)) AND (ANY((a22 > 85),3))) AND (a22 < 50)),-2.5,'↑買進'),colorMagenta;
DRAWTEXT(((((a23 > 20) OR (a24 > 10)) AND ((大戶 < -2) OR (機構(gòu) < -1))) AND (CROSS((MA(CLOSE,5)),CLOSE))),2,'減倉'),Color01FF00;
a32:=((((CLOSE / (REF(CLOSE,1))) - 1) * 100));
STICKLINE((((大戶 > 1) AND (機構(gòu) > 0.2)) AND (a32 < -3)),0,大戶,5,0),colorMagenta;
DRAWTEXT((((a16 AND a19) AND (大戶 < 0)) AND (a23 > 8)),-2.5,'↓出貨'),Color005400;
DRAWTEXT(((a15 AND a21) AND ((大戶 >= 0.7) OR (機構(gòu) > 0.4))),1.5,'增倉'),ColorFF0000;
DRAWTEXT((((a35 <= 0.1) AND (LAST((大戶 >= 0.25)) > 2)) AND (a23 < 17)),3.5,'☆拉升'),Color3354FF;
DRAWTEXT(((LAST(((大戶 > (REF(大戶,1))) AND (大戶 > 0))) > 2) AND (a23 < 17)),3,'☆推升'),Color00B5FF;
DRAWTEXT(((CROSS(a22,20)) AND (連續(xù)增倉天數(shù) >= 2)),4.3,'買'),ColorFF00DB;
DRAWTEXT(((((a31 < -4) AND (大戶 > 0)) AND (a24 < -13)) AND (a23 < -15)),2,'↑吃貨'),ColorFF00DB;
DRAWTEXT(((((a31 < -2) AND (大戶 > 0)) AND (a24 < -18)) AND (a23 < -15)),1.5,'↑進場'),ColorFF00DB;
DRAWTEXT((((((a15 OR a21) AND (連續(xù)增倉天數(shù) >= 2)) AND (a23 < 12)) AND (LAST((a31 > -3)) > 5)) AND ((大戶 + (REF(大戶,1))) >= 0.7)),1,'Θ起漲'),ColorFF4398;
{DRAWTEXTREL(10,900,'㊣十二星座*神獒贏富㊣'),linethick1,COLOR00EEff;};