KV -龙虎 （源码）

以下是KV -龙虎 （源码）

Code复制内容到剪贴板JGMR:="TDB.TDB"/100; JGMC:="TDS.TDS"/100; JGDX:=(JGMR-JGMC); 特大买入:=JGMR; 特大卖出:=JGMC; 特大净买:=JGDX; DHMR:="DDB.DDB"/100; DHMC:="DDS.DDS"/100; DHDX:=(DHMR-DHMC); 大单买入:=DHMR+特大买入; 大单卖出:=DHMC+特大卖出; 大单净买:=大单买入-大单卖出; ZHMR:="ZDB.ZDB"/100; ZHMC:="ZDS.ZDS"/100; ZHDX:=(ZHMR-ZHMC); 中单买入:=ZHMR+大单买入; 中单卖出:=ZHMC+大单卖出; 中单净买:=中单买入-中单卖出; 小单买入:=1-中单买入; 小单卖出:=1-中单卖出; 小单净买:=小单买入-小单卖出; DRAWGBK((CLOSE > 0),STRIP(RGB(4,1,28),RGB(4,1,35),0)); a1:=(IF((DATE <= 1341231),1,0)) * (IF((CURRENTDATE <= 1341231),1,0)); a2:=1 - 中单买入; a3:=1 - 中单卖出; a4:=特大买入; a5:=特大卖出; a6:=大单买入; a7:=大单卖出; 资金进出比:((("order2" - "order1") / CAPITAL) * 2000) * a1,color3d; 散户:((((a2 - a3) * VOL) / CAPITAL) * 500) * a1,linethick0,CulorFF7400; a8:=中单买入 - a6; a9:=中单卖出 - a7; 中户:((((a9 - a8) * VOL) / CAPITAL) * 500) * a1,linethick0,CulorFF7400; 大户:((((a6 - a7) * VOL) / CAPITAL) * 500) * a1,linethick0,colorRed; a4:=特大买入; a5:=特大卖出; 机构:((((a4 - a5) * VOL) / CAPITAL) * 500) * a1,linethick0,colorYellow; STICKLINE((散户 <= 0),0,(0 - 散户),6,0),Culor3B3BFF; STICKLINE((散户 >= 0),0,(0 - 散户),6,0),CulorFFDD00; STICKLINE((大户 >= 0),0,大户,4,0),colorRed; STICKLINE((大户 < 0),0,大户,4,0),CulorFF6F00; STICKLINE((机构 <= 0),0,机构,2,0),CulorFF0000; STICKLINE((机构 >= 0),0,机构,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 (机构 > 0.7)),-1,'增'),colorRed; DRAWTEXT((((((SUM(大户,2)) > 3) AND (大户 > 1)) OR (大户 > 1.5)) OR (机构 > 0.7)),-1.5,'仓'),colorRed; a11:=(大户 > 0.03) OR (资金进出比 > 0); 连续增仓天数: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 (连续增仓天数 > 2); a35:=((HHV(HIGH,3)) - (LLV(LOW,3))) / (REF(CLOSE,3)); DRAWTEXT(((a33 AND ((连续增仓天数 > 3) OR (a10 > 3))) AND ((COUNT((CLOSE > (REF(CLOSE,1))),3)) >= 3)),1.5,'◆出击'); a36:=SUM(大户,3); a37:=(a35 < 0.07) AND ((连续增仓天数 > 2) AND (a36 > 2.2)); DRAWTEXT(a37,2,'◆阻击'); a38:=(CLOSE < (REF(CLOSE,1))) AND (((散户 < -2) OR (大户 > 1)) OR (机构 > 0.7)); DRAWTEXT(a38,2.5,'洗'),Culor00F0FF; DRAWTEXT(a38,2,'盘'),Culor00F0FF; DRAWTEXT(((a16 AND (大户 < -0.3)) AND (a22 > 85)),2,'↓卖'),Culor00F0FF; DRAWTEXT(((a24 < -12) AND ((大户 >= 0.7) OR ((机构 > 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),Culor009A00; STICKLINE(((大户 < -2) AND (a31 > 3)),(((0 AND (a14 >= 80)) AND (a23 > 17)) AND (a22 > 80)),大户,5,0),Culor00E000; 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 (机构 > 0.3)) AND (ANY((a22 > 85),3))) AND (a22 < 50)),-2.5,'↑买进'),colorMagenta; DRAWTEXT(((((a23 > 20) OR (a24 > 10)) AND ((大户 < -2) OR (机构 < -1))) AND (CROSS((MA(CLOSE,5)),CLOSE))),2,'减仓'),Culor01FF00; a32:=((((CLOSE / (REF(CLOSE,1))) - 1) * 100)); STICKLINE((((大户 > 1) AND (机构 > 0.2)) AND (a32 < -3)),0,大户,5,0),colorMagenta; DRAWTEXT((((a16 AND a19) AND (大户 < 0)) AND (a23 > 8)),-2.5,'↓出货'),Culor005400; DRAWTEXT(((a15 AND a21) AND ((大户 >= 0.7) OR (机构 > 0.4))),1.5,'增仓'),CulorFF0000; DRAWTEXT((((a35 <= 0.1) AND (LAST((大户 >= 0.25)) > 2)) AND (a23 < 17)),3.5,'☆拉升'),Culor3354FF; DRAWTEXT(((LAST(((大户 > (REF(大户,1))) AND (大户 > 0))) > 2) AND (a23 < 17)),3,'☆推升'),Culor00B5FF; DRAWTEXT(((CROSS(a22,20)) AND (连续增仓天数 >= 2)),4.3,'买'),CulorFF00DB; DRAWTEXT(((((a31 < -4) AND (大户 > 0)) AND (a24 < -13)) AND (a23 < -15)),2,'↑吃货'),CulorFF00DB; DRAWTEXT(((((a31 < -2) AND (大户 > 0)) AND (a24 < -18)) AND (a23 < -15)),1.5,'↑进场'),CulorFF00DB; DRAWTEXT((((((a15 OR a21) AND (连续增仓天数 >= 2)) AND (a23 < 12)) AND (LAST((a31 > -3)) > 5)) AND ((大户 + (REF(大户,1))) >= 0.7)),1,'Θ起涨'),CulorFF4398; DRAWTEXTREL(10,900,'㊣神牛快赢㊣'),linethick1,COLOR00EEff;