|
重心:(收盘价+0.618*向前引用(收盘价,1)+0.382*向前引用(收盘价,2)+0.236*向前引用(收盘价,3)+0.146*向前引用(收盘价,4))/2.382,coloryellow,LINETHICK0; MN:=条件函数(重心>0.05,重心,0); 画柱线(MN<>开盘价,MN,MN,6,1),COLOR336699,LINETHICK2; //MA21:简单移动平均(收盘价,21),COLOR0000ff,LINETHICK1; kJ:=(最高价 + 最低价 + 收盘价)/3; 天B:=2*kJ-最低价; 地B:=2*kj-最高价; 人:=(地B+天B)/2,LINETHICK0,COLORGREEN; 均衡:= 向前引用( 人 , 1); k1:=(开盘价+收盘价+最高价+最低价)/4; k2:=(向前引用(开盘价,1)+向前引用(收盘价,1)+向前引用(最高价,1)+向前引用(最低价,1))/4; k3:=(向前引用(开盘价,2)+向前引用(收盘价,2)+向前引用(最高价,2)+向前引用(最低价,2))/4; k4:=(向前引用(开盘价,3)+向前引用(收盘价,3)+向前引用(最高价,3)+向前引用(最低价,3))/4; k5:=(向前引用(开盘价,4)+向前引用(收盘价,4)+向前引用(最高价,4)+向前引用(最低价,4))/4; 和:=(k2+k3+k4+k5)/4,colorFFFFFF,linethick0; 强弱:= 向前引用(和 , 1); 心:=最高价*0.982,LINETHICK0; 止赢:= 向前引用(心 , 1); p3:=系统参数(1); YC:=向前引用(收盘价,1); 止损:=(YC*1.0035*97+0.2)/99.65,COLORRED,LINETHICK0; 指定位置显示文字(收盘价,1,20,40, 均 衡 | +数字转化为字符串(均衡[p3] ,2 )),COLORGRAY; 指定位置显示文字(收盘价,1,20,120, 强 弱 | +数字转化为字符串(强弱[p3] ,2 )),COLORGRAY; 指定位置显示文字(收盘价,1,20,200, 止 损 | +数字转化为字符串(止损[p3] ,2 )),COLORGRAY; 指定位置显示文字(收盘价,1,20,280, 止 赢 | +数字转化为字符串(止赢[p3] ,2 )),COLORGRAY; gj:=成交额/成交量/100; E:=(最高价+最低价+开盘价+2*收盘价)/5; 明日阻力:=2*E-最低价; 明日支撑:=2*E-最高价; 明日突破:=E+(最高价-最低价); 明日反转:=E-(最高价-最低价); 今阻:=向前引用(明日阻力 , 1); 今支:=向前引用(明日支撑 , 1); 今突:=向前引用(明日突破 , 1); 今转:=向前引用(明日反转 , 1); CJ:=(成交额/成交量/100)-最低价; 天:=收盘价+CJ,LINETHICK0,COLORGREEN; 地:=收盘价-CJ,LINETHICK0; 天络:= 向前引用( 天 , 1); 地纲:= 向前引用( 地 ,1 ); 指定位置显示文字(收盘价,1,20,360, 今 阻 | +数字转化为字符串(今阻[p3] ,2 )),COLORGRAY; 指定位置显示文字(收盘价,1,20,440, 今 支 | +数字转化为字符串(今支[p3] ,2 )),COLORGRAY; 指定位置显示文字(收盘价,1,20,520, 今 突 | +数字转化为字符串(今突[p3] ,2 )),COLORGRAY; 指定位置显示文字(收盘价,1,20,600, 今 转 | +数字转化为字符串(今转[p3] ,2 )),COLORGRAY; 指定位置显示文字(收盘价,1,20,680, 天 络 | +数字转化为字符串(天络[p3] ,2 )),COLORGRAY; 指定位置显示文字(收盘价,1,20,760, 地 纲 | +数字转化为字符串(地纲[p3] ,2 )),COLORGRAY; 画柱线(((系统参数(1) = 数据位置) AND 地纲),地纲,地纲,25,0),LINETHICK2,COLORWHITE; 画柱线(((系统参数(1) = 数据位置) AND 天络),天络,天络,25,0),LINETHICK2,COLORWHITE; 画柱线(((系统参数(1) = 数据位置) AND 均衡),均衡,均衡,25,0),LINETHICK2,COLORGREEN; PT:=向前引用(最高价,1)-向前引用(最低价,1); CDP:=(最高价 + 最低价 + 收盘价)/3; AH:= CDP + PT; AL:=CDP - PT; NH:= 2*CDP-最低价; NL:= 2*CDP-最高价; 突:=(CDP+AH)/2,LINETHICK0; 卖A:=(CDP+NH)/2,LINETHICK0; 极:=(CDP+AL)/2,LINETHICK0; 买:=(CDP+NL)/2,LINETHICK0; 卖B:=(突+卖A)/2,LINETHICK0; 开:=(NH+NL)/2; 需求:=向前引用(CDP , 1),COLORYELLOW,LINETHICK0; 最高:向前引用(AH , 1),COLORMAGENTA,LINETHICK0; 近高:向前引用(NH , 1),COLORGREEN,LINETHICK0; 最低:=向前引用(AL, 1),COLORYELLOW,LINETHICK0; 近低:=向前引用(NL, 1),COLORRED,LINETHICK0; 测开:=向前引用(开, 1),COLORRED,LINETHICK0; //棒:开盘价,LINETHICK0,COLORBLUE; 佳卖:向前引用(卖B , 1),COLORYELLOW,LINETHICK0; 突破:向前引用(突 , 1),COLORMAGENTA,LINETHICK0; 卖吗:=向前引用(卖A , 1),COLORGREEN,LINETHICK0; 极买:向前引用(极 , 1),COLORYELLOW,LINETHICK0; 佳买:向前引用(买, 1),COLORRED,LINETHICK0; 画柱线(((系统参数(1) = 数据位置) AND 佳卖),佳卖,佳卖,25,0),LINETHICK1,COLORYELLOW; 画柱线(((系统参数(1) = 数据位置) AND 佳买),佳买,佳买,25,0),LINETHICK1,COLORRED; //画柱线(((系统参数(1) = 数据位置) AND 测开),测开,测开,25,0),LINETHICK1,COLORRED; //p3:=系统参数(1); //指定位置显示文字(收盘价,1,220,40, 需 求 | +数字转化为字符串(需求[p3] ,2 )),COLORGRAY; //指定位置显示文字(收盘价,1,220,120, 最 高 | +数字转化为字符串(最高[p3] ,2 )),COLORGRAY; //指定位置显示文字(收盘价,1,220,200, 近 高 | +数字转化为字符串(近高[p3] ,2 )),COLORGRAY; //指定位置显示文字(收盘价,1,220,280, 最 低 | +数字转化为字符串(最低[p3] ,2 )),COLORGRAY; //指定位置显示文字(收盘价,1,220,360, 近 低 | +数字转化为字符串(近低[p3] ,2 )),COLORGRAY; //指定位置显示文字(收盘价,1,220,440, 突 破 | +数字转化为字符串(突破[p3] ,2 )),COLORGRAY; //指定位置显示文字(收盘价,1,220,520, 佳 卖 | +数字转化为字符串(佳卖[p3] ,2 )),COLORGRAY; //指定位置显示文字(收盘价,1,220,600, 极 买 | +数字转化为字符串(极买[p3] ,2 )),COLORGRAY; //指定位置显示文字(收盘价,1,220,680, 佳 买 | +数字转化为字符串(佳买[p3] ,2 )),COLORGRAY; //指定位置显示文字(收盘价,1,220,760, 测 开 | +数字转化为字符串(测开[p3] ,2 )),COLORGRAY; input:n(30,1,9999); HH:最高值(最高价,N); LL:最低值(最低价,N); <% VH=FFL.VARDATA("HH") VL=FFL.VARDATA("LL") VN=FFL.VARDATA("N") LAST=UBOUND(VH) IF VN>LAST THEN VN=LAST+1 FOR I=LAST TO LAST-VN+1 STEP-1 VH(I)=VH(LAST) VL(I)=VL(LAST) NEXT FFL.VARDATA("HH")=VH FFL.VARDATA("LL")=VL FFL.VARSTARTINDEX("HH")=LAST-VN+1 FFL.VARSTARTINDEX("LL")=LAST-VN+1 %> HH,colorFF88FF,LINETHICK2; 显示文字(收盘价>0 and 是否最后周期=1,HH,【黄金分割】↑),colorFF88FF; 显示数字(有效值周期数(LL)=N-(N-1),HH,HH,2),align2,colorFF88FF; LL+((HH-LL)*0.809),短虚线,linethick1,COLOR889999; LL+((HH-LL)*0.950),短虚线,linethick1,COLOR889999; LL+((HH-LL)*0.750),短虚线,linethick1,COLOR889999; LL+((HH-LL)*0.236),短虚线,linethick1,COLOR889999; LL+((HH-LL)*0.190),短虚线,linethick1,COLOR889999; 显示文字(收盘价>0 and 是否最后周期=1,LL+((HH-LL)*0.190), 0.190↑),COLOR889999; 显示数字(有效值周期数(LL)=N-(N-1),LL+((HH-LL)*0.190),LL+((HH-LL)*0.190),2),align2,COLOR889999; 显示文字(收盘价>0 and 是否最后周期=1,LL+((HH-LL)*0.950), 0.950↑),COLOR889999; 显示数字(有效值周期数(LL)=N-(N-1),LL+((HH-LL)*0.950),LL+((HH-LL)*0.950),2),align2,COLOR889999; 显示文字(收盘价>0 and 是否最后周期=1,LL+((HH-LL)*0.809), 0.809↑),COLOR889999; 显示数字(有效值周期数(LL)=N-(N-1),LL+((HH-LL)*0.809),LL+((HH-LL)*0.809),2),align2,COLOR889999; 显示文字(收盘价>0 and 是否最后周期=1,LL+((HH-LL)*0.750), 0.750↑),COLOR889999; 显示数字(有效值周期数(LL)=N-(N-1),LL+((HH-LL)*0.750),LL+((HH-LL)*0.750),2),align2,COLOR889999; LL+((HH-LL)*0.618),短虚线,linethick1,COLOR889999; 显示文字(收盘价>0 and 是否最后周期=1,LL+((HH-LL)*0.618), 0.618↑),COLOR889999; 显示数字(有效值周期数(LL)=N-(N-1),LL+((HH-LL)*0.618),LL+((HH-LL)*0.618),2),align2,COLOR889999; LL+((HH-LL)*0.500),短虚线,linethick1,COLORFF99CC; 显示文字(收盘价>0 and 是否最后周期=1,LL+((HH-LL)*0.500), 0.500↑),COLORFF99CC; 显示数字(有效值周期数(LL)=N-(N-1),LL+((HH-LL)*0.500),LL+((HH-LL)*0.500),2),align2,COLOR889999; LL+((HH-LL)*0.382),短虚线,linethick1,COLOR889999; 显示文字(收盘价>0 and 是否最后周期=1,LL+((HH-LL)*0.382), 0.382↑),COLOR889999; 显示数字(有效值周期数(LL)=N-(N-1),LL+((HH-LL)*0.382),LL+((HH-LL)*0.382),2),align2,COLOR889999; LL+((HH-LL)*0.301),短虚线,linethick1,COLOR889999; 显示文字(收盘价>0 and 是否最后周期=1,LL+((HH-LL)*0.301), 0.301↑),COLOR889999; 显示数字(有效值周期数(LL)=N-(N-1),LL+((HH-LL)*0.301),LL+((HH-LL)*0.301),2),align2,COLOR889999; LL+((HH-LL)*0.140),短虚线,linethick1,COLOR889999; 显示文字(收盘价>0 and 是否最后周期=1,LL+((HH-LL)*0.236), 0.236↑),COLOR889999; 显示数字(有效值周期数(LL)=N-(N-1),LL+((HH-LL)*0.236),LL+((HH-LL)*0.236),2),align2,COLOR889999; 显示文字(收盘价>0 and 是否最后周期=1,LL+((HH-LL)*0.140), 0.140↑),COLOR889999; 显示数字(有效值周期数(LL)=N-(N-1),LL+((HH-LL)*0.141),LL+((HH-LL)*0.140),2),align2,COLOR889999; LL,colorFF88FF,LINETHICK2; 显示文字(收盘价>0 and 是否最后周期=1,LL,〖底部起点〗↑),colorFF88FF; 显示数字(有效值周期数(LL)=N-(N-1),LL,LL,2),align2,colorFF88FF; TJ1:=上一高点位置(成交量,30)+1; R30价:向前引用(收盘价,第一个条件成立位置(向前赋值(是否最后周期,TJ1))),COLORGREEN,CIRCLEDOT; TJ2:=上一高点位置(成交量,60)+1; R60价:向前引用(收盘价,第一个条件成立位置(向前赋值(是否最后周期,TJ2))),COLORRED,CIRCLEDOT; rr:=向前引用(最高价,1); ss:=向前引用(最低价,1); M:=(rr+ss)/2; 画柱线((rr<>0),M,M,8,1),COLORBROWN,LINETHICK1; A:=向前引用(收盘价,1);B:=向前引用(开盘价,1);S:=(A+B)/2; 画柱线((A<>0),S,S,8,1),coloryellow; M2:=收盘价+(最高价-收盘价)/2;画柱线(收盘价>开盘价,m2,m2,5,1),colorwhite; M3:=开盘价-(开盘价-最低价)/2;画柱线(收盘价>开盘价,m3,m3,5,1),colorgreen; M4:=开盘价+(最高价-开盘价)/2;画柱线(收盘价<开盘价,m4,m4,5,1),colorwhite; M5:=最低价+(收盘价-最低价)/2;画柱线(收盘价<开盘价,m5,m5,5,1),colorgreen; AA:=条件函数((最低价=2.22 OR 最低价=3.33 OR 最低价=4.44 OR 最低价=5.55 OR 最低价=6.66 OR 最低价=7.77 OR 最低价=8.88 OR 最低价=9.99),1,0); 显示文字(AA=1,最低价*0.98,★三),COLORGREEN; AA1:=条件函数((最高价=2.22 OR 最高价=3.33 OR 最高价=4.44 OR 最高价=5.55 OR 最高价=6.66 OR 最高价=7.77 OR 最高价=8.88 OR 最高价=9.99),1,0); 显示文字(AA=1,最低价*0.98,★三),COLORRED; AA2:=条件函数((收盘价=2.22 OR 收盘价=3.33 OR 收盘价=4.44 OR 收盘价=5.55 OR 收盘价=6.66 OR 收盘价=7.77 OR 收盘价=8.88 OR 收盘价=9.99),1,0); 显示文字 (AA=1,最低价*0.98,★三),COLORYELLOW; 显示文字(向前引用(收盘价,2)/向前引用(开盘价,2)<0.95&& 向前引用(开盘价,1)<向前引用(收盘价,2)&& 向前引用(开盘价,1)=向前引用(收盘价,1)&& 收盘价/开盘价>=0.55&&收盘价>向前引用(收盘价,2),最低价*0.95,弃婴子),COLORYELLOW; 显示文字(开盘价>收盘价 AND 开盘价/向前引用(收盘价,1) >= 1+4/100 AND 收盘价/开盘价<=1-5/100,最低价*0.98,冒阴),COLORFF00FF; 显示文字(开盘价<收盘价 AND 开盘价/向前引用(收盘价,1) <= 1-4/100 AND 收盘价/开盘价>=1+7/100,最低价*0.99,低开),COLORFFFF00; A:=向前引用(收盘价,1);B:=向前引用(开盘价,1);S:=(A+B)/2; TTJ:=上一次条件成立位置((成交量=最高值(成交量,21))); K0:=TTJ=0; K1:=累加到指定值周期数(K0,1); K2:=累加到指定值周期数(K0,2); K3:=累加到指定值周期数(K0,3); K4:=累加到指定值周期数(K0,4); K5:=累加到指定值周期数(K0,5); K6:=累加到指定值周期数(K0,6); K7:=累加到指定值周期数(K0,7); K8:=累加到指定值周期数(K0,8); K9:=累加到指定值周期数(K0,9); K10:=累加到指定值周期数(K0,10); C1:=向前引用(收盘价,K1-1); AA:画柱线(K1<=30,向前引用(收盘价,K1-1)*1.002,向前引用(收盘价,K1-1),10,0),COLORYELLOW; BA:画柱线(K2<=30,向前引用(收盘价,K2-1)*1.002,向前引用(收盘价,K2-1),10,0),COLORWHITE; CA:画柱线(K3<=30,向前引用(收盘价,K3-1)*1.002,向前引用(收盘价,K3-1),10,0),COLORBLUE; DA:画柱线(K4<=30,向前引用(收盘价,K4-1)*1.002,向前引用(收盘价,K4-1),10,0),COLORBLUE; EA:画柱线(K5<=30,向前引用(收盘价,K5-1)*1.002,向前引用(收盘价,K5-1),10,0),COLORBLUE; FA:画柱线(K6<=30,向前引用(收盘价,K6-1)*1.002,向前引用(收盘价,K6-1),10,0),COLORBLUE; GA:画柱线(K7<=30,向前引用(收盘价,K7-1)*1.002,向前引用(收盘价,K7-1),10,0),COLORBLUE; HA:画柱线(K8<=30,向前引用(收盘价,K8-1)*1.002,向前引用(收盘价,K8-1),10,0),COLORBLUE; IA:画柱线(K9<=30,向前引用(收盘价,K9-1)*1.002,向前引用(收盘价,K9-1),10,0),COLORBLUE; JA:画柱线(K10<=30,向前引用(收盘价,K10-1)*1.002,向前引用(收盘价,K10-1),10,0),COLORBLUE; 画斜线(成交量/流通盘大小*100>3 AND 成交量>=最高值(成交量,10),收盘价,0,35,0)color339933; //量能线:条件函数(上一高点位置(成交量 ,34) ,向前引用(收盘价 ,上一高点位置(成交量 ,34) ) ,收盘价 ),COLOR00cc33,LINETHICK1; 画柱线(收盘价<开盘价 and 向前引用(收盘价,1)>向前引用(开盘价,1),向前引用(收盘价,1),向前引用(收盘价,1),30,0),COLORMAGENTA; //MA3:简单移动平均(收盘价,3),COLORWHITE,LINETHICK2; //MA7:简单移动平均(收盘价,7),COLOR00ccff,LINETHICK2; //MA13:简单移动平均(收盘价,13),COLORRED,LINETHICK2; //MA21:简单移动平均(收盘价,21),COLOR0000ff,LINETHICK1; |