home *** CD-ROM | disk | FTP | other *** search
/ Point Programming 1 / PPROG1.ISO / c / sclib31 / examples / dissolv.c < prev    next >
Encoding:
C/C++ Source or Header  |  1991-12-31  |  1007 b   |  40 lines
  1. #include <scl1.h>
  2. #include <scl1clor.h>
  3.  
  4. /***********************************************************
  5.     Shows several dissolve effects for clearing the screen */
  6.  
  7. main()
  8. {
  9. int Color1,Color2;
  10.  
  11. if(Video()==COLOR)
  12.     {
  13.     Color1=WHITE_BLACK;
  14.     Color2=BROWN_BLACK+HIGHLIGHT;
  15.     }
  16. else
  17.     {
  18.     Color1=WHITE_BLACK;
  19.     Color2=WHITE_BLACK+HIGHLIGHT;
  20.     }
  21.  
  22. FillBlock(Color2,0,0,VC_Lines-1,VC_Cols-1,'X'); /* Fill screen with X */
  23. WaitTime(50);                                   /* 1/2 second delay */
  24. Dissolve(Color1,DS_BOX,1);                      /* Clear screen */
  25. WaitTime(50);
  26.                                                                   
  27. FillBlock(Color2,0,0,VC_Lines-1,VC_Cols-1,'X');
  28. WaitTime(100);
  29. Dissolve(Color1,DS_SIDES,1);
  30. WaitTime(50);
  31.  
  32. FillBlock(Color2,0,0,VC_Lines-1,VC_Cols-1,'X');
  33. WaitTime(100);
  34. Dissolve(Color1,DS_SIX_PARTS,1);
  35. WaitTime(50);
  36.  
  37. FillBlock(Color2,0,0,VC_Lines-1,VC_Cols-1,'X');
  38. WaitTime(100);
  39. Dissolve(Color1,DS_FOUR_BOXES,1);
  40. }