Changeset 54


Ignore:
Timestamp:
30.10.2008 23:02:52 (11 years ago)
Author:
marcus
Message:

r39 | svn | 2008-10-06 16:06:37 +0200 (Mo, 06 Okt 2008) | 1 line

trend command: put return values of b and m into variables

File:
1 edited

Legend:

Unmodified
Added
Removed
  • SH_SHM/trunk/source/shmenu4.c

    r16 r54  
    15401540        SAMPLE   min, max;            /* new minimum and maximum of trace */ 
    15411541        REAL     dt;                  /* sample distance of current trace */ 
     1542        char     str[BC_LINELTH+1];   /* scratch string */ 
     1543        char     symbol[BC_LINELTH+1];/* scratch string */ 
    15421544 
    15431545        /* executable code */ 
    15441546 
    1545         if  (cp_pnexc(par,1,status))  return; 
     1547        if  (cp_pnexc(par,3,status))  return; 
    15461548        ml_gettrcpar( par, 1, tc, "   trace list: ", trc, &listlth, status ); 
    15471549        if  (Severe(status))  return; 
     
    15651567                db_setr( trc[t], ER_MAXVAL, max, status ); 
    15661568                if  (Severe(status))  return; 
     1569                if  (cp_pentered(par,2,status))  { 
     1570                        cp_getstr( par, 2, tc, "   symbol b-ret: ", BC_LINELTH, symbol, status ); 
     1571                        if  (Severe(status))  return; 
     1572                        sprintf( str, "%e", b ); 
     1573                        sl_setsymbol( symbol, str, status ); 
     1574                        if  (Severe(status))  return; 
     1575                } /*endif*/ 
     1576                if  (cp_pentered(par,3,status))  { 
     1577                        cp_getstr( par, 3, tc, "   symbol m-ret: ", BC_LINELTH, symbol, status ); 
     1578                        if  (Severe(status))  return; 
     1579                        sprintf( str, "%e", m ); 
     1580                        sl_setsymbol( symbol, str, status ); 
     1581                        if  (Severe(status))  return; 
     1582                } /*endif*/ 
    15671583        } /*endfor*/ 
    15681584 
Note: See TracChangeset for help on using the changeset viewer.