INPUT:最近天(30,1,360);当前月:=FRPART(ROUND(当前日期/100)/100)*100;月:=MONTH;日:=DAY;N:=if(sysparam(1)=datacount,最近天,datacount-sysparam(1)+1);HH:=HHV(HIGH,N);LL:=LLV(LOW,N);VN:=N;IF VN>DATACOUNT THENVN=DATACOUNT+1;FOR I=DATACOUNT DOWNTO DATACOUNT-VN+1 DO BEGINHH[I]:=HH[DATACOUNT];LL[I]:=LL[DATACOUNT];END;TMP:=SETLBOUND(hh,DATACOUNT-VN+1);TMP:=SETLBOUND(ll,DATACOUNT-VN+1);KKH:=BAAST(H=HH);KKL:=BARSLAST(L=LL);N低日:=SONUM(NUMTOSTR(REF(DATE,KKL),0));N高日:=STRTONUM(NUMTOSTR(REF(DATE,KKH),0));:=IF(N低日>N高日,2,1),LINE