阿門1:=((C-LLV(L,21))/(HHV(H,21)-LLV(L,21)))*100;
阿門2:=SMA(阿門1,13,8);
耶穌傳道:CEILING(SMA(阿門2,13,8)),LINETHICK0,COLOR0000FF;
耶穌說道:MA(3*SMA((C-LLV(L,27))/(HHV(H,27)-LLV(L,27))*100,5,1)-2*SMA(SMA((C- LLV(L,27))/(HHV(H,27)-LLV(L,27))*100,5,1),3,1),5),LINETHICK0,COLORbbffcc;
阿門3:=BARSLAST(ref(cross(耶穌傳道,耶穌說道),1));
阿門4:=ref(c,阿門3+1)>c and ref(耶穌傳道,阿門3+1)<耶穌傳道 and cross(耶穌傳道,耶穌說道);
DRAWTEXT(FILTER(阿門4>0,5),耶穌傳道,’★’),colorwhite;
DRAWTEXT(FILTER(阿門4>0,5),耶穌傳道*1.5,’底背離’),coloryellow;
阿門5:=(((((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))) – 50) * 1.032) + 50);
入教堂:IF(CROSS(阿門5,21),50,18.5),LINETHICK1,colorwhite;
DRAWTEXTABS(5,5,’概念股網(wǎng) www.iloveholybible.com’),linethick1,COLOR00EEff;
出教堂:IF(CROSS(87,阿門5),50,81.5),LINETHICK1,colorFf8080;
阿門6:=(HIGH+LOW+CLOSE+open)/4;
阿門7:=(阿門6-MA(阿門6,14))/(0.015*AVEDEV(阿門6,14));
阿門8:=(阿門6-MA(阿門6,70))/(0.015*AVEDEV(阿門6,70));
阿門9:=IF(阿門7>=150 AND 阿門7<200 AND 阿門8>=150 AND 阿門8<200,10,0);
阿門10:=IF(阿門7<=-150 AND 阿門7>-200 AND 阿門8<=-150 AND 阿門8>-200,-10,阿門9);
祈禱:(IF(阿門8>=200 AND 阿門7>=150,15,IF(阿門8<=-200 AND 阿門7<=-150,-15,阿門10))+50),colorcc9900 ,linethick2 ,crossdot;
門徒1 :=(C-EMA(C,5))/EMA(C,5)*100;
門徒2 :=(C-EMA(C,10))/EMA(C,10)*100;
門徒3 :=(C-EMA(C,21))/EMA(C,21)*100;
信眾1 :=-(C-EMA(C,5))/EMA(C,5)*100;
信眾2 :=-(C-EMA(C,10))/EMA(C,10)*100;
信眾3 :=-(C-EMA(C,21))/EMA(C,21)*100;
得救:IF(EMA((信眾1+2*信眾2+3*信眾3)/6,4)<-3.3,100,81),color00ff00;
起信:IF(EMA((門徒1+2*門徒2+3*門徒3)/6,4)<-3.3,0,18),coloryellow;