home *** CD-ROM | disk | FTP | other *** search
/ CyberMycha 2006 April / SGP.iso / dema / Keepsake-Demo-en-li-v1.0.exe / res / auto / tutorial.camera.tcl < prev    next >
Text File  |  2005-10-22  |  761b  |  37 lines
  1. proc tutorial.cabinetCloseUp.enter {} {
  2.     setThreadID 4
  3.     setThreadID 0
  4. }
  5.  
  6. proc tutorial.cabinetCloseUp.leave {} {
  7.     setThreadID 4
  8.     setThreadID 0
  9. }
  10.  
  11. proc tutorial.forestExit.enter {} {
  12.     setThreadID 4
  13.     forestExit::new waterfallA -repeat
  14.     forestExit::new waterfallB -repeat
  15.     setThreadID 0
  16. }
  17.  
  18. proc tutorial.forestExit.leave {} {
  19.     setThreadID 4
  20.     wq'widget::delete& forestExit::waterfallA
  21.     wq'widget::delete& forestExit::waterfallB
  22.     setThreadID 0
  23. }
  24.  
  25. proc tutorial.mustavioWagon.enter {} {
  26.     setThreadID 4
  27.     mustavioWagon::new waterfallA -repeat
  28.     setThreadID 0
  29. }
  30.  
  31. proc tutorial.mustavioWagon.leave {} {
  32.     setThreadID 4
  33.     wq'widget::delete& mustavioWagon::waterfallA
  34.     setThreadID 0
  35. }
  36.  
  37.