开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > 游戏 > 其他智力游戏 > 查看源码
FMMUSIC.C
资源名称：泡泡龙源代码.zip　[点击查看]
上传用户：junwei_58
上传日期：2007-05-15
资源大小：79k
文件大小：1k
源码类别：

其他智力游戏

开发平台：

Visual C++

FMMUSIC.C：源码内容
  1. #define FMMUSIC_C
  2. #include <dos.h>
  3. #include <conio.h>
  4. #include <stdio.h>
  5. #include "fmmusic.h"
  6. #include "fmcreate.h"
  7. extern char *FMfilename;
  9. Note notetable[13]={_R,_C,_Ch,_D,_Dh,_E,_F,_Fh,_G,_Gh,_A,_Ah,_B,};
  10. int timetable[8]={_2_0*2, _2_0, _1_1, _1_2, _1_4, _1_8, _1_16, _1_32,};
  12. void WriteFM(char reg,char data){asm{
  13. mov dx,FM_PORT
  14. mov al,reg
  15. out dx,al
  16. inc dx
  17. mov al,data
  18. out dx,al
  19. }}
  20. char ReadFM(){asm{
  21. mov dx,FM_PORT
  22. in al,dx
  23. }}
  25. void FMSound(int freq,char block){
  26. WriteFM(0xa0,freq&0x00ff);
  27. WriteFM(0xb0,(block<<2)|((freq&0xff00)>>8)|0x20);
  28. }
  29. void FMSoundOFF(int freq,char block){
  30. WriteFM(0xa0,freq&0x00ff);
  31. WriteFM(0xb0,(block<<2)|((freq&0xff00)>>8));
  32. }
  33. void delayFM(int time){
  34. char i;
  35. WriteFM(0x04,0x80);
  36. WriteFM(0x03,216);
  37. WriteFM(0x04,0x42);
  38. for(i=1;i<time;i++){
  39. while(((char)ReadFM()&0xe0)<0xa0);
  40. WriteFM(0x04,0x82);
  41. }
  42. }
  44. int FMready(){
  45.  // char i;
  46. WriteFM(0x04,0x80);
  47. WriteFM(0x03,216);
  48. WriteFM(0x04,0x42);
  49. if(((char)ReadFM()&0xe0)>=0xa0){
  50. WriteFM(0x04,0x82);
  51. return 1;
  52. } else return 0;
  53. }
  54. void initPiano(){
  55. int n;
  56. WriteFM(1,0);
  57. WriteFM(8,0);
  58. WriteFM(0xbd,0);
  59. WriteFM(0x20,0x21);
  60. WriteFM(0x23,0x11);
  61. WriteFM(0x40,0x4c);
  62. WriteFM(0x43,0);
  63. WriteFM(0x60,0xd2);
  64. WriteFM(0x63,0xd2);
  65. WriteFM(0x80,0x32);
  66. WriteFM(0x83,0x11);
  67. WriteFM(0xe0,0);
  68. WriteFM(0xe3,0);
  69. WriteFM(0xc0,4);
  70. music=FMload(FMfilename,&length);
  71. }