Comments and Ratings

Is this command similar to officedoc and winopen.m?

Nice little useful program for training your morse skills:)

I updated the code a little, if anyone is interested... (feel free to add it to the original):

To have smaller spaces between letters, change line 33 from lsp = wav(6176:23022); to lsp = wav(6176:16022);

To add danish letters æ,ø,å (can be done for any additional signs, and I probably will later), add
AE = [Dit;ssp;Dah;ssp;Dit;ssp;Dah]; % danish Æ .-.-
OE = [Dah;ssp;Dah;ssp;Dah;ssp;Dit]; % danish Ø ---.
AA = [Dit;ssp;Dah;ssp;Dah;ssp;Dit;ssp;Dah]; % danish Å .--.-
and change
vars ={'period','comma','question','slash_'}; to
vars ={'period','comma','question','slash_','AE','OE','AA'};
and change
    elseif ismember(text(i),'.,?/')
        x = findstr(text(i),'.,?/');
to
    elseif ismember(text(i),'.,?/ÆØÅ')
        x = findstr(text(i),'.,?/ÆØÅ');

to modify the speed, a resampling is added in the last part (just after the loop):
morsecode=resample(morsecode,Fs,15000); % resample to Fs/15000
if the numberused is higher than Fs, the speed will be higher, if it is lower, the speed will be lower...

This is great absolutely handy and well-written. This was what I was looking for for a long time.... Thanks. Keep up the good work.

Thank you very much! Very useful tool! For everybody who has problems like mentioned by javier seminario: You have to change some lines if you have another system setup (language):
            
Excel.ActiveChart.SeriesCollection(i).XValues = ['=' sheetname ' R2C1:R' int2str(nr+1) 'C1'];
Excel.ActiveChart.SeriesCollection(i).Values = ['=' sheetname '!R2C' int2str(i+1) ':R' int2str(nr+1) 'C' int2str(i+1)];

In this both lines as well as in the following both you have to change R (Row) and C (Column) to the abbreviations used in your language (german: Z (Zeile), S (Spalte)).

Excel.ActiveChart.SeriesCollection(noOfSeries).XValues = ['=' sheetname '!R2C' int2str(locx(j)) ':R' int2str(nr+1) 'C' int2str(locx(j))];
Excel.ActiveChart.SeriesCollection(noOfSeries).Values = ['=' sheetname '!R2C' int2str(locy(j)) ':R' int2str(nr+1) 'C' int2str(locy(j))];

In the following line you have to change word 'Sheet' (only the last one in quotation marks) to the adequate word in your language (german: Tabelle).

Sheet = get(Workbook.Sheets,'Item',['Sheet',num2str(i)]);

You can use try and catch to capture different languages.

Works perfectly and solves a problem for me. The work is much appreciated.

I don't know if this worked with Excel 2003. I had to change the following code in order to make it work:
%%%
%Excel.ActiveChart.SeriesCollection(i).XValues = ['=' sheetname '!R2C1:R' int2str(nr+1) 'C1'];
Excel.ActiveChart.SeriesCollection(i).XValues = Excel.ActiveWorkbook.Sheets.Item(sheetname).Range(['A2:A' int2str(nr+1)]);

%Excel.ActiveChart.SeriesCollection(i).Values = ['"=' sheetname '!R2C' int2str(i+1) ':R' int2str(nr+1) 'C' int2str(i+1) '"'];
Excel.ActiveChart.SeriesCollection(i).Values = Excel.ActiveWorkbook.Sheets.Item(sheetname).Range([Excel.ActiveWorkbook.Sheets.Item(sheetname).Cells.Item(int2str(i+1)).Item(2).Address ':' Excel.ActiveWorkbook.Sheets.Item(sheetname).Cells.Item(int2str(i+1)).Item(int2str(nr+1)).Address]);
%%%

Excelent work...

   I've got a problem using this function, however.. Lately I've been working on generating an automated Excel report. This report contains some figures which were imported from MATLAB using your code..
    Since these figures are pasted into my report (and saved), they are still there when I try to generate the next report.. This way, everytime I finish a report, I have to save it to another file and manually remove the figures, to avoid overlapping the next time I run the report generator program..
  My question is: Is there a Matlab routine (or activex command) to delete the figures (in an Excel spreadsheet) so they will not be present when a new report is generated???

  Hope you can give me a clue...

   Thanks in advance..
 
  Christian

Good work.
Just did not use the conventaional Euler angles as the standard 6 DOF in aviation.

Hi , While running this program , I found the following error,
*************************************
??? Index exceeds matrix dimensions.

Error in ==> morse at 23
text = varargin{1};
*****************************************
My version is 7.2(R2006a)
What I have to do?

Its a good effort. Very helpful.

Very useful, I have been looking for this for long time....

Some Errors in the .m file need to be fixed according to the document:
Matrix A:
  A(2, 3) should be Zq+Ue
  A(4, 3) should be cos(PHIe)
  A(4, 8) should be -sin(PHIe)

Not sure why nobody commented. But these are exactly what I am looking for!

Plainly, this work's application very nice and usefully for several civil, mechanical etc.. engineering areas.

I think, this file documantation, description and program-running-algorithm's flow not-regular. I know epoxi-laminate composite plate system with analytical and finite element solution technique but all-user don't know this theory and method.

If you use one-main program instead of more-sub programs (with input and output veriables) than this program and work be more likeable.

I was tested your program running algorithms to several thin and thick plate model for true-solution and shear locking effect. But I don't see shear locking program module or procedure in main-program.
Analysis results, different the Reissner-Mindlin thick plate model.

I think this files need more improvement but I know this area's works are very hard and require the more works-time.

Good works, Best Regard

Works exactly as intended. Solved a problem for me quickly and kept me from having to write a function.

This function was a great start and I was using it often with some additions/modifications. Then they upgraded me to Office 2007 at work and it was down hill from there. Seems that many of the properties have changed or are no longer available to set and numerous errors occur now. I managed to strip alot of the extras out so it would run but the graphs are all messed up when I open excel (extra series plotted for no apparent reason).

I've just used it. I have a *.dat file in which I want to change a specific number. It changes efficiently, but somehow the lines are re-arranged as one after each other horizontally instead of vertically with a small square character. It confuses me te follow the inputs in the files after using find/replace. Therefore, I sugges the author to succed keeping the original file as it was after applying the .m code.

The program is quiet good,

Well done.