feat: C# Fur Elise player using Windows Beep API
This commit is contained in:
@@ -0,0 +1,8 @@
|
|||||||
|
bin/
|
||||||
|
obj/
|
||||||
|
*.user
|
||||||
|
*.dll
|
||||||
|
*.exe
|
||||||
|
*.pdb
|
||||||
|
.vs/
|
||||||
|
.idea/
|
||||||
@@ -0,0 +1,10 @@
|
|||||||
|
<Project Sdk="Microsoft.NET.Sdk">
|
||||||
|
<PropertyGroup>
|
||||||
|
<OutputType>Exe</OutputType>
|
||||||
|
<TargetFramework>net10.0</TargetFramework>
|
||||||
|
<ImplicitUsings>enable</ImplicitUsings>
|
||||||
|
<Nullable>enable</Nullable>
|
||||||
|
<AssemblyName>FurElise</AssemblyName>
|
||||||
|
<RootNamespace>FurElise</RootNamespace>
|
||||||
|
</PropertyGroup>
|
||||||
|
</Project>
|
||||||
@@ -0,0 +1,9 @@
|
|||||||
|
{
|
||||||
|
"runtimeOptions": {
|
||||||
|
"tfm": "net10.0",
|
||||||
|
"framework": {
|
||||||
|
"name": "Microsoft.NETCore.App",
|
||||||
|
"version": "10.0.12"
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
+132
@@ -0,0 +1,132 @@
|
|||||||
|
// Für Elise (致爱丽丝) — C# console player
|
||||||
|
// Windows: kernel32 Beep; --dry-run prints score only.
|
||||||
|
using System;
|
||||||
|
using System.Collections.Generic;
|
||||||
|
using System.Runtime.InteropServices;
|
||||||
|
using System.Threading;
|
||||||
|
|
||||||
|
class FurElisePlayer
|
||||||
|
{
|
||||||
|
[DllImport("kernel32.dll", SetLastError = true)]
|
||||||
|
static extern bool Beep(uint dwFreq, uint dwDuration);
|
||||||
|
|
||||||
|
static readonly Dictionary<string, int> Freq = new(StringComparer.OrdinalIgnoreCase)
|
||||||
|
{
|
||||||
|
["C4"] = 262, ["D4"] = 294, ["Ds4"] = 311, ["E4"] = 330,
|
||||||
|
["F4"] = 349, ["G4"] = 392, ["Gs4"] = 415, ["A4"] = 440,
|
||||||
|
["As4"] = 466, ["B4"] = 494,
|
||||||
|
["C5"] = 523, ["D5"] = 587, ["Ds5"] = 622, ["E5"] = 659,
|
||||||
|
["F5"] = 698, ["G5"] = 784, ["Gs5"] = 831, ["A5"] = 880,
|
||||||
|
["B5"] = 988, ["C6"] = 1047,
|
||||||
|
["A3"] = 220, ["B3"] = 247, ["E3"] = 165,
|
||||||
|
};
|
||||||
|
|
||||||
|
// note name, duration in 16th-note units (4 = quarter), rest = "R"
|
||||||
|
static readonly (string Note, int Units)[] Score =
|
||||||
|
{
|
||||||
|
// Theme A (famous opening)
|
||||||
|
("E5", 2), ("Ds5", 2), ("E5", 2), ("Ds5", 2), ("E5", 2),
|
||||||
|
("B4", 2), ("D5", 2), ("C5", 2),
|
||||||
|
("A4", 6), ("R", 2),
|
||||||
|
("C4", 2), ("E4", 2), ("A4", 2),
|
||||||
|
("B4", 6), ("R", 2),
|
||||||
|
("E4", 2), ("Gs4", 2), ("B4", 2),
|
||||||
|
("C5", 6), ("R", 2),
|
||||||
|
|
||||||
|
("E4", 2), ("E5", 2), ("Ds5", 2), ("E5", 2), ("Ds5", 2), ("E5", 2),
|
||||||
|
("B4", 2), ("D5", 2), ("C5", 2),
|
||||||
|
("A4", 6), ("R", 2),
|
||||||
|
("C4", 2), ("E4", 2), ("A4", 2),
|
||||||
|
("B4", 6), ("R", 2),
|
||||||
|
("E4", 2), ("C5", 2), ("B4", 2),
|
||||||
|
("A4", 12),
|
||||||
|
|
||||||
|
// Theme B (middle section, simplified)
|
||||||
|
("E4", 2), ("C5", 2), ("B4", 2),
|
||||||
|
("A4", 4), ("E4", 2), ("F4", 2),
|
||||||
|
("E4", 2), ("A4", 2), ("B4", 2), ("C5", 2),
|
||||||
|
("B4", 4), ("E4", 2), ("Gs4", 2),
|
||||||
|
("A4", 4), ("E4", 2), ("B4", 2),
|
||||||
|
("C5", 2), ("A4", 2), ("B4", 2), ("A4", 2),
|
||||||
|
("E5", 2), ("Ds5", 2), ("E5", 2), ("Ds5", 2), ("E5", 2),
|
||||||
|
("B4", 2), ("D5", 2), ("C5", 2),
|
||||||
|
("A4", 6), ("R", 2),
|
||||||
|
("C4", 2), ("E4", 2), ("A4", 2),
|
||||||
|
("B4", 6), ("R", 2),
|
||||||
|
("E4", 2), ("Gs4", 2), ("B4", 2),
|
||||||
|
("C5", 6), ("R", 2),
|
||||||
|
("E4", 2), ("E5", 2), ("Ds5", 2), ("E5", 2), ("Ds5", 2), ("E5", 2),
|
||||||
|
("B4", 2), ("D5", 2), ("C5", 2),
|
||||||
|
("A4", 6), ("R", 2),
|
||||||
|
("C4", 2), ("E4", 2), ("A4", 2),
|
||||||
|
("B4", 6), ("R", 2),
|
||||||
|
("E4", 2), ("C5", 2), ("B4", 2),
|
||||||
|
("A4", 12),
|
||||||
|
};
|
||||||
|
|
||||||
|
static int Main(string[] args)
|
||||||
|
{
|
||||||
|
var dryRun = false;
|
||||||
|
var bpm = 72; // Für Elise ~ 72 eighth-ish feel; we treat unit = 16th
|
||||||
|
var loops = 1;
|
||||||
|
|
||||||
|
for (var i = 0; i < args.Length; i++)
|
||||||
|
{
|
||||||
|
var a = args[i];
|
||||||
|
if (a == "--dry-run") dryRun = true;
|
||||||
|
else if (a == "--bpm" && i + 1 < args.Length) bpm = int.Parse(args[++i]);
|
||||||
|
else if (a == "--loops" && i + 1 < args.Length) loops = int.Parse(args[++i]);
|
||||||
|
else if (a == "--help" || a == "-h")
|
||||||
|
{
|
||||||
|
Console.WriteLine("FurElisePlayer [--dry-run] [--bpm 72] [--loops 1]");
|
||||||
|
Console.WriteLine("Play Beethoven - Für Elise via Windows Beep.");
|
||||||
|
return 0;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
if (bpm < 40) bpm = 40;
|
||||||
|
if (bpm > 200) bpm = 200;
|
||||||
|
if (loops < 1) loops = 1;
|
||||||
|
|
||||||
|
// 16th-note duration in ms from BPM (quarter note = 60000/bpm)
|
||||||
|
var unitMs = (int)Math.Round(60000.0 / bpm / 4.0);
|
||||||
|
if (unitMs < 20) unitMs = 20;
|
||||||
|
|
||||||
|
Console.WriteLine("Beethoven - Für Elise (致爱丽丝)");
|
||||||
|
Console.WriteLine($"BPM={bpm}, unit={unitMs}ms, notes={Score.Length}, loops={loops}");
|
||||||
|
Console.WriteLine(dryRun ? "Mode: dry-run (no sound)" : "Mode: play");
|
||||||
|
Console.WriteLine(new string('-', 48));
|
||||||
|
|
||||||
|
for (var loop = 1; loop <= loops; loop++)
|
||||||
|
{
|
||||||
|
if (loops > 1) Console.WriteLine($"--- loop {loop}/{loops} ---");
|
||||||
|
foreach (var (note, units) in Score)
|
||||||
|
{
|
||||||
|
var ms = units * unitMs;
|
||||||
|
// slight articulation: leave a tiny gap
|
||||||
|
var soundMs = Math.Max(15, ms - 8);
|
||||||
|
|
||||||
|
if (note == "R" || note == "-" || note.Length == 0)
|
||||||
|
{
|
||||||
|
if (dryRun) Console.WriteLine($" REST {ms,4} ms");
|
||||||
|
else Thread.Sleep(ms);
|
||||||
|
continue;
|
||||||
|
}
|
||||||
|
|
||||||
|
if (!Freq.TryGetValue(note, out var hz))
|
||||||
|
{
|
||||||
|
Console.Error.WriteLine($"Unknown note: {note}");
|
||||||
|
continue;
|
||||||
|
}
|
||||||
|
|
||||||
|
if (dryRun)
|
||||||
|
Console.WriteLine($" {note,-5} {hz,4} Hz {ms,4} ms");
|
||||||
|
else if (!Beep((uint)hz, (uint)soundMs))
|
||||||
|
Console.Beep(hz, soundMs);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
Console.WriteLine("Done.");
|
||||||
|
return 0;
|
||||||
|
}
|
||||||
|
}
|
||||||
@@ -0,0 +1,62 @@
|
|||||||
|
# FurElise C#
|
||||||
|
|
||||||
|
用 C# 控制台程序在 Windows 上演奏贝多芬《致爱丽丝》（Für Elise）。
|
||||||
|
|
||||||
|
## 原理
|
||||||
|
|
||||||
|
- 使用 Windows 内核 API `kernel32!Beep(frequency, duration)` 发声
|
||||||
|
- 乐谱数据用 `(音名, 时值)` 数组描述，`R` 表示休止
|
||||||
|
- 音名映射到平均律频率（如 `A4=440`、`E5=659`、`Ds5=622`）
|
||||||
|
|
||||||
|
## 运行
|
||||||
|
|
||||||
|
### 方式 A：已编译程序
|
||||||
|
|
||||||
|
```powershell
|
||||||
|
dotnet FurElise.dll
|
||||||
|
# 或
|
||||||
|
.\FurElise.exe
|
||||||
|
```
|
||||||
|
|
||||||
|
### 方式 B：源码直接编译（.NET 10 csc）
|
||||||
|
|
||||||
|
```powershell
|
||||||
|
$refDir = "C:\Program Files\dotnet\packs\Microsoft.NETCore.App.Ref\10.0.12\ref\net10.0"
|
||||||
|
$refs = (Get-ChildItem "$refDir\*.dll" | ForEach-Object { "-r:`"$($_.FullName)`"" }) -join ' '
|
||||||
|
dotnet exec "C:\Program Files\dotnet\sdk\10.0.401\Roslyn\bincore\csc.dll" `
|
||||||
|
-nologo -t:exe -out:FurElise.dll $refs Program.cs
|
||||||
|
# 复制 runtimeconfig.json 后
|
||||||
|
dotnet FurElise.dll
|
||||||
|
```
|
||||||
|
|
||||||
|
### 方式 C：dotnet run（需可用的 SDK/NuGet）
|
||||||
|
|
||||||
|
```powershell
|
||||||
|
dotnet run --project FurElise.csproj
|
||||||
|
```
|
||||||
|
|
||||||
|
## 参数
|
||||||
|
|
||||||
|
| 参数 | 说明 | 默认 |
|
||||||
|
|------|------|------|
|
||||||
|
| `--dry-run` | 只打印音符与频率，不发声 | 关 |
|
||||||
|
| `--bpm <n>` | 速度（四分音符 BPM） | 72 |
|
||||||
|
| `--loops <n>` | 重复次数 | 1 |
|
||||||
|
| `--help` | 帮助 | |
|
||||||
|
|
||||||
|
示例：
|
||||||
|
|
||||||
|
```powershell
|
||||||
|
.\FurElise.exe --dry-run
|
||||||
|
.\FurElise.exe --bpm 90 --loops 2
|
||||||
|
```
|
||||||
|
|
||||||
|
## 说明
|
||||||
|
|
||||||
|
- 仅 Windows（依赖 `Beep` API）；无声卡驱动策略时部分环境可能无声音
|
||||||
|
- 旋律为主题段落的简化编配，适合教学演示
|
||||||
|
- 请勿在文章/仓库中提交站点账号密码
|
||||||
|
|
||||||
|
## License
|
||||||
|
|
||||||
|
MIT
|
||||||
Reference in New Issue
Block a user