home *** CD-ROM | disk | FTP | other *** search
/ CyberMycha 2006 April / SGP.iso / dema / Keepsake-Demo-en-li-v1.0.exe / res / auto / garden.camera.tcl < prev    next >
Text File  |  2005-10-22  |  10KB  |  343 lines
  1. proc garden.dollFinding.enter {} {
  2.     setThreadID 4
  3.     dollFinding::new waterfallA -repeat
  4.     dollFinding::new waterfallB -repeat
  5.     setThreadID 0
  6. }
  7.  
  8. proc garden.dollFinding.leave {} {
  9.     setThreadID 4
  10.     wq'widget::delete& dollFinding::waterfallA
  11.     wq'widget::delete& dollFinding::waterfallB
  12.     setThreadID 0
  13. }
  14.  
  15. proc garden.driaCloseUp.enter {} {
  16.     setThreadID 4
  17.     driaCloseUp::new runes -repeat
  18.     setThreadID 0
  19. }
  20.  
  21. proc garden.driaCloseUp.leave {} {
  22.     setThreadID 4
  23.     wq'widget::delete& driaCloseUp::runes
  24.     setThreadID 0
  25. }
  26.  
  27. proc garden.fromWindow.enter {} {
  28.     setThreadID 4
  29.     fromWindow::new waterfall -repeat
  30.     setThreadID 0
  31. }
  32.  
  33. proc garden.fromWindow.leave {} {
  34.     setThreadID 4
  35.     wq'widget::delete& fromWindow::waterfall
  36.     setThreadID 0
  37. }
  38.  
  39. proc garden.gardenLever.enter {} {
  40.     setThreadID 4
  41.     gardenLever::new runeDriaLoop -repeat
  42.     gardenLever::new runeDriaStart -repeat
  43.     gardenLever::new runeDriaSuccess -repeat
  44.     gardenLever::new runeOrlosLoop -repeat
  45.     gardenLever::new runeOrlosStart -repeat
  46.     gardenLever::new runeUndarLoop -repeat
  47.     gardenLever::new runeUndarStart -repeat
  48.     gardenLever::new waterA -repeat
  49.     gardenLever::new waterB -repeat
  50.     gardenLever::new waterC -repeat
  51.     gardenLever::new waterD -repeat
  52.     setThreadID 0
  53. }
  54.  
  55. proc garden.gardenLever.leave {} {
  56.     setThreadID 4
  57.     wq'widget::delete& gardenLever::runeDriaLoop
  58.     wq'widget::delete& gardenLever::runeDriaStart
  59.     wq'widget::delete& gardenLever::runeDriaSuccess
  60.     wq'widget::delete& gardenLever::runeOrlosLoop
  61.     wq'widget::delete& gardenLever::runeOrlosStart
  62.     wq'widget::delete& gardenLever::runeUndarLoop
  63.     wq'widget::delete& gardenLever::runeUndarStart
  64.     wq'widget::delete& gardenLever::waterA
  65.     wq'widget::delete& gardenLever::waterB
  66.     wq'widget::delete& gardenLever::waterC
  67.     wq'widget::delete& gardenLever::waterD
  68.     setThreadID 0
  69. }
  70.  
  71. proc garden.gardenStage.enter {} {
  72.     setThreadID 4
  73.     gardenStage::new water -repeat
  74.     setThreadID 0
  75. }
  76.  
  77. proc garden.gardenStage.leave {} {
  78.     setThreadID 4
  79.     wq'widget::delete& gardenStage::water
  80.     setThreadID 0
  81. }
  82.  
  83. proc garden.gargoyles.enter {} {
  84.     setThreadID 4
  85.     gargoyles::new runeDriaSuccess -repeat
  86.     gargoyles::new waterA -repeat
  87.     gargoyles::new waterfallA -repeat
  88.     gargoyles::new waterfallB -repeat
  89.     gargoyles::new waterfallTree -repeat
  90.     gargoyles::new waterTreeA -repeat
  91.     setThreadID 0
  92. }
  93.  
  94. proc garden.gargoyles.leave {} {
  95.     setThreadID 4
  96.     wq'widget::delete& gargoyles::runeDriaSuccess
  97.     wq'widget::delete& gargoyles::waterA
  98.     wq'widget::delete& gargoyles::waterfallA
  99.     wq'widget::delete& gargoyles::waterfallB
  100.     wq'widget::delete& gargoyles::waterfallTree
  101.     wq'widget::delete& gargoyles::waterTreeA
  102.     setThreadID 0
  103. }
  104.  
  105. proc garden.islandCloseUp.enter {} {
  106.     setThreadID 4
  107.     islandCloseUp::new runeDriaLoop -repeat
  108.     islandCloseUp::new runeDriaStart -repeat
  109.     islandCloseUp::new runeDriaSuccess -repeat
  110.     islandCloseUp::new runeOrlosLoop -repeat
  111.     islandCloseUp::new runeOrlosStart -repeat
  112.     islandCloseUp::new runeUndarLoop -repeat
  113.     islandCloseUp::new runeUndarStart -repeat
  114.     setThreadID 0
  115. }
  116.  
  117. proc garden.islandCloseUp.leave {} {
  118.     setThreadID 4
  119.     wq'widget::delete& islandCloseUp::runeDriaLoop
  120.     wq'widget::delete& islandCloseUp::runeDriaStart
  121.     wq'widget::delete& islandCloseUp::runeDriaSuccess
  122.     wq'widget::delete& islandCloseUp::runeOrlosLoop
  123.     wq'widget::delete& islandCloseUp::runeOrlosStart
  124.     wq'widget::delete& islandCloseUp::runeUndarLoop
  125.     wq'widget::delete& islandCloseUp::runeUndarStart
  126.     setThreadID 0
  127. }
  128.  
  129. proc garden.magicalTreeGrowing.enter {} {
  130.     setThreadID 4
  131.     setThreadID 0
  132. }
  133.  
  134. proc garden.magicalTreeGrowing.leave {} {
  135.     setThreadID 4
  136.     setThreadID 0
  137. }
  138.  
  139. proc garden.orlosCloseUp.enter {} {
  140.     setThreadID 4
  141.     orlosCloseUp::new runes -repeat
  142.     setThreadID 0
  143. }
  144.  
  145. proc garden.orlosCloseUp.leave {} {
  146.     setThreadID 4
  147.     wq'widget::delete& orlosCloseUp::runes
  148.     setThreadID 0
  149. }
  150.  
  151. proc garden.path.enter {} {
  152.     setThreadID 4
  153.     path::new water -repeat
  154.     setThreadID 0
  155. }
  156.  
  157. proc garden.path.leave {} {
  158.     setThreadID 4
  159.     wq'widget::delete& path::water
  160.     setThreadID 0
  161. }
  162.  
  163. proc garden.puzzleSliders.enter {} {
  164.     setThreadID 4
  165.     setThreadID 0
  166. }
  167.  
  168. proc garden.puzzleSliders.leave {} {
  169.     setThreadID 4
  170.     setThreadID 0
  171. }
  172.  
  173. proc garden.puzzleStageTop.enter {} {
  174.     setThreadID 4
  175.     puzzleStageTop::new fishesA -repeat
  176.     puzzleStageTop::new fishesB -repeat
  177.     puzzleStageTop::new fishesC -repeat
  178.     puzzleStageTop::new fishesD -repeat
  179.     puzzleStageTop::new fishesE -repeat
  180.     puzzleStageTop::new fishesF -repeat
  181.     puzzleStageTop::new fishesG -repeat
  182.     puzzleStageTop::new fishesH -repeat
  183.     puzzleStageTop::new fishesI -repeat
  184.     setThreadID 0
  185. }
  186.  
  187. proc garden.puzzleStageTop.leave {} {
  188.     setThreadID 4
  189.     wq'widget::delete& puzzleStageTop::fishesA
  190.     wq'widget::delete& puzzleStageTop::fishesB
  191.     wq'widget::delete& puzzleStageTop::fishesC
  192.     wq'widget::delete& puzzleStageTop::fishesD
  193.     wq'widget::delete& puzzleStageTop::fishesE
  194.     wq'widget::delete& puzzleStageTop::fishesF
  195.     wq'widget::delete& puzzleStageTop::fishesG
  196.     wq'widget::delete& puzzleStageTop::fishesH
  197.     wq'widget::delete& puzzleStageTop::fishesI
  198.     setThreadID 0
  199. }
  200.  
  201. proc garden.smallBridge.enter {} {
  202.     setThreadID 4
  203.     smallBridge::new runeDriaLoop -repeat
  204.     smallBridge::new runeDriaStart -repeat
  205.     smallBridge::new runeDriaSuccess -repeat
  206.     smallBridge::new runeOrlosLoop -repeat
  207.     smallBridge::new runeOrlosStart -repeat
  208.     smallBridge::new runeUndarLoop -repeat
  209.     smallBridge::new runeUndarStart -repeat
  210.     smallBridge::new waterA -repeat
  211.     smallBridge::new waterB -repeat
  212.     smallBridge::new waterTreeA -repeat
  213.     setThreadID 0
  214. }
  215.  
  216. proc garden.smallBridge.leave {} {
  217.     setThreadID 4
  218.     wq'widget::delete& smallBridge::runeDriaLoop
  219.     wq'widget::delete& smallBridge::runeDriaStart
  220.     wq'widget::delete& smallBridge::runeDriaSuccess
  221.     wq'widget::delete& smallBridge::runeOrlosLoop
  222.     wq'widget::delete& smallBridge::runeOrlosStart
  223.     wq'widget::delete& smallBridge::runeUndarLoop
  224.     wq'widget::delete& smallBridge::runeUndarStart
  225.     wq'widget::delete& smallBridge::waterA
  226.     wq'widget::delete& smallBridge::waterB
  227.     wq'widget::delete& smallBridge::waterTreeA
  228.     setThreadID 0
  229. }
  230.  
  231. proc garden.smallIsland.enter {} {
  232.     setThreadID 4
  233.     smallIsland::new runeDriaLoop -repeat
  234.     smallIsland::new runeDriaStart -repeat
  235.     smallIsland::new runeDriaSuccess -repeat
  236.     smallIsland::new runeOrlosLoop -repeat
  237.     smallIsland::new runeOrlosStart -repeat
  238.     smallIsland::new runeUndarLoop -repeat
  239.     smallIsland::new runeUndarStart -repeat
  240.     smallIsland::new waterA -repeat
  241.     smallIsland::new waterB -repeat
  242.     smallIsland::new waterC -repeat
  243.     smallIsland::new waterD -repeat
  244.     smallIsland::new waterE -repeat
  245.     smallIsland::new waterF -repeat
  246.     smallIsland::new waterTreeA -repeat
  247.     smallIsland::new waterTreeB -repeat
  248.     smallIsland::new waterTreeC -repeat
  249.     smallIsland::new waterTreeD -repeat
  250.     smallIsland::new waterTreeE -repeat
  251.     smallIsland::new waterTreeF -repeat
  252.     setThreadID 0
  253. }
  254.  
  255. proc garden.smallIsland.leave {} {
  256.     setThreadID 4
  257.     wq'widget::delete& smallIsland::runeDriaLoop
  258.     wq'widget::delete& smallIsland::runeDriaStart
  259.     wq'widget::delete& smallIsland::runeDriaSuccess
  260.     wq'widget::delete& smallIsland::runeOrlosLoop
  261.     wq'widget::delete& smallIsland::runeOrlosStart
  262.     wq'widget::delete& smallIsland::runeUndarLoop
  263.     wq'widget::delete& smallIsland::runeUndarStart
  264.     wq'widget::delete& smallIsland::waterA
  265.     wq'widget::delete& smallIsland::waterB
  266.     wq'widget::delete& smallIsland::waterC
  267.     wq'widget::delete& smallIsland::waterD
  268.     wq'widget::delete& smallIsland::waterE
  269.     wq'widget::delete& smallIsland::waterF
  270.     wq'widget::delete& smallIsland::waterTreeA
  271.     wq'widget::delete& smallIsland::waterTreeB
  272.     wq'widget::delete& smallIsland::waterTreeC
  273.     wq'widget::delete& smallIsland::waterTreeD
  274.     wq'widget::delete& smallIsland::waterTreeE
  275.     wq'widget::delete& smallIsland::waterTreeF
  276.     setThreadID 0
  277. }
  278.  
  279. proc garden.stageStairs.enter {} {
  280.     setThreadID 4
  281.     stageStairs::new fishesA -repeat
  282.     stageStairs::new fishesB -repeat
  283.     stageStairs::new fishesC -repeat
  284.     setThreadID 0
  285. }
  286.  
  287. proc garden.stageStairs.leave {} {
  288.     setThreadID 4
  289.     wq'widget::delete& stageStairs::fishesA
  290.     wq'widget::delete& stageStairs::fishesB
  291.     wq'widget::delete& stageStairs::fishesC
  292.     setThreadID 0
  293. }
  294.  
  295. proc garden.studyBalcony.enter {} {
  296.     setThreadID 4
  297.     studyBalcony::new waterFallA -repeat
  298.     studyBalcony::new waterFallB -repeat
  299.     setThreadID 0
  300. }
  301.  
  302. proc garden.studyBalcony.leave {} {
  303.     setThreadID 4
  304.     wq'widget::delete& studyBalcony::waterFallA
  305.     wq'widget::delete& studyBalcony::waterFallB
  306.     setThreadID 0
  307. }
  308.  
  309. proc garden.undarCloseUp.enter {} {
  310.     setThreadID 4
  311.     undarCloseUp::new runes -repeat
  312.     setThreadID 0
  313. }
  314.  
  315. proc garden.undarCloseUp.leave {} {
  316.     setThreadID 4
  317.     wq'widget::delete& undarCloseUp::runes
  318.     setThreadID 0
  319. }
  320.  
  321. proc garden.waterfall.enter {} {
  322.     setThreadID 4
  323.     waterfall::new waterfallA -repeat
  324.     waterfall::new waterfallB -repeat
  325.     waterfall::new waterfallC -repeat
  326.     waterfall::new waterfallD -repeat
  327.     waterfall::new waterfallE -repeat
  328.     waterfall::new waterfallF -repeat
  329.     setThreadID 0
  330. }
  331.  
  332. proc garden.waterfall.leave {} {
  333.     setThreadID 4
  334.     wq'widget::delete& waterfall::waterfallA
  335.     wq'widget::delete& waterfall::waterfallB
  336.     wq'widget::delete& waterfall::waterfallC
  337.     wq'widget::delete& waterfall::waterfallD
  338.     wq'widget::delete& waterfall::waterfallE
  339.     wq'widget::delete& waterfall::waterfallF
  340.     setThreadID 0
  341. }
  342.  
  343.