九毛八公式指标
请老师把通达信暖气带改写成大智慧的 ，谢谢！！ 源码如下： MA5:=MA(C,5); MA10:=MA(C,10); MA20:=MA(C,20); MA60:=MA(C,60); MA120:=MA(C,120); MA240:=MA(C,240); ∠5:=57.3*(ATAN(100*(MA5/REF(MA5,1)-1))); ∠10:=57.3*(ATAN(100*(MA10/REF(MA10,1)-1))); ∠20:=57.3*(ATAN(100*(MA20/REF(MA20,1)-1))); ∠60:=57.3*(ATAN(100*(MA60/REF(MA60,1)-1))); ∠120:=57.3*(ATAN(100*(MA120/REF(MA120,1)-1))); C1:=REF(C,1); C2:=REF(C,2); WS1:=MA5>MA10&&MA10>MA20&&MA20>MA60&&MA60>MA120; WS2:=∠5>0&&∠10>0&&∠20>0&&∠60>0&&∠120>0; WXSS:=COUNT(WS1,2)=2&&COUNT(WS2,2)=2; WSYY:=C>MA5&&C>C1&&C>O&&WXSS&&C1公式模块：
MA5:=MA(C,5);
MA10:=MA(C,10); MA20:=MA(C,20); MA60:=MA(C,60); MA120:=MA(C,120); MA240:=MA(C,240); ∠5:=57.3*(ATAN(100*(MA5/REF(MA5,1)-1))); ∠10:=57.3*(ATAN(100*(MA10/REF(MA10,1)-1))); ∠20:=57.3*(ATAN(100*(MA20/REF(MA20,1)-1))); ∠60:=57.3*(ATAN(100*(MA60/REF(MA60,1)-1))); ∠120:=57.3*(ATAN(100*(MA120/REF(MA120,1)-1))); C1:=REF(C,1); C2:=REF(C,2); WS1:=MA5>MA10 AND MA10>MA20 AND MA20>MA60 AND MA60>MA120; WS2:=∠5>0 AND ∠10>0 AND ∠20>0 AND ∠60>0 AND ∠120>0; WXSS:=COUNT(WS1,2)=2 AND COUNT(WS2,2)=2; WSYY:=C>MA5 AND C>C1 AND C>O AND WXSS AND C1<MIN(REF(MA5,1),REF(MA10,1)); FILLRGN(MA60,MA120,MA60>MA120,RGB(240,180,180),MA60<=MA120,RGB(180,240,180)); STICKLINE(WSYY,CLOSE,OPEN,6,0),COLORYELLOW; M1:MA5; M2:MA10; M3:MA20; M4:MA60; M5:MA120;
