From svnnotify @ sourceforge.jp Sat Oct 2 21:25:19 2010 From: svnnotify @ sourceforge.jp (svnnotify @ sourceforge.jp) Date: Sat, 02 Oct 2010 21:25:19 +0900 Subject: [Ttssh2-commit] =?utf-8?b?WzQxMTddICBiZWVwIOODnuOCr+ODreOBqw==?= =?utf-8?b?5byV5pWw44KS6L+95Yqg44GX44Gf44CC?= Message-ID: <1286022319.443709.28590.nullmailer@users.sourceforge.jp> Revision: 4117 http://sourceforge.jp/projects/ttssh2/svn/view?view=rev&revision=4117 Author: yutakapon Date: 2010-10-02 21:25:19 +0900 (Sat, 02 Oct 2010) Log Message: ----------- beep マクロに引数を追加した。 Modified Paths: -------------- trunk/teraterm/ttpmacro/ttl.c -------------- next part -------------- Modified: trunk/teraterm/ttpmacro/ttl.c =================================================================== --- trunk/teraterm/ttpmacro/ttl.c 2010-09-29 11:14:29 UTC (rev 4116) +++ trunk/teraterm/ttpmacro/ttl.c 2010-10-02 12:25:19 UTC (rev 4117) @@ -271,13 +271,42 @@ WORD TTLBeep() { - if (GetFirstChar()==0) - { - MessageBeep(0); - return 0; + int val = 0; + WORD Err = 0; + UINT type = MB_OK; + + if (CheckParameterGiven()) { + GetIntVal(&val, &Err); + if (Err!=0) return Err; + + switch (val) { + case 0: + type = -1; + break; + case 1: + type = MB_ICONASTERISK; + break; + case 2: + type = MB_ICONEXCLAMATION; + break; + case 3: + type = MB_ICONHAND; + break; + case 4: + type = MB_ICONQUESTION; + break; + case 5: + type = MB_OK; + break; + default: + return ErrSyntax; + break; + } } - else - return ErrSyntax; + + MessageBeep(type); + + return 0; } WORD TTLBreak() { From svnnotify @ sourceforge.jp Sat Oct 2 21:43:45 2010 From: svnnotify @ sourceforge.jp (svnnotify @ sourceforge.jp) Date: Sat, 02 Oct 2010 21:43:45 +0900 Subject: [Ttssh2-commit] =?utf-8?b?WzQxMThdICBiZWVwIOODnuOCr+ODreOBqw==?= =?utf-8?b?5byV5pWw44KS6L+95Yqg44GX44Gf44CC?= Message-ID: <1286023425.793535.1741.nullmailer@users.sourceforge.jp> Revision: 4118 http://sourceforge.jp/projects/ttssh2/svn/view?view=rev&revision=4118 Author: yutakapon Date: 2010-10-02 21:43:45 +0900 (Sat, 02 Oct 2010) Log Message: ----------- beep ??????綣????申?????? Modified Paths: -------------- trunk/doc/en/html/about/history.html trunk/doc/en/html/macro/command/beep.html trunk/doc/ja/html/about/history.html trunk/doc/ja/html/macro/command/beep.html -------------- next part -------------- Modified: trunk/doc/en/html/about/history.html =================================================================== --- trunk/doc/en/html/about/history.html 2010-10-02 12:25:19 UTC (rev 4117) +++ trunk/doc/en/html/about/history.html 2010-10-02 12:43:45 UTC (rev 4118) @@ -42,6 +42,7 @@ +
-beep +beep [<sound type>]
-Plays a waveform sound(Windows Default Beep sound).
+Plays a waveform sound.
+The <sound type> parameter can be one of the following values. The default value is the Windows Default Beep sound.
Value | +Meaning | +
---|---|
0 | +A simple beep | +
1 | +Windows Asterisk sound | +
2 | +Windows Exclamation sound | +
3 | +Windows Critical Stop sound | +
4 | +Windows Question sound | +
5 | +Windows Default Beep sound | +
for i 1 10 - beep + beep 0 pause 1 nextModified: trunk/doc/ja/html/about/history.html =================================================================== --- trunk/doc/ja/html/about/history.html 2010-10-02 12:25:19 UTC (rev 4117) +++ trunk/doc/ja/html/about/history.html 2010-10-02 12:43:45 UTC (rev 4118) @@ -42,6 +42,7 @@
-beep +beep [<sound type>]
-WAVE ?ョ??????SystemDefault??????????????
+WAVE ?ョ???????????
+?????????????????uSystemDefault????????????
? | +???? | +
---|---|
0 | +???????????????????I????? | +
1 | +SystemAsterisk?????????j | +
2 | +SystemExclamation?????????? | +
3 | +SystemHand???????? | +
4 | +SystemQuestion????????????? | +
5 | +SystemDefault??????? | +
for i 1 10 - beep + beep 0 pause 1 nextFrom svnnotify @ sourceforge.jp Sat Oct 2 22:20:43 2010 From: svnnotify @ sourceforge.jp (svnnotify @ sourceforge.jp) Date: Sat, 02 Oct 2010 22:20:43 +0900 Subject: [Ttssh2-commit] =?utf-8?b?WzQxMTldICDoi7HoqLPjgpLov73liqDjgII=?= Message-ID: <1286025643.632182.15911.nullmailer@users.sourceforge.jp> Revision: 4119 http://sourceforge.jp/projects/ttssh2/svn/view?view=rev&revision=4119 Author: yutakapon Date: 2010-10-02 22:20:43 +0900 (Sat, 02 Oct 2010) Log Message: ----------- ?沿┳??申??? Modified Paths: -------------- trunk/doc/en/html/about/history.html trunk/doc/ja/html/about/history.html -------------- next part -------------- Modified: trunk/doc/en/html/about/history.html =================================================================== --- trunk/doc/en/html/about/history.html 2010-10-02 12:43:45 UTC (rev 4118) +++ trunk/doc/en/html/about/history.html 2010-10-02 13:20:43 UTC (rev 4119) @@ -39,19 +39,25 @@
Supported operating systems: