今天翻看自己的指标库,看到短线游子的【压力预测】有意思,自己改了测量涨幅,不会编指标,但也喜欢动手 测量跌幅 DRAWGBK((CLOSE > 0),COLORRGB(0,0,0),COLORRGB(0,0,0),1); KLINE(O,H,L,C,0); AB:=SYSPARAM(1); BB:=SYSPARAM(3); D:=(BB - AB); DA:=BACKSET(ISLASTBAR,HHVBARS(H,(D+1))+1); 高点:=COUNT(DA,(D+1))=1;{高点位置} ll:=hhv(H,(D + 1)); 最高:ll[BB],COLORred,LINETHICK0; x1:=最高*(1-0.02); x2:=最高*(1-0.04); x3:= 最高*(1-0.06); x4:= 最高*(1-0.08); x5:= 最高*(1-0.10); x6:= 最高*(1-0.12); x7:= 最高*(1-0.14); x8:= 最高*(1-0.16); x9:=最高*(1-0.18); x10:=最高*(1-0.20); x11:= 最高*(1-0.22); x12:= 最高*(1-0.24); x13:= 最高*(1-0.26); x14:= 最高*(1-0.28); x15:= 最高*(1-0.30); x16:= 最高*(1-0.32); x17:=最高*(1-0.34); x18:=最高*(1-0.36); x19:= 最高*(1-0.38); x20:= 最高*(1-0.40); x21:= 最高*(1-0.42); x22:= 最高*(1-0.44); x23:= 最高*(1-0.46); x24:= 最高*(1-0.48);DRAWLINE(高点,最高, ISLASTBAR,REF(最高,1),0),Color939300,LINEDOT; B1:DRAWLINE(高点,x1,ISLASTBAR,REF(x1,1),0),Color008080,LINEDOT; B2:DRAWLINE(高点,x2,ISLASTBAR,REF(x2,1),0),Color939300,LINEDOT; B3:DRAWLINE(高点,x3,ISLASTBAR,REF(x3,1),0),Color008080,LINEDOT; B4:DRAWLINE(高点,x4,ISLASTBAR,REF(x4,1),0),Color939300,LINEDOT; B5:DRAWLINE(高点,x5,ISLASTBAR,REF(x5,1),0),Color008080,LINEDOT; B6:DRAWLINE(高点,x6,ISLASTBAR,REF(x6,1),0),Color939300,LINEDOT; B7:DRAWLINE(高点,x7,ISLASTBAR,REF(x7,1),0),Color008080,LINEDOT; B8:DRAWLINE(高点,x8,ISLASTBAR,REF(x8,1),0),Color939300,LINEDOT; B9:DRAWLINE(高点,x9,ISLASTBAR,REF(x9,1),0),Color008080,LINEDOT; B10:DRAWLINE(高点,x10,ISLASTBAR,REF(x10,1),0),Color939300,LINEDOT; B11:DRAWLINE(高点,x11,ISLASTBAR,REF(x11,1),0),Color008080,LINEDOT; B12:DRAWLINE(高点,x12,ISLASTBAR,REF(x12,1),0),Color939300,LINEDOT; B13:DRAWLINE(高点,x13,ISLASTBAR,REF(x13,1),0),Color008080,LINEDOT; B14:DRAWLINE(高点,x14,ISLASTBAR,REF(x14,1),0),Color939300,LINEDOT; B15:DRAWLINE(高点,x15,ISLASTBAR,REF(x15,1),0),Color008080,LINEDOT; B16:DRAWLINE(高点,x16,ISLASTBAR,REF(x16,1),0),Color939300,LINEDOT; B17:DRAWLINE(高点,x17,ISLASTBAR,REF(x17,1),0),Color008080,LINEDOT; B18:DRAWLINE(高点,x18,ISLASTBAR,REF(x18,1),0),Color939300,LINEDOT; B19:DRAWLINE(高点,x19,ISLASTBAR,REF(x19,1),0),Color008080,LINEDOT; B20:DRAWLINE(高点,x20,ISLASTBAR,REF(x20,1),0),Color939300,LINEDOT; B21:DRAWLINE(高点,x21,ISLASTBAR,REF(x21,1),0),Color008080,LINEDOT; B22:DRAWLINE(高点,x22,ISLASTBAR,REF(x22,1),0),Color939300,LINEDOT; B23:DRAWLINE(高点,x23,ISLASTBAR,REF(x23,1),0),Color008080,LINEDOT; B24:DRAWLINE(高点,x24,ISLASTBAR,REF(x24,1),0),Color939300,LINEDOT; VERTLINE(高点),COLORRED,LINETHICK1;DRAWTEXT(高点,REF(最高*0.996,BARSLAST(BARSCOUNT(C)=AB)),' 最高价 '+NUMTOSTR(最高,2)+'元'),ALIGN1,Color838383,PXUP35; DRAWTEXT(高点,REF(x1*0.996,BARSLAST(BARSCOUNT(C)=AB)),' 2%:'+NUMTOSTR(x1,2)+'元'),ALIGN1,Color838383,PXUP35; DRAWTEXT(高点,REF(x2*0.996,BARSLAST(BARSCOUNT(C)=AB)),' 4%:'+NUMTOSTR(x2,2)+'元'),ALIGN1,Color838383,PXUP35; DRAWTEXT(高点,REF(x3*0.996,BARSLAST(BARSCOUNT(C)=AB)),' 6%:'+NUMTOSTR(x3,2)+'元'),ALIGN1,Color838383,PXUP35; DRAWTEXT(高点,REF(x4*0.996,BARSLAST(BARSCOUNT(C)=AB)),' 8%:'+NUMTOSTR(x4,2)+'元'),ALIGN1,Color838383,PXUP35; DRAWTEXT(高点,REF(x5*0.996,BARSLAST(BARSCOUNT(C)=AB)),' 10%:'+NUMTOSTR(x5,2)+'元'),ALIGN1,Color838383,PXUP35; DRAWTEXT(高点,REF(x6*0.996,BARSLAST(BARSCOUNT(C)=AB)),' 12%:'+NUMTOSTR(x6,2)+'元'),ALIGN1,Color838383,PXUP35; DRAWTEXT(高点,REF(x7*0.996,BARSLAST(BARSCOUNT(C)=AB)),' 14%:'+NUMTOSTR(x7,2)+'元'),ALIGN1,Color838383,PXUP35; DRAWTEXT(高点,REF(x8*0.996,BARSLAST(BARSCOUNT(C)=AB)),' 16%:'+NUMTOSTR(x8,2)+'元'),ALIGN1,Color838383,PXUP35; DRAWTEXT(高点,REF(x9*0.996,BARSLAST(BARSCOUNT(C)=AB)),' 18%:'+NUMTOSTR(x9,2)+'元'),ALIGN1,Color838383,PXUP35; DRAWTEXT(高点,REF(x10*0.996,BARSLAST(BARSCOUNT(C)=AB)),' 20%:'+NUMTOSTR(x10,2)+'元'),ALIGN1,Color838383,PXUP35; DRAWTEXT(高点,REF(x11*0.996,BARSLAST(BARSCOUNT(C)=AB)),' 22%:'+NUMTOSTR(x11,2)+'元'),ALIGN1,Color838383,PXUP35; DRAWTEXT(高点,REF(x12*0.996,BARSLAST(BARSCOUNT(C)=AB)),' 24%:'+NUMTOSTR(x12,2)+'元'),ALIGN1,Color838383,PXUP35; DRAWTEXT(高点,REF(x13*0.996,BARSLAST(BARSCOUNT(C)=AB)),' 26%:'+NUMTOSTR(x13,2)+'元'),ALIGN1,Color838383,PXUP35; DRAWTEXT(高点,REF(x14*0.996,BARSLAST(BARSCOUNT(C)=AB)),' 28%:'+NUMTOSTR(x14,2)+'元'),ALIGN1,Color838383,PXUP35; DRAWTEXT(高点,REF(x15*0.996,BARSLAST(BARSCOUNT(C)=AB)),' 30%:'+NUMTOSTR(x15,2)+'元'),ALIGN1,Color838383,PXUP35; DRAWTEXT(高点,REF(x16*0.996,BARSLAST(BARSCOUNT(C)=AB)),' 32%:'+NUMTOSTR(x16,2)+'元'),ALIGN1,Color838383,PXUP35; DRAWTEXT(高点,REF(x17*0.996,BARSLAST(BARSCOUNT(C)=AB)),' 34%:'+NUMTOSTR(x17,2)+'元'),ALIGN1,Color838383,PXUP35; DRAWTEXT(高点,REF(x18*0.996,BARSLAST(BARSCOUNT(C)=AB)),' 36%:'+NUMTOSTR(x18,2)+'元'),ALIGN1,Color838383,PXUP35; DRAWTEXT(高点,REF(x19*0.996,BARSLAST(BARSCOUNT(C)=AB)),' 38%:'+NUMTOSTR(x19,2)+'元'),ALIGN1,Color838383,PXUP35; DRAWTEXT(高点,REF(x20*0.996,BARSLAST(BARSCOUNT(C)=AB)),' 40%:'+NUMTOSTR(x20,2)+'元'),ALIGN1,Color838383,PXUP35; DRAWTEXT(高点,REF(x21*0.996,BARSLAST(BARSCOUNT(C)=AB)),' 42%:'+NUMTOSTR(x21,2)+'元'),ALIGN1,Color838383,PXUP35; DRAWTEXT(高点,REF(x22*0.996,BARSLAST(BARSCOUNT(C)=AB)),' 44%:'+NUMTOSTR(x22,2)+'元'),ALIGN1,Color838383,PXUP35; DRAWTEXT(高点,REF(x23*0.996,BARSLAST(BARSCOUNT(C)=AB)),' 46%:'+NUMTOSTR(x23,2)+'元'),ALIGN1,Color838383,PXUP35; DRAWTEXT(高点,REF(x24*0.996,BARSLAST(BARSCOUNT(C)=AB)),' 48%:'+NUMTOSTR(x24,2)+'元'),ALIGN1,Color838383,PXUP35;测量涨幅{【压力预测线】} DRAWGBK((CLOSE > 0),COLORRGB(0,0,0),COLORRGB(0,0,0),1); KLINE(O,H,L,C,0); AB:=SYSPARAM(1); BB:=SYSPARAM(3); D:=(BB - AB); DA:=BACKSET(ISLASTBAR,LLVBARS(L,(D+1))+1); 低点:=COUNT(DA,(D+1))=1;{低点位置} ll:=llv(L,(D + 1)); 最低:ll[BB],COLORred,LINETHICK0; x1:=最低*(1+0.02); x2:=最低*(1+0.04); x3:= 最低*(1+0.06); x4:= 最低*(1+0.08); x5:= 最低*(1+0.10); x6:= 最低*(1+0.12); x7:= 最低*(1+0.14); x8:= 最低*(1+0.16); x9:=最低*(1+0.18); x10:=最低*(1+0.20); x11:= 最低*(1+0.22); x12:= 最低*(1+0.24); x13:= 最低*(1+0.26); x14:= 最低*(1+0.28); x15:= 最低*(1+0.30); x16:= 最低*(1+0.32); x17:=最低*(1+0.34); x18:=最低*(1+0.36); x19:= 最低*(1+0.38); x20:= 最低*(1+0.40); x21:= 最低*(1+0.42); x22:= 最低*(1+0.44); x23:= 最低*(1+0.46); x24:= 最低*(1+0.48);DRAWLINE(低点,最低, ISLASTBAR,REF(最低,1),0),Color939300,LINEDOT; B1:DRAWLINE(低点,x1,ISLASTBAR,REF(x1,1),0),Color008080,LINEDOT; B2:DRAWLINE(低点,x2,ISLASTBAR,REF(x2,1),0),Color939300,LINEDOT; B3:DRAWLINE(低点,x3,ISLASTBAR,REF(x3,1),0),Color008080,LINEDOT; B4:DRAWLINE(低点,x4,ISLASTBAR,REF(x4,1),0),Color939300,LINEDOT; B5:DRAWLINE(低点,x5,ISLASTBAR,REF(x5,1),0),Color008080,LINEDOT; B6:DRAWLINE(低点,x6,ISLASTBAR,REF(x6,1),0),Color939300,LINEDOT; B7:DRAWLINE(低点,x7,ISLASTBAR,REF(x7,1),0),Color008080,LINEDOT; B8:DRAWLINE(低点,x8,ISLASTBAR,REF(x8,1),0),Color939300,LINEDOT; B9:DRAWLINE(低点,x9,ISLASTBAR,REF(x9,1),0),Color008080,LINEDOT; B10:DRAWLINE(低点,x10,ISLASTBAR,REF(x10,1),0),Color939300,LINEDOT; B11:DRAWLINE(低点,x11,ISLASTBAR,REF(x11,1),0),Color008080,LINEDOT; B12:DRAWLINE(低点,x12,ISLASTBAR,REF(x12,1),0),Color939300,LINEDOT; B13:DRAWLINE(低点,x13,ISLASTBAR,REF(x13,1),0),Color008080,LINEDOT; B14:DRAWLINE(低点,x14,ISLASTBAR,REF(x14,1),0),Color939300,LINEDOT; B15:DRAWLINE(低点,x15,ISLASTBAR,REF(x15,1),0),Color008080,LINEDOT; B16:DRAWLINE(低点,x16,ISLASTBAR,REF(x16,1),0),Color939300,LINEDOT; B17:DRAWLINE(低点,x17,ISLASTBAR,REF(x17,1),0),Color008080,LINEDOT; B18:DRAWLINE(低点,x18,ISLASTBAR,REF(x18,1),0),Color939300,LINEDOT; B19:DRAWLINE(低点,x19,ISLASTBAR,REF(x19,1),0),Color008080,LINEDOT; B20:DRAWLINE(低点,x20,ISLASTBAR,REF(x20,1),0),Color939300,LINEDOT; B21:DRAWLINE(低点,x21,ISLASTBAR,REF(x21,1),0),Color008080,LINEDOT; B22:DRAWLINE(低点,x22,ISLASTBAR,REF(x22,1),0),Color939300,LINEDOT; B23:DRAWLINE(低点,x23,ISLASTBAR,REF(x23,1),0),Color008080,LINEDOT; B24:DRAWLINE(低点,x24,ISLASTBAR,REF(x24,1),0),Color939300,LINEDOT; VERTLINE(低点),COLORRED,LINETHICK1;DRAWTEXT(低点,REF(最低*0.996,BARSLAST(BARSCOUNT(C)=AB)),' 最低价 '+NUMTOSTR(最低,2)+'元'),ALIGN1,Color838383,PXUP35; DRAWTEXT(低点,REF(x1*0.996,BARSLAST(BARSCOUNT(C)=AB)),' 2%:'+NUMTOSTR(x1,2)+'元'),ALIGN1,Color838383,PXUP35; DRAWTEXT(低点,REF(x2*0.996,BARSLAST(BARSCOUNT(C)=AB)),' 4%:'+NUMTOSTR(x2,2)+'元'),ALIGN1,Color838383,PXUP35; DRAWTEXT(低点,REF(x3*0.996,BARSLAST(BARSCOUNT(C)=AB)),' 6%:'+NUMTOSTR(x3,2)+'元'),ALIGN1,Color838383,PXUP35; DRAWTEXT(低点,REF(x4*0.996,BARSLAST(BARSCOUNT(C)=AB)),' 8%:'+NUMTOSTR(x4,2)+'元'),ALIGN1,Color838383,PXUP35; DRAWTEXT(低点,REF(x5*0.996,BARSLAST(BARSCOUNT(C)=AB)),' 10%:'+NUMTOSTR(x5,2)+'元'),ALIGN1,Color838383,PXUP35; DRAWTEXT(低点,REF(x6*0.996,BARSLAST(BARSCOUNT(C)=AB)),' 12%:'+NUMTOSTR(x6,2)+'元'),ALIGN1,Color838383,PXUP35; DRAWTEXT(低点,REF(x7*0.996,BARSLAST(BARSCOUNT(C)=AB)),' 14%:'+NUMTOSTR(x7,2)+'元'),ALIGN1,Color838383,PXUP35; DRAWTEXT(低点,REF(x8*0.996,BARSLAST(BARSCOUNT(C)=AB)),' 16%:'+NUMTOSTR(x8,2)+'元'),ALIGN1,Color838383,PXUP35; DRAWTEXT(低点,REF(x9*0.996,BARSLAST(BARSCOUNT(C)=AB)),' 18%:'+NUMTOSTR(x9,2)+'元'),ALIGN1,Color838383,PXUP35; DRAWTEXT(低点,REF(x10*0.996,BARSLAST(BARSCOUNT(C)=AB)),' 20%:'+NUMTOSTR(x10,2)+'元'),ALIGN1,Color838383,PXUP35; DRAWTEXT(低点,REF(x11*0.996,BARSLAST(BARSCOUNT(C)=AB)),' 22%:'+NUMTOSTR(x11,2)+'元'),ALIGN1,Color838383,PXUP35; DRAWTEXT(低点,REF(x12*0.996,BARSLAST(BARSCOUNT(C)=AB)),' 24%:'+NUMTOSTR(x12,2)+'元'),ALIGN1,Color838383,PXUP35; DRAWTEXT(低点,REF(x13*0.996,BARSLAST(BARSCOUNT(C)=AB)),' 26%:'+NUMTOSTR(x13,2)+'元'),ALIGN1,Color838383,PXUP35; DRAWTEXT(低点,REF(x14*0.996,BARSLAST(BARSCOUNT(C)=AB)),' 28%:'+NUMTOSTR(x14,2)+'元'),ALIGN1,Color838383,PXUP35; DRAWTEXT(低点,REF(x15*0.996,BARSLAST(BARSCOUNT(C)=AB)),' 30%:'+NUMTOSTR(x15,2)+'元'),ALIGN1,Color838383,PXUP35; DRAWTEXT(低点,REF(x16*0.996,BARSLAST(BARSCOUNT(C)=AB)),' 32%:'+NUMTOSTR(x16,2)+'元'),ALIGN1,Color838383,PXUP35; DRAWTEXT(低点,REF(x17*0.996,BARSLAST(BARSCOUNT(C)=AB)),' 34%:'+NUMTOSTR(x17,2)+'元'),ALIGN1,Color838383,PXUP35; DRAWTEXT(低点,REF(x18*0.996,BARSLAST(BARSCOUNT(C)=AB)),' 36%:'+NUMTOSTR(x18,2)+'元'),ALIGN1,Color838383,PXUP35; DRAWTEXT(低点,REF(x19*0.996,BARSLAST(BARSCOUNT(C)=AB)),' 38%:'+NUMTOSTR(x19,2)+'元'),ALIGN1,Color838383,PXUP35; DRAWTEXT(低点,REF(x20*0.996,BARSLAST(BARSCOUNT(C)=AB)),' 40%:'+NUMTOSTR(x20,2)+'元'),ALIGN1,Color838383,PXUP35; DRAWTEXT(低点,REF(x21*0.996,BARSLAST(BARSCOUNT(C)=AB)),' 42%:'+NUMTOSTR(x21,2)+'元'),ALIGN1,Color838383,PXUP35; DRAWTEXT(低点,REF(x22*0.996,BARSLAST(BARSCOUNT(C)=AB)),' 44%:'+NUMTOSTR(x22,2)+'元'),ALIGN1,Color838383,PXUP35; DRAWTEXT(低点,REF(x23*0.996,BARSLAST(BARSCOUNT(C)=AB)),' 46%:'+NUMTOSTR(x23,2)+'元'),ALIGN1,Color838383,PXUP35; DRAWTEXT(低点,REF(x24*0.996,BARSLAST(BARSCOUNT(C)=AB)),' 48%:'+NUMTOSTR(x24,2)+'元'),ALIGN1,Color838383,PXUP35; {点击看本软件截图: 58股票 公式网 http://www. 58gu. com 整理} |