home *** CD-ROM | disk | FTP | other *** search
/ DOS/V Power Report 1997 October / VPR9710A.ISO / Ffilly / SHORT1 / SHORT1.TFY < prev    next >
Text File  |  1997-05-26  |  1KB  |  66 lines
  1. // Created By SPON96.06
  2. //
  3. // 渚ショート
  4. //
  5. //  by 渚
  6. //
  7.  
  8. #info INAM "渚ショート"
  9. #info IART "渚"
  10. #info ICMT "短い物語"
  11. #info COMP "渚"
  12. #info ARNG "渚"
  13. #info GRPC "渚"
  14. #info EFCT "渚"
  15. #info IDIM "640x400 ,65535"
  16. #info JINT No
  17. #info TRNS "Ask Me"
  18. #info MDFY No
  19.  
  20.  
  21.  
  22.  
  23.  
  24. // オープニング
  25. main()
  26. {
  27.    LoadPic("short1.bmp");
  28.   OpenWin(0);
  29.  
  30.   scene1();
  31. }
  32.  
  33.  
  34. // エンディング
  35. scene0()
  36. {
  37.   CloseWinAll();
  38. }
  39.  
  40.  
  41. // シーン1
  42. scene1()
  43. {
  44.   int p0, p1, p2, p3;
  45.  
  46.   p0 = LoadPic("short1.bmp");
  47.   p1 = LoadPic("1_1.bmp");
  48.   p2 = LoadPic("1_2.bmp");
  49.   p3 = LoadPic("1_3.bmp");
  50.  
  51.   mes(TIME){ step(2){
  52.     PlayMIDI("short1.mid"); 
  53.     end_step;
  54.   }}
  55.   mes(MIDI_TIME){ step(1){
  56.     MovePic(p0, 0, 0, PicWidth(0), PicHeight(0), 0); ,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,
  57.     MovePic(p1, 0, 0, PicWidth(0), PicHeight(0), 0, 0, 0, 2, 20); ,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,
  58.     MovePic(p2, 0, 0, PicWidth(0), PicHeight(0), 0, 0, 0, 3, 20); ,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,
  59.     PlayMIDI("s_end.mid"); ,
  60.     MovePic(p3, 0, 0, PicWidth(0), PicHeight(0), 0); ,,,,,,,,,,,,,,
  61.     DelPic(p0); DelPic(p1); DelPic(p2); DelPic(p3);  del_us;  scene0();  del_me;,
  62.   }}
  63. }
  64.  
  65.  
  66.