本ページには広告が含まれています。
引数に指定した文字列をモールス信号、またはモールス信号を文字列に変換します。
- 構文
- UString = Morse.encode( str )
- UString = Morse.decode( str )
- 引数
- str 必須
- encode
- エンコードする文字列
- decode
- デコードする文字列
- 戻り値
- 変換した文字列
プログラム
プログラム実行例
指定した文字列のモールス信号を鳴らす
- Main
- FUNCTIONS
DEF_DLL Beep(long, long): long: kernel32.dll
DIM frequency = 880 // 周波数
DIM dot = 50 // 短点の長さ(ms)
DIM str = MORSE.encode("UWSC")
DIM len = LENGTH(str) -1
DIM array[len][2]
FOR i = 0 TO len
SELECT COPY(str, i+1, 1)
CASE "・"
array[i][0] = dot
array[i][1] = TRUE
CASE "−"
array[i][0] = dot * 3
array[i][1] = TRUE
CASE " "
array[i][0] = dot
array[i][1] = FALSE
SELEND
NEXT
FOR i = 0 TO UBound(array)
IFB array[i][1] THEN
Beep(frequency, array[i][0])
ELSE
SLEEP(array[i][0] / 1000)
ENDIF
NEXT使用関数
解説(自動生成)
公開日:
更新日:
関連記事
- MODULE化
- 複数の変数や類似する機能を持つ関数をひとつのグループとしてまとめます。
- QuotedPrintableモジュール (自作関数)
- Quoted-printableのエンコード・デコードを行います。
- Base64モジュール (自作関数)
- Base64のエンコード・デコードを行います。
- Cipherモジュール (自作関数)
- 文字列の暗号化・復号を行います。
