home *** CD-ROM | disk | FTP | other *** search
/ ring.yamanashi.ac.jp/pub/pc/freem/action/ / action.zip / TQAP.zip / Usr / Key.tonyu < prev    next >
Text File  |  2006-12-16  |  274b  |  21 lines
  1. extends SpriteChar;
  2.  
  3. x=trunc(x/32)*32+16;
  4. y=trunc(y/32)*32+16;
  5. p=$pat_key+0;
  6. zOrder=2;
  7.  
  8. for (jiki in $chars){
  9.   if (jiki is Mychar) break;
  10. }
  11.  
  12.  
  13. while(1){
  14.   if (crashTo(jiki)) {
  15.     jiki.key=1;
  16.     $mplayer.play($se_push05);
  17.     die();
  18.   }
  19.   update();
  20.   
  21. }