home *** CD-ROM | disk | FTP | other *** search
/ ring.yamanashi.ac.jp/pub/pc/freem/action/ / action.zip / henkyaku1.0.exe / henkyaku / Program / Usr / hikoki.tonyu < prev    next >
Text File  |  2010-07-19  |  1KB  |  58 lines
  1. extends DxChar;
  2.  
  3. zOrder=1;
  4. sokudo=2;
  5. houkou=2;
  6. f=0;
  7. angle=-30;
  8.  
  9. while(1){
  10.   if(houkou==1)x+=sokudo;
  11.   if(houkou==2)x-=sokudo;
  12.   if(x>$screenWidth){
  13.     houkou=2;
  14.     f=0;
  15.     angle=-30;
  16.   }  
  17.   if(x<0){houkou=1;
  18.     f=1;
  19.     angle=30;
  20.   }
  21.   y+=sokudo/2;
  22.  
  23.     for (e in $chars) {
  24.       if(e is Player1 && crashTo(e)){
  25.         die();
  26.         $periodscore+=1;
  27.         $periodall+=1;
  28.         $mplayer.play($se_get,0,128);
  29.         $score1+=1;
  30.       }
  31.       if(e is Player2 && crashTo(e)){
  32.         die();
  33.         $periodscore+=1;
  34.         $periodall+=1;
  35.         {$mplayer.play($se_get,0,128);}
  36.         $score1+=1;
  37.       }
  38.       if(e is Player3 && crashTo(e)){
  39.         die();
  40.         $periodscore+=1;
  41.         $periodall+=1;
  42.         $mplayer.play($se_get,0,128);
  43.         $score1+=1;
  44.       }
  45.       if(e is Player4 && crashTo(e)){
  46.         die();
  47.         $periodscore+=1;
  48.         $periodall+=1;
  49.         {$mplayer.play($se_get,0,128);}
  50.         $score2+=1;
  51.       }
  52.     }
  53.   if (y>$screenHeight) {
  54.     die();
  55.     $periodall+=1;
  56.   }
  57.   update();
  58. }