Help with strings

Share icon

Description
I have a number of waves named:

alp, bet, bAlp, bBet, blpCPM, betCPM, balpCPM, bbetCPM, alpBKG, betBKG

I am trying to write a script that defines a number and adds the number to the end of them. For example, if I wanted to add the number 160, I would change their names to

alp160, bet160, bAlp160, bBet160, blpCPM160, betCPM160, balpCPM160, bbetCPM160, alpBKG160, betBKG160

Can you help me?

PiSTosHiP 
Macro Demo()
    Make/O alp, bet, bAlp, bBet, blpCPM, betCPM, balpCPM, bbetCPM, alpBKG, betBKG
    String listOfWaves="alp;bet;bAlp;bBet;blpCPM;betCPM;balpCPM;bbetCPM;alpBKG;betBKG;"
    RenameWaves(listOfWaves,160)
End
 
Function RenameWaves(listOfWaveNames,suffixNum)
    String listOfWaveNames
    Variable suffixNum
    
    Variable i, n=ItemsInList(listOfWaveNames)
    for( i=0; i<n; i+=1 )
        String name= StringFromList(i,listOfWaveNames)
        String newName = name + num2istr(suffixNum)
        Rename $name, $newName
    endfor
End

--Jim Prouty
Software Engineer, WaveMetrics, Inc.

April 28, 2012 at 09:25 am - Permalink