RAY.CPP
上传用户:wszmarenbt
上传日期:2013-04-26
资源大小:2552k
文件大小:1k
源码类别:

Windows编程

开发平台:

Visual C++

  1. /*----------------------------ANIMATION-----------------------------*/
  2. /*   NAME : COLOR RAYS WITH SOUND        */
  3. /*----------------------------ANIMATION-----------------------------*/
  4. #include<graphics.h>
  5. #include<dos.h>
  6. #include<math.h>
  7. #include<conio.h>
  8. void main()
  9. {
  10. int driver=DETECT,mode;
  11. int X0=300,Y0=200,X=350,Y=200,R=100,NUM;
  12. registerbgidriver(EGAVGA_driver);
  13. initgraph(&driver,&mode,"");
  14. for(NUM=1;NUM<=50;NUM++)
  15. {
  16. X=X0+R*cos(NUM*2*3.1415926/50); /*CALCULATE THE NEW STATION*/
  17. Y=Y0+R*sin(NUM*2*3.1415926/50);
  18. setcolor(NUM%11);               /*CHANGE THE COLOR*/
  19. line(X0,Y0,X,Y);                /*DRAW THE NEW LINE*/
  20. sound(523);
  21. delay(20);
  22. nosound();
  23. delay(30);
  24. }
  25. setcolor(YELLOW);
  26. outtextxy(100,450,"*-*-*-*-*-*   COLOR RAYS WITH SOUND   *-*-*-*-*-*-*");
  27. getch();
  28. closegraph();
  29. }