1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
| VO:=MA(VOL,N);
MAGIC_VOL:=MA(VO/LLV(VO,M),M);
C_BBI:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12))/3;
H_BBI:=(MA(HIGH,3)+MA(HIGH,6)+MA(HIGH,12))/3;
L_BBI:=(MA(LOW,3)+MA(LOW,6)+MA(LOW,12))/3;
MAGIC_CP_BBI:(C_BBI-LLV(L_BBI,M))/(HHV(H_BBI,M)-LLV(L_BBI,M));
POWER:MAGIC_CP_BBI*MAGIC_VOL;
POWER_BBI:=(MA(POWER,3)+MA(POWER,6)+MA(POWER,12)+MA(POWER,24))/4;
POWER_BBI_AD:POWER_BBI+1.809*STD(POWER_BBI,M);
POWER_BBI_DE:POWER_BBI-2.191*STD(POWER_BBI,M);
DRAWTEXT(CROSS(POWER,POWER_BBI_AD),POWER,'B'),COLORGREEN,LINETHICK3;
DRAWTEXT(CROSS(POWER_BBI_AD,POWER),POWER,'S'),COLORRED,LINETHICK3;
HI:FINDHIGH(POWER,0,R,1);
LO:FINDLOW(POWER,0,R,1);
|