| 以文本方式查看主题 - 金字塔客服中心 - 专业程序化交易软件提供商 (http://www.weistock.com/bbs/index.asp) -- 公式模型编写问题提交 (http://www.weistock.com/bbs/list.asp?boardid=4) ---- 该指标放金字塔，指标有问题 (http://www.weistock.com/bbs/dispbbs.asp?boardid=4&id=182742) |
| -- 作者：毛豆 -- 发布时间：2020/10/29 10:59:44 -- 该指标放金字塔，指标有问题 Z1:=STRCAT(HYBLOCK,\' \'); Z2:=STRCAT(Z1,DYBLOCK); Z3:=STRCAT(Z2,\' \'); DRAWTEXT_FIX(ISLASTBAR,0,0.03,0,STRCAT(Z3,GNBLOCK)),COLORLIRED; DRAWTEXT_FIX(ISLASTBAR,0,0.09,0,FGBLOCK),COLORLIMAGENTA; MAA5:MA(C,5),COLORFF00FF,LINETHICK2; MAA10:=MA(C,10); MAA30:MA(C,30),COLORRED; KS:IF(MAA10>MAA30,MAA10,MAA30),COLORBLUE; A3:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100; A4:=SMA(A3,3,1); A5:=SMA(A4,3,1); A6:=3*A4-2*A5; A7:=C-REF(C,1); A8:=100*EMA(EMA(A7,6),6)/EMA(EMA(ABS(A7),6),6); 买:=LLV(A8,2)=LLV(A8,7) AND COUNT(A8<0,2) AND CROSS(A8,MA(A8,2)); DRAWTEXT(FILTER(买=1,5),LOW-0.05,\'↖跟庄买进\'),COLORYELLOW; STICKLINE(买,OPEN,CLOSE,2,0),COLORYELLOW; VAR1:=CLOSE>REF(CLOSE,1) AND CLOSE>REF(CLOSE,2); VAR2:=REF(VAR1,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2); VAR3:=REF(VAR2,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2); VAR4:=REF(VAR3,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2); VAR5:=REF(VAR4,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2); VAR6:=REF(VAR5,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2); VAR7:=REF(VAR6,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2); VAR8:=REF(VAR7,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2); VAR9:=REF(VAR8,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2); VARA:=REF(VAR9,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2); VARB:=REF(VARA,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2); VARC:=REF(VARB,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2); STICKLINE(VAR1 OR VAR2 OR VAR3 OR VAR4 OR VAR5 OR VAR6 OR VAR7 OR VAR8 OR VAR9 OR VARA OR VARB OR VARC,CLOSE,REF(CLOSE,1),3,1),COLORRED;{红1} VARD:=CLOSE<REF(CLOSE,1) AND CLOSE<REF(CLOSE,2); VARE:=REF(VARD,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2); VARF:=REF(VARE,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2); VAR10:=REF(VARF,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2); VAR11:=REF(VAR10,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2); VAR12:=REF(VAR11,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2); VAR13:=REF(VAR12,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2); VAR14:=REF(VAR13,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2); VAR15:=REF(VAR14,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2); VAR16:=REF(VAR15,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2); VAR17:=REF(VAR16,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2); VAR18:=REF(VAR17,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2); STICKLINE(VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18,CLOSE,REF(CLOSE,1),3,0),COLORFFCC66; VAR19:=REF(VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18,1) AND VAR1; STICKLINE(VAR19,REF(CLOSE,1),REF(CLOSE,2),4,1),COLORYELLOW; VAR1A:=REF(VAR1 OR VAR2 OR VAR3 OR VAR4 OR VAR5 OR VAR6 OR VAR7 OR VAR8 OR VAR9 OR VARA OR VARB OR VARC,1) AND VARD; STICKLINE(VAR1A,REF(CLOSE,1),REF(CLOSE,2),5,2),COLOR00FF00; STICKLINE(VAR19,REF(CLOSE,1),REF(CLOSE,2),3,0),COLOR00C8FF; STICKLINE(VAR19,REF(CLOSE,1),REF(CLOSE,2),2,0),COLOR10ECFF; STICKLINE(VAR19,REF(CLOSE,1),REF(CLOSE,2),2,0),COLOR10FFFF; STICKLINE(VAR1A,REF(CLOSE,1),REF(CLOSE,2),3,0),COLOR00D900; STICKLINE(VAR1A,REF(CLOSE,1),REF(CLOSE,2),3,0),COLORBLUE; STICKLINE(VAR1A,REF(CLOSE,1),REF(CLOSE,2),0,0),COLOR090FF2; PMA:MA(C,5),COLORWHITE,LINETHICK2; IF(PMA>REF(PMA,1),PMA,DRAWNULL),COLORRED,LINETHICK2; IF(PMA<REF(PMA,1),PMA,DRAWNULL),COLORGREEN,LINETHICK2; T:=150; TT:=3; N1:=0; 高1:=REF(HHV(H,T),TT); 低1:=REF(LLV(L,T),TT); H1:=高1-(高1-低1)*0.191; H2:=高1-(高1-低1)*0.382; H3:=高1-(高1-低1)*0.5; H4:=高1-(高1-低1)*0.618; H5:=高1-(高1-低1)*0.809; 顶:REFDATE(高1,DATE),COLORFFFF00; 一:REFDATE(H1,DATE),DOTLINE,COLORYELLOW; 二:REFDATE(H2,DATE),DOTLINE,COLORMAGENTA; 三:REFDATE(H3,DATE),DOTLINE,COLOR00FFFF; 四:REFDATE(H4,DATE),DOTLINE,COLORMAGENTA; 五:REFDATE(H5,DATE),DOTLINE,COLORYELLOW; 低:REFDATE(低1,DATE),COLOR00FF00; TT4:=(CURRBARSCOUNT=1); DRAWTEXT(TT4 AND 顶,顶,\'顶\'),COLOR208FFF; DRAWTEXT(TT4 AND 一,一,\'0.809\'),COLOR208FFF; DRAWTEXT(TT4 AND 二,二,\'0.618\'),COLOR208FFF; DRAWTEXT(TT4 AND 三,三,\'0.5\'),COLOR208FFF; DRAWTEXT(TT4 AND 四,四,\'0.382\'),COLOR208FFF; DRAWTEXT(TT4 AND 五,五,\'0.191\'),COLOR208FFF; DRAWTEXT(TT4 AND 低,低*1.009,\'底\'),COLOR208FFF;
|
| -- 作者：FireScript -- 发布时间：2020/10/29 11:10:20 -- 其他厂商的代码 移植过来是需要做一些修改的。毕竟软件不同 代码规范和底层机制都是有差异的。大家相互之间肯定是有一定差异性存在的。 你直接放到编译器里 编辑，编译报错的地方一个个改就行了。有的只是函数名称不一样而已。 比如你这里的DRAWTEXT_FIX 在金字塔里用
DRAWTEXT 替换，但是参数位置不一样。你还需要调整下才行。 |
| -- 作者：毛豆 -- 发布时间：2020/10/29 11:18:04 -- ,FGBLOCK这个显示未定义又该怎么修改呢 |
| -- 作者：毛豆 -- 发布时间：2020/10/29 11:25:13 -- FGBLOCK这个显示未定义又该怎么修改呢 |
| -- 作者：毛豆 -- 发布时间：2020/10/29 11:29:55 -- FGBLOCK这个显示未定义怎么弄 Z1:=STRCAT(HYBLOCK,\' \'); Z2:=STRCAT(Z1,DYBLOCK); Z3:=STRCAT(Z2,\' \'); DRAWTEXT(ISLASTBAR,0,0.03,0,STRCAT(Z3,GNBLOCK)),COLORLIRED; DRAWTEXT(ISLASTBAR,0,0.09,0,FGBLOCK),COLORLIMAGENTA; MAA5:MA(C,5),COLORFF00FF,LINETHICK2; MAA10:=MA(C,10); MAA30:MA(C,30),COLORRED; KS:IF(MAA10>MAA30,MAA10,MAA30),COLORBLUE; A3:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100; A4:=SMA(A3,3,1); A5:=SMA(A4,3,1); A6:=3*A4-2*A5; A7:=C-REF(C,1); A8:=100*EMA(EMA(A7,6),6)/EMA(EMA(ABS(A7),6),6); 买:=LLV(A8,2)=LLV(A8,7) AND COUNT(A8<0,2) AND CROSS(A8,MA(A8,2)); DRAWTEXT(FILTER(买=1,5),LOW-0.05,\'↖跟庄买进\'),COLORYELLOW; STICKLINE(买,OPEN,CLOSE,2,0),COLORYELLOW; VAR1:=CLOSE>REF(CLOSE,1) AND CLOSE>REF(CLOSE,2); VAR2:=REF(VAR1,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2); VAR3:=REF(VAR2,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2); VAR4:=REF(VAR3,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2); VAR5:=REF(VAR4,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2); VAR6:=REF(VAR5,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2); VAR7:=REF(VAR6,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2); VAR8:=REF(VAR7,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2); VAR9:=REF(VAR8,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2); VARA:=REF(VAR9,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2); VARB:=REF(VARA,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2); VARC:=REF(VARB,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2); STICKLINE(VAR1 OR VAR2 OR VAR3 OR VAR4 OR VAR5 OR VAR6 OR VAR7 OR VAR8 OR VAR9 OR VARA OR VARB OR VARC,CLOSE,REF(CLOSE,1),3,1),COLORRED;{红1} VARD:=CLOSE<REF(CLOSE,1) AND CLOSE<REF(CLOSE,2); VARE:=REF(VARD,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2); VARF:=REF(VARE,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2); VAR10:=REF(VARF,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2); VAR11:=REF(VAR10,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2); VAR12:=REF(VAR11,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2); VAR13:=REF(VAR12,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2); VAR14:=REF(VAR13,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2); VAR15:=REF(VAR14,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2); VAR16:=REF(VAR15,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2); VAR17:=REF(VAR16,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2); VAR18:=REF(VAR17,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2); STICKLINE(VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18,CLOSE,REF(CLOSE,1),3,0),COLORFFCC66; VAR19:=REF(VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18,1) AND VAR1; STICKLINE(VAR19,REF(CLOSE,1),REF(CLOSE,2),4,1),COLORYELLOW; VAR1A:=REF(VAR1 OR VAR2 OR VAR3 OR VAR4 OR VAR5 OR VAR6 OR VAR7 OR VAR8 OR VAR9 OR VARA OR VARB OR VARC,1) AND VARD; STICKLINE(VAR1A,REF(CLOSE,1),REF(CLOSE,2),5,2),COLOR00FF00; STICKLINE(VAR19,REF(CLOSE,1),REF(CLOSE,2),3,0),COLOR00C8FF; STICKLINE(VAR19,REF(CLOSE,1),REF(CLOSE,2),2,0),COLOR10ECFF; STICKLINE(VAR19,REF(CLOSE,1),REF(CLOSE,2),2,0),COLOR10FFFF; STICKLINE(VAR1A,REF(CLOSE,1),REF(CLOSE,2),3,0),COLOR00D900; STICKLINE(VAR1A,REF(CLOSE,1),REF(CLOSE,2),3,0),COLORBLUE; STICKLINE(VAR1A,REF(CLOSE,1),REF(CLOSE,2),0,0),COLOR090FF2; PMA:MA(C,5),COLORWHITE,LINETHICK2; IF(PMA>REF(PMA,1),PMA,DRAWNULL),COLORRED,LINETHICK2; IF(PMA<REF(PMA,1),PMA,DRAWNULL),COLORGREEN,LINETHICK2; T:=150; TT:=3; N1:=0; 高1:=REF(HHV(H,T),TT); 低1:=REF(LLV(L,T),TT); H1:=高1-(高1-低1)*0.191; H2:=高1-(高1-低1)*0.382; H3:=高1-(高1-低1)*0.5; H4:=高1-(高1-低1)*0.618; H5:=高1-(高1-低1)*0.809; 顶:REFDATE(高1,DATE),COLORFFFF00; 一:REFDATE(H1,DATE),DOTLINE,COLORYELLOW; 二:REFDATE(H2,DATE),DOTLINE,COLORMAGENTA; 三:REFDATE(H3,DATE),DOTLINE,COLOR00FFFF; 四:REFDATE(H4,DATE),DOTLINE,COLORMAGENTA; 五:REFDATE(H5,DATE),DOTLINE,COLORYELLOW; 低:REFDATE(低1,DATE),COLOR00FF00; TT4:=(CURRBARSCOUNT=1); DRAWTEXT(TT4 AND 顶,顶,\'顶\'),COLOR208FFF; DRAWTEXT(TT4 AND 一,一,\'0.809\'),COLOR208FFF; DRAWTEXT(TT4 AND 二,二,\'0.618\'),COLOR208FFF; DRAWTEXT(TT4 AND 三,三,\'0.5\'),COLOR208FFF; DRAWTEXT(TT4 AND 四,四,\'0.382\'),COLOR208FFF; DRAWTEXT(TT4 AND 五,五,\'0.191\'),COLOR208FFF; DRAWTEXT(TT4 AND 低,低*1.009,\'底\'),COLOR208FFF;
|