Rev 8163 | Rev 8177 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed
| Rev 8163 | Rev 8171 | ||
|---|---|---|---|
| Line 794... | Line 794... | ||
| 794 | } |
794 | } |
| 795 | else { |
795 | else { |
| 796 | t=tstart+i*v; eval_setval(varpos,t); |
796 | t=tstart+i*v; eval_setval(varpos,t); |
| 797 | dc[0]=strevalue(p1); dc[1]=strevalue(p2); |
797 | dc[0]=strevalue(p1); dc[1]=strevalue(p2); |
| 798 | } |
798 | } |
| 799 | if(! |
799 | if(!isfinite(dc[0]) || !isfinite(dc[1])) ic[0]=ic[1]=-BOUND; |
| 800 | else scale(dc,ic,1); |
800 | else scale(dc,ic,1); |
| 801 | if(vimg_enable) vimg_plot1 (scale_buf[0],scale_buf[1]); |
801 | if(vimg_enable) vimg_plot1 (scale_buf[0],scale_buf[1]); |
| 802 | if(j==0) { |
802 | if(j==0) { |
| 803 | gdImageSetPixel(image,ic[0],ic[1],pm->color[0]); j++; |
803 | gdImageSetPixel(image,ic[0],ic[1],pm->color[0]); j++; |
| 804 | } |
804 | } |
| Line 853... | Line 853... | ||
| 853 | else { |
853 | else { |
| 854 | if(n>LEVEL_LIM+1) n=LEVEL_LIM+1; |
854 | if(n>LEVEL_LIM+1) n=LEVEL_LIM+1; |
| 855 | for(i=0;i<n-1;i++) { |
855 | for(i=0;i<n-1;i++) { |
| 856 | fnd_item(pm->str,i+2,tc); |
856 | fnd_item(pm->str,i+2,tc); |
| 857 | d=strevalue(tc); |
857 | d=strevalue(tc); |
| 858 | if( |
858 | if(isfinite(d)) ld->levels[i]=d; else ld->levels[i]=0; |
| 859 | } |
859 | } |
| 860 | ld->levelcnt=n-1; |
860 | ld->levelcnt=n-1; |
| 861 | } |
861 | } |
| 862 | levelcurve(ld); |
862 | levelcurve(ld); |
| 863 | for(i=0;i<ld->datacnt;i++) { |
863 | for(i=0;i<ld->datacnt;i++) { |
| Line 1238... | Line 1238... | ||
| 1238 | snprintf(buf,sizeof(buf),"%s",p); |
1238 | snprintf(buf,sizeof(buf),"%s",p); |
| 1239 | for(j=0, p1=buf; j<pm->pcnt; j++, p1=p2) { |
1239 | for(j=0, p1=buf; j<pm->pcnt; j++, p1=p2) { |
| 1240 | p2=find_item_end(p1); if(*p2) *p2++=0; |
1240 | p2=find_item_end(p1); if(*p2) *p2++=0; |
| 1241 | p1=find_word_start(p1); |
1241 | p1=find_word_start(p1); |
| 1242 | if(*p1) pm->pd[j]=strevalue(p1); else pm->pd[j]=0; |
1242 | if(*p1) pm->pd[j]=strevalue(p1); else pm->pd[j]=0; |
| 1243 | if(! |
1243 | if(!isfinite(pm->pd[j])) { |
| 1244 | if(j<o->required_parms) return -1; |
1244 | if(j<o->required_parms) return -1; |
| 1245 | else {pm->pd[j]=0;break;} |
1245 | else {pm->pd[j]=0;break;} |
| 1246 | } |
1246 | } |
| 1247 | } |
1247 | } |
| 1248 | collapse_item(p,o->required_parms); |
1248 | collapse_item(p,o->required_parms); |