home *** CD-ROM | disk | FTP | other *** search
/ MacFormat UK 166 - Disc 2 / MF_UK_166_2.iso / pc / Files / Scenes / HOME.DIR / Internal_7.ls < prev    next >
Encoding:
Text File  |  2006-01-12  |  3.1 KB  |  93 lines
  1. property mShad, mBack, chn
  2. global gRootPath, dV, mFont, MMFSize, SMFSize, HDFSize, BDFSize, clickAction, bOpaqueMenubar, mTxtAlign, mTxtIndent, ShadowOffset, mKey, bWidth, bHeight, menuStartSp, FinalMMSp, MaxItems
  3.  
  4. on exitFrame me
  5.   mFont = "Arial"
  6.   MMFSize = 18
  7.   SMFSize = 14
  8.   HDFSize = 24
  9.   BDFSize = 14
  10.   bWidth = 140
  11.   bHeight = 40
  12.   ShadowOffset = 15
  13.   MaxItems = 18
  14.   tempSettings = member("TempSettings")
  15.   menuTree = member("menuTree")
  16.   member("menuShadow").regPoint = point(0, 0)
  17.   member("menuBack").regPoint = point(0, 0)
  18.   mShad = member("menuShadow")
  19.   mBack = member("menuBack")
  20.   repeat with i = 1 to tempSettings.line.count
  21.     delete tempSettings.line[i]
  22.   end repeat
  23.   repeat with i = 1 to menuTree.line.count
  24.     delete menuTree.line[i]
  25.   end repeat
  26.   repeat with i = 1 to the number of castMembers of castLib "menuText"
  27.     castLib("menuText").member[i].erase()
  28.   end repeat
  29.   repeat with i = 1 to the number of castMembers of castLib "submenufields"
  30.     castLib("submenufields").member[i].erase()
  31.   end repeat
  32.   settings = getNetText(gRootPath & "files" & dV & "menu" & dV & "settings.menu")
  33.   if netDone(settings) then
  34.     tempSettings.text = netTextresult(settings)
  35.     repeat with i = 1 to tempSettings.line.count
  36.       mess = tempSettings.line[i].word[1]
  37.       case mess of
  38.         "<interface_font>":
  39.           mFont = tempSettings.line[i].char[18..tempSettings.line[i].char.count]
  40.         "<main_menu_fontsize>":
  41.           MMFSize = integer(tempSettings.line[i].word[2])
  42.         "<submenu_fontsize>":
  43.           SMFSize = integer(tempSettings.line[i].word[2])
  44.         "<Header_Fontsize>":
  45.           HDFSize = integer(tempSettings.line[i].word[2])
  46.         "<body_fontsize>":
  47.           BDFSize = integer(tempSettings.line[i].word[2])
  48.         "<button_width>":
  49.           bWidth = integer(tempSettings.line[i].word[2])
  50.         "<button_height>":
  51.           bHeight = integer(tempSettings.line[i].word[2])
  52.         "<Item_Mode>":
  53.           clickAction = string(tempSettings.line[i].word[2])
  54.         "<opaque_menu_bar?>":
  55.           bOpaqueMenubar = string(tempSettings.line[i].word[2])
  56.         "<TextAlign>":
  57.           mTxtAlign = string(tempSettings.line[i].word[2])
  58.           case mTxtAlign of
  59.             "left":
  60.               mTxtAlign = #left
  61.             "right":
  62.               mTxtAlign = #right
  63.             "center":
  64.               mTxtAlign = #center
  65.           end case
  66.         "<textIndent>":
  67.           mTxtIndent = integer(tempSettings.line[i].word[2])
  68.         "<ShadowOffset>":
  69.           ShadowOffset = integer(tempSettings.line[i].word[2])
  70.       end case
  71.     end repeat
  72.   end if
  73.   tempSp = sprite("menuplaceholder").spriteNum
  74.   menuStartSp = sprite(tempSp)
  75.   menuStartSp.visible = 0
  76.   chn = menuStartSp.spriteNum + 1
  77.   repeat with p = tempSp to _movie.channel.count
  78.     sprite(p).scriptInstanceList = []
  79.     channel(p).removeScriptedSprite()
  80.     sprite(p).visible = 0
  81.   end repeat
  82.   dynItems = getNetText(gRootPath & "files" & dV & "menu" & dV & "items.menu")
  83.   MMCount = 0
  84.   SMCount = 0
  85.   SpCount = 0
  86.   pLocV = menuStartSp.locV
  87.   sLocH = menuStartSp.left
  88.   pLocH = sLocH
  89.   gatherList()
  90.   ProcessList()
  91.   GenerateSprites()
  92. end
  93.