home *** CD-ROM | disk | FTP | other *** search
/ What PC? 1998 December / WPCDEC98.ISO / dxrs / Mainmn12.dxr / Internal_1.ls < prev    next >
Encoding:
Text File  |  1998-10-12  |  1.4 KB  |  20 lines
  1. on startMovie
  2.   global DriveLtr, MainMenuChooseList, MainBackgroundSprite, MainHilightSprite1, MainHilightSprite2, MAINQuitButtonSprite, lntAlertBox, IntAlertButtonOne, IntAlertButtonTwo, IntAlertButtonThree, IntBrowserAlOption, MainRegularGraphic, MainRegularGraphicList, MainRegularGraphicCount, MainLastUpdate
  3.   set MAINQuitButtonSprite to 2
  4.   set lntAlertBox to 30
  5.   set IntAlertButtonOne to 31
  6.   set IntAlertButtonTwo to 32
  7.   set IntAlertButtonThree to 33
  8.   set IntBrowserAlOption to 0
  9.   set MainMenuChooseList to list([[32, 185, 220, 214, "SoftwareHilight", 220, 185], [240, 37, 515, 236, "FeatSoftHilight", 241, 40]], [[32, 223, 220, 243, "EntertainHilight", 220, 221], [242, 245, 518, 446, "EntMontageHilight", 241, 247]], [[32, 259, 220, 280, "BuyersHilight", 220, 257], []], [[32, 296, 220, 317, "JargonHilight", 220, 293], []], [[32, 333, 220, 354, "GetStartHighlight", 220, 328], []], [[32, 370, 220, 391, "InternetHilight", 220, 365], []], [[32, 407, 220, 427, "CreditsHilight", 220, 401], []], [[525, 56, 628, 151, "VirginHilight", 526, 56], []], [[525, 152, 628, 245, "Compservehilight", 526, 152], []], [[525, 248, 628, 345, "ClaraHilight", 526, 248], []])
  10.   repeat with i = 1 to 48
  11.     puppetSprite(i, 1)
  12.   end repeat
  13.   set MainBackgroundSprite to 1
  14.   set MainHilightSprite1 to 10
  15.   set MainHilightSprite2 to 11
  16.   set the member of sprite MainBackgroundSprite to member "menu2"
  17.   updateStage()
  18.   set MainLastUpdate to the timer
  19. end
  20.