home *** CD-ROM | disk | FTP | other *** search
/ ring.yamanashi.ac.jp/pub/pc/freem/action/ / action.zip / TQAP.zip / Usr / Editor_Help.tonyu < prev    next >
Text File  |  2007-06-09  |  11KB  |  288 lines

  1. extends SpriteChar;
  2.  
  3. run=1;
  4.  
  5. w_x1=$viewX+40;
  6. w_y1=$viewY+40;
  7. w_x2=w_x1+400;
  8. w_y2=w_y1+300;
  9.  
  10. t_x1=60;
  11. t_y1=50;
  12. stp =15;
  13.   
  14. limit=7;
  15.  
  16. for (e in $chars){
  17.   if (e is Editor) break;
  18. }
  19.  
  20. setFont("élér âSâVâbâN");
  21.  
  22. while(1){
  23.   
  24.   if (e.help_page==1) page1();
  25.   if (e.help_page==2) page2();
  26.   if (e.help_page==3) page5();
  27.   if (e.help_page==4) page6();
  28.   if (e.help_page==5) tilelist();
  29.   if (e.help_page==6) keylist1();
  30.   if (e.help_page==7) keylist2();
  31.   if (getkey(81)==1) break;
  32.  
  33. }
  34.  
  35. run=0;
  36. setFont(0);
  37.  
  38. //-------------------------------------------------------------------------
  39.  
  40. function page1(){
  41.   
  42.   wait(1);
  43.   
  44.   while(1){
  45.     
  46.     background();
  47.     drawText(w_x1+t_x1,w_y1+t_y1         ,"èεû{ôIé╚Ägéóò√ü@éP",$clWhite,10,-1);
  48.     drawText(w_x1+t_x1,w_y1+t_y1+stp*1.5 ,"âGâfâBâbâgé┼é═âXâeü[âWâfü[â^é╠ò╥ÅWé¬é┼é½é▄é╖üB",$clWhite,10,-1);
  49.     drawText(w_x1+t_x1,w_y1+t_y1+stp*2.5 ,"â}âEâXé┼â^âCâïé≡æIæ≡é╡üAözÆué╡é─éóé¡é▒é╞é┼",$clWhite,10,-1);
  50.     drawText(w_x1+t_x1,w_y1+t_y1+stp*3.5 ,"ò╥ÅWé≡ìsé┴é─éóé½é▄é╖üB",$clWhite,10,-1);
  51.     drawText(w_x1+t_x1,w_y1+t_y1+stp*5   ,"éPüAéQâLü[üiépé╠Åπé╔éáéΘâLü[é┼é╖üjé≡ëƒé╖é╞",$clWhite,10,-1);
  52.     drawText(w_x1+t_x1,w_y1+t_y1+stp*6   ,"â^âCâïé¬ò╧éφéΦé▄é╖üBé╖é½é╚â^âCâïé≡æIé±é┼",$clWhite,10,-1);
  53.     drawText(w_x1+t_x1,w_y1+t_y1+stp*7   ,"ì╢âNâèâbâNé╖éΘé╞é╗é╠ÅΩÅèé╔â^âCâïé¬özÆué│éΩé▄é╖üB",$clWhite,10,-1);
  54.     drawText(w_x1+t_x1,w_y1+t_y1+stp*8   ,"ôGâLâââëéΓâîâoü[é╚é╟üiê╚ì~âIâuâWâFâNâgé╞",$clWhite,10,-1);    
  55.     drawText(w_x1+t_x1,w_y1+t_y1+stp*9   ,"î─é╤é▄é╖üjé≡É▌Æué╖éΘé▒é╞éαé┼é½é▄é╖üB",$clWhite,10,-1);
  56.     drawText(w_x1+t_x1,w_y1+t_y1+stp*10.5,"âIâuâWâFâNâgìφÅ£é═écâLü[é≡ëƒé╡é─æ╬Å█é≡",$clWhite,10,-1);
  57.     drawText(w_x1+t_x1,w_y1+t_y1+stp*11.5,"ì╢âNâèâbâNé┼é╖üB",$clWhite,10,-1);
  58.     drawText(w_x1+t_x1,w_y1+t_y1+stp*13  ,"âJü[â\âïâLü[üiü¬ü½ü⌐ü¿üjé┼ëµû╩é≡ê┌ô«é┼é½é▄é╖üB",$clWhite,10,-1);
  59.     
  60.     if (key_input()!=1) break;
  61.     update();
  62.   }
  63.  
  64. }
  65.  
  66. function page2(){
  67.   
  68.   wait(1);
  69.   
  70.   while(1){
  71.     
  72.     background();
  73.     drawText(w_x1+t_x1,w_y1+t_y1         ,"èεû{ôIé╚Ägéóò√ü@éQ",$clWhite,10,-1);
  74.     drawText(w_x1+t_x1,w_y1+t_y1+stp*1.5 ,"ésâLü[é≡ëƒé╖é╞âeâXâgâvâîâCé¬é┼é½é▄é╖üB",$clWhite,10,-1);
  75.     drawText(w_x1+t_x1,w_y1+t_y1+stp*2.5 ,"Ä⌐ï@é≡özÆué╖éΘê╩Æué≡æIæ≡é╡é─é¡é╛é│éóüB",$clWhite,10,-1);
  76.     drawText(w_x1+t_x1,w_y1+t_y1+stp*3.5 ,"âvâîâCé¬âXâ^ü[âgé╡é▄é╖üB",$clWhite,10,-1);
  77.     drawText(w_x1+t_x1,w_y1+t_y1+stp*4.5 ,"âeâXâgâvâîâCÆåé═üAédâLü[é≡ëƒé╖é⌐üA",$clWhite,10,-1);
  78.     drawText(w_x1+t_x1,w_y1+t_y1+stp*5.5 ,"âAâEâgé╔é╚éΘé╞âGâfâBâbâgëµû╩é╔û▀éΦé▄é╖üB",$clWhite,10,-1);
  79.     drawText(w_x1+t_x1,w_y1+t_y1+stp*7   ,"ékâLü[é┼â}âbâvé╠âìü[âhüAérâLü[é┼âZü[âué¬",$clWhite,10,-1);
  80.     drawText(w_x1+t_x1,w_y1+t_y1+stp*8   ,"é┼é½é▄é╖üBé`âLü[é┼âXâeü[âWé≡æIæ≡é╡é─",$clWhite,10,-1);
  81.     drawText(w_x1+t_x1,w_y1+t_y1+stp*9   ,"âZü[âué┼é½é▄é╖üB",$clWhite,10,-1);    
  82.     drawText(w_x1+t_x1,w_y1+t_y1+stp*10   ,"",$clWhite,10,-1);
  83.     drawText(w_x1+t_x1,w_y1+t_y1+stp*10.5,"öαé≡âZâbâgé╡é╜îπüAöαé╠Åπé┼ëEâNâèâbâNé╖éΘé╞üA",$clWhite,10,-1);
  84.     drawText(w_x1+t_x1,w_y1+t_y1+stp*11.5,"âNâèâAîπé╔é╟é╠âXâeü[âWé╔ìsé¡é⌐îêÆΦé┼é½é▄é╖üB",$clWhite,10,-1);
  85.     drawText(w_x1+t_x1,w_y1+t_y1+stp*12.5,"ö≥é╤ɵé╠âXâeü[âWé╞ÅΩÅèé≡æIæ≡é╡é─é¡é╛é│éóüB",$clWhite,10,-1);
  86.     
  87.     if (key_input()!=1) break;
  88.     update();
  89.   }
  90. }
  91.  
  92.  
  93.  
  94.  
  95. function page5(){
  96.   
  97.   var mx,my;
  98.   
  99.   mx=200;
  100.   my=235;
  101.   
  102.   wait(1);
  103.   
  104.   while(1){
  105.     
  106.     background();
  107.     drawText(w_x1+t_x1,w_y1+t_y1       ,"âXâNâìü[âïò√û@",$clWhite,10,-1);
  108.     drawText(w_x1+t_x1,w_y1+t_y1+stp*1.5 ,"âXâNâìü[âïé╠é│é╣ò√é╔é═éSé┬é╠ò√û@é¬éáéΦé▄é╖üB",$clWhite,10,-1);
  109.     drawText(w_x1+t_x1,w_y1+t_y1+stp*3   ,"ü@X-Y  : Åπë║ì╢ëEé╔âXâNâìü[âïé╡é▄é╖üB",$clWhite,10,-1);
  110.     drawText(w_x1+t_x1,w_y1+t_y1+stp*4   ,"ü@X    : ì╢ëEò√îⁿé╠é▌âXâNâìü[âïé╡é▄é╖üB",$clWhite,10,-1);
  111.     drawText(w_x1+t_x1,w_y1+t_y1+stp*5   ,"ü@Y    : Åπë║ò√îⁿé╠é▌âXâNâìü[âïé╡é▄é╖üB",$clWhite,10,-1);
  112.     drawText(w_x1+t_x1,w_y1+t_y1+stp*6   ,"ü@None : ëµû╩é≡î┼ÆΦé╡üAâXâNâìü[âïé╡é▄é╣é±üB",$clWhite,10,-1);
  113.     drawText(w_x1+t_x1,w_y1+t_y1+stp*7.5 ,"âéü[âhé╠É╪éΦæ╓éªé═éRüAéSüiédé╠Åπé╔éáéΘâLü[üj",$clWhite,10,-1);
  114.     drawText(w_x1+t_x1,w_y1+t_y1+stp*8.5 ,"é┼ìséóé▄é╖üB",$clWhite,10,-1);    
  115.     drawText(w_x1+t_x1,w_y1+t_y1+stp*9.5 ,"î╗ì▌é╠âéü[âhé═âXâeü[â^âXëµû╩é╔ò\Īé│éΩé▄é╖üB",$clWhite,10,-1);
  116.     drawSprite(w_x1+mx,w_y1+my,$pat_status01+0,0,-2);
  117.     
  118.     if (key_input()!=1) break;
  119.     update();
  120.   }
  121. }
  122.  
  123. function page6(){
  124.  
  125.   wait(1);
  126.   
  127.   while(1){
  128.     
  129.     background();
  130.     drawText(w_x1+t_x1,w_y1+t_y1         ,"âîâoü[é╔é┬éóé─",$clWhite,10,-1);
  131.     drawText(w_x1+t_x1,w_y1+t_y1+stp*1.5 ,"âXâeü[âWÆåé╔é═ô»é╢ÉFé╠âîâoü[é≡",$clWhite,10,-1);
  132.     drawText(w_x1+t_x1,w_y1+t_y1+stp*2.5 ,"éQé┬ê╚ÅπâZâbâgé┼é½é▄é╣é±üB",$clWhite,10,-1);
  133.     drawText(w_x1+t_x1,w_y1+t_y1+stp*4   ,"öÆÉFé╠âîâoü[é═âXâNâìü[âïò√û@é¬",$clWhite,10,-1);
  134.     drawText(w_x1+t_x1,w_y1+t_y1+stp*5   ,"X-Yé╠Ä₧é╔é╠é▌âZâbâgé┼é½é▄é╖üB",$clWhite,10,-1);
  135.     
  136.     if (key_input()!=1) break;
  137.     update();
  138.   }
  139. }
  140.  
  141. function tilelist(){
  142.     
  143.   var mx,my;
  144.   
  145.   mx=80;
  146.   my=80;
  147.   
  148.   wait(1);
  149.   
  150.   while(1){
  151.     
  152.     background();
  153.     drawText(w_x1+t_x1      ,w_y1+t_y1       ,"âpâ^ü[âôé╠Éαû╛",$clWhite,10,-1);
  154.     
  155.     drawText(w_x1+t_x1+stp*3,w_y1+t_y1+stp*2 ,"Æ╩Åφï≤è╘",$clWhite,10,-1);
  156.     drawText(w_x1+t_x1+stp*3,w_y1+t_y1+stp*3 ,"Ådù═é¬é⌐é⌐éΘ",$clWhite,10,-1);
  157.     drawSprite(w_x1+mx,w_y1+my+stp*1  ,$pat_block+0,0,-2);
  158.     
  159.     drawText(w_x1+t_x1+stp*3,w_y1+t_y1+stp*4.5 ,"â}âOâ}",$clWhite,10,-1);
  160.     drawText(w_x1+t_x1+stp*3,w_y1+t_y1+stp*5.5 ,"ÉGéΩéΘé╞âAâEâg",$clWhite,10,-1);
  161.     drawSprite(w_x1+mx,w_y1+my+stp*3.5,$pat_block+1,0,-2);
  162.     
  163.     drawText(w_x1+t_x1+stp*3,w_y1+t_y1+stp*7   ,"ûéû@ï╓Ä~ï≤è╘",$clWhite,10,-1);
  164.     drawText(w_x1+t_x1+stp*3,w_y1+t_y1+stp*8   ,"ûéû@é¬Ägéªé╚éó",$clWhite,10,-1);
  165.     drawSprite(w_x1+mx,w_y1+my+stp*6  ,$pat_block+2,0,-2);
  166.     
  167.     drawText(w_x1+t_x1+stp*3,w_y1+t_y1+stp*9.5 ,"âuâìâbâN",$clWhite,10,-1);
  168.     drawText(w_x1+t_x1+stp*3,w_y1+t_y1+stp*10.5,"ûéû@é┼Å┴é╣éΘ",$clWhite,10,-1);
  169.     drawSprite(w_x1+mx,w_y1+my+stp*8.5  ,$pat_block+4,0,-2);
  170.     
  171.     drawText(w_x1+t_x1+stp*3,w_y1+t_y1+stp*12 ,"ë≤éΩéΘâuâìâbâN",$clWhite,10,-1);
  172.     drawText(w_x1+t_x1+stp*3,w_y1+t_y1+stp*13,"Åπé╔ŵéΘé╞ë≤éΩéΘ",$clWhite,10,-1);
  173.     drawSprite(w_x1+mx,w_y1+my+stp*11  ,$pat_block+8,0,-2);
  174.     
  175.     drawText(w_x1+t_x1+stp*13.5,w_y1+t_y1+stp*2 ,"ìdéóâuâìâbâN",$clWhite,10,-1);
  176.     drawText(w_x1+t_x1+stp*13.5,w_y1+t_y1+stp*3 ,"ûéû@é┼Å┴ïÄòsë┬",$clWhite,10,-1);
  177.     drawSprite(w_x1+mx+stp*10.5,w_y1+my+stp*1  ,$pat_block+3,0,-2);
  178.     
  179.     drawText(w_x1+t_x1+stp*13.5,w_y1+t_y1+stp*4.5 ,"âcâ^",$clWhite,10,-1);
  180.     drawText(w_x1+t_x1+stp*13.5,w_y1+t_y1+stp*5.5 ,"Å╕éΦì~éΦë┬ö\",$clWhite,10,-1);
  181.     drawSprite(w_x1+mx+stp*10.5,w_y1+my+stp*3.5  ,$pat_block+12,0,-2);
  182.     
  183.     drawText(w_x1+t_x1+stp*13.5,w_y1+t_y1+stp*7 ,"û│Ådù═ï≤è╘",$clWhite,10,-1);
  184.     drawText(w_x1+t_x1+stp*13.5,w_y1+t_y1+stp*8 ,"Ådù═é¬1/40é╔",$clWhite,10,-1);
  185.     drawSprite(w_x1+mx+stp*10.5,w_y1+my+stp*6  ,$pat_block+5,0,-2);
  186.     
  187.     drawText(w_x1+t_x1+stp*13.5,w_y1+t_y1+stp*9.5 ,"â_â~ü[éP",$clWhite,10,-1);
  188.     drawText(w_x1+t_x1+stp*13.5,w_y1+t_y1+stp*10.5 ,"Æ╩ë▀ë┬ö\",$clWhite,10,-1);
  189.     drawSprite(w_x1+mx+stp*10.5,w_y1+my+stp*8.5  ,$pat_block+14,0,-2);
  190.     
  191.     drawText(w_x1+t_x1+stp*13.5,w_y1+t_y1+stp*12 ,"â_â~ü[éQ",$clWhite,10,-1);
  192.     drawText(w_x1+t_x1+stp*13.5,w_y1+t_y1+stp*13 ,"Æ╩ë▀ë┬ö\",$clWhite,10,-1);
  193.     drawSprite(w_x1+mx+stp*10.5,w_y1+my+stp*11  ,$pat_block+13,0,-2);
  194.     
  195.     if (key_input()!=1) break;
  196.     update();
  197.   }
  198. }
  199.   
  200.  
  201.  
  202. function keylist1(){
  203.  
  204.   wait(1);
  205.   
  206.   while(1){
  207.     
  208.     background();
  209.     drawText(w_x1+t_x1,w_y1+t_y1         ,"â}âEâXæÇì∞êΩùù"    ,$clWhite,10,-1);
  210.     drawText(w_x1+t_x1,w_y1+t_y1+stp*1.5 ,"ü@ì╢âNâèâbâNü@üFü@âpâ^ü[âôözÆuü@ü@",$clWhite,10,-1);
  211.     drawText(w_x1+t_x1,w_y1+t_y1+stp*3   ,"ü@ëEâNâèâbâNü@üFü@âXâ|âCâgü@ü@ü@",$clWhite,10,-1);
  212.     drawText(w_x1+t_x1,w_y1+t_y1+stp*4.5 ,"ü@âVâtâgü{ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@",$clWhite,10,-1);
  213.     drawText(w_x1+t_x1,w_y1+t_y1+stp*5.5 ,"ü@ü@ëEâNâèâbâNüFü@âIâuâWâFâNâgâXâ|âCâgü@",$clWhite,10,-1);
  214.     drawText(w_x1+t_x1,w_y1+t_y1+stp*7   ,"ü@öαé╠Åπé┼ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@ü@",$clWhite,10,-1);
  215.     drawText(w_x1+t_x1,w_y1+t_y1+stp*8   ,"ü@ü@ëEâNâèâbâNüFü@öαé╠ö≥é╤ɵÉ▌ÆΦü@",$clWhite,10,-1);
  216.  
  217.     if (key_input()!=1) break;
  218.     update();
  219.   }
  220. }
  221.  
  222. function keylist2(){
  223.   
  224.   wait(1);
  225.  
  226.   while(1){
  227.     
  228.     background();
  229.     drawText(w_x1+t_x1,w_y1+t_y1       ,"âLü[æÇì∞êΩùù"    ,$clWhite,10,-1);
  230.     drawText(w_x1+t_x1,w_y1+t_y1+stp*1 ,"ü@ékü@ü@ü@ü@ü@ü@üFü@âìü[âhü@ü@ü@ü@",$clWhite,10,-1);
  231.     drawText(w_x1+t_x1,w_y1+t_y1+stp*2 ,"ü@érü@ü@ü@ü@ü@ü@üFü@âZü[âuü@ü@ü@ü@",$clWhite,10,-1);
  232.     drawText(w_x1+t_x1,w_y1+t_y1+stp*3 ,"ü@é`ü@ü@ü@ü@ü@ü@üFü@æIæ≡é╡é─âZü[âu",$clWhite,10,-1);
  233.     drawText(w_x1+t_x1,w_y1+t_y1+stp*4 ,"ü@ébü@ü@ü@ü@ü@ü@üFü@âNâèâAü@ü@ü@ü@",$clWhite,10,-1);
  234.     drawText(w_x1+t_x1,w_y1+t_y1+stp*5 ,"ü@ésü@ü@ü@ü@ü@ü@üFü@âeâXâgâvâîâCü@",$clWhite,10,-1);
  235.     drawText(w_x1+t_x1,w_y1+t_y1+stp*6 ,"ü@édü@ü@ü@ü@ü@ü@üFü@âeâXâgâvâîâCé⌐éτò£ïAü@",$clWhite,10,-1);
  236.     drawText(w_x1+t_x1,w_y1+t_y1+stp*7 ,"ü@éhü@ü@ü@ü@ü@ü@üFü@âQü[âÇèJÄnê╩ÆuÉ▌ÆΦ",$clWhite,10,-1);
  237.     drawText(w_x1+t_x1,w_y1+t_y1+stp*8 ,"ü@épü@ü@ü@ü@ü@ü@üFü@â^âCâgâïëµû╩é╔û▀éΘ",$clWhite,10,-1);
  238.     drawText(w_x1+t_x1,w_y1+t_y1+stp*9 ,"ü@éPüié╩üjü@ü@ü@üFü@âpâ^ü[âôæùéΦü{",$clWhite,10,-1);
  239.     drawText(w_x1+t_x1,w_y1+t_y1+stp*10,"ü@éQüié╙üjü@ü@ü@üFü@âpâ^ü[âôæùéΦü|",$clWhite,10,-1);
  240.     drawText(w_x1+t_x1,w_y1+t_y1+stp*11,"ü@éRüiéáüjü@ü@ü@üFü@âXâNâìü[âïò√û@æùéΦü{",$clWhite,10,-1);
  241.     drawText(w_x1+t_x1,w_y1+t_y1+stp*12,"ü@éSüiéñüjü@ü@ü@üFü@âXâNâìü[âïò√û@æùéΦü|",$clWhite,10,-1);
  242.     drawText(w_x1+t_x1,w_y1+t_y1+stp*13,"ü@ü¬ü½ü⌐ü¿ü@ü@ü@üFü@ëµû╩ê┌ô«",$clWhite,10,-1);
  243.     
  244.     if (key_input()!=1) break;
  245.     update();
  246.   }
  247.  
  248. }
  249.  
  250. function background(){
  251.   
  252.   fillRect(w_x1,w_y1,w_x2,w_y2,$clBlack,1);
  253.   
  254.   drawLine(w_x1+50 ,w_y1+40 ,w_x1+350,w_y1+40 ,$clWhite,-1);
  255.   drawLine(w_x1+50 ,w_y1+270,w_x1+350,w_y1+270,$clWhite,-1);
  256.   
  257.   drawText(w_x1+180,w_y1+20 ,"HELP",$clWhite,12,-1);
  258.   drawText(w_x1+270,w_y1+275,"Q : û▀éΘ",$clWhite,10,-1);
  259.   drawText(w_x1+60 ,w_y1+275,"ü⌐ ü¿ : Äƒé╠âyü[âWé╓",$clWhite,10,-1);
  260.   drawText(w_x1+290,w_y1+20 ,"Page "+e.help_page+"/"+limit,$clWhite,10,-1);
  261.  
  262. }
  263.  
  264. function key_input(){
  265.   
  266.   var value;
  267.   
  268.   value=e.help_page;
  269.   
  270.   if (getkey(37)==1) {
  271.     e.help_page--;
  272.     if (e.help_page<1    ) e.help_page=limit;
  273.     if (e.help_page>limit) e.help_page=1;
  274.     value=e.help_page;
  275.   }
  276.   if (getkey(39)==1) {
  277.     e.help_page++;
  278.     if (e.help_page<1    ) e.help_page=limit;
  279.     if (e.help_page>limit) e.help_page=1;
  280.     value=e.help_page;
  281.   }
  282.   //if (getkey(81)==1) value=0;
  283.   
  284. }
  285.  
  286.  
  287.  
  288.