home *** CD-ROM | disk | FTP | other *** search
/ ring.yamanashi.ac.jp/pub/pc/freem/action/ / action.zip / henkyaku1.0.exe / henkyaku / Program / Usr / risetto.tonyu < prev    next >
Text File  |  2010-07-17  |  548b  |  26 lines
  1. extends SecretChar;
  2. time=null;
  3. $risetto=0;
  4. while(1){
  5.   if(getkey(123)>=1){
  6.     $risetto=1;
  7.     appear(new risettohaikei($screenWidth/2,$screenHeight/2,$pat_kuro+0,0 ));
  8.     time=timestop();
  9.     while($risetto==1){
  10.       if(getkey(27)==1){
  11.         $risetto=0;
  12.         time=null;
  13.         $titlehyouzi=null;
  14.         $titlemenu=0;
  15.         $projectManager.loadPage($page_title);
  16.       }
  17.       if(getkey(32)==1){
  18.         $risetto=0;
  19.         time.releaseAll();
  20.         time=null;
  21.       }
  22.     update();  
  23.   }
  24.  }
  25.  update();       
  26. }