All Forums  Origin Forum for Programming  LabTalk Forum  Modifying WKSANALY.OGS

Note: You must be registered in order to post a reply.
To register, click here. Registration is FREE!

Screensize: 640 x 480 800 x 600 1024 x 768 1280 x 1024 UserName: Password: Anti-Spam Code: Format Mode: Basic  Help  Prompt  Format: Font Andale Mono Arial Arial Black Book Antiqua Century Gothic Comic Sans MS Courier New Georgia Impact Lucida Console Script MT Bold Stencil Tahoma Times New Roman Trebuchet MS Verdana   Size 1 2 3 4 5 6   Color Black Red Yellow Pink Green Orange Purple Blue Beige Brown Teal Navy Maroon LimeGreen Message: * HTML is OFF * Forum Code is ON Smilies [quote][i]Originally posted by jonni[/i] [br]Hi, Using the correlate function in Origin appends two columns to the worksheet (Lag and Corr). I usually run this from the script window using run.section(WKSANALY,Correlate). The section is included at the end of this mail. I have a worksheet of type XYYYY... and for many columns the correlation process adds many more, if I wish to (auto)correlate all of them. What I want to do is modify the Correlate section of WKSANALY.OGS to create a new worksheet (with some defining title) with the Lag and Corr columns rather than appending them to the original. The way the section is written it looks as though I need to be careful in the additions/removals I make. Has anyone done something similar that I can follow as an example? Many thanks. jonni [Correlate] if (run.section(,CorrSelectionCK)!=0) return 1; wks.multiX=1; //Enable Multiple X columns wks.AddCol(Lag); wks.col$(wks.ncols).type=4; //Set as X fft.corr.lagdata$=%(%H,wks.ncols); wks.AddCol(Corr); wks.col$(wks.ncols).type=1; //Set as Y fft.corr.corrdata$=%(%H,wks.ncols); switch(wks.iscolsel()) { case 1: fft.corr.poslag=1; if (fft.corr(%(%H,wks.c1),%(%H,wks.c1))!=0) { doc -uw; //Refresh Worksheet type -b; type -b $General.BadCalculation; } break; case 2: fft.corr.poslag=0; if (fft.corr(%(%H,wks.c1),%(%H,wks.c1+%(%H,@O,1)))!=0) { doc -uw; //Refresh Worksheet type -b; type -b $General.BadCalculation; } break; } set %H -ue; doc -uw; return 0; [/quote]   Check here to include your profile signature. Check here to subscribe to this topic.