home *** CD-ROM | disk | FTP | other *** search
/ ring.yamanashi.ac.jp/pub/pc/freem/action/ / action.zip / henkyaku1.0.exe / henkyaku / Program / Usr / optionsyori.tonyu < prev    next >
Text File  |  2010-07-17  |  8KB  |  269 lines
  1. extends SecretChar;
  2.  
  3. while(1){
  4. if(getkey(13)==1){
  5.   $mplayer.play($se_kettei,0,128);
  6.     if($titlemenu==1){
  7.       appear(new optionnoruma1(408,170,$noruma+"üô",$clWhite,20));//âpü[âZâôâg
  8.       appear(new optionnoruma2(430,184,$pat_logo+14));//É}î`
  9.       optionkettei=1;
  10.       $optionkettei=1;
  11.       while(optionkettei==1){
  12.         wait(1);
  13.         if(getkey(37)>=1){
  14.           $mplayer.play($se_titlezyouge,0,128);
  15.           if($noruma>0) $noruma-=1;
  16.           wait(4);          
  17.           if($noruma<0) $noruma=0;
  18.         }
  19.         if(getkey(38)>=1){
  20.           $mplayer.play($se_titlezyouge,0,128);
  21.           if($noruma<90) $noruma+=10;
  22.           else $noruma=100;
  23.           wait(4);
  24.           if($noruma>100) $noruma=100;
  25.         }
  26.         if(getkey(39)>=1){
  27.           $mplayer.play($se_titlezyouge,0,128);
  28.           if($noruma<100) $noruma+=1;
  29.           wait(4);
  30.           if($noruma>100) $noruma=100;
  31.         }
  32.         if(getkey(40)>=1){
  33.           $mplayer.play($se_titlezyouge,0,128);
  34.           if($noruma>10) $noruma-=10;
  35.           else $noruma=0;
  36.           wait(4);
  37.           if($noruma<0) $noruma=0;
  38.         }
  39.         if(getkey(13)==1){
  40.           $mplayer.play($se_kettei,0,128);
  41.           optionkettei=0;
  42.           $optionkettei=0;
  43.         }
  44.         if(getkey(45)==1){
  45.           $mplayer.play($se_stop,0,128);
  46.           optionkettei=0;
  47.           $optionkettei=0;
  48.         }
  49.         update();
  50.       }
  51.     }
  52.     if($titlemenu==2){
  53.       appear(new optionleveltext(383,170,"level"+$level,$clWhite,20));//âîâxâï
  54.       appear(new optionnoruma2(430,184,$pat_logo+14));//É}î`
  55.       optionkettei=2;
  56.       $optionkettei=2;
  57.       while(optionkettei==2){
  58.         wait(1);
  59.         if(getkey(37)>=1){
  60.           $mplayer.play($se_titlezyouge,0,128);
  61.           if($syokilevel>1) $syokilevel-=1;
  62.           wait(4);          
  63.           if($syokilevel<1) $syokilevel=1;
  64.         }
  65.         if(getkey(38)>=1){
  66.           $mplayer.play($se_titlezyouge,0,128);
  67.           if($syokilevel<90) $syokilevel+=10;
  68.           else $syokilevel=100;
  69.           wait(4);
  70.           if($syokilevel>100) $syokilevel=100;
  71.         }
  72.         if(getkey(39)>=1){
  73.           $mplayer.play($se_titlezyouge,0,128);
  74.           if($syokilevel<100) $syokilevel+=1;
  75.           wait(4);
  76.           if($syokilevel>100) $syokilevel=100;
  77.         }
  78.         if(getkey(40)>=1){
  79.           $mplayer.play($se_titlezyouge,0,128);
  80.           if($syokilevel>10) $syokilevel-=10;
  81.           else $syokilevel=1;
  82.           wait(4);
  83.           if($syokilevel<1) $syokilevel=1;
  84.         }
  85.         if(getkey(13)==1){
  86.           $mplayer.play($se_kettei,0,128);
  87.           optionkettei=0;
  88.           $optionkettei=0;
  89.         }
  90.         if(getkey(45)==1){
  91.           $mplayer.play($se_stop,0,128);
  92.           optionkettei=0;
  93.           $optionkettei=0;
  94.         }
  95.         update();
  96.       }
  97.     }
  98.     if($titlemenu==3){
  99.       $controsettei=1;
  100.       appear(new optioncontrokasoru(278,184,$pat_logo+15));//É}î`
  101.       appear(new optioncontrol1(308,100,"âtâïâXâNâèü[âô",$clBlack,20));//full
  102.       appear(new optioncontrol2(308,140,"âtâïâXâNâèü[âô",$clBlack,20));//full
  103.       appear(new optioncontrol3(208,390,"üªì─ïNô«Ä₧é╔ëeï┐é╡é▄é╖üB",$clBlack,20));//full
  104.       optionkettei=3;
  105.       $optionkettei=3;
  106.       while(optionkettei==3){
  107.         wait(1);
  108.         if(getkey(39)==1){
  109.           $mplayer.play($se_titlezyouge,0,128);
  110.           if($controsettei==1){
  111.             if($player1contro1<=5) $player1contro1+=1;
  112.             wait(4);          
  113.             if($player1contro1>5) $player1contro1=1;
  114.           }
  115.           if($controsettei==2){
  116.             if($player1contro2<=5) $player1contro2+=1;
  117.             wait(4);          
  118.             if($player1contro2>5) $player1contro2=1;
  119.           }
  120.         }
  121.         if(getkey(38)>=1){
  122.           wait(4);
  123.           $mplayer.play($se_titlezyouge,0,128);
  124.           if($controsettei==1) $controsettei=2;
  125.           else $controsettei=1;
  126.         }
  127.         if(getkey(37)==1){
  128.           $mplayer.play($se_titlezyouge,0,128);
  129.           if($controsettei==1){
  130.             if($player1contro1>=1) $player1contro1-=1;         
  131.             if($player1contro1<1) $player1contro1=5;
  132.           }
  133.           if($controsettei==2){
  134.             if($player1contro2>=1) $player1contro2-=1;          
  135.             if($player1contro2<1) $player1contro2=5;
  136.           }
  137.         }
  138.         if(getkey(40)>=1){
  139.           wait(4);
  140.           $mplayer.play($se_titlezyouge,0,128);
  141.           if($controsettei==1) $controsettei=2;
  142.           else $controsettei=1;
  143.         }
  144.         if(getkey(13)==1){
  145.           $mplayer.play($se_kettei,0,128);
  146.           optionkettei=0;
  147.           $optionkettei=0;
  148.         }
  149.         if(getkey(45)==1){
  150.           $mplayer.play($se_stop,0,128);
  151.           optionkettei=0;
  152.           $optionkettei=0;
  153.         }       
  154.         update();
  155.       }
  156.     }
  157.     if($titlemenu==4){
  158.       $controsettei=1;
  159.       appear(new optioncontrokasoru(300,184,$pat_logo+15));//É}î`
  160.       appear(new fullscreen1(308,170,"âtâïâXâNâèü[âô",$clBlack,20));//full
  161.       appear(new fullscreen2(308,210,"üªì─ïNô«Ä₧é╔ëeï┐é╡é▄é╖üB",$clBlack,20));//full
  162.       moonwalk=$moonwalkflag;
  163.       moonwalkonoff=$moonwalkonoff;
  164.       if(moonwalkonoff==0) moonwalkmozi="OFF";
  165.       if(moonwalkonoff==1) moonwalkmozi="ON";
  166.       if(moonwalk==1){
  167.         appear(new moonwalk1(308,250,"âÇü[âôâEâHü[âN"+moonwalkmozi,$clBlack,20));//full
  168.       }
  169.       optionkettei=4;
  170.       $optionkettei=4;
  171.       while(optionkettei==4){
  172.         wait(1);
  173.         if(getkey(37)==1){
  174.           $mplayer.play($se_titlezyouge,0,128);
  175.           full=$fullscreen1;
  176.           moon=$moonwalkonoff;
  177.           if($controsettei==1){
  178.            if(full==0) $fullscreen1=1;
  179.            if(full==1) $fullscreen1=0;
  180.           }
  181.           if($controsettei==3){
  182.            if(moon==0) $moonwalkonoff=1;
  183.            if(moon==1) $moonwalkonoff=0;
  184.           }
  185.         }
  186.         if(getkey(38)>=1){
  187.           $mplayer.play($se_titlezyouge,0,128);
  188.           if($controsettei==1 && $moonwalkflag==1) $controsettei=3; 
  189.           if($controsettei==3 && $moonwalkflag==1) $controsettei=1;
  190.           wait(4);
  191.         }
  192.         if(getkey(39)==1){
  193.           $mplayer.play($se_titlezyouge,0,128);
  194.           full=$fullscreen1;
  195.           moon=$moonwalkonoff;
  196.           if($controsettei==1){
  197.            if(full==0) $fullscreen1=1;
  198.            if(full==1) $fullscreen1=0;
  199.           }
  200.           if($controsettei==3){
  201.            if(moon==0) $moonwalkonoff=1;
  202.            if(moon==1) $moonwalkonoff=0;
  203.           }
  204.         }
  205.         if(getkey(40)>=1){
  206.           $mplayer.play($se_titlezyouge,0,128);
  207.           if($controsettei==1 && $moonwalkflag==1) $controsettei=3; 
  208.           if($controsettei==1 && $moonwalkflag==1) $controsettei=1;
  209.           wait(4);
  210.         }
  211.         if(getkey(13)==1){
  212.           $mplayer.play($se_kettei,0,128);
  213.           optionkettei=0;
  214.           $optionkettei=0;
  215.         }
  216.         if(getkey(45)==1){
  217.           $mplayer.play($se_stop,0,128);
  218.           optionkettei=0;
  219.           $optionkettei=0;
  220.         }
  221.         update();
  222.       }
  223.     }
  224.     if($titlemenu==5){
  225.       $titlemenu=6;
  226.       optiondate=new FileWriter("option.txt");
  227.       optiondate.writeLn($noruma);
  228.       optiondate.writeLn($syokilevel);
  229.       optiondate.writeLn($fullscreen1);
  230.       optiondate.writeLn($player1contro1);
  231.       optiondate.writeLn($player1contro2);
  232.       optiondate.writeLn($moonwalkflag);
  233.       optiondate.writeLn($moonwalkonoff);
  234.       optiondate.close();
  235.       $projectManager.loadPage($page_title);
  236.     }
  237.   }
  238. if(getkey(40)>=1){
  239.   wait(10);
  240.   $mplayer.play($se_titlezyouge,0,128);
  241.   $titlemenu+=1;
  242.   if($titlemenu>=6){
  243.     $titlemenu=1;
  244.   }
  245.   }
  246. if(getkey(38)>=1){
  247.   wait(10);
  248.   $mplayer.play($se_titlezyouge,0,128);
  249.   $titlemenu-=1;
  250.   if($titlemenu<=0){
  251.     $titlemenu=5;
  252.   }
  253.   }
  254. if(getkey(45)==1){
  255.   $mplayer.play($se_stop,0,128);
  256.       $titlemenu=6;
  257.       optiondate=new FileWriter("option.txt");
  258.       optiondate.writeLn($noruma);
  259.       optiondate.writeLn($syokilevel);
  260.       optiondate.writeLn($fullscreen1);
  261.       optiondate.writeLn($player1contro1);
  262.       optiondate.writeLn($player1contro2);
  263.       optiondate.writeLn($moonwalkflag);
  264.       optiondate.writeLn($moonwalkonoff);
  265.       optiondate.close();
  266.       $projectManager.loadPage($page_title);
  267. }
  268.   update();
  269. }