home *** CD-ROM | disk | FTP | other *** search
/ DOS/V Power Report 1996 December / VPR9612A.ISO / FFILLY / HANA / HANABANA.TFY < prev    next >
Text File  |  1996-10-08  |  4KB  |  207 lines
  1. // Created By SPON96.06
  2. //
  3. // Hanabana
  4. //
  5. //  by E.Hashimoto
  6. //
  7.  
  8. #info INAM "Hanabana"
  9. #info IART "E.Hashimoto"
  10. #info GRPC "E.Hasimoto"
  11. #info EFCT "E.Hasimoto"
  12. #info IDIM 800x600 ,16M
  13.  
  14.  
  15. int mDown, xoff, yoff;
  16.  
  17.  
  18. // マウスの位置が矩形の範囲内かどうか調べる関数
  19. isInRect(int x1, int y1, int x2, int y2)
  20. {
  21.   if(x1 <= MesP2 && MesP2 < x2 && y1 <= MesP3 && MesP3 < y2){
  22.     return (1);
  23.   }
  24.   return (0);
  25. }
  26.  
  27.  
  28. // オープニング
  29. main()
  30. {
  31.   int sw, sh, pw, ph;
  32.   LoadPic("hanabana.bmp");
  33.   OpenWin(0);
  34.   mDown = 0;
  35.   scene1();
  36. }
  37.  
  38.  
  39. // エンディング
  40. scene0()
  41. {
  42.   CloseWinAll();
  43. }
  44.  
  45.  
  46. // シーン1
  47. scene1()
  48. {
  49.   int p0;
  50.  
  51.   p0 = LoadPic("akanade.bmp");
  52.  
  53.   mes(TIME){ step(2){
  54.     PlayMIDI("omoide.mid"); 
  55.     PlayWAVE("st.wav"); 
  56.     MovePic(p0, 0, 0, PicWidth(0), PicHeight(0), 0); ,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,
  57.     DelPic(p0);  del_us;  scene2();  del_me;
  58.     end_step;
  59.   }}
  60. }
  61.  
  62.  
  63. // シーン2
  64. scene2()
  65. {
  66.   int p0;
  67.  
  68.   p0 = LoadPic("begonia2.bmp");
  69.  
  70.   mes(TIME){ step(2){
  71.     PlayWAVE("st.wav"); 
  72.     MovePic(p0, 0, 0, PicWidth(0), PicHeight(0), 0); ,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,
  73.     DelPic(p0);  del_us;  scene3();  del_me;
  74.     end_step;
  75.   }}
  76. }
  77.  
  78.  
  79. // シーン3
  80. scene3()
  81. {
  82.   int p0;
  83.  
  84.   p0 = LoadPic("begonia.bmp");
  85.  
  86.   mes(TIME){ step(2){
  87.     PlayWAVE("st.wav"); 
  88.     MovePic(p0, 0, 0, PicWidth(0), PicHeight(0), 0); ,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,
  89.     DelPic(p0);  del_us;  scene4();  del_me;
  90.     end_step;
  91.   }}
  92. }
  93.  
  94.  
  95. // シーン4
  96. scene4()
  97. {
  98.   int p0;
  99.  
  100.   p0 = LoadPic("kosumosu.bmp");
  101.  
  102.   mes(TIME){ step(2){
  103.     PlayWAVE("st.wav"); 
  104.     MovePic(p0, 0, 0, PicWidth(0), PicHeight(0), 0); ,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,
  105.     DelPic(p0);  del_us;  scene5();  del_me;
  106.     end_step;
  107.   }}
  108. }
  109.  
  110.  
  111. // シーン5
  112. scene5()
  113. {
  114.   int p0;
  115.  
  116.   p0 = LoadPic("kulokkas.bmp");
  117.  
  118.   mes(TIME){ step(2){
  119.     PlayWAVE("st.wav"); 
  120.     MovePic(p0, 0, 0, PicWidth(0), PicHeight(0), 0); ,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,
  121.     DelPic(p0);  del_us;  scene6();  del_me;
  122.     end_step;
  123.   }}
  124. }
  125.  
  126.  
  127. // シーン6
  128. scene6()
  129. {
  130.   int p0;
  131.  
  132.   p0 = LoadPic("nadesiko.bmp");
  133.  
  134.   mes(TIME){ step(2){
  135.     PlayWAVE("st.wav"); 
  136.     MovePic(p0, 0, 0, PicWidth(0), PicHeight(0), 0); ,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,
  137.     DelPic(p0);  del_us;  scene7();  del_me;
  138.     end_step;
  139.   }}
  140. }
  141.  
  142.  
  143. // シーン7
  144. scene7()
  145. {
  146.   int p0;
  147.  
  148.   p0 = LoadPic("popii.bmp");
  149.  
  150.   mes(TIME){ step(2){
  151.     PlayWAVE("st.wav"); 
  152.     MovePic(p0, 0, 0, PicWidth(0), PicHeight(0), 0); ,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,
  153.     DelPic(p0);  del_us;  scene8();  del_me;
  154.     end_step;
  155.   }}
  156. }
  157.  
  158.  
  159. // シーン8
  160. scene8()
  161. {
  162.   int p0;
  163.  
  164.   p0 = LoadPic("syaga.bmp");
  165.  
  166.   mes(TIME){ step(2){
  167.     PlayWAVE("st.wav"); 
  168.     MovePic(p0, 0, 0, PicWidth(0), PicHeight(0), 0); ,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,
  169.     DelPic(p0);  del_us;  scene9();  del_me;
  170.     end_step;
  171.   }}
  172. }
  173.  
  174.  
  175. // シーン9
  176. scene9()
  177. {
  178.   int p0;
  179.  
  180.   p0 = LoadPic("tyulippu.bmp");
  181.  
  182.   mes(TIME){ step(2){
  183.     PlayWAVE("st.wav"); 
  184.     MovePic(p0, 0, 0, PicWidth(0), PicHeight(0), 0); ,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,
  185.     DelPic(p0);  del_us;  scene10();  del_me;
  186.     end_step;
  187.   }}
  188. }
  189.  
  190.  
  191. // シーン10
  192. scene10()
  193. {
  194.   int p0;
  195.  
  196.   p0 = LoadPic("tyou.bmp");
  197.  
  198.   mes(TIME){ step(2){
  199.     PlayWAVE("st.wav"); 
  200.     MovePic(p0, 0, 0, PicWidth(0), PicHeight(0), 0); ,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,
  201.     DelPic(p0);  del_us;  scene0();  del_me;
  202.     end_step;
  203.   }}
  204. }
  205.  
  206.  
  207.