home *** CD-ROM | disk | FTP | other *** search
/ LAUNCH 3 / LAUNCH.BIN / mac / MEDIAHB / SOURCES / S13_INTRO2.k < prev    next >
Text File  |  1995-09-02  |  997b  |  66 lines
  1. object S13_INTRO2 is MEDIADISTRIBUTOR
  2. with
  3.     Duration is -1;
  4.     X is 0; Y is 0; Width is 640; Height is 480;
  5.     Items is [
  6.         S13_1_HBINTR2F_PIC,
  7.         S13_2_CLICK,
  8.         S13_3_DONE
  9.     ];
  10. end;
  11.  
  12. object S13_1_HBINTR2F_PIC is MEDIASCROLLER
  13. has
  14.     
  15.     OffScreen()
  16.         do
  17.             self.Enable(false);
  18.             self.Show(true);
  19.         end;
  20.     
  21. with
  22.     Target is PICTURECLIENT with Supplier is M177_HBINTR2F_PIC; Duration is 0; end;
  23.     Duration is -1;
  24.     X is 0; Y is 0; Width is 640; Height is 480;
  25. end;
  26.  
  27. object S13_2_CLICK is MEDIADELEGATOR
  28. has
  29.     
  30.     OffScreen()
  31.         do
  32.             self.Enable(true);
  33.             self.Show(true);
  34.         end;
  35.     
  36.     MouseDown(theX, theY)
  37.         do
  38.             TRANSITION.Set(CombHorizontal, 15);
  39.             APPLICATION.GoTo(S1_LAYOUT1);
  40.         end;
  41.     
  42. with
  43.     Duration is -1;
  44.     X is 128; Y is 341; Width is 178; Height is 22;
  45. end;
  46.  
  47. object S13_3_DONE is MEDIADELEGATOR
  48. has
  49.     
  50.     OffScreen()
  51.         do
  52.             self.Enable(true);
  53.             self.Show(true);
  54.         end;
  55.     
  56.     MouseDown(theX, theY)
  57.         do
  58.             APPLICATION.Quit();
  59.         end;
  60.     
  61. with
  62.     Duration is -1;
  63.     X is 559; Y is 433; Width is 80; Height is 46;
  64. end;
  65.  
  66.