把海底捞鱼改成通达信

编写要求：

input:N(5,1,100);DRAWGBK(CLOSE,COLORRGB(14,156,85),COLORRGB(38,0,73),1);X7:=EMA(EMA(EMA(HIGH,5),5),5);下轨:X7*0.9,POINTDOT,LINETHICK1,color1F89EE;上轨:X7*1.1,POINTDOT,LINETHICK1,color2ED85B;快:=EMA(CLOSE,3);短:=EMA(CLOSE,5);MID:=MA(CLOSE,26);MA34:MA(CLOSE,34),color93C589;MA55:=MA(CLOSE,55);VAR1:=(OPEN+LOW+HIGH+CLOSE)/4;支撑:=EMA(VAR1,5);压力:HHV(支撑,20),POINTDOT,LINETHICK3,colorFFFF;XL1:=LLV(HIGH,30);MA5:=LLV(LOW,3)=LLV(LOW,60) AND CLOSE/REF(CLOSE,1)>=1.04;DRAWTEXT(FILTER(MA5>0 AND LOW,3),LOW,'←全仓'),color13FF;AA12:=MA(CLOSE,5);AA10:MA(CLOSE,10),colorFF;BB10:=MA(CLOSE,12);BB12:=(ATAN(AA10-REF(AA10,1)))*3.1416*10;BB20:=(ATAN(BB10-REF(BB10,1)))*3.1416*10;MA13:MA(CLOSE,13);PARTLINE(MA13-REF(MA13,1)>0,MA13),LINETHICK2,colorFF;PARTLINE(MA13-REF(MA13,1)<0,MA13),LINETHICK2,colorFF00;FILLRGN(BB10<=AA10 AND BB20>=1 AND BB12>=1,AA10,BB10),colorFF;FILLRGN(BB10>=AA10 AND BB12<=1 AND BB12<=1,AA10,BB10),colorFF00;AA20:MA(CLOSE,20),colorFF00FF;AA22:=(ATAN(AA20-REF(AA20,1)))*3.1416*10;BB22:=MA(CLOSE,22);VABR1:=(ATAN(BB22-REF(BB22,1)))*3.1416*10;DRAWTEXT(CROSS(快,短) AND BB12>1 AND 上轨-REF(上轨,1)>0,LOW,'●回头望月'),colorFF870E;FILLRGN(BB22<=AA20 AND VABR1>=1 AND AA22>=1,AA20,BB22),colorFF00FF;FILLRGN(BB22>=AA20 AND VABR1<=1 AND AA22<=1,AA20,BB22),colorFFFF;DRAWTEXT(CROSS(AA10,AA20) AND BB12>1 AND CLOSE>OPEN AND HIGH<压力,LOW-0.12,'★海底捞鱼'),color56A1FF;DRAWTEXT(FILTER(LOW<=MA34 AND CLOSE>=MA55 AND CLOSE>OPEN AND HIGH<压力 AND MA55-REF(MA55,1)>0 AND BB12>1 AND MA34-REF(MA34,1)>0,11),LOW,'★回头望月'),colorFF00;VABR2:=1;FFF:=(MA(CLOSE,80)-MA(CLOSE,13)/3)*VABR2;追涨:=MA((CLOSE-FFF)/FFF,1);MA120:=IF(CROSS(追涨,0) AND LOW/REF(HIGH,1)<1,0.1,0);DRAWTEXT(FILTER(MA120>0,4),LOW,'★追涨');WH:=MA(CLOSE,120);MA1:=CROSS(AA20,WH);DRAWTEXT(MA1 AND WH-REF(WH,1)>0 AND MA55-REF(MA55,1)>0 AND LOW<=AA20,LOW,'★回头望月'),colorFF0000;DRAWTEXT(CROSS(AA10,AA20) AND BB12>0.9 AND CLOSE>OPEN AND HIGH<压力,LOW-0.2,'机会难得'),colorC154FF;MA2:=EMA(CLOSE,5);MA4:=EMA(CLOSE,12);CSX1:=EMA(CLOSE,50);CSX2:=REF(OPEN,1);CSX3:=CSX2MA2;CSX7:=CLOSE>MA4;X1:=CLOSE>CSX1;DRAWTEXT(CSX3 AND CSX4 AND CSX5 AND CSX6 AND CSX7 AND X1 AND CROSS(AA10,AA20),LOW-0.12,'←●均线粘合'),color5EC3F6;X2:=(3*CLOSE+LOW+OPEN+HIGH)/6;X3:=(20*X2+19*REF(X2,1)+18*REF(X2,2)+17*REF(X2,3)+16*REF(X2,4)+15*REF(X2,5)+14*REF(X2,6)+13*REF(X2,7)+12*REF(X2,8)+11*REF(X2,9)+10*REF(X2,10)+9*REF(X2,11)+8*REF(X2,12)+7*REF(X2,13)+6*REF(X2,14)+5*REF(X2,15)+4*REF(X2,16)+3*REF(X2,17)+2*REF(X2,18)+REF(X2,20))/210;L14:=EMA(SLOPE(CLOSE,21)*20+CLOSE,55);L15:=(CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60))*100;L16:=SMA(L15,5,1);L17:=SMA(L16,10,1);L18:=CROSS(L17,L16);L19:=L17>80 OR L16>80;上1:=L18 AND L19;DRAWTEXT(上1 AND L14>X3,HIGH+0.3,'←●清仓！'),colorFF6800;DRAWTEXT(上1 AND L14>X3,HIGH+0.2,'←★坚决卖'),colorFFFF00;DRAWTEXT(FILTER(HIGH>上轨,5),HIGH+0.12,'←●逢高快跑'),color6285D6;DRAWTEXT(FILTER(LOWXL1 AND BB12>1,15),LOW-0.06,'←●海底捞鱼'),colorB2008C;DRAWTEXT(FILTER(LOW<=XL1 AND CLOSE>XL1 AND CLOSE>OPEN AND AA10-REF(AA10,1)>0,5),LOW-0.1,'←●海底捞鱼'),colorD6FF;RSV:=SMA(HIGH,21,2)*1.05;DRAWTEXT(FILTER(HIGH>上轨 AND CLOSE<上轨 AND CLOSE压力 AND CLOSE<压力 AND AA10-REF(AA10,1)<1 AND BB12<1 AND CLOSE=CLOSE,CLOSE,OPEN,9,0),colorFF7100;STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,8,0),colorFF8200;STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,7,0),colorFF9000;STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,6.5,0),colorFF9800;STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,6,0),colorFFA800;STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,5,0),colorFFB900;STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,3.5,0),colorFFC500;STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,1.5,0),colorFFEC00;STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,9,0),color70084;STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,8,0),colorA3;STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,7,0),colorB7;STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,6.3,0),colorC5;STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,6,0),colorCD;STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,5.3,0),colorE2;STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,4.5,0),color3EE9;STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,3,0),color754E9;STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,1.5,0),color76EF3;STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,0.7,0),color78CFD;STICKLINE(CLOSE>OPEN,OPEN,LOW,1,0),color726CA;STICKLINE(CLOSE>OPEN,OPEN,LOW,0.5,0),colorF91FF;STICKLINE(CLOSE>OPEN,CLOSE,HIGH,1,0),color726CA;STICKLINE(CLOSE>OPEN,CLOSE,HIGH,0.5,0),colorF91FF;STICKLINE(OPEN>CLOSE,CLOSE,LOW,1,0),colorDE9100;STICKLINE(OPEN>CLOSE,OPEN,HIGH,1,0),colorDE9100;STICKLINE(CLOSE/OPEN>1.04 AND CLOSE0,CLOSE,OPEN,9,0),color90FF;STICKLINE(CLOSE/OPEN>1.04 AND CLOSE0,CLOSE,OPEN,8,0),color9FFF;STICKLINE(CLOSE/OPEN>1.04 AND CLOSE0,CLOSE,OPEN,4,0),colorB5FF;STICKLINE(CLOSE/OPEN>1.04 AND CLOSE0,CLOSE,OPEN,2,0),colorE4FF;STICKLINE(CLOSE/OPEN>1.04 AND CLOSE0,OPEN,LOW,0.7,0),colorFFFF;STICKLINE(CLOSE/OPEN>1.04 AND CLOSE0,CLOSE,HIGH,0.7,0),colorFFFF;STICKLINE(CLOSERSV AND CLOSERSV AND CLOSERSV AND CLOSERSV AND CLOSERSV AND CLOSERSV AND CLOSE=MA(CLOSE,20),50,20);RL4:=IF(RSV24>RL1 AND REF(RSV24,1)<=RL1,LLV(REF(LOW,1),BARSLAST(RSV24<=RL1 AND REF(RSV24,1)>RL1)-1),REF(LLV(REF(LOW,1),BARSLAST(RSV24<=RL1 AND REF(RSV24,1)>RL1)-1),BARSLAST(RSV24>RL1 AND REF(RSV24,1))));RL42:=IF(LOW均5 AND RSV24>L2L,LOW,REF(LOW,BARSLAST(LOW均5 AND RSV24>L2L))),POINTDOT,LINETHICK3,colorFF;支撑位:IF(CROSS(RSV24,L2L),LOW,REF(LOW,BARSLAST(CROSS(RSV24,L2L)))),colorFFFF;ZHAOHL:IF(CROSS(L2L,RSV24),HIGH,REF(HIGH,BARSLAST(CROSS(L2L,RSV24)))),ALIGN0,color567DBC;海底:=MA(CLOSE,4);X7:=EMA(EMA(EMA(HIGH,9),9),9);海底2:=X7*0.92;中轨道:=X7*0.933;VARQS1:=MA(CLOSE,2);DRAWTEXT(CROSS(VARQS1,海底) AND LOW<=海底2 AND CLOSE>=中轨道,LOW-0.01,'←●底部'),colorFFFF;DRAWTEXT(CLOSE/OPEN>1.04 AND BB12>1 AND AA10-REF(AA10,1)>0 AND HIGH<=上轨 AND CLOSE>AA10 AND CLOSE>OPEN,LOW-0.05,'←●追击');

解答：

N:=5;