home *** CD-ROM | disk | FTP | other *** search
/ Micromanía 24 / CDMM24_2.iso / data / system / finals.s < prev    next >
Encoding:
Text File  |  1996-08-22  |  6.5 KB  |  179 lines
  1. //
  2. // Finals Code!
  3. //
  4.  
  5.     static short fin_frames[4] = {
  6.         9,24,15,6
  7.     };
  8.  
  9. //-----------------------
  10. //
  11. // start_up()
  12. //
  13. //-----------------------
  14.  
  15. short start_up()
  16. {
  17.     short i,k,error;
  18.  
  19.     //
  20.     // Set forward, back, and control icons
  21.     //
  22.  
  23.    icon_reset();
  24.  
  25.  
  26.    icon_add( ICON_CONTROL, 0 );
  27.    icon_add( ICON_UP,      0 );
  28.  
  29.  
  30.     if (current_submenu > 0) {
  31.         icon_add( ICON_BACK, 0 );
  32.         button_set( "back", 0,0 );
  33.     }
  34.     else {
  35.         button_set( "back", 1,0 );
  36.     }
  37.  
  38.  
  39.     if (current_submenu < fin_frames[current_menu]-1) {
  40.         icon_add( ICON_FORWARD, 0 );
  41.         button_set( "forward", 0,0 );
  42.     }
  43.     else {
  44.         button_set( "forward", 1,0 );
  45.     }
  46.  
  47.     //
  48.     // If not returning from control panel...
  49.     //
  50.  
  51.    if (!pan_quit_flag) {
  52.  
  53.         //
  54.         // Restart background animation
  55.         //
  56.  
  57.         if      (current_menu==MENU_TATOOINE) error = fin_show_ta( current_submenu );
  58.         else if (current_menu==MENU_MOSEISLY) error = fin_show_me( current_submenu );
  59.         else if (current_menu==MENU_JABBAHAN) error = fin_show_jb( current_submenu );
  60.         else if (current_menu==MENU_FINALBAT) error = fin_show_fb( current_submenu );
  61.     }
  62.     pan_quit_flag = FALSE;
  63. }
  64.  
  65. //---------------------------
  66. //
  67. // fin_show_ta()
  68. //
  69. // Show Appropriate 
  70. // storyboards for tatooine
  71. //
  72. //---------------------------
  73.  
  74. static short fin_show_ta( short submenu )
  75. {
  76.     if      (submenu == 0)    anim_start("data\tatooine\final\desfina.nut",ONCE,NEWPAL);
  77.     else if (submenu == 1)    anim_start("data\tatooine\final\desfinb.nut",ONCE,NEWPAL);
  78.     else if (submenu == 2)    anim_start("data\tatooine\final\desfinc.nut",ONCE,NEWPAL);
  79.     else if (submenu == 3)    anim_start("data\tatooine\final\desfind.nut",ONCE,NEWPAL);
  80.     else if (submenu == 4)    anim_start("data\tatooine\final\desfine.nut",ONCE,NEWPAL);
  81.     else if (submenu == 5)    anim_start("data\tatooine\final\desfinf.nut",ONCE,NEWPAL);
  82.     else if (submenu == 6)    anim_start("data\tatooine\final\desfing.nut",ONCE,NEWPAL);
  83.     else if (submenu == 7)    anim_start("data\tatooine\final\desfinh.nut",ONCE,NEWPAL);
  84.     else if (submenu == 8)    anim_start("data\tatooine\final\desfini.nut",ONCE,NEWPAL);
  85.     else return 1;
  86.     return 0;
  87. }
  88.  
  89. //---------------------------
  90. //
  91. // fin_show_me()
  92. //
  93. // Show Appropriate 
  94. // finals for moseisly
  95. //
  96. //---------------------------
  97.  
  98. static short fin_show_me( short submenu )
  99. {
  100.     if      (submenu == 0)    anim_start("data\moseisly\final\mosfina.nut" ,ONCE,NEWPAL);
  101.     else if (submenu == 1)    anim_start("data\moseisly\final\mosfinb.nut" ,ONCE,NEWPAL);
  102.     else if (submenu == 2)    anim_start("data\moseisly\final\mosfinc.nut" ,ONCE,NEWPAL);
  103.     else if (submenu == 3)    anim_start("data\moseisly\final\mosfind.nut" ,ONCE,NEWPAL);
  104.     else if (submenu == 4)    anim_start("data\moseisly\final\mosfine.nut" ,ONCE,NEWPAL);
  105.     else if (submenu == 5)    anim_start("data\moseisly\final\mosfinf.nut" ,ONCE,NEWPAL);
  106.     else if (submenu == 6)    anim_start("data\moseisly\final\mosfing.nut" ,ONCE,NEWPAL);
  107.     else if (submenu == 7)    anim_start("data\moseisly\final\mosfinh.nut" ,ONCE,NEWPAL);
  108.     else if (submenu == 8)    anim_start("data\moseisly\final\mosfini.nut" ,ONCE,NEWPAL);
  109.     else if (submenu == 9)    anim_start("data\moseisly\final\mosfinj.nut" ,ONCE,NEWPAL);
  110.     else if (submenu ==10)    anim_start("data\moseisly\final\mosfink.nut" ,ONCE,NEWPAL);
  111.     else if (submenu ==11)    anim_start("data\moseisly\final\mosfinl.nut" ,ONCE,NEWPAL);
  112.     else if (submenu ==12)    anim_start("data\moseisly\final\mosfinm.nut" ,ONCE,NEWPAL);
  113.     else if (submenu ==13)    anim_start("data\moseisly\final\mosfinn.nut" ,ONCE,NEWPAL);
  114.     else if (submenu ==14)    anim_start("data\moseisly\final\mosfino.nut" ,ONCE,NEWPAL);
  115.     else if (submenu ==15)    anim_start("data\moseisly\final\mosfinp.nut" ,ONCE,NEWPAL);
  116.     else if (submenu ==16)    anim_start("data\moseisly\final\mosfinq.nut" ,ONCE,NEWPAL);
  117.     else if (submenu ==17)    anim_start("data\moseisly\final\mosfinr.nut" ,ONCE,NEWPAL);
  118.     else if (submenu ==18)    anim_start("data\moseisly\final\mosfins.nut" ,ONCE,NEWPAL);
  119.     else if (submenu ==19)    anim_start("data\moseisly\final\mosfint.nut" ,ONCE,NEWPAL);
  120.     else if (submenu ==20)    anim_start("data\moseisly\final\mosfinu.nut" ,ONCE,NEWPAL);
  121.     else if (submenu ==21)    anim_start("data\moseisly\final\mosfinv.nut" ,ONCE,NEWPAL);
  122.     else if (submenu ==22)    anim_start("data\moseisly\final\mosfinw.nut" ,ONCE,NEWPAL);
  123.     else if (submenu ==23)    anim_start("data\moseisly\final\mosfinx.nut" ,ONCE,NEWPAL);
  124.     else return 1;
  125.     return 0;
  126. }
  127.  
  128. //---------------------------
  129. //
  130. // fin_show_jb()
  131. //
  132. // Show Appropriate 
  133. // finals for jabba/han
  134. //
  135. //---------------------------
  136.  
  137. static short fin_show_jb( short submenu )
  138. {
  139.     if      (submenu == 0)    anim_start("data\jabbahan\final\jabfina.nut" ,ONCE,NEWPAL);
  140.     else if (submenu == 1)    anim_start("data\jabbahan\final\jabfinb.nut" ,ONCE,NEWPAL);
  141.     else if (submenu == 2)    anim_start("data\jabbahan\final\jabfinc.nut" ,ONCE,NEWPAL);
  142.     else if (submenu == 3)    anim_start("data\jabbahan\final\jabfind.nut" ,ONCE,NEWPAL);
  143.     else if (submenu == 4)    anim_start("data\jabbahan\final\jabfine.nut" ,ONCE,NEWPAL);
  144.     else if (submenu == 5)    anim_start("data\jabbahan\final\jabfinf.nut" ,ONCE,NEWPAL);
  145.     else if (submenu == 6)    anim_start("data\jabbahan\final\jabfing.nut" ,ONCE,NEWPAL);
  146.     else if (submenu == 7)    anim_start("data\jabbahan\final\jabfinh.nut" ,ONCE,NEWPAL);
  147.     else if (submenu == 8)    anim_start("data\jabbahan\final\jabfini.nut" ,ONCE,NEWPAL);
  148.     else if (submenu == 9)    anim_start("data\jabbahan\final\jabfinj.nut" ,ONCE,NEWPAL);
  149.     else if (submenu ==10)    anim_start("data\jabbahan\final\jabfink.nut" ,ONCE,NEWPAL);
  150.     else if (submenu ==11)    anim_start("data\jabbahan\final\jabfinl.nut" ,ONCE,NEWPAL);
  151.     else if (submenu ==12)    anim_start("data\jabbahan\final\jabfinm.nut" ,ONCE,NEWPAL);
  152.     else if (submenu ==13)    anim_start("data\jabbahan\final\jabfinn.nut" ,ONCE,NEWPAL);
  153.     else if (submenu ==14)    anim_start("data\jabbahan\final\jabfino.nut" ,ONCE,NEWPAL);
  154.     else return 1;
  155.     return 0;
  156. }
  157.  
  158. //---------------------------
  159. //
  160. // fin_show_fb()
  161. //
  162. // Show Appropriate 
  163. // finals for finalbat
  164. //
  165. //---------------------------
  166.  
  167. static short fin_show_fb( short submenu )
  168. {
  169.     if      (submenu == 0)    anim_start("data\finalbat\final\fbfina.nut" ,ONCE,NEWPAL);
  170.     else if (submenu == 1)    anim_start("data\finalbat\final\fbfinb.nut" ,ONCE,NEWPAL);
  171.     else if (submenu == 2)    anim_start("data\finalbat\final\fbfinc.nut" ,ONCE,NEWPAL);
  172.     else if (submenu == 3)    anim_start("data\finalbat\final\fbfind.nut" ,ONCE,NEWPAL);
  173.     else if (submenu == 4)    anim_start("data\finalbat\final\fbfine.nut" ,ONCE,NEWPAL);
  174.     else if (submenu == 5)    anim_start("data\finalbat\final\fbfinf.nut" ,ONCE,NEWPAL);
  175.     else return 1;
  176.     return 0;
  177. }
  178.  
  179.