//1602?可以顯示英文字符和數字，兩行，每行可以顯示16個字符，第一行地址為0X80~0X9F
//第二行地址為?0XC0~0XDF

//可變調電子琴按下第十六個鍵實現升高伴音


//2^（1/6）=1.12246?
//2^（1/12）=1.05946?

#include

const?a=2;

#define?half_note??1.05946
#define?note??1.12246
#define?uchar?unsigned?char
#define?uint??unsigned?int

#define?L5??1
#define?L6??2
#define?L7??3

#define?Z1??4
#define?Z2??5
#define?Z3??6
#define?Z4??7
#define?Z5??8
#define?Z6??9
#define?Z7??10

#define?G1??11
#define?G2??12
#define?G3??13
#define?G4??14
#define?G5??15
#define?K???-1


unsigned?char?code?sound1[]={

?G328G32G21G11G26G12Z62Z52Z624Z32Z22Z12L72L64
?L62L6204L64L64L62L6204L64
?L64Z34Z34Z34Z32Z22Z14Z2404
?Z26Z32Z24Z14Z22Z12L62L52L6404
?Z3

?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----
?????目錄???????????0??2011-01-17?12:06??自動演奏?電子琴?1602\
?????文件???????92445??2010-03-06?10:15??自動演奏?電子琴?1602\Last?Loaded?電子琴.DBK
?????文件????????6376??2010-03-07?23:40??自動演奏?電子琴?1602\STARTUP.A51
?????文件???????10743??2010-03-07?23:40??自動演奏?電子琴?1602\STARTUP.LST
?????文件?????????750??2010-03-07?23:40??自動演奏?電子琴?1602\STARTUP.OBJ
?????文件???????19124??2010-03-07?23:40??自動演奏?電子琴?1602\電子琴
?????文件????????8141??2010-03-07?23:41??自動演奏?電子琴?1602\電子琴.c
?????文件???????92428??2010-03-07?21:11??自動演奏?電子琴?1602\電子琴.DSN
?????文件????????7751??2010-03-07?23:40??自動演奏?電子琴?1602\電子琴.hex
?????文件??????????45??2010-03-07?23:40??自動演奏?電子琴?1602\電子琴.lnp
?????文件???????17502??2010-03-07?23:40??自動演奏?電子琴?1602\電子琴.LST
?????文件???????21871??2010-03-07?23:40??自動演奏?電子琴?1602\電子琴.M51
?????文件???????21249??2010-03-07?23:40??自動演奏?電子琴?1602\電子琴.OBJ
?????文件????????1247??2010-03-07?23:41??自動演奏?電子琴?1602\電子琴.Opt
?????文件???????12058??2010-03-07?23:41??自動演奏?電子琴?1602\電子琴.plg
?????文件????????1246??2011-01-17?12:06??自動演奏?電子琴?1602\電子琴.PWI
?????文件????????2152??2010-03-07?23:16??自動演奏?電子琴?1602\電子琴.Uv2
?????文件????????1247??2010-03-07?23:28??自動演奏?電子琴?1602\電子琴_Opt.Bak
?????文件????????2152??2010-03-07?22:09??自動演奏?電子琴?1602\電子琴_Uv2.Bak
?????文件???????16896??2010-03-07?21:11??自動演奏?電子琴?1602\音符計算公式.xls