大智慧短线狙击　源码

以下是短线狙击　源码

C/C++ Code复制内容到剪贴板双线持币:HHV(MA(HIGH,(3)),2),LINETHICK2,color00ff00; 单线持股:LLV(MA(HIGH,(3)),1),LINETHICK2,color0000FF; DRAWTEXTREL(400,10,'双线持币.单线持股'),LINETHICK4,Culoryellow; A74:=MA(CLOSE,20); A75:=(CLOSE > MA(CLOSE,5)); A76:=(MA(CLOSE,5) > MA(CLOSE,10)); A77:=(CLOSE > MA(CLOSE,10)); A78:=(MA(CLOSE,5) > MA(CLOSE,20)); A79:=(CLOSE > MA(CLOSE,20)); A710:=REF(A74,1); A711:=(A74 > A710); AVX:=(((((IF(A75,10,(0 - 10)) + IF(A76,10,(0 - 10))) + IF(A77,10,(0 - 10))) + IF(A78,10,(0 - 10))) + IF(A79,10,(0 - 10))) + IF(A711,10,(0 - 10))); DSLX:=(CLOSE / INDEXC); DSLX1:=MA(DSLX,5); DSLX2:=MA(DSLX,10); V1:=MA(VOL,5); V2:=MA(VOL,10);T := BARSLAST(DISPSTATUS=1)+1; T := BARSLAST(DISPSTATUS=1)+1; HHg := HHV(H, T); ddg := LLV(L, T); {Hk := LL-HH; G12 := LL-HK*1.55; } IF BARSTATUS=2 and c<200 and ((CROSS(AVX,1) AND (V1 >= V2)) AND (DSLX >= DSLX1)) THEN DRAWTEXTABS(32,100,'该股的量能理想，有明显走强迹象，可以考虑中线进场参与，仓位在2/3左右。 '),color0000FF,LINETHICK3; IF BARSTATUS=2 and c<200 and ((CROSS(AVX,1) AND (V1 < V2)) AND (DSLX >= DSLX1)) THEN DRAWTEXTABS(32,100,'该股虽然走势趋强，但量能还显不足，可以考虑短线进场，仓位在1/2左右。 '),color0000FF,LINETHICK3; IF BARSTATUS=2 and c<200 and ((CROSS(AVX,1) AND (V1 > V2)) AND (DSLX < DSLX1)) THEN DRAWTEXTABS(20,100,'该股量价配合良好，但相对其它股票并没有明显走强，可以考虑短线进场，仓位1/2左右。 '),color0000FF,LINETHICK3; IF BARSTATUS=2 and c<200 and ((CROSS(AVX,1) AND (V1 <= V2)) AND (DSLX < DSLX1)) THEN DRAWTEXTABS(32,100,'该股形态尚可，但量能不足，股票也未完全走强，可以短线参与，仓位1/3左右。 '),color0000FF,LINETHICK3; IF BARSTATUS=2 and c<200 and ((CROSS(1,AVX) AND (V1 >= V2)) AND (DSLX >= DSLX1)) THEN DRAWTEXTABS(32,100,'该股形态变坏，但走势相对其它股票尚可，重仓者减持大半，清仓者可以观望。 '),color00FF00,LINETHICK3; IF BARSTATUS=2 and c<200 and ((CROSS(1,AVX) AND (V1 < V2)) AND (DSLX >= DSLX1)) THEN DRAWTEXTABS(32,100,'该股随大盘一起下跌，程明显缩量走势，考虑到大盘风险，减持或清仓。 '),color00FF00,LINETHICK3; IF BARSTATUS=2 and c<200 and ((CROSS(1,AVX) AND (V1 >= V2)) AND (DSLX < DSLX1)) THEN DRAWTEXTABS(32,100,'该股放量下跌，走势明显偏弱，离场观望。 '),color00FF00,LINETHICK3; IF BARSTATUS=2 and c<200 and ((CROSS(1,AVX) AND (V1 < V2)) AND (DSLX < DSLX1)) THEN DRAWTEXTABS(32,100,'该股缩量下跌，走势偏弱，离场观望。 '),color00FF00,LINETHICK3; IF BARSTATUS=2 and c<200 and ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 >= V2)) AND (DSLX >= DSLX1)) THEN DRAWTEXTABS(32,100,'该股形态良好，强势明显，量能充足，可以继续持有。 '),color00FFFF,LINETHICK3; IF BARSTATUS=2 and c<200 and ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 < V2)) AND (DSLX >= DSLX1)) THEN DRAWTEXTABS(32,100,'该股上行趋势不变，强势依然，但量能开始转弱，注意风险。 '),color00FFFF,LINETHICK3; IF BARSTATUS=2 and c<200 and ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 >= V2)) AND (DSLX < DSLX1)) THEN DRAWTEXTABS(32,100,'该股仍然具备上涨潜力，但股性偏弱，可考虑减仓。 '),color00FFFF,LINETHICK3; IF BARSTATUS=2 and c<200 and ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 < V2)) AND (DSLX < DSLX1)) THEN DRAWTEXTABS(32,100,'该股走势趋弱，量能不足，减持大部分筹码。 '),color00FFFF,LINETHICK3; IF BARSTATUS=2 and c<200 and ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 >= V2)) AND (DSLX >= DSLX1)) THEN DRAWTEXTABS(32,100,'该股形态不佳，注意成交量的变化，但目前不适合参与。 '),COLOR00FF00,LINETHICK3; IF BARSTATUS=2 and c<200 and ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 < V2)) AND (DSLX >= DSLX1)) THEN DRAWTEXTABS(32,100,'该股趋势不明，股价偏弱，注意量能变化，目前不宜参与。 '),COLOR00FF00,LINETHICK3; IF BARSTATUS=2 and c<200 and ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 >= V2)) AND (DSLX < DSLX1)) THEN DRAWTEXTABS(32,100,'该股有走强迹象，但量能不足，趋势不明，不适合操作。 '),COLOR00FF00,LINETHICK3; IF BARSTATUS=2 and c<200 and ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 < V2)) AND (DSLX < DSLX1)) THEN DRAWTEXTABS(32,100,'该股走势太弱，没有参与价值。 '),COLOR00FF00,LINETHICK3; IF BARSTATUS=2 and c>200 and (CROSS(AVX,1) AND (V1 >= V2)) THEN DRAWTEXTABS(32,100,'大盘量能理想，有明显走强迹象，可以考虑中线进场参与，仓位在2/3左右， '),color0000FF,LINETHICK3; IF BARSTATUS=2 and c>200 and (CROSS(AVX,1) AND (V1 >= V2)) THEN DRAWTEXTABS(32,100,'如前期经过一轮下跌，此时为最佳买点，但如果前期有过一段涨幅则介入需谨慎。 '),color0000FF,LINETHICK3; IF BARSTATUS=2 and c>200 and (CROSS(AVX,1) AND (V1 < V2)) THEN DRAWTEXTABS(32,100,'大盘虽然走势趋强，但量能还显不足，如果前期经过一轮下跌， '),color0000FF,LINETHICK3; IF BARSTATUS=2 and c>200 and (CROSS(AVX,1) AND (V1 < V2)) THEN DRAWTEXTABS(32,100,'可以考虑短线进场，仓位在1/2左右，一旦量能放大可以加仓买入。 '),color0000FF,LINETHICK3; IF BARSTATUS=2 and c>200 and (CROSS(1,AVX) AND (V1 >= V2)) THEN DRAWTEXTABS(32,100,'大盘形态走坏，重仓者可以减去大部分仓位。 '),color00FF00,LINETHICK3; IF BARSTATUS=2 and c>200 and (CROSS(1,AVX) AND (V1 < V2)) THEN DRAWTEXTABS(32,100,'大盘缩量调整，注意风险，短线清仓观望。 '),color00FF00,LINETHICK3; IF BARSTATUS=2 and c>200 and (((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 >= V2)) THEN DRAWTEXTABS(32,100,'大盘走势良好，量能理想，可以继续持有强势股。 '),color00FFFF,LINETHICK3; IF BARSTATUS=2 and c>200 and (((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 < V2)) THEN DRAWTEXTABS(32,100,'大盘形态良好，但量能稍显不足，随时准备减仓。 '),color00FFFF,LINETHICK3; IF BARSTATUS=2 and c>200 and (((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 >= V2)) THEN DRAWTEXTABS(32,100,'大盘趋势不明，注意成交量变化，目前不适宜进场。 '),COLOR00FF00,LINETHICK3; IF BARSTATUS=2 and c>200 and (((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 < V2)) THEN DRAWTEXTABS(32,100,'大盘趋势向下，量能萎缩，不适合进场。 '),COLOR00FF00,LINETHICK3; DRAWGBK((CLOSE > 0),STRIP(RGB(4,1,28),RGB(4,1,35),0)); PT := REF(HIGH,1)-REF(LOW,1); 重心:=(HIGH + LOW + CLOSE)/3; 压力Ⅰ:= 2*重心-LOW; 压力Ⅱ:= 重心 + PT; 支撑Ⅰ:= 2*重心-HIGH; 支撑Ⅱ:= 重心 - PT; DRAWTEXTABS(100,13,' 《逆势操作》'),CulorFFFFFF; DRAWTEXTABS(175,13,' 重心:'+重心),Culoryellow; DRAWTEXTABS(100,32,' 支 撑'),CulorFFFFFF; DRAWTEXTABS(100,49,' '+支撑Ⅰ),CulorFFFFFF; DRAWTEXTABS(100,67,' '+支撑Ⅱ),CulorFFFFFF; DRAWTEXTABS(100,32,' 压 力'),CulorFFFFFF; DRAWTEXTABS(100,49,' '+压力Ⅰ),CulorFFFFFF; DRAWTEXTABS(100,67,' '+压力Ⅱ),CulorFFFFFF; DRAWTEXTABS(100,10,'│'),Culor00FFFF; DRAWTEXTABS(100,22,'│'),Culor00FFFF; DRAWTEXTABS(100,34,'│'),Culor00FFFF; DRAWTEXTABS(100,46,'│'),Culor00FFFF; DRAWTEXTABS(100,58,'│'),Culor00FFFF; DRAWTEXTABS(100,70,'│'),Culor00FFFF; DRAWTEXTABS(243,10,'│'),Culor00FFFF; DRAWTEXTABS(243,22,'│'),Culor00FFFF; DRAWTEXTABS(243,34,'│'),Culor00FFFF; DRAWTEXTABS(243,46,'│'),Culor00FFFF; DRAWTEXTABS(243,58,'│'),Culor00FFFF; DRAWTEXTABS(243,70,'│'),Culor00FFFF; DRAWTEXTABS(171,30,'│'),Culor00FFFF; DRAWTEXTABS(171,34,'│'),Culor00FFFF; DRAWTEXTABS(171,46,'│'),Culor00FFFF; DRAWTEXTABS(171,58,'│'),Culor00FFFF; DRAWTEXTABS(171,70,'│'),Culor00FFFF; DRAWTEXTABS(105,5,'────────────'),Culor00FFFF; DRAWTEXTABS(105,25,'────────────'),Culor00FFFF; DRAWTEXTABS(105,42,'────────────'),Culor00FFFF; DRAWTEXTABS(105,59,'────────────'),Culor00FFFF; DRAWTEXTABS(105,76,'────────────'),Culor00FFFF; Var1:=ma((v/(h-l)),4); Var33:=abs(c-o);Var44:=v/(h-l); TIPTEXT(Var44<var1 AND Var33<ma(Var33,4),0,'资金无入场意愿，萎缩中'); TIPTEXT(Var44<var1 AND Var33>ma(Var33,4),0,'场内资金运作行为'); TIPTEXT(Var44>var1 AND Var33<ma(Var33,4),0,'多空双方激烈争夺中'); TIPTEXT(Var44>var1 AND Var33>ma(Var33,4),0,'场外资金介入（或出局）意愿强烈'); TR := SUM(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(LOW-REF(CLOSE,1))),14); HD := HIGH-REF(HIGH,1); LD := REF(LOW,1)-LOW; DMP:= SUM(IF(HD>0 AND HD>LD,HD,0),14); DMM:= SUM(IF(LD>0 AND LD>HD,LD,0),14); PDI:= DMP*100/TR; MDI:= DMM*100/TR; ADX:= MA(ABS(MDI-PDI)/(MDI+PDI)*100,6); ADXR:=(ADX+REF(ADX,6))/2; TIPTEXT(cross(pdi,mdi),0,'PDI线从下向上突破MDI线，显示有新多头进场，为买进信号'); TIPTEXT(cross(mdi,pdi),0,'PDI线从上向下跌破MDI线，显示有新空头进场，为卖出信号'); TIPTEXT(adx>ref(adx,1),0,'ADX值持续高于前一日，行情将维持原趋势'); TIPTEXT(adx<ref(adx,1) and adx<20,0,'ADX值递减，降到20以下，且横向行进时，市场气氛为盘整'); TIPTEXT(adx<ref(adx,1) and ref(adx,1)<ref(adx,2) and ref(adx,2)>ref(adx,3) and ref(adx,3)>ref(adx,4),0,'ADX值从上升倾向转为下降时，表明行情即将反转'); RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100; K:=SMA(RSV,3,1); D:=SMA(K,3,1); J:=3*K-2*D; TIPTEXT(1=1,0,''); TIPTEXT(cross(j,k) and k<50,0,'KDJ金叉'); TIPTEXT(cross(k,j) and k>50,0,'KDJ死叉'); TIPTEXT(j>84,0,'KDJ指标高位'); TIPTEXT(j<16,0,'KDJ指标低位'); TYP := (HIGH + LOW + CLOSE)/3; cci:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14)); TIPTEXT(cci<-100,0,'CCI指标底位，买入机会'); TIPTEXT(cci>100,0,'CCI指标高位，卖出机会'); wr:=-100*(HHV(HIGH,14)-CLOSE)/(HHV(HIGH,14)-LLV(LOW,14)); TIPTEXT(wr>-20,0,'W&R超买，即将见顶，应及时卖出'); TIPTEXT(wr<-80,0,'W&R超卖，即将见底，应伺机买进'); MTM := CLOSE-REF(CLOSE,6); MTMMA := MA(MTM,6); TIPTEXT(CROSS(MTM,MTMMA),0,'MTM从下向上突破MTMMA，买入信号'); TIPTEXT(CROSS(MTMMA,MTM),0,'MTM从上向下跌破MTMMA，卖出信号'); LC := REF(CLOSE,1); RSI1:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100; RSI2:=SMA(MAX(CLOSE-LC,0),12,1)/SMA(ABS(CLOSE-LC),12,1)*100; TIPTEXT(RSI1>85,0,'6日RSI向上突破85，超买,考虑卖出'); TIPTEXT(RSI1<15,0,'6日RSI向下跌破15，超卖，考虑买入'); TIPTEXT(CROSS(RSI1,RSI2),0,'6日RSI向上突破12日RSI，买进信号'); TIPTEXT(CROSS(RSI2,RSI1),0,'6日RSI向下跌破12日RSI，卖出信号'); VarA:=EMA((CLOSE-LLV(LOW,14))/(HHV(HIGH,14)-LLV(LOW,14))*4,3); VarB:=REF(LOW,1)*0.9; VarC:=LOW*0.9; VarD:=(VarC*VOL+VarB*(CAPITAL-VOL))/CAPITAL; VarE:=EMA(VarD,30); VarF:=CLOSE-REF(CLOSE,1); Var10:=MAX(VarF,0); Var11:=ABS(VarF); Var12:=SMA(Var10,5,1)/SMA(Var11,5,1)*100; Var13:=SMA(Var10,14,1)/SMA(Var11,14,1)*100; Var14:=SMA(MAX(VarF,0),4,1)/SMA(ABS(VarF),4,1)*100; Var15:=(HHV(HIGH,60)-CLOSE)/(HHV(HIGH,60)-LLV(LOW,60))*(-100); Var16:=(CLOSE-LLV(LOW,15))/(HHV(HIGH,15)-LLV(LOW,15))*100; Var17:=SMA((SMA(Var16,4,1)-50)*2,3,1); Var18:=(INDEXC-LLV(INDEXL,20))/(HHV(INDEXH,28)-LLV(INDEXL,20))*100; Var19:=SMA(Var18,4,1); Var1B:=(HHV(HIGH,30)-CLOSE)/CLOSE*100; 妖精:=Var14<=30 AND Var15<-30 AND Var1B>20 AND VarE-CLOSE>=-0.248 AND Var12<22 AND Var13<30; Var20:=(INDEXC-LLV(INDEXL,15))/(HHV(INDEXH,15)-LLV(INDEXL,15))*100; Var21:=SMA(Var20,4,1); Var1C:=SMA(Var21,3,1); 都不能少:=Var14<=20 AND Var15<-80 AND Var1B>20 AND Var17<-30 AND Var1C<30 AND VarE-CLOSE>=-1 AND Var12<20 AND Var13<26; TIPTEXT(妖精=1 ,0,'提示:吸货50%,中短期底部。'); TIPTEXT(妖精=1 ,0,'财富降临,有资金在逢低买入。'); TIPTEXT(都不能少=1 ,0,'中短期底部，一个都不能少。'); TIPTEXT(都不能少=1,0,'财富降临，资金在逢低建仓。');