gspt1:=1;
gspt2:=STRCAT(STRCAT('总收入同比增长:',CON2STR(FINANCE(44),2)),'% ');
gspt3:=STRCAT(gspt2,STRCAT(STRCAT('净利润同比增长:',CON2STR(FINANCE(43),2)),'% '));
gspt4:=STRCAT(gspt3,STRCAT(STRCAT('资产负债率:',CON2STR(FINANCE(9),2)),'% '));
gspt5:=STRCAT(gspt4,STRCAT(STRCAT('每股现金流:',CON2STR(FINANCE(25)/FINANCE(1),2)),'元'));
DRAWTEXT_FIX(ISLASTBAR,0.001,0.00,0,STRCAT(gspt5,0)),COLORFF0000;
gspt6:=STRCAT(DYBLOCK,' ');
gspt7:=STRCAT(gspt6,STRCAT(HYBLOCK,' '));
gspt8:=STRCAT(gspt7,STRCAT(DYBLOCK,' '));
gspt9:=STRCAT(gspt8,STRCAT(GNBLOCK,' '));
DRAWTEXT_FIX(ISLASTBAR,0.001,0.06,0,STRCAT(gspt9,0)),COLOR00FF00;
gspt10:=REF(EMA((HIGH+LOW+CLOSE)/3,10),1);
gspt11:=EMA(HHV(HIGH,10),3);
gspt12:=EMA(LLV(LOW,10),3);
牛熊值:EMA(gspt10*2 - gspt12,8)*gspt1,LINETHICK2,COLOR800080;
IF(C>=REF(牛熊值,1),牛熊值,DRAWNULL),LINETHICK2,COLORFFA500;
IF(C<=REF(牛熊值,1),牛熊值,DRAWNULL),LINETHICK2,COLOR008000;
DRAWKLINE(HIGH,OPEN,LOW,CLOSE);
gspt13:=EMA(C,14);
gspt14:=(gspt13-REF(gspt13,1))/REF(gspt13,1)*100;
gspt15:=REF(C,1);
gspt16:=IF(NAMELIKE('ST') OR NAMELIKE('*ST'),0.05,IF(INBLOCK('创业板') OR INBLOCK('科创板'),0.2,0.1));
gspt17:=C>=ZTPRICE(gspt15,gspt16) AND C=H AND PERIOD=5;
STICKLINE(gspt17,O,C,2.8,0),COLORMAGENTA;
STICKLINE(gspt17,H,L,0,0),COLORMAGENTA;
gspt18:=REF(C,1);
gspt19:=IF(NAMELIKE('ST') OR NAMELIKE('*ST'),0.05,IF(INBLOCK('创业板') OR INBLOCK('科创板'),0.2,0.1));
gspt20:=C>=ZTPRICE(gspt18,gspt19) AND C=H AND PERIOD=5;
gspt21:=gspt20 AND COUNT(gspt20,20)=1;
gspt22:=V/MA(V,5)>1.8;
首板:=gspt21 AND gspt22 AND C>O;
gspt23:=(HIGH+LOW+CLOSE)/3;
gspt24:=VOL/IF(HIGH=LOW,4,HIGH-LOW);
gspt25:=IF(CAPITAL=0,gspt24*(gspt23-MIN(CLOSE,OPEN)),gspt24*IF(HIGH=LOW,1,(MIN(OPEN,CLOSE)-LOW)));
gspt26:=IF(CAPITAL=0,gspt24*(MIN(OPEN,CLOSE)-LOW),gspt24*IF(HIGH=LOW,1,(gspt23-MIN(CLOSE,OPEN))));
gspt27:=IF(CAPITAL=0,gspt24*(HIGH-MAX(OPEN,CLOSE)),gspt24*IF(HIGH=LOW,1,(HIGH-MAX(OPEN,CLOSE))));
gspt28:=IF(CAPITAL=0,gspt24*(MAX(CLOSE,OPEN)-gspt23),gspt24*IF(HIGH=LOW,1,(MAX(CLOSE,OPEN)-gspt23)));
gspt29:=((gspt25+gspt26)-(gspt27+gspt28))/IF(CAPITAL=0,10000,10000);
gspt30:=SMA(IF(C>=REF(C,1),gspt29,-gspt29/100),2,1);
gspt31:=SMA(gspt30*120/FROMOPEN*5,2,1);
gspt32:=SMA(gspt31,5,1);
gspt33:=SMA(gspt32,5,1);
gspt34:=MA(CLOSE,5);
gspt35:=MA(CLOSE,60);
gspt36:=(REF(CLOSE,3)-CLOSE)/REF(CLOSE,3)*100>5;
gspt37:=FILTER(gspt36,10);
gspt38:=BARSLAST(gspt37);
gspt39:=REF(HIGH,gspt38+2);
gspt40:=REF(HIGH,gspt38+1);
gspt41:=REF(HIGH,gspt38);
gspt42:=MAX(gspt39,gspt40);
gspt43:=MAX(gspt42,gspt41);
gspt44:=(CLOSE-REF(CLOSE,1))/REF(CLOSE,1)*100>5;
gspt45:=gspt38< 150;
gspt46:=(OPEN-gspt43)/gspt43*100< 30;
gspt47:=(CLOSE-LLV(LOW,gspt38))/LLV(LOW,gspt38)*100< 50;
gspt48:=(CLOSE-REF(OPEN,5))/REF(OPEN,5)*100< 30;
gspt49:=VOL/MA(VOL,5)< 3.5;
gspt50:=(CLOSE-REF(CLOSE,89))/REF(CLOSE,89)*100< 80;
gspt51:=gspt44 AND gspt45 AND gspt46 AND gspt47 AND gspt48 AND gspt49 AND gspt50;
暴利:=FILTER(gspt51,15);
gspt52:=(((CLOSE-gspt35)/gspt35)< 0.1);
gspt53:=(((CLOSE-gspt34)/gspt34)< 0.3);
gspt54:=((gspt52=1) AND (gspt53=1))*0.2;
gspt55:=(((gspt54=0) AND (REF(gspt54,1)=0.2)) AND (REF((COUNT((gspt54=0.2),10)=10),1)=1))*-0.1;
DRAWTEXT_FIX(1,0.980,20,1,'公式平台,公式源码 http://www.gspt.com'),COLOR333333;
主筹突破:=gspt55=-0.1;
gspt56:=(暴利 OR 主筹突破);
gspt57:=DMA(AMOUNT/VOL/100,VOL/CAPITAL);
gspt58:=CLOSE/(REF(CLOSE,1))>1.05 AND (CLOSE/O>1.05);
gspt59:=(VOL/REF(VOL,1)>1.2 AND COUNT(CLOSE>OPEN,1)) OR (LOW>REF(HIGH,1) AND COUNT(OPEN>CLOSE,1) AND VOL/REF(VOL,1)>1.2);
主力筹码:=gspt56 AND C/REF(C,1)>1.095 AND gspt59 AND gspt58;
主升首板信号:=首板 AND 主力筹码;
DRAWICON(主升首板信号,L*0.97,42);
DRAWTEXT(主升首板信号,L*0.95,' ←主升首'),COLORYELLOW;