写入简谱(flash钢琴谱)自动播放简谱琴声程序 c#
这个音乐程序,有个缺点,就是节拍不好控制,你不懂要输入多少个空格(表示延时多少)?读简谱时钟的时钟周期是多少?
/*
甩葱歌简谱 测试用
QTTUVTTTVUSSSUTT
TTQTTUVTTTOQQQPOUVTT
XXWVUSSSUWWWWVUOTT
TTXXWVUSSSUWWWWVUVTT
*/
using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Linq;
using System.Text;
using System.Windows.Forms;
using System.Runtime.InteropServices;
namespace gangqinzidongbofang
{
public partial class Form1 : Form
{
public Form1()
{
InitializeComponent();
}
public static uint SND_ASYNC = 0x0001; //
public static uint SND_FILENAME = 0x00020000;
[DllImport("winmm.dll")]
public static extern uint mciSendString(string lpstrCommand,
string lpstrReturnString, uint uReturnLength, uint hWndCallback);
string path = @"D:\Download\Silverlightkey\codefans.net\键盘钢琴\AphroditePiano\Sound\";
string keyname = "";
string stryinjie = "";
int i;
private void button1_Click(object sender, EventArgs e)
{
stryinjie = richTextBox1.Text;
i = 0;
timer1.Interval = 200;
timer1.Enabled = true;
}
private void timer1_Tick(object sender, EventArgs e)
{
if (char.IsLetter(stryinjie[i]))
{
//D:\Download\Silverlightkey\codefans.net\键盘钢琴\AphroditePiano\Sound\目录,保存了A.mp3 B.mp3 C.mp3到Z.mp3,分别存放了不同的音阶MP3文件
string keyname = char.ToUpper(stryinjie[i]) + ".mp3";
string alldir = path + keyname;
mciSendString(@"close temp_alias", null, 0, 0);
mciSendString(@"open " + alldir + " alias temp_alias", null, 0, 0);
//("play temp_alias repeat", null, 0, 0);
mciSendString("play temp_alias ", null, 0, 0);
}
else
{
if (stryinjie[i].Equals(' '))//等于空格
{
System.Threading.Thread.Sleep(2000);
//if(Delay(1));
}
}
i++;
if (i == stryinjie.Length)
{
timer1.Enabled = false;
}
}
/// <summary>
/// 延时函数
/// </summary>
/// <param name="delayTime">需要延时多少秒</param>
/// <returns></returns>
public static bool Delay(int delayTime)
{
DateTime now = DateTime.Now;
int s;
do
{
TimeSpan spand = DateTime.Now - now;
s = spand.Seconds;
Application.DoEvents();
}
while (s < delayTime);
return true;
}
}
}
写入简谱(flash钢琴谱)自动播放简谱琴声程序 c#相关推荐
- 计算机音乐谱大全eiei,彼岸吉他谱频道-求谱eiei,偶像练习生,求吉他谱,尤克里里谱,简谱,五线谱,钢琴谱,乐队总谱,乐谱-彼岸吉他 - 一站式吉他爱好者服务平台...
想要的谱子找不到? 求谱速度太慢? 质量太差? 彼岸吉他在线求谱解决你的求谱刚需 14万+首曲谱库 数十位合作长达十五年的网络知名制谱师 为你提供可靠制谱保障 多种服务模式选择 一般免费登记求谱 付费 ...
- 计算机音乐惊雷乐谱,彼岸吉他谱频道-求谱惊雷,皮卡丘多多,求吉他谱,尤克里里谱,简谱,五线谱,钢琴谱,乐队总谱,乐谱-彼岸吉他 - 一站式吉他爱好者服务平台...
想要的谱子找不到? 求谱速度太慢? 质量太差? 彼岸吉他在线求谱解决你的求谱刚需 14万+首曲谱库 数十位合作长达十五年的网络知名制谱师 为你提供可靠制谱保障 多种服务模式选择 一般免费登记求谱 付费 ...
- dw自动滚动图片_DW里怎么做图片自动播放
匿名用户 1级 2018-12-29 回答 是做个简单的相册? 漂亮的Flash动画人人喜欢,不过制作起来的确有一些技术难度.你知道吗,Dreamweaver作为一个网页制作工具,还可以创建好玩的Fl ...
- 植物大战僵尸音乐计算机简谱,植物大战僵尸(主题音乐)钢琴谱
植物大战僵尸(主题音乐)钢琴谱该歌谱演奏者为游戏,歌曲名称为植物大战僵尸,歌谱类型为钢琴谱.西洋古典音乐中的一种键盘乐器,有"乐器之王"的美称.由88个琴键(52个白键,36个黑键 ...
- 在Excel中插入Flash及解决不能自动播放问题
转载地址:http://blog.sina.com.cn/s/blog_4b69f1db0100dwsa.html 在网上下的flash小游戏,按网上说的放到excel中,每次打开excel,都不能自 ...
- 键盘钢琴html代码,Flash键盘钢琴 电脑键盘钢琴附键盘钢琴谱
Flash键盘钢琴(电脑键盘钢琴)先下载Flash钢琴,把打开的窗口以较小的形式显示,以方便看着曲谱弹,对了~~一定要让其成为当前的活动的窗口,切换到英文输入法之后,按照下面的曲谱练习即可~~ 最好先 ...
- 用计算机弹钢琴谱,flash用键盘弹钢琴,电脑钢琴谱-走啦网
用键盘弹钢琴 好玩的flash键盘钢琴:键盘上的26个英文字母分别对应着26个钢琴键,按不同的键就能听到该键对应的钢琴声,由于完全采用钢琴原声,所以弹出来的效果很真实,就像真的在钢琴旁弹奏一样.在使用 ...
- 解决 CHROME FLASH 不能自动播放的问题及加载视频前的“黑色背景”如何改变
chrome中flash不能自动播放,相信很多人都遇到了这个问题,网上检索的话,很多都会提到添加muted,当时尝试了这个方法,根本不起作用.后来慢慢发现一种情况:当单独在根节点中放入video后,可 ...
- CEF-81.3.10支持Flash自动播放代码修改
CEF-81.3.10支持Flash自动播放代码修改 由于项目的需求,自己手动编译了CEF-81.3.10(对应Chromium-81.0.4044.138内核),编译完成后,测试cefclient不 ...
最新文章
- jemeter多场景混合案例_Jmeter多业务混合场景如何设置各业务所占并发比例
- arm单片机中函数参数的传递
- python 是什么类型的语言-为什么说 Python 是强类型语言?
- 软件定义闪存:加速闪存规模化应用
- 卡西欧9860连接电脑数据传输_轻松办公好助手,卡西欧STYLISH计算器体验记
- 【lua学习】4.表
- python对json的相关操作
- 半监督学习价值凸显!谷歌大脑83页PPT介绍最新进展
- 国内少有的Flutter干货分享:Flutter的原理及美团的实践!
- 【解题报告】动态规划进阶题(区间DP、树形DP、状压DP入门)
- 计算机excel高级筛选操作大全,Excel高级筛选的7个使用实例,含不等于空、多条件、筛选到另一表格、用通配符*/?或公式组合条件...
- Inno Setup打包教程
- js实现中文简体繁体转换
- 计算GPS坐标的直线距离
- Android沉浸式体验适配方案
- 【高德地图POI踩坑】AMap.PlaceSearch无法使用
- webkit未能加载文件或程序集WebKitBrowser
- MybatisPlus乐观锁配置
- JS中设计模式的深入理解
- openssl给内网IP生成ca证书(ssl证书)
热门文章
- 使用MapReduce序列化求每个部门的工资总额
- Android修改情景模式的默认值,移动端app开发流程
- 【easyAR】图片识别
- 2022年CMMI认证补贴的常见问题汇总
- 鹿班|一人设计10亿图片,这个“设计师”如何演进?
- 【踩坑合辑】pycharm远程连接服务器
- 蓝牙Mesh的基本架构/配网流程/节点定义
- 黄金分割(0.618)法求解函数极值(附代码)
- Navicat连接MySQL8报错:Client does not suport authentication protocal requested by server
- 网络可视化 | 虹科网络监控软件解决方案(二)-- 网络探针nProbe