home *** CD-ROM | disk | FTP | other *** search
/ ring.yamanashi.ac.jp/pub/pc/freem/action/ / action.zip / baku100.zip / baku100 / Usr / pause.tonyu < prev    next >
Text File  |  2011-10-05  |  1KB  |  44 lines
  1. extends SpriteChar;
  2. t=null;
  3. y=-50;
  4. ca=color(200,200,200);
  5. //$hp>0 && $hp<=100
  6. while (0<$hp) {
  7.   if (t==null) {// é▄é╛Ä₧è╘é≡é╞é▀é─éóé╚é»éΩé╬
  8.     if (getkey(13)==1 && $hp<110) { 
  9.       t=timeStop();     
  10.     }          
  11.   } else {
  12.     // é╖é┼é╔Ä₧è╘é≡é╞é▀é─éóé╜éτ
  13.     
  14.       la=-50;   
  15.   lb=85;
  16.     drawSprite($viewx+47,47,$pat_Actor83+0,0,-4);
  17.     
  18.   fillrect(lb+20+$viewX,60+la,lb+20+$viewX+$hp*1.5,79+la,color(220,0,0),-10);
  19.   fillrect(lb+19+$viewX,59+la,lb+21+$viewX+150,80+la,color(130,130,130),-5);
  20.   
  21.   drawText(lb+50+$viewX,85+la,"ü~"+trunc($mp/50)+"/6",ca,20,-30);
  22.   drawdxSprite(lb+$viewX+30,100+la,$pat_zxc+3,0,20,45,255,2);
  23.   drawText(lb+50+$viewX,115+la,"ü~"+trunc($sp/100)+"/3",ca,20,-30);
  24.   drawdxSprite(lb+$viewX+30,125+la,$pat_zxc+6,0,20,0,255,0.5);
  25.   
  26.   drawText(5+$viewX,95,trunc($zk01.x/100)+"m"+"/"+$score+"Å≥ë╗",ca,20,-30);
  27.   
  28.   drawText(5+$viewX,180+la,"Z/ÄΦ₧╓Æe  X/ûCæΣ  Spase/âèâZâbâg",ca,20,-30);
  29.   
  30.   centerText(300+$viewX,200,"â|ü[âYÆå/Enteré┼ì─èJ",ca,30,30);
  31.         
  32.         
  33.   if (getkey(32)==1) {
  34.     $projectManager.loadPage($page_stage1);
  35.   }
  36.   
  37.     
  38.     if (getkey(13)==1) {
  39.       t.releaseAll();
  40.       t=null;
  41.     }
  42.   }
  43.   update(); 
  44. }