home *** CD-ROM | disk | FTP | other *** search
/ ring.yamanashi.ac.jp/pub/pc/freem/action/ / action.zip / baku100.zip / baku100 / Usr / ef06.tonyu < prev    next >
Text File  |  2011-10-10  |  2KB  |  125 lines
  1. extends SpriteChar;
  2. //ë⌐É≥öwîi
  3.  
  4. pa=2*rnd()-1;
  5.   pb=2*rnd()-1;
  6.   pc=2*rnd()-1;
  7.   da=0;
  8. db=0;
  9. dc=0;
  10. la=52;
  11.  
  12.  
  13.  
  14. rn1=rnd(28);
  15. p1=0;
  16. if(rn1==p1)se=$se_animal02;
  17. p1++;
  18. if(rn1==p1)se=$se_alarm00;
  19. p1++;
  20. if(rn1==p1)se=$se_bell05;
  21. p1++;
  22. if(rn1==p1)se=$se_bell15a;
  23. p1++;
  24. if(rn1==p1)se=$se_clock01;
  25. p1++;
  26. if(rn1==p1)se=$se_crash27;
  27. p1++;
  28. if(rn1==p1)se=$se_drag00;
  29. p1++;
  30. if(rn1==p1)se=$se_fall01;
  31. p1++;
  32. if(rn1==p1)se=$se_fm003;
  33. p1++;
  34. if(rn1==p1)se=$se_freeze01;
  35. p1++;
  36. if(rn1==p1)se=$se_gas02;
  37. p1++;
  38. if(rn1==p1)se=$se_insect00;
  39. p1++;
  40. if(rn1==p1)se=$se_insect05;
  41. p1++;
  42. if(rn1==p1)se=$se_kachi00;
  43. p1++;
  44. if(rn1==p1)se=$se_mizu04;
  45. p1++;
  46. if(rn1==p1)se=$se_mecha04;
  47. p1++;
  48. if(rn1==p1)se=$se_mecha15;
  49. p1++;
  50. if(rn1==p1)se=$se_mizu04;
  51. p1++;
  52. if(rn1==p1)se=$se_noise00;
  53. p1++;
  54. if(rn1==p1)se=$se_open51;
  55. p1++;
  56. if(rn1==p1)se=$se_puu55;
  57. p1++;
  58. if(rn1==p1)se=$se_step00;
  59. p1++;
  60. if(rn1==p1)se=$se_type01;
  61. p1++;
  62. if(rn1==p1)se=$se_valve00;
  63. p1++;
  64. if(rn1==p1)se=$se_voice003;
  65. p1++;
  66. if(rn1==p1)se=$se_voice011;
  67. p1++;
  68. if(rn1==p1)se=$se_voice010;
  69. p1++;
  70. if(rn1==p1)se=$se_voice023_c;
  71. p1++;
  72. if(rn1==p1)se=$se_voice031;
  73. p1++;
  74. if(rn1==p1)se=$se_water00;
  75. p1++;
  76. if(rn1==p1)se=$se_weapon04;
  77.  
  78. rn2=rnd(10);
  79. t1=400;
  80.  
  81.  
  82.  
  83. while(1) {
  84.  
  85.   
  86. if(rn2==0 && amod(tt,t1)==1){$mplayer.play(se,0,80);}
  87.   
  88. da+=pa;
  89. db+=pb;
  90. dc+=pc;
  91. if($hp<=0){
  92. tt++;
  93.   da+=4*sin(tt);
  94. db+=4*sin(tt);
  95. dc+=4*sin(tt);
  96. }
  97.  
  98. x1=x+la*cos(da);
  99. y1=y+la*sin(da);
  100.     drawdxSprite(x1,y1,$pat_zxc+13,0,20,da,255,1);
  101. x1=x1+la*cos(da);
  102. y1=y1+la*sin(da);
  103.  
  104. x1=x1+la*cos(db);
  105. y1=y1+la*sin(db);
  106.  
  107.     drawdxSprite(x1,y1,$pat_zxc+13,0,20,db,255,1);
  108.  
  109. x1=x1+la*cos(db);
  110. y1=y1+la*sin(db);
  111.  
  112. x1=x1+la*cos(dc);
  113. y1=y1+la*sin(dc);
  114.  
  115.     drawdxSprite(x1,y1,$pat_zxc+13,0,20,dc,255,1);
  116.     
  117. x1=x1+la*cos(dc);
  118. y1=y1+la*sin(dc);
  119.  
  120. drawSprite(x1,y1,$pat_asd+18,0,18);
  121. drawdxSprite(x1,y1,$pat_asd+19,0,19,0,255,1);
  122.  
  123. if($zk01.x-600>x){$hk--;die();}
  124. update();
  125. }