WinTools & DOS Utilities/YS.ISO/prog/hg30/demo/t2text.mmm/meta.txt

Text File | 1994-08-07 | 10.1 KB | 20 lines

Name
----
t2text.mmm*Internal HD:Jambo folder:GR:Jambo folder:

Strings
------
rollingSnds
Macromedia Director

Script Channel Commands
--------------------
clickFlip "addSlideDown", "addslide", "flip"if the doubleClick then flipclickFlip "advOptionsDown", "advOptions", "flip"go to marker ("titlesIn")editableTextdontPassEventglobal slipOut,  globalAction, whatField, actionKey, postAction
set slipOut = "bullet2"
set the text of cast "Bullet2a" to " "
set the immediate of sprite 15 = FALSE
pause
set the keyDownScript = "fakeType 15"
set whatField  = "Bullet2a"
if globalAction = "slipArrow" or the key = ENTER or globalAction = "flipArrow" then
  set the text of cast whatField = " "
else
  set the text of cast whatField to the key
end ifset the keyDownScript = "flip click"
set the text of cast "EditTitle" to " "
set the text of Cast "editSubtitle" to " "
pause
flipinstallMenu H74
repeat with i = 3 to 8
  set the immediate of sprite i to FALSE
end repeat
global flipOut, slipOut, activeMenu
set activeMenu = ""
set flipOut to ""
set slipOut = ""
pausego to frame ("sweep")global flipOut, slipOut
set flipOut = ""
set slipOut = ""
set the keyDownScript to "if the key = RETURN then flip"
pausepause
--returnoriginmarkergo to marker ("Frame")go to marker ("color")set the keyDownScript = "flip"
set the text of cast "EditTitle" to " "
set the text of Cast "editSubtitle" to " "
pauseglobal flipOut, slipOut
set flipOut = "titlesIn"
set slipOut = "titlesOut"
set the text of cast "TypeTItle" to " "installMenu 0
global flipOut, slipOut
set slipOut = ""
set flipOut = ""
set the immediate of sprite 15 to FALSE
pausepuppetize 6, 13, TRUE
set the mouseUpScript to "if the mouseCast = 28 then cleanUpMenu"
set the immediate of sprite 3 to FALSE
checkRollover 6, 13
go to the frameautoType "typeSubTitle", "subtitleReel"global flipOut
set flipOut = "TypeTitle"
set slipOut = "addSlide2"
set the immediate of sprite 10 to FALSE
puppetSprite 10, FALSE
set the text of cast "bulletItem" to "Listenpunkt"
set the text of cast "Bullet1" to "Listenpunkt"
pauseglobal SlipOut, flipOut
set flipOut = "type1"
set slipOut = "newPRS1"set the mouseUpScript = ""
set the text of cast "EditTitle" to " "
set the text of Cast "editSubtitle" to " "
pausego to frame ("Rotate")global slipOut, flipOu
set flipOut = "option1"
set slipOut = "styel1"puppetSprite 3, FALSE
set the immediate of sprite 3 to FALSEpausepause
--returnoriginmarkerpuppetSprite 6, FALSE
set the immediate of sprite 6 to FALSEglobal flipOut
set flipOut = ""
flipglobal slipOut, flipOut
set flipOut = "summary"
set slipOut = "textHome"global whatField, actionKey
set actionKey = ""
set the text of cast "Bullet1" to " "
set the keyDownScript = "flip"
pauseinstallMenu H72
global slipOut
puppetSprite 5, TRUE
set the immediate of sprite 5 to TRUE
set slipOut = "advOK"
pauseclickFlip "rightDown", "specialRight", "HoofItT3"moveableSpriteglobal origin, flipOut, slipOut, activeMenu
set activeMenu = ""
set origin = the frame + 1
set flipOut = "addBulletAni"
set slipOut = ""
set the text of cast "bullet3" to "Listenpunkt"
pauseinstallMenu H75
flipNull
set the immediate of sprite 15 = FALSE
set the keyDownScript to ""
set the text of cast "bullet3" to the text of cast a35
pauseglobal flipOut, slpOut
set flipOut = "styleSAni"
set slipOut = ""
set the mouseUpScript = ""
pauseunloadCast
preloadCast "NewPRSDown"
installMenu H72
puppetSprite 3, TRUE
set the immediate of sprite 3 to TRUE
global flipOut, slipOut
set flipOut = ""
set slipOut = "cleanIntro"
pauseglobal slipOut, whatField, actionKey
set actionKey = ""
set slipOut = "bullet1"
set the text of cast "Bullet2a" to " "
set the immediate of sprite 15 = FALSE
set the keyDownScript = "flip"
pauseglobal flipOut, slipOut
set slipOut = ""
set flipOut = "outputOptionsAni"
set the mouseUpScript = ""
pauseinstallMenu H75
set the immediate of sprite 15 = FALSE
set the keyDownScript to "if the key = RETURN then flip"
set the text of cast "bullet3" to the text of cast a35
pauseinstallMenu h74
set the text of cast "bullet4" to the text of cast "typebullet4"
global flipOut, origin, activeMenu
set activeMenu = "preview"
set origin to ""
set flipOut to ""
set the mouseDownScript = ""
set the keyDownScript = ""
pauseglobal flipOut, slipOut
set slipOut = "type1"
set flipOut = "output1"global flipOut, slipOut
set slipOut = "output1"
set flipOut = "styel1"repeat with i = 3 to 8
  set the immediate of sprite i to FALSE
end repeat
global slipOut, flipOut
set slipOut = ""
set flipOut = ""
pausepuppetSprite 3, FALSE
set the immediate of sprite 3 to FALSE
repeat with i = 21 to 24
  set the immediate of sprite i to TRUE
  puppetSprite i, TRUE
end repeat
installMenu 0
pauseglobal flipOut, slipOut
set slipOut = ""
set flipOut = "optionsAni"
pauseglobal slip, flip
set flipOut = "outliner2"
set slipOut = "outliner1"
set the text of cast "bullet4" = " "go to marker ("circular")go to marker ("sweep")go to marker ("frame")autoType "bullet4", "typebullet4"
returnoriginpuppetSprite 5, FALSE
set the immediate of sprite 5 to FALSEcleanUpMenuglobal slipOut, flipOut
set flipOut = ""
set slipOut = "addSlide1"
set the immediate of sprite 3 to FALSE
puppetSprite 3, FALSEset the text of cast "typeSubTitle" = " "
autoType "typeTitle", "titleAgenda"set the mouseUpScript to ""
puppetsprite 15, FALSE
global flipOut, slipOut
set flipOut = ""
set slipOut = "sorter1"
go to frame ("Color")global flipOut, slipOut
set slipOut = ""
set flipOut = "advisorAni"
puppetSprite 5, FALSE
set the immediate of sprite 5 to FALSE
go to the frameflipNull
set the text of cast "bulletItem" to the text of cast a35
set the text of cast "Bullet1" to the text of cast a35
pauseglobal globalAction, whatField, actionKey, postAction
set the keyDownScript = "fakeType 15"
set whatField  = "Bullet1"
if globalAction = "slipArrow" or the key = ENTER or globalAction = "flipArrow" then
  set the text of cast whatField = " "
else
  set the text of cast whatField to the key
end if
set actionKey = RETURN
set the text of cast A41 = " "
pauseinstallMenu F43
GLOBAL SLIPOUT
SET SLIPOUT = "bullet2"
set the keyDownScript = ""
set the immediate of sprite 15 = TRUE
showBullet 13, TRUE
pause--editableTextclickFlip "NewPRSDown", "NewPrs", "flip"global whatField, globalAction
set the immediate of sprite 3 to FALSE
puppetSprite 3, FALSE
set whatField = "editSubtitle"
set the keyDownScript = "fakeType 30"
if globalAction = "slipArrow" or globalAction = "flipArrow" then
  set the text of cast whatField = " "
else
  set the text of cast whatField to the key
end if
set the text of Cast "editTitle" to " "
pauseglobal flipOut, slipOut
set flipOut = "adv"
set slipOut = "option1"puppetSprite 3, FALSE
set the immediate of sprite 3 to FALSE
repeat with i = 21 to 24
  set the immediate of sprite i to TRUE
  puppetSprite i, TRUE
end repeat
installMenu 0clickFlip "okDown", "ok", "flip" flipNull
set the immediate of sprite 3 to TRUE
puppetSprite 3, TRUE
puppetize 6, 15, FALSE
UPDATESTAGE
set the mouseUpScript to " "
pauseglobal flipOut,slipOut
set slipOut = "Adv"
set flipOut = ""
set the immediate of sprite 5 = FALSE
puppetSprite 5, FALSE
set the immediate of sprite 6 = TRUE
puppetSprite 6, TRUE
go to the frame
init
go to marker ("intro")puppetSprite 5, TRUE
set the immediate of sprite 5 to TRUE
puppetSprite 6, FALSE
set the immediate of sprite 6 to FALSE
set the mouseUpScript = ""
flipNull
go to the frameinstallMenu 0
global flipOut, slipOut, originMarker
repeat with i = 3 to 8
  set the immediate of sprite i to TRUE
end repeat
set originMarker to "TextHome"
set flipOut = "summary"
set slipOut = ""
updateStage
preLoadCast B11, B23
pauseglobal flipOut, slipOut
set flipOut = "slideTypeAni"
set slipOut = "splash"
puppetSprite 3, FALSE
set the immediate of sprite 3 to FALSE
updateStage

go to the frameglobal slipOut
puppetSprite 5, FALSE
set the immediate of sprite 5 to FALSE
set slipOut = "newPRSOK"puppetSprite 5, FALSE
set the immediate of sprite 5 to FALSE
installMenu F43
global slipOut
set slipOut = "newPRSOK"
pauseflipNull
set the immediate of sprite 9 to FALSE
set the immediate of sprite 10 to TRUE
puppetSprite 10, TRUE
pauseglobal slipOut, activeMenu, flipOut
puppetsprite 15, FALSE
updateStage
set activeMenu = "undo"
set slipOut = "sorter1"
set flipOut = ""
set the mouseUpScript to ""
go to the frameglobal whatField, globalAction
flipNull
set whatField = "EditTitle"
set the keyDownScript = "fakeType 15"
if globalAction = "slipArrow" or globalAction = "flipArrow" then
  set the text of cast whatField = " "
else
  set the text of cast whatField to the key
  set the text of Cast "editSubtitle" to " "
end if

pauseset the immediate of sprite 10 to FALSE
puppetSprite 10, FALSEglobal flipOut, slipOut
set slipOut = "prePop"
set flipOut = ""
set the immediate of sprite 9 to TRUE
set the immediate of sprite 10 to FALSE
puppetSprite 10, FALSE
go to the frameglobal flipOut, slipOut
set slipOut = "addSlide1"
set flipOut = "addTitle"
set the immediate of sprite 3 to TRUE
set the immediate of sprite 9 to FALSE
set the mouseUpScript to ""
puppetize 6, 13, FALSE
pauseinstallMenu h75
global origin, flipOut, activeMenu
set activeMenu = ""
set origin = ""
set flipOut = ""
set the keyDownScript to ""
set the mouseDownScript = ""
set the immediate of sprite 10 to FALSE
set the immediate of sprite 15 to TRUE
puppetsprite 7, FALSE
updateStage
pauseglobal flipOut
puppetSprite 15, TRUE
set flipOut = ""
set the mouseUpScript to "sorterDragFlip"
set the immediate of sprite 10 to FALSE
repeat while the stillDown
  set the locH of sprite 11 to the mouseH
  if sprite 11 intersects 12 then
    set the locH of sprite 15 to 23
  end if
  if sprite 11 intersects 13 then
    set the locH of sprite 15 to 122
  end if
  if sprite 11 intersects 14 then
    set the locH of sprite 15 to 224
  end if
  updateStage
end repeat

--Sprite 11 = dummy sprite
--Sprite 12 = left shield
--Sprite 13 = middle shield
--Sprite 14 = right shield
--Sprite 7 = highlight boxinstallMenu H74
global slipOut
set slipOut = "outliner3"global flipOut, slipOut, activeMenu
puppetsprite 15, FALSE
set activeMenu = ""
set flipOut = ""
set slipOut = "outliner3"
set the immediate of sprite 10 to TRUE
set the immediate of sprite 15 to FALSE
set the mouseUpScript to ""
go to the frame

Fonts
-----
Helvetica
Geneva
Monaco
Chicago