大智慧经典指标源码(二).doc

.大智慧经典指标源码（二）21、涨停跳空N:=3;filter(COUNT(ref(c,n)/REF(C,(n+1)=1.099),n)=1,n);上跳空:LREF(H,1),stick,color0000ff,linethick2;下跳空:H1.01 AND C/REF(C,1)1.098,stick,COLORFF00FF,linethick2;22、月线指标N:=9;M1:=3;M2:=3;t:=ma(c,12);a2:=ct;b:=tREF(t,1) AND REF(t,1)REF(MA(C,12),1)*3, CIRCLEDOT,COLORYELLOW;趋势24月向上:(MA(C,24)REF(MA(C,24),1)*2, CIRCLEDOT,color0000ff; V1:=VOL/SUM(VOL,13);V2:=DMA(C,V1);RSI6:=SMA(MAX(C-REF(C,1),0),6,1)/SMA(ABS(C-REF(C,1),6,1)*100;定海神针:IF(CROSS(20,RSI6),5,0),stick,COLORFFFFFF,linethick4;金叉KDJ:IF(cross(kdj.k(9,3,3),kdj.d(9,3,3) and kdj.k(9,3,3)20,3,0),COLOR00FF00;DRAWTEXT(cross(kdj.k(9,3,3),kdj.d(9,3,3) and kdj.k(9,3,3)20,3,),COLORyellow;DRAWTEXT(cross(kdj.k(9,3,3),kdj.d(9,3,3) and kdj.k(9,3,3)20,3,叉),COLORyellow;金10叉20: cross (ma(c,10),ma(c,20)*5,STICK,COLORFFFF00,LINETHICK4;23、熊市末端close=5AND LLV(LOW,250)LLV(LOW,1);k1:=ref(close,2)/ref(open,2)0.95 and ref(c,2)ref(c,3);k2:=ref(open,1)ref(close,2) and ref(close,1)(ref(close,2)+ref(open,2)/2;k3:=closeref(close,1);k4:=llv(low,13)=ref(low,1);曙光初现:backset(k1 and k2 and k3 and k4,3);Var1:=CLOSE/EMA(CLOSE,51)*10076;Var2:=CLOSE/EMA(CLOSE,60)*100LOW*1.092;Var4:=Var3 AND COUNT(Var3,5)1;超跌起爆:if(Var4 AND (Var1 OR Var2),1,0) ,STICK,COLORRED,LINETHICK6; 牛大底:1A0001$CLOSE/REF(1A0001$CLOSE,23)0.78AND C/REF(C,30)0.858 and ref(c,1)/l1.5and ref(c,1)ref(o,1) and ref(c,2)ref(o,2) and ref(c,3)ref(o,3),stick,color00ff00,linethick2;24、抄底王var2:=MA(CLOSE, 5);var3:=MA(CLOSE, 10);var4:=MA(CLOSE, 20);var5:=MA(CLOSE, 30);var6:=(var2+var3+var4+var5)/4;var7:=(var6-REF(var6,15)/REF(var6,15)*100;var9:=EMA(var7,8);反转:STICKLINE(var91*REF(var9, 1), var7, 0, 5, 0), COLOREE00EE;持股:STICKLINE(var71*REF(var7, 1), var7, var9, 5, 0), COLORRED;持币:STICKLINE(var71*REF(var7, 1), var7, var9, 5, 1), COLORGREEN;洗盘:STICKLINE(var71*REF(var9, 1), var7, var9, 10, 0), COLOR00EEFF;var10:=(CLOSE-MA(CLOSE, 58)/MA(CLOSE, 58)*100;var11:=(var101*REF(var10, 1) AND var10(-40)*1.5;var12:=VOL/CAPITAL*100;var13:=LLVBARS(LOW, 50);var14:=SUM(VOL, var13);var15:=HHVBARS(HIGH, 50);var16:=SUM(VOL, var15);var17:=(CLOSE-REF(OPEN, var15)/REF(OPEN, var15)*100;var18:=var16/CAPITAL*100;var19:=(CLOSE-REF(OPEN, var13)/REF(OPEN, var13)*100;var20:=var14/CAPITAL*100;var21:=MA(CLOSE, 3);var22:=REF(CLOSE, 2)*0.865;var23:=REF(CLOSE, 13)*0.772;var24:=MIN(var22, var23);var25:=MA(CLOSE, 13);抄底王:IF(CLOSE-var24)/CLOSE0.030 AND var17(-35) AND SUM(var12, 5)/51.800, 1, 0)*10, COLORWHITE;DRAWTEXT(抄底王, 抄底王, 成功率 90.22 %，共发出指示1289次底追 ), COLORFFAA00;var26:=(CLOSE-REF(CLOSE, 1)/REF(CLOSE, 1)*100;var27:=(EMA(CLOSE, 12)-EMA(CLOSE, 26)*100;var28:=EMA(var27, 9);var29:=2*(var27-var28);DRAWTEXT(var277 AND var27=var28, 5, 追),COLORWHITE;STICKLINE(var277, 0,(-10), 5, 0), COLORFFFF66; 25、明白入市var3:=(CLOSE-LLV(LOW,26)/(HHV(HIGH,26)-LLV(LOW,26)*100; var4:=SMA(SMA(var3,3,1),3,1); var5:=EMA(var4,5); var6:=var5; var7:=3*var4-2*var5; var8:=(CLOSE-LLV(LOW,9)/(HHV(HIGH,9)-LLV(LOW,9)*100; K: SMA(var8,3,1), COLORWHITE; D: SMA(K,3,1),COLORYELLOW; var9:=3*K-2*D; varA:=LLV(LOW,36); varB:=HHV(HIGH,30); varC:=EMA(CLOSE-varA)/(varB-varA)*4,4)*25; 趋势: varC;底背: STICKLINE(varC90,100,92,5,0),COLORRED; varD:=87.5; varE:=(varC-LLV(varC,4)/(HHV(varC,4)-LLV(varC,4)*4*25; 反弹: DRAWTEXT(IF(CROSS(var9,8),87,0),48,反弹),COLORGREEN; 买: DRAWTEXT(IF(CROSS(varE,87.5) AND 趋势87,87,0),70,卖),COLORRED; 短买: IF(CROSS(趋势,10) AND 趋势10,50,0);varF:=SMA(var3,20,1); var10:=SMA(varF,15,1); var11:=(3*varF+2*var10)/4; var12:=REF(var11,1); var13:=SMA(MAX(var11-var12,0),2,1)/SMA(ABS(var11-var12),2,1)*100; var14:=MA(var13,10); var15:=IF(CROSS(var14,90),25,0); DRAWTEXT(CROSS(var14,90),27,强势整理),COLORWHITE; var16:=(CLOSE+LOW+HIGH)/3; var17:=SUM(var16-REF(LOW,1)-(HIGH-var16)*VOL/100000/(HIGH-LOW),0); var18:=EMA(var17,1); var19:=MA(var18,12); var1A:=MA(var18,26); var1B:=(var18-var19)*10; var1C:=CAPITAL/EMA(VOL,5)/30*1.1; var1D:=IF(CROSS(var1B,var1C),1,0); var1E:=FILTER(var1D,7); var1F:=DRAWICON(var1E=1,100,1); var20:=EMA(CLOSE,12)-EMA(CLOSE,26); 强势: DRAWTEXT(IF(CROSS(var20,0) AND var200,87,0),80,强势);弱势: DRAWTEXT(IF(CROSS(0,var20) AND var20var4,var3,var4,15,0), COLORYELLOW;STICKLINE(var3 var4,var3,var4,20,0), COLORBLUE;var5:=(REF(HIGH,1)+REF(LOW,1)/2;var6:=MA(CLOSE,N)+2*STD(CLOSE,N);var7:=REF(CLOSE,1);var8:=SMA(MAX(CLOSE-var7,0),N1,1)/SMA(ABS(CLOSE-var7),N1,1)*100;var9:=CROSS(N2,var8);varA:=FILTER(var9,4);varB:=(2*CLOSE+HIGH+LOW)/4;varC:=LLV(LOW,34);varD:=HHV(HIGH,34);varE:=EMA(varB-var1)/(var5-var1)*100,7);varF:=EMA(0.667*REF(varE,1)+0.333*varE,5);DRAWTEXT(IF(COUNT(CLOSE0.6 AND COUNT(varEvarF,6) AND REF(LOW,5)=LLV(LOW,120) AND REF(CLOSE=OPEN,4) AND REF(CLOSEOPEN,3) AND REF(CLOSEOPEN,2) AND REF(OPENCLOSE,1) AND OPENREF(CLOSE,1),1,0),LOW,买进), COLORYELLOW;var10:=MA(CLOSE,80)-MA(CLOSE,10)/3;DRAWTEXT(IF(CLOSEMA(VOL,5)/240 AND CLOSEREF(CLOSE,1)*1.08 AND CLOSE MA(CLOSE,13)*1.3,1,0),LOW,抄底), COLORRED;27、抄底先锋m:1,50,1; n:1,60,18 var2:=MA(CLOSE,N); var3:=(CLOSE-var2)/var2*100; var4:=MA(var3,M); 升跌: var4; var5:=BARSLAST(CROSS(-10,var4)=1); var6:=BARSLAST(CROSS(var4,10)=1); var7:=var4=5; var8:=var410 AND var6=5; C1: IF(var4=5,var4,0),COLORWHITE; C2: C1, COLORSTICK; C3: IF(var410 AND var6=5,var4,0),COLORWHITE; C4: C3, COLORSTICK; D: 升跌REF(升跌,1) AND var7*25,COLORRED;28、波段之王var1:=(c-llv(l,13)/(hhv(h,13)-llv(l,13)*100;牛:sma(var1,7,1);var2:=sma(牛,5,1);熊:if(cross(牛,var2) and cross(ma(c,5),ma(c,13) and 牛50),var2*2,var2);var3:=ema(c,8);var4:=ema(c,20);stickline(牛var2,牛,熊,0,0);stickline(牛var2,牛,var2,0,0);短线进出:3*sma(c-llv(l,13)/(hhv(h,13)-llv(l,13)*100,5,1)-2*sma(sma(c-llv(l,13)/(hhv(h,13)-llv(l,13)*100,5,1),3,1);var5:=10;低吸区:if(短线进出=77,77,89);vara:=if(cross(目前位置,20) or cross(目前位置,生命线) and 目前位置20,20,5);卖出区:var9;varb:=llv(l,55);varc:=hhv(h,34);vard:=ema(var6-varb)/(varc-varb)*100,3);vare:=(目前位置+vard)/2;varf:=ema(0.667*ref(vard,1)+0.333*目前位置,2);var10:=ema(vare,5);var11:=ema(0.667*ref(var10,1)+0.333*var10,2);强弱:50,pointdot;100,pointdot;20;29、多空操盘趋势线: 3*SMA(CLOSE-LLV(LOW,27)/(HHV(HIGH,27)-LLV(LOW,27)*100,5,1)-2*SMA(SMA(CLOSE-LLV(LOW,27)/(HHV(HIGH,27)-LLV(LOW,27)*100,5,1),3,1),colorf0f000;买点准备: IF(趋势线a12 and a12a13 and cross(a13,a14) and isup,18,0),stick,linethick2,color00bbff;drawtext(a11a12 and a12a13 and cross(a13,a14) and isup,35,均线多头排列),color00ffff;Var1:=HHV(HIGH,9)-LLV(LOW,9);Var2:=HHV(HIGH,9)-CLOSE;Var3:=CLOSE-LLV(LOW,9);Var4:=Var2/Var1*100-70;Var5:=(CLOSE-LLV(LOW,60)/(HHV(HIGH,60)-LLV(LOW,60);Var6:=(2*CLOSE+HIGH+LOW)/4;Var7:=SMA(Var3/Var1*100,3,1);Var8:=LLV(LOW,34);Var9:=SMA(Var7,3,1)-SMA(Var4,9,1);Var10:=IF(Var9100,Var9-100,0);Var11:=HHV(HIGH,34);Var12:=EMA(Var6-Var8)/(Var11-Var8)*100,13);Var13:=EMA(0.667*REF(Var12,1)+0.333*Var12,2);Var13,COLOR000000;STICKLINE(Var12-Var130,Var12,Var13,8,0),COLOR0055ff;STICKLINE(Var12-Var131.5;a2:=(hhv(high,50)-low)/(hhv(high,50)-llv(low,100);a3:=(low-llv(low,100)/(hhv(high,50)-llv(low,100);a4:=HHVBARS(high,50)0.5 and a30.3 and a4;a6:=count(a5,20)=1;抢反弹:if(a6 and a5 ,23,0),stick,linethick2,color00ffff;drawtext(抢反弹,35,抢反弹),color00bbff;Var2w:=100-100*(HHV(HIGH,14)-CLOSE)/(HHV(HIGH,14)-LLV(LOW,14);MW:= EMA(Var2w,3);Var3w:=EMA(Var2w,7);M1:= EMA(Var3w,5);mb1:=CROSS(MW,M1) AND M120;抄底 :IF(mb1),40,0),linethick2,colorffffff;drawtext(抄底 ,62,),color00ffff;drawtext(抄底 ,52,抄底 ),colorff00ff;30、精准买卖V1:=(C*2+H+L)/4*10; V2:=EMA(V1,13)-EMA(V1,34); V3:=EMA(V2,5); V4:=2*(V2-V3)*5.5; 主力撤: IF(V4=0,V4,0),colorff00ff; V5:=(HHV(INDEXH,8)-INDEXC)/(HHV(INDEXH,8)-LLV(INDEXL,8)*8; V6:=EMA(3*V5-2*SMA(V5,18,1),5); V7:=(INDEXC-LLV(INDEXL,8)/(HHV(INDEXH,8)-LLV(INDEXL,8)*10; V8:=(INDEXC*2+INDEXH+INDEXL)/4; V9:=EMA(V8,13)-EMA(V8,34); VA:=EMA(V9,3); VB:=(V9-VA)/2; 大盘资金进场:IF(VB=0,VB,0),Colorred; 大盘资金撤走:IF(VB=0,VB,0),colorgreen; V11:=3*SMA(C-LLV(L,55)/(HHV(H,55)-LLV(L,55)*100,5,1)-2*SMA(SMA(C-LLV(L,55)/(HHV(H,55)-LLV(L,55)*100,5,1),3,1); 趋势线: EMA(V11,3); V12:=(趋势线-REF(趋势线,1)/REF(趋势线,1)*100; 准备现金: STICKLINE(趋势线=13,0,20,5,0),colorcc9900; aa:=(趋势线=13) and filter(趋势线=13),15); drawtext (aa,30,准备现金),colorcc9900; 买入股票: STICKLINE(趋势线13,0,50,5,0),color0099ff; bb:= (趋势线13) and filter(趋势线13),10) ; drawtext (bb,60,买入股票),color0099ff; 卖临界: STICKLINE(趋势线90 and 趋势线ref(趋势线,1),100,95,15,1),COLORFFFF00;见顶清仓:filter(趋势线90 and 趋势线ref(趋势线,1) and 主力进=90 AND V12) and filter(趋势线=90 AND V12),10);stickline(大盘资金进场and 趋势线90,0,30,10,0),colorgreen;stickline(主力进 and 趋势线90,0,40,10,0),colorblue;31、疯牛公式（估抄底）使用：红柱后三线粘合在一起时可考虑买入，绿柱后三线粘合可考虑卖出RSV1:=(CLOSE-LLV(LOW,9)/(HHV(HIGH,9)-LLV(LOW,9)*100;RSV2:=(CLOSE-LLV(LOW,27)/(HHV(HIGH,27)-LLV(LOW,27)*100;WEN:=3*SMA(CLOSE-LLV(LOW,27)/(HHV(HIGH,27)-LLV(LOW,27)*100,5,1)-2*SMA(SMA(CLOSE-LLV (LOW,27)/(HHV(HIGH,27)-LLV(LOW,27)*100,5,1),3,1);J1:=SMA(RSV1,3,1);J2:=SMA(J1,3,1);W1:=SMA(RSV2,3,1);W2:=SMA(W1,3,1);强弱界线:49,POINTDOT,LINETHICK3,COLOR9966CC;见顶信号:100,COLORCCFF00;出点准备: IF(CROSS(J2,J1) AND J285,70,100),LINETHICK2,COLOR00FF00;趋势线: WEN,LINETHICK2,COLORFF84FF;买点准备:IF(趋势线88,100,趋势线,5,1),COLORGREEN;STICKLINE(趋势线=10,0,趋势线,5,1),COLORYELLOW;STICKLINE(COUNT(趋势线REF(趋势线,1) AND 趋势线85,100,80,8,0),COLORGREEN;DRAWICON(CROSS(趋势线,49),趋势线,7),COLORRED;DRAWICON(FILTER(CROSS(G2,G1) AND G281,10),G2*1.05,2);DRAWTEXT(CROSS(趋势线,49),47,转强),ALIGN0,COLORRED;DRAWTEXT(CROSS(49,趋势线),52,转弱),ALIGN0,COLORGREEN;32、估抄底F-通用使用：红柱后三线粘合在一起时可考虑买入，绿柱后三线粘合可考虑卖出RSV1:=(CLOSE-LLV(LOW,9)/(HHV(HIGH,9)-LLV(LOW,9)*100;RSV2:=(CLOSE-LLV(LOW,27)/(HHV(HIGH,27)-LLV(LOW,27)*100;J1:=SMA(RSV1,3,1);J2:=SMA(J1,3,1);趋势线:3*SMA(RSV2,5,1)-2*SMA(SMA(RSV2,5,1),3,1),LINETHICK2,COLORFF84FF;K:SMA(RSV2,3,1),LINETHICK2,COLORWHITE;D:SMA(K,3,1),LINETHICK2,COLORF408F4;见顶信号:100,COLORCCFF00;买点准备:IF(趋势线85,70,100),LINETHICK2,COLOR00FF00;强弱界线:49,POINTDOT,LINETHICK3,COLOR99AACC;以下设置副图显示方式STICKLINE(趋势线88,100,趋势线,4,1),COLORGREEN;STICKLINE(趋势线=10,0,趋势线,4,1),COLORYELLOW;STICKLINE(COUNT(趋势线REF(趋势线,1) AND 趋势线85,100,80,4,0),COLORGREEN;DRAWICON(CROSS(趋势线,49),趋势线,1),COLORRED;DRAWICON(FILTER(CROSS(D,K) AND D81,10),D*1.05,2);DRAWTEXT(CROSS(趋势线,49),47,转强),COLORRED;DRAWTEXT(CROSS(49,趋势线),52,转弱),COLORGREEN;33、FXJ权证（主图input: n(4,1,255);IF DATATYPE=8then beginpartline(c*2-ref(c,3),c0),MOVE3,color005555,LAYER7;partline(ref(c,1)*2-ref(c,4),c0),MOVE2,color005500,LAYER7;partline(ref(c,2)*2-ref(c,5),c0),MOVE1,color553355,LAYER7;END;K线图部份通用F:EMA(C,5);X:EMA(C,34),COLORGRAY,linethick1;KS:=if(BARSCOUNT(c)=1,c/10000,(1-C/SMA(C,13,1)*100);RKS:=REF(KS,1);MLS:=RKS/KS1.23 AND RKS10 AND C/REF(C,1)1.02;J:STICKLINE(KS=10,H,L,0,1),colorwhite,linethick2; 权:EMA(C,13),colorred,linethick2;证:EMA(KS*C/100+权,3), COLORff9933,linethick1;反弹:STICKLINE(MLS=1,H,L,0,1),colorff00ff,linethick2;STICKLINE(权证,权,证,4,1),COLORFF00FF;STICKLINE(C=O,H,L,0,0),COLORred;STICKLINE(C=O,C,O,8,0),COLORred;STICKLINE(CO,H,L,0,0),COLORGRAY;STICKLINE(C10,H,L,0,0),colorwhite,linethick1; STICKLINE(KS10,O,C,8,1),colorwhite,linethick1; STICKLINE(MLS,H,L,0,0),color00ffff,linethick1;STICKLINE(MLS,O,C,8,0),color00ffff,linethick1;Var1:=BACKSET(REF(HIGH,2)=HHV(HIGH,5),3);Var2:=CROSS(Var1,0.9);Var3:=BACKSET(REF(LOW,2)=LLV(LOW,5),3);Var4:=CROSS(Var3,0.9);压力: REF(HIGH,BARSLAST(Var2), POINTDOT,ColorEA91B5;STICKLINE(CLOSE,REF(HIGH,BARSLAST(Var2),REF(HIGH,BARSLAST(Var2),5,0),ColorEA91B5;支撑: REF(LOW,BARSLAST(Var4), POINTDOT,Color00b4ff;STICKLINE(CLOSE,REF(LOW,BARSLAST(Var4),REF(LOW,BARSLAST(Var4),5,0),Color00b4ff;分析家趋势线aa:=ref(h,n)=hhv(h,2*n+1);aaa:=filter(aa,n);bb:=backset(aaa,n+1);cc1:=filter(bb,n);cc:=cc1 or BARSTATUS=2;aa2:=ref(l,n)=llv(l,2*n+1);aaa2:=filter(aa2,n);bb2:=backset(aaa2,n+1);cc22:=filter(bb2,n);cc2:=cc22 and not(cc1);ea:=backset(cc,ref(barslast(cc2),1)+1);eb:=earef(ea,1);ee:=backset(eb,2);ff1:=eeref(ee,1);ee2:=backset(ff1 and count(cc,ref(barslast(cc2),1)+2)=0,ref(barslast(cc2),1)+2);ff2:=ee2ref(ee2,1);ee3:=backset(ff2 and count(cc,ref(barslast(cc2),1)+2)=0,ref(barslast(cc2),1)+2);ff3:=ee3ref(ee3,1);js:=if(cc,count(cc2,ref(barslast(cc),1)+1),0);g1:=if(js=1 and cc,barslast(ff1),0);ga:=if(cc and ref(l,barslast(ff1)=ref(l,barslast(ff2),barslast(ff2),barslast(ff1);g2:=if(js=2 and cc,ga,0);g3:=if(js=3 and cc,if(cc and ref(l,ga)=ref(l,barslast(ff3),barslast(ff3),ga),0);gg:=g1+g2+g3;ja:=backset(cc,gg);jb:=jaref(ja,1);jj:=backset(jb,2);ld:=jjref(jj,1);ld1:=ld or BARSTATUS=2;hea:=backset(ld1,ref(barslast(cc),1)+1);heb:=hearef(hea,1);hee:=backset(heb,2);hff1:=heeref(hee,1);hee2:=backset(hff1 and count(ld1,ref(barslast(cc),1)+2)=0,ref(barslast(cc),1)+2);hff2:=hee2ref(hee2,1);hee3:=backset(hff2 and count(ld1,ref(barslast(cc),1)+2)=0,ref(barslast(cc),1)+2);hff3:=hee3ref(hee3,1);hjs:=if(ld1,count(cc1,ref(barslast(ld1),1)+1),0);hg1:=if(hjs=1 and ld1,barslast(hff1),0);hga:=if(ld1 and ref(h,barslast(hff1)=3 and ld1,if(ld1 and ref(h,hga)ref(hja,1);hjj:=backset(hjb,2);hd:=hjjref(hjj,1);x1:=backset(BARSTATUS=2,barslast(ld)+1);x2:=x1ref(x1,1);y1:=backset(BARSTATUS=2,barslast(hd)+1);y2:=y1ref(y1,1);z1:=if(barslast(x2)barslast(y2),x2,y2);z2:=if(barslast(x2)ref(uu,1);ww:=backset(vv,ref(barslast(ld),1)+2);xx:=wwref(ww,1);drawline(xx,l,vv,l,1),color00ffff;uu2:=backset(BARSTATUS=2,barslast(hd)+1);vv2:=uu2ref(uu2,1);ww2:=backset(vv2,ref(barslast(hd),1)+2);xx2:=ww2ref(ww2,1);drawline(xx2,h,vv2,h,1),color00ffff;34、疯牛公式Var3:=(CLOSE-MA(CLOSE,6)/MA(CLOSE,6)*100;Var4:=(CLOSE-MA(CLOSE,24)/MA(CLOSE,24)*100;Var5:=(CLOSE-MA(CLOSE,32)/MA(CLOSE,32)*100;Var6:=(Var3+Var4+Var5)/3;Var7:=EMA(Var6,5);指标: EMA(EMA(Var3,5),5)*3, COLORSTICK;Var8:=IF(Var610;换手: VOL/CAPITAL*100,COLORGREEN;成交万手: VOL/10000, COLORYELLOW;DRAWTEXT(Var8=10 AND FILTER(Var8=10,5),-1015,接近底部),linethick1,COLORYELLOW;STICKLINE(Var8=10 AND FILTER(Var8=10,5),-1.620,-10,5,0),coloryellow;DRAWTEXT(VarA=20,15,底部),linethick1,colorwhite;STICKLINE(VarA=20),0,10,5,0),colorwhite;VARC:=(ZIG(3,5)REF(ZIG(3,5),1) AND (REF(ZIG(3,5),1)=REF(ZIG(3,5),2) AND (REF(ZIG(3,5),2)=REF(ZIG(3,5),3);VARD:=(ZIG(3,5)=REF(ZIG(3,5),2) AND (REF(ZIG(3,5)