home *** CD-ROM | disk | FTP | other *** search
/ What PC? 1997 December / WPCDEC97.ISO / DXRS / GESWDEC.DXR / 00001_StartMovie.ls next >
Encoding:
Text File  |  1997-10-13  |  15.0 KB  |  111 lines
  1. on startMovie
  2.   global IFLSpriteDifference, IFLhasLineFlashedList, IFLCanChange, IFLGettingSNameSprite, ADDAdCount, ADDADvertSprite, ADDADCOntTwo, IFLButtonList, IFLArtsNameSprite, GESMasterList, GESPCLevelOneList, GESPCBegin, GESPCTextList, GESMouseWordList, GESDesOnStage, GESLastText, GESTempWhichPic, GESSytemUnit, GESPCList, GESInsidSysList, GESReturnIcon, GESInsideLevelOneList, GESInsideTextIntroSprite, GESPCTextListOne, GESPCTextListTwo, GESRollReturn, GESWhichXplor, GESInsThisDes, GESBrown, GESGreen, GESBlack, MASGESFlag, GESThisDEScription, GESQuittingList, GESQuitCounter, GESChooseQuit, IFLQuitsprite, GESBuyingList, WaitFactor, IFLGoNow, IFLMovieNameList, IFLWhichcursorList, IFLThisButton, addlist, addPallist, ADDThisNum, ADDKindList, REFAddWatch, GESPrinterList, GESNotefirst, GESNoteAllBlue, GESNOTBrown, GESNOTBlue, GESHeadList, REFINTER, IFLHeadInkList, GesPrinterIntro, GESPrinterIntroList, GESPrintDotList, GESPrintLaserList, GESPrintInktList, GESPrinterTextList, GESWhichPrinterChosen, GESPrinterIntroScreenList, GTSLASTRolledover, IFLUSERPRESSEDESCKEY, GESEscList, IFLSectionImageList, GESPrinterfirst, GESNotebookList, GESNOTETextList, GESNoteLevelOneList, GESNoteBuyingList, GESnotebookQuittingList, GESNoteIcon, GESPRINTBuyingList, IFLRolledOver
  3.   repeat with t = 1 to 38
  4.     puppetSprite(t, 1)
  5.     set the stretch of sprite t to 0
  6.   end repeat
  7.   puppetSprite(48, 1)
  8.   repeat with t = 39 to 47
  9.     puppetSprite(t, 0)
  10.     set the stretch of sprite t to 0
  11.   end repeat
  12.   updateStage()
  13.   repeat with t = 39 to 47
  14.     puppetSprite(t, 1)
  15.     set the stretch of sprite t to 0
  16.   end repeat
  17.   updateStage()
  18.   if REFINTER = 1 then
  19.     set REFINTER to 0
  20.   else
  21.     set GTSLASTRolledover to 0
  22.     set IFLUSERPRESSEDESCKEY to 0
  23.     set IFLSectionImageList to list("ALLNAmesGTS", "ALLNAmes", "ALLNAmes", "ALLNAmes", "ALLNAmes", "ALLNAmes", "ALLNAmes", "ALLNAmesGES", "ALLNAmes")
  24.     set GESEscList to list(8, 28)
  25.     set REFAddWatch to 0
  26.     set GESNoteIcon to 8
  27.     set IFLThisButton to 44
  28.     set IFLGettingSNameSprite to 44
  29.     set ADDADvertSprite to 48
  30.     if MASGESFlag = 0 then
  31.       set GESPrinterfirst to 0
  32.       set GESWhichPrinterChosen to 0
  33.       set GesPrinterIntro to 0
  34.       set GESQuitCounter to 0
  35.       set GESChooseQuit to 0
  36.       set IFLQuitsprite to 38
  37.       set IFLGoNow to 0
  38.       set ADDADCOntTwo to 0
  39.       set ADDAdCount to 0
  40.       set IFLRolledOver to 0
  41.       set GESNotefirst to 0
  42.       set GESNoteAllBlue to 0
  43.       set IFLSpriteDifference to 38
  44.       set IFLCanChange to 1
  45.       set GESPCBegin to 0
  46.       set GESDesOnStage to 0
  47.       set GESLastText to 0
  48.       set GESTempWhichPic to 0
  49.       set GESSytemUnit to 0
  50.       set GESReturnIcon to 11
  51.       set GESInsideTextIntroSprite to 17
  52.       set GESRollReturn to 0
  53.       set GESWhichXplor to 0
  54.       set GESInsThisDes to 0
  55.       set GESThisDEScription to 0
  56.       if the machineType < 200 then
  57.         if the colorDepth = 8 then
  58.           set GESNOTBrown to 162
  59.           set GESNOTBlue to 47
  60.           set GESBrown to 35
  61.           set GESGreen to 178
  62.           set GESBlack to 255
  63.         else
  64.           set GESNOTBrown to 17831
  65.           set GESNOTBlue to 6510
  66.           set GESBrown to 19846
  67.           set GESGreen to 3472
  68.           set GESBlack to 0
  69.         end if
  70.       else
  71.         set GESNOTBrown to 162
  72.         set GESNOTBlue to 47
  73.         set GESBrown to 35
  74.         set GESGreen to 178
  75.         set GESBlack to 255
  76.       end if
  77.     end if
  78.     set IFLButtonList to list([39, 1012, 653, 150, 172, 170, 117, 327], [40, 1006, 404, 150, 175, 173, 117, 327], [41, 1009, 653, 106, 178, 176, 117, 327], [42, 1003, 404, 105, 181, 179, 117, 327], [43, 1008, 164, 61, 184, 182, 117, 327], [44, 76, 404, 61, 81, 79, 117, 327], [45, 1001, 164, 105, 190, 188, 117, 327], [46, 1015, 164, 150, 193, 191, 117, 327], [47, 1014, 653, 61, 196, 194, 117, 327])
  79.     set IFLHeadInkList to list([39, 36], [40, 36], [41, 36], [42, 36], [43, 36], [44, 36], [45, 36], [46, 36], [47, 36], [48, 0])
  80.     set IFLhasLineFlashedList to list(4, 5, 2, 1, 5, 0, 0, 2, 5)
  81.     if MASGESFlag = 0 then
  82.       set MASGESFlag to 1
  83.       set GESQuittingList to list([38, 250, 251, 39, 39])
  84.       set GESPrinterIntroList to list([4, 73], [5, 74], [6, 76])
  85.       set GESHeadList to list(["REFBUT", 247, 177, 0, 0, "REFAllNames", 28], ["HANBUT", 251, 177, 0, 0, "HANAllNames", 28], ["RESBUT", 239, 177, 0, 0, "RESAllNames", 28], ["GROBUT", 251, 177, 0, 0, "GROAllNames", 28], ["FAEBUT", 251, 177, 0, 0, "FAEAllNames", 28], ["GESBUT", 237, 177, 0, 0, "GESAllNames", 28], ["GTSBUT", 251, 177, 0, 0, "GTSAllNames", 28], ["ARTBUT", 251, 177, 0, 0, "ARTAllNames", 28], ["MGIBUT", 236, 177, 0, 0, "MGIAllNames", 28])
  86.       set GESBuyingList to list([199, 226, 105, 130, 0], [201, 224, 28, 78, 0], [203, 227, 96, 135, 0], [205, 223, 115, 135, 0], [219, 228, 92, 135, 0], [221, 225, 101, 125, 0])
  87.       set GESPRINTBuyingList to list([317, 333, 130, 155, 0], [327, 334, 175, 120, 0], [329, 336, 100, 120, 0], [331, 335, 175, 120, 0])
  88.       set GESPCLevelOneList to list([4, 9, 1, 0, [11, 100, 239, 258], [10, 131, 430, 164], [37, 205, 393, 159]], [5, 5, 1, 0, [11, 98, 239, 258], [10, 135, 422, 164], [37, 201, 393, 159]], [6, 6, 1, 0, [11, 97, 239, 258], [10, 141, 451, 164], [12, 188, 422, 400]], [7, 7, 1, 0, [11, 99, 239, 258], [10, 122, 393, 160]], [8, 8, 1, 0, [11, 101, 239, 258], [10, 127, 387, 164]])
  89.       set GESInsideLevelOneList to list([5, 8, 0, 0, [10, 176, 430, 164], [37, 219, 393, 159]], [9, 7, 0, 0, [10, 171, 416, 164], [37, 203, 393, 159]], [7, 2, 0, 0, [10, 148, 433, 164], [37, 199, 393, 159]], [8, 3, 0, 0, [10, 153, 421, 164]], [6, 4, 0, 0, [10, 157, 436, 164]], [13, 9, 0, 0, [10, 180, 436, 164]], [14, 6, 0, 0, [10, 166, 435, 164]], [15, 1, 0, 0, [10, 144, 438, 164], [37, 221, 393, 159]], [16, 5, 0, 0, [10, 162, 417, 164]], [20, 10, 0, 0, [10, 183, 449, 164]])
  90.       set GESPCTextListOne to list([122, ["input", 0, 0, [20, 123, 128, 160, 0], [21, 193, 500, 350, 36], [22, 194, 500, 350, 36, 1]], ["layouts", 0, 0, [20, 125, 128, 160, 0], [21, 190, 500, 350, 36], [22, 191, 500, 350, 36, 1]], ["types,", 0, 0, [20, 124, 116, 160, 0], [21], [22]], ["interchangeable.", 0, 0, [20, 126, 87, 160, 0], [21, 196, 500, 350, 36], [22, 197, 500, 350, 36, 1]]], [127, ["input", 0, 0, [20, 123, 128, 160, 0], [21, 193, 500, 350, 36], [22, 194, 500, 350, 36, 1]], ["types", 0, 0, [20, 128, 87, 160, 0], [21], [22]], ["ball", 0, 0, [20, 129, 87, 160, 0], [21], [22]], ["connect", 0, 0, [20, 130, 107, 160, 0], [21, 207, 500, 350, 36], [22, 208, 500, 350, 36, 1]]], [131, ["simplest", 0, 0, [20, 132, 75, 160, 0], [21], [22]], ["soundcard", 0, 0, [20, 133, 75, 160, 0], [21], [22]], ["sophisticated", 0, 0, [20, 134, 95, 160, 0], [21], [22]]], [135, ["frequency", 0, 0, [20, 136, 95, 160, 0], [21, 216, 500, 350, 36], [22, 217, 500, 350, 36, 1]], ["size,", 0, 0, [20, 137, 95, 160, 0], [21], [22]], ["resolution", 0, 0, [20, 138, 104, 160, 0], [21, 213, 500, 350, 36], [22, 214, 500, 350, 36, 1]], ["output", 0, 0, [20, 139, 113, 160, 0], [21, 210, 500, 350, 36], [22, 211, 500, 350, 36, 1]], ["graphics", 0, 0, [20, 140, 113, 160, 0], [21], [22]], ["VGA.", 0, 0, [20, 178, 104, 160, 0], [21], [22]]])
  91.       set GESPCTextListTwo to list([144, ["types,", 0, 0, [20, 145, 128, 160, 0], [21], [22]], ["store", 0, 0, [20, 146, 106, 160, 0], [21], [22]], ["Mb", 0, 0, [20, 147, 96, 160, 0], [21], [22]]], [148, ["CD-Rom", 0, 0, [20, 149, 157, 160, 0], [21], [22]], ["discs.", 0, 0, [20, 150, 108, 160, 0], [21], [22]], ["performance", 0, 0, [20, 152, 106, 160, 0], [21], [22]], ["speed", 0, 0, [20, 151, 116, 160, 0], [21], [22]]], [153, ["floppy", 0, 0, [20, 154, 131, 160, 0], [21], [22]], ["Historically", 0, 0, [20, 155, 108, 160, 0], [21], [22]], ["Nowadays", 0, 0, [20, 156, 128, 160, 0], [21], [22]]], [157, ["choice", 0, 0, [20, 158, 92, 160, 0], [21], [22]], ["brain", 0, 0, [20, 159, 96, 160, 0], [21], [22]], ["486", 0, 0, [20, 160, 132, 160, 0], [21], [22]], ["Pentium", 0, 0, [20, 161, 90, 160, 0], [21], [22]]], [162, ["identifiable", 0, 0, [20, 163, 140, 160, 0], [21], [22]], ["special", 0, 0, [20, 164, 142, 160, 0], [21], [22]], ["design", 0, 0, [20, 165, 107, 160, 0], [21], [22]]], [166, ["Ram", 0, 0, [20, 167, 178, 160, 0], [21], [22]], ["working", 0, 0, [20, 168, 100, 160, 0], [21], [22]], ["Fitting", 0, 0, [20, 169, 107, 160, 0], [21], [22]], ["slow", 0, 0, [20, 170, 103, 160, 0], [21], [22]]], [171, ["quality", 0, 0, [20, 172, 104, 160, 0], [21], [22]], ["connectors", 0, 0, [20, 173, 99, 160, 0], [21], [22]], ["standard", 0, 0, [20, 174, 128, 160, 0], [21], [22]], ["different", 0, 0, [20, 175, 108, 160, 0], [21], [22]]], [176, ["controller,", 0, 0, [20, 177, 97, 160, 0], [21], [22]], ["resolution", 0, 0, [20, 138, 125, 160, 0], [21], [22]], ["VGA", 0, 0, [20, 178, 104, 160, 0], [21], [22]], ["memory", 0, 0, [20, 179, 110, 160, 0], [21], [22]]], [180, ["cards", 0, 0, [20, 181, 143, 160, 0], [21], [22]], ["PCI.", 0, 0, [20, 182, 123, 160, 0], [21], [22]]], [183, ["faster.", 0, 0, [20, 184, 107, 160, 0], [21], [22]], ["kilobytes", 0, 0, [20, 185, 106, 160, 0], [21], [22]]])
  92.       set GESPrinterTextList to list([302, ["How it functions", 0, 0, [20, 303, 175, 160, 0, 304, 305], [21], [22]], ["Colour Printing", 0, 0, [20, 307, 200, 160, 0, 308, 309], [21, 306, 2000, 205, 0, 306, 306], [22, 306, 30, 205, 0, 306, 306]], ["Speed", 0, 0, [20, 311, 200, 160, 0, 312, 313], [21, 310, 2000, 205, 0, 306, 306], [22, 310, 30, 205, 0, 310, 310]], ["Resolution", 0, 0, [20, 315, 241, 160, 0, 316, 319], [21, 314, 2000, 205, 0, 314, 314], [22, 314, 30, 205, 0, 314, 314]], ["Advantages", 0, 0, [20, 320, 200, 160, 0, 321, 322], [21], [22]], ["Size", 0, 0, [20, 323, 210, 160, 0, 323, 323], [21], [22]], ["Paper Handling", 0, 0, [20, 324, 125, 160, 0, 324, 324], [21], [22]], ["Intro Screen", 0, 0, [20, 324, 125, 160, 0, 324, 324], [21], [22]]])
  93.       set GESMouseWordList to list()
  94.       set GESPCList to list([4, 92, 239, 258, 8], [5, 86, 239, 258, 8], [6, 96, 239, 258, 8], [7, 88, 239, 258, 8], [8, 90, 239, 258, 8], [9, 94, 239, 258, 8], [10, 121, 428, 164, 36], [11, 94, 2000, 258, 39], [12, 188, 422, 400, 36], [35, 358, 200, 229, 36], [38, 250, 53, 442, 39], [3, 83, 325, 272, 0], [44, 64, 404, 61, 39], [33, 268, 200, 200, 36], [37, 199, 2000, 200, 0], [30, 84, 400, 400, 39])
  95.       set GESInsidSysList to list([4, 102, 220, 280, 8], [16, 103, 220, 280, 8], [5, 105, 220, 280, 8], [8, 107, 220, 280, 8], [7, 109, 220, 280, 8], [10, 142, 453, 164, 36], [11, 186, 500, 380, 36], [6, 111, 220, 280, 8], [13, 113, 220, 280, 8], [9, 115, 220, 280, 8], [14, 117, 220, 280, 8], [15, 119, 220, 280, 8], [17, 143, 537, 343, 36], [3, 83, 325, 272, 0], [37, 199, 2000, 200, 0], [38, 250, 53, 442, 39], [44, 64, 404, 61, 39])
  96.       set GESPrinterList to list([4, 274, 200, 200, 8], [5, 276, 200, 200, 8], [6, 278, 200, 200, 8], [7, 286, 2000, 200, 36], [13, 301, 115, 340, 36], [11, 271, 200, 200, 36], [30, 270, 400, 400, 36], [37, 317, 397, 159, 36], [38, 250, 53, 442, 39], [44, 64, 404, 61, 39], [20, 303, 2000, 61, 0], [22, 303, 2000, 61, 0], [8, 358, 200, 229, 36])
  97.       set GESPrintDotList to list([4, 286, 2000, 271, 8], [5, 280, 578, 414, 36], [6, 284, 577, 365, 36], [13, 302, 504, 175, 36], [7, 286, 306, 271, 8], [37, 327, 397, 159, 36])
  98.       set GESPrintLaserList to list([4, 276, 577, 365, 36], [5, 280, 578, 414, 36], [6, 288, 2000, 320, 8], [13, 302, 504, 175, 36], [7, 288, 240, 320, 8], [37, 331, 397, 159, 36])
  99.       set GESPrintInktList to list([4, 276, 577, 365, 36], [5, 287, 2000, 276, 8], [6, 284, 578, 414, 36], [13, 302, 504, 175, 36], [7, 287, 274, 276, 8], [37, 329, 397, 159, 36])
  100.       set GESPrinterIntroScreenList to list([3, 273, 325, 272, 0], [4, 274, 320, 200, 36], [5, 278, 320, 200, 36], [6, 282, 320, 200, 36], [7, 286, 2000, 200, 36], [13, 301, 115, 340, 36], [16, 119, 2000, 258, 36], [17, 124, 2000, 160, 0], [18, 98, 2000, 258, 36], [20, 124, 2000, 160, 0], [21, 124, 2000, 160, 0], [22, 124, 2000, 160, 0], [23, 223, 2000, 160, 0], [44, 64, 404, 61, 39], [31, 345, 2000, 400, 39], [33, 269, 2000, 200, 36], [11, 271, 200, 200, 36], [30, 270, 400, 400, 36], [36, 257, 2000, 160, 0], [38, 250, 53, 442, 39], [37, 317, 397, 159, 36], [8, 358, 200, 229, 36])
  101.       set GESnotebookQuittingList to list([38, 500, 501, 39, 39])
  102.       set GESNoteBuyingList to list([407, 423, 175, 120, 0], [409, 424, 175, 120, 0], [411, 425, 175, 120, 0], [413, 426, 175, 120, 0], [415, 427, 175, 120, 0], [417, 429, 175, 120, 0], [419, 428, 175, 120, 0], [421, 430, 175, 120, 0])
  103.       set GESNoteLevelOneList to list([5, 5, 0, 0, [13, 392, 466, 169], [35, 351, 400, 400, 36], [37, 409, 397, 159]], [6, 6, 0, 0, [13, 384, 466, 169], [35, 356, 400, 400, 36], [37, 417, 397, 159]], [7, 7, 0, 0, [13, 385, 466, 169], [35, 350, 400, 400, 36]], [8, 8, 0, 0, [13, 386, 466, 169], [35, 353, 400, 400, 36], [37, 413, 397, 159]], [9, 9, 0, 0, [13, 389, 466, 169], [35, 354, 400, 400, 36], [37, 415, 397, 159]], [10, 10, 0, 0, [13, 388, 466, 169], [35, 357, 400, 400, 36], [37, 421, 397, 159]], [14, 14, 0, 0, [13, 387, 466, 169], [35, 352, 400, 400, 36], [37, 411, 397, 159]], [12, 12, 0, 0, [13, 390, 466, 169], [35, 355, 400, 400, 36], [37, 419, 397, 159]], [15, 15, 1, 1, [13, 391, 466, 169], [35, 360, 400, 400, 36], [37, 407, 397, 159]])
  104.       set GESNOTETextList to list([391, ["RAM,", 0, 0, [20, 394, 175, 169, 0], [21], [22]], ["processor", 0, 0, [20, 393, 175, 169, 0], [21], [22]]], [392, ["monochrome,", 0, 0, [20, 395, 175, 169, 0], [21], [22]], ["passive-matrix", 0, 0, [20, 396, 175, 169, 0], [21], [22]], ["active-matrix", 0, 0, [20, 397, 175, 169, 0], [21], [22]]], [386, ["memory_cards,", 0, 0, [20, 398, 175, 169, 0], [21], [22]], ["modems,", 0, 0, [20, 399, 175, 169, 0], [21], [22]], ["adapters,", 0, 0, [20, 400, 175, 169, 0], [21], [22]], ["hard_disks", 0, 0, [20, 401, 175, 169, 0], [21], [22]]], [388, ["tracker-balls,", 0, 0, [20, 404, 175, 169, 0], [21], [22]], ["TrackPoints", 0, 0, [20, 405, 175, 169, 0], [21], [22]], ["touch-sensitive", 0, 0, [20, 406, 175, 169, 0], [21], [22]]], [390, ["multimedia", 0, 0, [20, 403, 175, 169, 0], [21], [22]], ["PCMCIA.", 0, 0, [20, 402, 175, 169, 0], [21], [22]]])
  105.       set GESNotebookList to list([4, 364, 200, 200, 8], [5, 366, 200, 200, 8], [6, 368, 200, 200, 8], [7, 370, 200, 200, 8], [8, 372, 200, 200, 8], [14, 374, 200, 200, 8], [10, 376, 200, 200, 8], [9, 378, 200, 200, 8], [12, 380, 200, 200, 8], [13, 391, 466, 169, 36], [11, 361, 200, 200, 36], [35, 360, 400, 400, 36], [38, 500, 53, 442, 39], [44, 66, 404, 61, 37], [3, 363, 325, 272, 0], [15, 383, 200, 200, 37], [37, 199, 2000, 200, 36], [16, 348, 200, 229, 36])
  106.       set GESMasterList to list([2, 0], [3, 83, 325, 272, 0], [4, 92, 239, 258, 8], [5, 86, 239, 258, 8], [6, 96, 239, 258, 8], [7, 88, 239, 258, 8], [8, 90, 239, 258, 8], [14, 50, 2000, 2000, 0], [10, 121, 428, 164, 36], [9, 94, 239, 258, 8], [12, 188, 2000, 400, 36], [13, 50, 2000, 2000, 0], [15, 50, 2000, 2000, 0], [16, 50, 2000, 2000, 0], [17, 50, 2000, 2000, 0], [18, 50, 2000, 2000, 0], [19, 0], [20, 50, 2000, 2000, 0], [21, 50, 2000, 2000, 0], [22, 50, 2000, 2000, 0], [23, 50, 2000, 2000, 0], [24, 0], [25, 0], [26, 0], [27, 0], [28, 0], [29, 0], [35, 358, 200, 229, 36], [31, 50, 2000, 2000, 0], [32, 0], [33, 268, 200, 200, 36], [11, 94, 2000, 258, 39], [30, 84, 400, 400, 39], [36, 0], [38, 250, 53, 442, 39], [37, 199, 2000, 200, 0])
  107.     end if
  108.   end if
  109.   IFLCursorSet()
  110. end
  111.