home *** CD-ROM | disk | FTP | other *** search
/ CD-ROM Today - The Disc! 9 / cdrt09.iso / mac / UTAHDEMO / SHARED.DIR / 00732_Script_732 < prev    next >
Text File  |  1995-01-13  |  3KB  |  101 lines
  1. -- set up quit
  2. on setUpQuit
  3.   global buttonPressed
  4.   
  5.   puppetSprite 22, TRUE
  6.   puppetSprite 21, TRUE
  7.   puppetSprite 20, TRUE
  8.   puppetSprite 19, TRUE
  9.   
  10.  if (the type of sprite 20 = 1) then
  11.    if rollover (20) then
  12.     if (the stillDown) then
  13.       set the castNum of sprite (20) to a34
  14.     else
  15.       set the castNum of sprite (20) to a35
  16.     end if
  17.    else
  18.   set the castNum of sprite (20) to a34
  19.   end if
  20. end if
  21.  
  22. if (the type of sprite 19 = 1) then
  23.   if rollover (19) then
  24.     if (buttonPressed = 7) and (the stillDown) then
  25.       set the castNum of sprite (19) to the number of cast "quit down"
  26.     else if (the stillDown) then 
  27.       set the castNum of sprite (19) to the number of cast "quit up"
  28.     else
  29.       set the castNum of sprite (19) to the number of cast "quit sel"
  30.     end if
  31.   else
  32.     set the castNum of sprite (19) to the number of cast "quit up"
  33.   end if
  34. end if
  35.  
  36.   --credits button
  37. if (the type of sprite 21 = 1) then
  38.   if rollover (21) then
  39.     if (buttonPressed = 30) and (the stillDown) then
  40.       set the castNum of sprite (21) to the number of cast "credits down"
  41.     else if (the stillDown) then 
  42.       set the castNum of sprite (21) to the number of cast "credits up"
  43.     else
  44.       set the castNum of sprite (21) to the number of cast "credits sel"
  45.     end if
  46.   else
  47.     set the castNum of sprite (21) to the number of cast "credits up"
  48.   end if
  49. end if
  50.  
  51.   --help button
  52. if (the type of sprite 22 = 1) then
  53.   if rollover (22) then
  54.     if (buttonPressed = 15) and (the stillDown) then
  55.       set the castNum of sprite (22) to the number of cast "help down"
  56.     else if (the stillDown) then 
  57.       set the castNum of sprite (22) to the number of cast "help up"
  58.     else
  59.       set the castNum of sprite (22) to the number of cast "help sel"
  60.     end if
  61.   else
  62.     set the castNum of sprite (22) to the number of cast "help up"
  63.   end if
  64. end if
  65.  
  66. -- confirm quitting
  67. on confirmQuitting
  68.   global buttonPressed
  69.   
  70.   puppetSprite 23, TRUE
  71.   puppetSprite 24, TRUE
  72.   
  73.   if not(the stillDown) then set buttonPressed = FALSE
  74.  
  75. if (the type of sprite 23 = 1) then  
  76.   if rollover (23) then
  77.     if (buttonPressed = 8) and (the stillDown) then
  78.       set the castNum of sprite (23) to the number of cast "yes down"
  79.     else if (the stillDown) then 
  80.       set the castNum of sprite (23) to the number of cast "yes up"
  81.     else
  82.       set the castNum of sprite (23) to the number of cast "yes sel"
  83.     end if
  84.   else
  85.     set the castNum of sprite (23) to the number of cast "yes up"
  86.   end if
  87. end if
  88.   
  89. if (the type of sprite 24 = 1) then
  90.   if rollover (24) then
  91.     if (buttonPressed = 9) and (the stillDown) then
  92.       set the castNum of sprite (24) to the number of cast "no down"
  93.     else if (the stillDown) then 
  94.       set the castNum of sprite (24) to the number of cast "no up"
  95.     else
  96.       set the castNum of sprite (24) to the number of cast "no sel"
  97.     end if
  98.   else
  99.     set the castNum of sprite (24) to the number of cast "no up"
  100.   end if
  101. end if