home *** CD-ROM | disk | FTP | other *** search
/ CyberMycha 2006 April / SGP.iso / dema / Keepsake-Demo-en-li-v1.0.exe / res / interface / common / itf.inv.tcl < prev    next >
Text File  |  2005-11-07  |  44KB  |  863 lines
  1. class itf'inventory {
  2.     proc itf'inventory {this stage} oz'widget {itf'inventory} {
  3.         set base "interface/[MODE]/inv"
  4.  
  5.         if {$stage == 1} {
  6.             set ($this,bg1)           [new oz'sprite "$base/inv.bg1"]
  7.             set ($this,bg2)           [new oz'sprite "$base/inv.bg2"]
  8.         } else {
  9.             set ($this,bg1)           [new oz'sprite "$base/inv.bg3"]
  10.             set ($this,bg2)           [new oz'sprite "$base/inv.bg4"]
  11.         }
  12.  
  13.         set ($this,yewlockLeavesBlue)   [new oz'button "$base/inv.yewlockLeavesBlue"]
  14.         set ($this,yewlockLeavesRed)    [new oz'button "$base/inv.yewlockLeavesRed"]
  15.         set ($this,yewlockLeavesWhite)  [new oz'button "$base/inv.yewlockLeavesWhite"]
  16.         set ($this,yewlockLeavesYellow) [new oz'button "$base/inv.yewlockLeavesYellow"]
  17.         set ($this,headenFlower)        [new oz'button "$base/inv.headenFlower"]
  18.         set ($this,nigilisSeed)         [new oz'button "$base/inv.nigilisSeed"]
  19.         set ($this,nigilisFruit)        [new oz'button "$base/inv.nigilisFruit"]
  20.         set ($this,pendant)             [new oz'button "$base/inv.pendant"]
  21.         set ($this,wineBottle)          [new oz'button "$base/inv.wineBottle"]
  22.         set ($this,brokenPendant)       [new oz'button "$base/inv.brokenPendant"]
  23.         set ($this,caretakerTools)      [new oz'button "$base/inv.caretakerTools"]
  24.         set ($this,figurine)            [new oz'button "$base/inv.figurine"]
  25.         set ($this,figurineS)           [new oz'button "$base/inv.figurineS"]
  26.         set ($this,circlet)             [new oz'button "$base/inv.circlet"]
  27.         set ($this,magicalStaff)        [new oz'button "$base/inv.magicalStaff"]
  28.         set ($this,keyRing)             [new oz'button "$base/inv.keyRing"]
  29.         set ($this,caretakerKey)        [new oz'button "$base/inv.caretakerKey"]
  30.         set ($this,caretakerKeyS)       [new oz'button "$base/inv.caretakerKeyS"]
  31.  
  32.         set ($this,wineCaveClue)        [new oz'button "$base/inv.wineCaveClue"]
  33.         set ($this,caretakerNote)       [new oz'button "$base/inv.caretakerNote"]
  34.         set ($this,noteBook)            [new oz'button "$base/inv.noteBook"]
  35.         set ($this,doll)                [new oz'button "$base/inv.doll"]
  36.         set ($this,dollS)               [new oz'button "$base/inv.dollS"]
  37.         set ($this,yewlockLeavesPage)   [new oz'button "$base/inv.yewlockLeavesPage"]
  38.         set ($this,nigilisPage)         [new oz'button "$base/inv.nigilisPage"]
  39.         set ($this,headenFlowerPage)    [new oz'button "$base/inv.headenFlowerPage"]
  40.         set ($this,headenFlowerPageS)   [new oz'button "$base/inv.headenFlowerPageS"]
  41.  
  42.         set ($this,aleunderRoot)        [new oz'button "$base/inv.aleunderRoot"]
  43.         set ($this,catHair)             [new oz'button "$base/inv.catHair"]
  44.         set ($this,celeste)             [new oz'button "$base/inv.celeste"]
  45.         set ($this,dragonClaw)          [new oz'button "$base/inv.dragonClaw"]
  46.         set ($this,eternalFlame)        [new oz'button "$base/inv.eternalFlame"]
  47.         set ($this,libraryBallAqua)     [new oz'button "$base/inv.libraryBallAqua"]
  48.         set ($this,libraryBallBrown)    [new oz'button "$base/inv.libraryBallBrown"]
  49.         set ($this,libraryBallEntrance) [new oz'button "$base/inv.libraryBallEntrance"]
  50.         set ($this,libraryBallPink)     [new oz'button "$base/inv.libraryBallPink"]
  51.         set ($this,oracleMoss)          [new oz'button "$base/inv.oracleMoss"]
  52.         set ($this,pearl)               [new oz'button "$base/inv.pearl"]
  53.         set ($this,soulDust)            [new oz'button "$base/inv.soulDust"]
  54.         set ($this,starFragment)        [new oz'button "$base/inv.starFragment"]
  55.         set ($this,wolfDrool)           [new oz'button "$base/inv.wolfDrool"]
  56.         
  57.         set ($this,handWrittenNotes)    [new oz'button "$base/inv.handWrittenNotes"]
  58.         set ($this,orbNotes)            [new oz'button "$base/inv.orbNotes"]
  59.         set ($this,spellbook)           [new oz'button "$base/inv.spellbook"]
  60.         set ($this,tapestryArtRoom)     [new oz'button "$base/inv.tapestryArtRoom"]
  61.         set ($this,tapestryForge)       [new oz'button "$base/inv.tapestryForge"]
  62.         set ($this,tapestryObservatory) [new oz'button "$base/inv.tapestryObservatory"]
  63.         set ($this,tapestrySolarium)    [new oz'button "$base/inv.tapestrySolarium"]
  64.   
  65.         oz'widget::bind $($this,bg1) enter itf'inventory::enter $this
  66.         oz'widget::bind $($this,bg1) leave itf'inventory::leave $this
  67.         oz'widget::bind $($this,bg2) enter itf'inventory::enter $this
  68.         oz'widget::bind $($this,bg2) leave itf'inventory::leave $this
  69.  
  70.         oz'widget::property $($this,bg1) -isize [oz'widget::width $($this,bg1)] [oz'widget::height $($this,bg1)]
  71.         oz'widget::property $($this,bg2) -isize [oz'widget::width $($this,bg2)] [oz'widget::height $($this,bg2)]
  72.         
  73.         oz'widget::property $($this,bg1) -pos 0 0.166666 -alpha 0
  74.         oz'widget::property $($this,bg2) -pos 0 0.166666 -alpha 0
  75.         
  76.         oz'button::property $($this,yewlockLeavesBlue) \
  77.             -pos [xpos 0] [ypos 0] -alpha 0 -click itf'inventory::showdesc1 $this "yewlockLeavesBlue"
  78.         oz'button::property $($this,yewlockLeavesRed)  \
  79.             -pos [xpos 0] [ypos 0] -alpha 0 -click itf'inventory::showdesc1 $this "yewlockLeavesRed"
  80.         oz'button::property $($this,yewlockLeavesWhite) \
  81.             -pos [xpos 0] [ypos 0] -alpha 0 -click itf'inventory::showdesc1 $this "yewlockLeavesWhite"
  82.         oz'button::property $($this,yewlockLeavesYellow) \
  83.             -pos [xpos 0] [ypos 0] -alpha 0 -click itf'inventory::showdesc1 $this "yewlockLeavesYellow"
  84.         oz'button::property $($this,headenFlower) \
  85.             -pos [xpos 1] [ypos 0] -alpha 0 -click itf'inventory::showdesc1 $this "headenFlower"
  86.         oz'button::property $($this,nigilisSeed) \
  87.             -pos [xpos 2] [ypos 0] -alpha 0 -click itf'inventory::showdesc1 $this "nigilisSeed"
  88.         oz'button::property $($this,nigilisFruit) \
  89.             -pos [xpos 2] [ypos 0] -alpha 0 -click itf'inventory::showdesc1 $this "nigilisFruit"
  90.         oz'button::property $($this,pendant) \
  91.             -pos [xpos 0] [ypos 1] -alpha 0 -click itf'inventory::showdesc1 $this "pendant"
  92.         oz'button::property $($this,wineBottle) \
  93.             -pos [xpos 0] [ypos 1] -alpha 0 -click itf'inventory::showdesc1 $this "wineBottle"
  94.         oz'button::property $($this,brokenPendant) \
  95.             -pos [xpos 0] [ypos 1] -alpha 0 -click itf'inventory::showdesc1 $this "brokenPendant"
  96.         oz'button::property $($this,caretakerTools) \
  97.             -pos [xpos 1] [ypos 1] -alpha 0 -click itf'inventory::showdesc1 $this "caretakerTools"
  98.         oz'button::property $($this,figurine) \
  99.             -pos [xpos 0] [ypos 3] -alpha 0 -click itf'inventory::showdesc1 $this "figurine"
  100.         oz'button::property $($this,figurineS) \
  101.             -pos [xpos 0] [ypos 3] -alpha 0 -click itf'inventory::showdesc1 $this "figurine"
  102.         oz'button::property $($this,circlet) \
  103.             -pos [xpos 0] [ypos 2] -alpha 0 -click itf'inventory::showdesc1 $this "circlet"
  104.         oz'button::property $($this,magicalStaff) \
  105.             -pos [xpos 1] [ypos 2] -alpha 0 -click itf'inventory::showdesc1 $this "magicalStaff"
  106.         oz'button::property $($this,keyRing) \
  107.             -pos [xpos 0] [ypos 3] -alpha 0 -click itf'inventory::showdesc1 $this "keyRing"
  108.         oz'button::property $($this,caretakerKey) \
  109.             -pos [xpos 1] [ypos 3] -alpha 0 -click itf'inventory::showdesc1 $this "caretakerKey"
  110.         oz'button::property $($this,caretakerKeyS) \
  111.             -pos [xpos 1] [ypos 3] -alpha 0 -click itf'inventory::showdesc1 $this "caretakerKey"
  112.  
  113.         oz'button::property $($this,wineCaveClue) \
  114.             -pos [xpos 0] [ypos 0] -alpha 0 -click itf'inventory::showdesc2 $this "wineCaveClue"
  115.         oz'button::property $($this,caretakerNote) \
  116.             -pos [xpos 0] [ypos 1] -alpha 0 -click itf'inventory::showdesc2 $this "caretakerNote"
  117.         oz'button::property $($this,noteBook) \
  118.             -pos [xpos 0] [ypos 2] -alpha 0 -click itf'inventory::showdesc2 $this "noteBook"
  119.         oz'button::property $($this,doll) \
  120.             -pos [xpos 0] [ypos 3] -alpha 0 -click itf'inventory::showdesc2 $this "doll"
  121.         oz'button::property $($this,dollS) \
  122.             -pos [xpos 0] [ypos 3] -alpha 0 -click itf'inventory::showdesc2 $this "doll"
  123.         oz'button::property $($this,yewlockLeavesPage) \
  124.             -pos [xpos 1] [ypos 0] -alpha 0 -click itf'inventory::showdesc2 $this "yewlockLeavesPage"
  125.         oz'button::property $($this,nigilisPage) \
  126.             -pos [xpos 1] [ypos 1] -alpha 0 -click itf'inventory::showdesc2 $this "nigilisPage"
  127.         oz'button::property $($this,headenFlowerPage) \
  128.             -pos [xpos 1] [ypos 2] -alpha 0 -click itf'inventory::showdesc2 $this "headenFlowerPage"
  129.         oz'button::property $($this,headenFlowerPageS) \
  130.             -pos [xpos 1] [ypos 2] -alpha 0 -click itf'inventory::showdesc2 $this "headenFlowerPage"
  131.  
  132.         oz'button::property $($this,dragonClaw) \
  133.             -pos [xpos 3] [ypos 0] -alpha 0 -click itf'inventory::showdesc1 $this "dragonClaw"
  134.         oz'button::property $($this,wolfDrool) \
  135.             -pos [xpos 4] [ypos 0] -alpha 0 -click itf'inventory::showdesc1 $this "wolfDrool"
  136.         oz'button::property $($this,catHair) \
  137.             -pos [xpos 5] [ypos 0] -alpha 0 -click itf'inventory::showdesc1 $this "catHair"
  138.         oz'button::property $($this,celeste) \
  139.             -pos [xpos 3] [ypos 1] -alpha 0 -click itf'inventory::showdesc1 $this "celeste"
  140.         oz'button::property $($this,aleunderRoot) \
  141.             -pos [xpos 4] [ypos 1] -alpha 0 -click itf'inventory::showdesc1 $this "aleunderRoot"
  142.         oz'button::property $($this,oracleMoss) \
  143.             -pos [xpos 5] [ypos 1] -alpha 0 -click itf'inventory::showdesc1 $this "oracleMoss"
  144.         oz'button::property $($this,libraryBallEntrance) \
  145.             -pos [xpos 2] [ypos 2] -alpha 0 -click itf'inventory::showdesc1 $this "libraryBallEntrance"
  146.         oz'button::property $($this,libraryBallPink) \
  147.             -pos [xpos 5] [ypos 2] -alpha 0 -click itf'inventory::showdesc1 $this "libraryBallPink"
  148.         oz'button::property $($this,libraryBallAqua) \
  149.             -pos [xpos 4] [ypos 2] -alpha 0 -click itf'inventory::showdesc1 $this "libraryBallAqua"
  150.         oz'button::property $($this,libraryBallBrown) \
  151.             -pos [xpos 3] [ypos 2] -alpha 0 -click itf'inventory::showdesc1 $this "libraryBallBrown"
  152.         oz'button::property $($this,soulDust) \
  153.             -pos [xpos 2] [ypos 3] -alpha 0 -click itf'inventory::showdesc1 $this "soulDust"
  154.         oz'button::property $($this,pearl) \
  155.             -pos [xpos 3] [ypos 3] -alpha 0 -click itf'inventory::showdesc1 $this "pearl"
  156.         oz'button::property $($this,eternalFlame) \
  157.             -pos [xpos 4] [ypos 3] -alpha 0 -click itf'inventory::showdesc1 $this "eternalFlame"
  158.         oz'button::property $($this,starFragment) \
  159.             -pos [xpos 5] [ypos 3] -alpha 0 -click itf'inventory::showdesc1 $this "starFragment"
  160.         
  161.         oz'button::property $($this,handWrittenNotes) \
  162.             -pos [xpos 3] [ypos 1] -alpha 0 -click itf'inventory::showdesc2 $this "handWrittenNotes"
  163.         oz'button::property $($this,orbNotes) \
  164.             -pos [xpos 3] [ypos 0] -alpha 0 -click itf'inventory::showdesc2 $this "orbNotes"
  165.         oz'button::property $($this,spellbook) \
  166.             -pos [xpos 1] [ypos 3] -alpha 0 -click itf'inventory::showdesc2 $this "spellbook"
  167.         oz'button::property $($this,tapestryArtRoom) \
  168.             -pos [xpos 2] [ypos 2] -alpha 0 -click itf'inventory::showdesc2 $this "tapestryArtRoom"
  169.         oz'button::property $($this,tapestryForge) \
  170.             -pos [xpos 2] [ypos 0] -alpha 0 -click itf'inventory::showdesc2 $this "tapestryForge"
  171.         oz'button::property $($this,tapestryObservatory) \
  172.             -pos [xpos 2] [ypos 1] -alpha 0 -click itf'inventory::showdesc2 $this "tapestryObservatory"
  173.         oz'button::property $($this,tapestrySolarium) \
  174.             -pos [xpos 2] [ypos 3] -alpha 0 -click itf'inventory::showdesc2 $this "tapestrySolarium"
  175.         
  176.         oz'widget::child [FOREGROUNDWIDGET] $($this,bg1) -0.1
  177.         oz'widget::child [FOREGROUNDWIDGET] $($this,bg2) -0.1
  178.  
  179.         oz'widget::child [FOREGROUNDWIDGET] $($this,yewlockLeavesBlue)   -0.75
  180.         oz'widget::child [FOREGROUNDWIDGET] $($this,yewlockLeavesRed)    -0.75
  181.         oz'widget::child [FOREGROUNDWIDGET] $($this,yewlockLeavesWhite)  -0.75
  182.         oz'widget::child [FOREGROUNDWIDGET] $($this,yewlockLeavesYellow) -0.75
  183.         oz'widget::child [FOREGROUNDWIDGET] $($this,headenFlower)        -0.75
  184.         oz'widget::child [FOREGROUNDWIDGET] $($this,nigilisSeed)         -0.75
  185.         oz'widget::child [FOREGROUNDWIDGET] $($this,nigilisFruit)        -0.75
  186.         oz'widget::child [FOREGROUNDWIDGET] $($this,pendant)             -0.75
  187.         oz'widget::child [FOREGROUNDWIDGET] $($this,wineBottle)          -0.75
  188.         oz'widget::child [FOREGROUNDWIDGET] $($this,brokenPendant)       -0.75
  189.         oz'widget::child [FOREGROUNDWIDGET] $($this,caretakerTools)      -0.75
  190.         oz'widget::child [FOREGROUNDWIDGET] $($this,figurine)            -0.75 
  191.         oz'widget::child [FOREGROUNDWIDGET] $($this,figurineS)           -0.75 
  192.         oz'widget::child [FOREGROUNDWIDGET] $($this,circlet)             -0.75 
  193.         oz'widget::child [FOREGROUNDWIDGET] $($this,magicalStaff)        -0.75
  194.         oz'widget::child [FOREGROUNDWIDGET] $($this,keyRing)             -0.75
  195.         oz'widget::child [FOREGROUNDWIDGET] $($this,caretakerKey)        -0.75
  196.         oz'widget::child [FOREGROUNDWIDGET] $($this,caretakerKeyS)       -0.75
  197.  
  198.         oz'widget::child [FOREGROUNDWIDGET] $($this,wineCaveClue)        -0.75
  199.         oz'widget::child [FOREGROUNDWIDGET] $($this,caretakerNote)       -0.75
  200.         oz'widget::child [FOREGROUNDWIDGET] $($this,noteBook)            -0.75
  201.         oz'widget::child [FOREGROUNDWIDGET] $($this,doll)                -0.75
  202.         oz'widget::child [FOREGROUNDWIDGET] $($this,dollS)               -0.75
  203.         oz'widget::child [FOREGROUNDWIDGET] $($this,yewlockLeavesPage)   -0.75
  204.         oz'widget::child [FOREGROUNDWIDGET] $($this,nigilisPage)         -0.75
  205.         oz'widget::child [FOREGROUNDWIDGET] $($this,headenFlowerPage)    -0.75
  206.         oz'widget::child [FOREGROUNDWIDGET] $($this,headenFlowerPageS)   -0.75
  207.  
  208.         oz'widget::child [FOREGROUNDWIDGET] $($this,aleunderRoot)        -0.75
  209.         oz'widget::child [FOREGROUNDWIDGET] $($this,catHair)             -0.75
  210.         oz'widget::child [FOREGROUNDWIDGET] $($this,celeste)             -0.75
  211.         oz'widget::child [FOREGROUNDWIDGET] $($this,dragonClaw)          -0.75
  212.         oz'widget::child [FOREGROUNDWIDGET] $($this,eternalFlame)        -0.75
  213.         oz'widget::child [FOREGROUNDWIDGET] $($this,libraryBallAqua)     -0.75
  214.         oz'widget::child [FOREGROUNDWIDGET] $($this,libraryBallBrown)    -0.75
  215.         oz'widget::child [FOREGROUNDWIDGET] $($this,libraryBallEntrance) -0.75
  216.         oz'widget::child [FOREGROUNDWIDGET] $($this,libraryBallPink)     -0.75
  217.         oz'widget::child [FOREGROUNDWIDGET] $($this,oracleMoss)          -0.75
  218.         oz'widget::child [FOREGROUNDWIDGET] $($this,pearl)               -0.75
  219.         oz'widget::child [FOREGROUNDWIDGET] $($this,soulDust)            -0.75
  220.         oz'widget::child [FOREGROUNDWIDGET] $($this,starFragment)        -0.75
  221.         oz'widget::child [FOREGROUNDWIDGET] $($this,wolfDrool)           -0.75
  222.  
  223.         oz'widget::child [FOREGROUNDWIDGET] $($this,handWrittenNotes)    -0.75
  224.         oz'widget::child [FOREGROUNDWIDGET] $($this,orbNotes)            -0.75
  225.         oz'widget::child [FOREGROUNDWIDGET] $($this,spellbook)           -0.75
  226.         oz'widget::child [FOREGROUNDWIDGET] $($this,tapestryArtRoom)     -0.75
  227.         oz'widget::child [FOREGROUNDWIDGET] $($this,tapestryForge)       -0.75
  228.         oz'widget::child [FOREGROUNDWIDGET] $($this,tapestryObservatory) -0.75
  229.         oz'widget::child [FOREGROUNDWIDGET] $($this,tapestrySolarium)    -0.75
  230.     }
  231.  
  232.     proc ~itf'inventory {this} {
  233.         delete $($this,bg1)
  234.         delete $($this,bg2)
  235.  
  236.         delete $($this,yewlockLeavesBlue)
  237.         delete $($this,yewlockLeavesRed)
  238.         delete $($this,yewlockLeavesWhite)
  239.         delete $($this,yewlockLeavesYellow)
  240.         delete $($this,headenFlower)
  241.         delete $($this,nigilisSeed)
  242.         delete $($this,nigilisFruit)
  243.         delete $($this,pendant)
  244.         delete $($this,wineBottle)
  245.         delete $($this,brokenPendant)
  246.         delete $($this,caretakerTools)
  247.         delete $($this,figurine)
  248.         delete $($this,figurineS)
  249.         delete $($this,circlet)
  250.         delete $($this,magicalStaff)
  251.         delete $($this,keyRing)
  252.         delete $($this,caretakerKey)
  253.         delete $($this,caretakerKeyS)
  254.  
  255.         delete $($this,wineCaveClue)
  256.         delete $($this,caretakerNote)
  257.         delete $($this,noteBook)
  258.         delete $($this,doll)
  259.         delete $($this,dollS)
  260.         delete $($this,yewlockLeavesPage)
  261.         delete $($this,nigilisPage)
  262.         delete $($this,headenFlowerPage)
  263.         delete $($this,headenFlowerPageS)
  264.  
  265.         delete $($this,aleunderRoot)
  266.         delete $($this,catHair)
  267.         delete $($this,celeste)
  268.         delete $($this,dragonClaw)
  269.         delete $($this,eternalFlame)
  270.         delete $($this,libraryBallAqua)
  271.         delete $($this,libraryBallBrown)
  272.         delete $($this,libraryBallEntrance)
  273.         delete $($this,libraryBallPink)
  274.         delete $($this,libraryBallAqua)
  275.         delete $($this,oracleMoss)
  276.         delete $($this,pearl)
  277.         delete $($this,soulDust)
  278.         delete $($this,starFragment)
  279.         delete $($this,wolfDrool)
  280.  
  281.         delete $($this,handWrittenNotes)
  282.         delete $($this,orbNotes)
  283.         delete $($this,spellbook)
  284.         delete $($this,tapestryArtRoom)
  285.         delete $($this,tapestryForge)
  286.         delete $($this,tapestryObservatory)
  287.         delete $($this,tapestrySolarium)
  288.     }
  289.  
  290.     proc load2stage {this} {
  291.         set base "interface/[MODE]/inv"
  292.  
  293.         delete $($this,bg1)
  294.         delete $($this,bg2)
  295.  
  296.         set ($this,bg1)           [new oz'sprite "$base/inv.bg3"]
  297.         set ($this,bg2)           [new oz'sprite "$base/inv.bg4"]
  298.  
  299.         oz'widget::bind $($this,bg1) enter itf'inventory::enter $this
  300.         oz'widget::bind $($this,bg1) leave itf'inventory::leave $this
  301.         oz'widget::bind $($this,bg2) enter itf'inventory::enter $this
  302.         oz'widget::bind $($this,bg2) leave itf'inventory::leave $this
  303.  
  304.         oz'widget::property $($this,bg1) -isize [oz'widget::width $($this,bg1)] [oz'widget::height $($this,bg1)]
  305.         oz'widget::property $($this,bg2) -isize [oz'widget::width $($this,bg2)] [oz'widget::height $($this,bg2)]
  306.         
  307.         oz'widget::property $($this,bg1) -pos 0 0.166666 -alpha 0
  308.         oz'widget::property $($this,bg2) -pos 0 0.166666 -alpha 0
  309.         
  310.         oz'widget::child [FOREGROUNDWIDGET] $($this,bg1) -0.1
  311.         oz'widget::child [FOREGROUNDWIDGET] $($this,bg2) -0.1
  312.     }
  313.  
  314.     proc show {this n} {
  315.         oz'widget::fadeto $($this,bg$n) 1
  316.  
  317.         setThreadID 4
  318.         oz'event {wizDisableMouse}
  319.         oz'event {oz'delay 0.25}
  320.         oz'event {wizEnableMouse}
  321.  
  322.         if {$n == 1} {
  323.  
  324.             if {[ozGet itemBlueYewlock] == "pickedUp"} {
  325.                 oz'event {
  326.                     oz'widget::x $($this,yewlockLeavesBlue) [itf'inventory::xpos 0]
  327.                     oz'widget::y $($this,yewlockLeavesBlue) [itf'inventory::ypos 0]
  328.                     oz'widget::fadeto $($this,yewlockLeavesBlue) 1
  329.                 }
  330.             }
  331.             
  332.             if {[ozGet itemRedYewlock] == "pickedUp"} {
  333.                 oz'event {
  334.                     oz'widget::x $($this,yewlockLeavesRed) [itf'inventory::xpos 0]
  335.                     oz'widget::y $($this,yewlockLeavesRed) [itf'inventory::ypos 0]
  336.                     oz'widget::fadeto $($this,yewlockLeavesRed) 1
  337.                 }
  338.             }
  339.             
  340.             if {[ozGet itemWhiteYewlock] == "pickedUp"} {
  341.                 oz'event {
  342.                     oz'widget::x $($this,yewlockLeavesWhite) [itf'inventory::xpos 0]
  343.                     oz'widget::y $($this,yewlockLeavesWhite) [itf'inventory::ypos 0]
  344.                     oz'widget::fadeto $($this,yewlockLeavesWhite) 1
  345.                 }
  346.             }
  347.             
  348.             if {[ozGet itemYellowYewlock] == "pickedUp"} {
  349.                 oz'event {
  350.                     oz'widget::x $($this,yewlockLeavesYellow) [itf'inventory::xpos 0]
  351.                     oz'widget::y $($this,yewlockLeavesYellow) [itf'inventory::ypos 0]
  352.                     oz'widget::fadeto $($this,yewlockLeavesYellow) 1
  353.                 }
  354.             }
  355.  
  356.             if {[ozGet itemHeadenFlower] == "pickedUp"} {
  357.                 oz'event {
  358.                     oz'widget::x $($this,headenFlower) [itf'inventory::xpos 1]
  359.                     oz'widget::y $($this,headenFlower) [itf'inventory::ypos 0]
  360.                     oz'widget::fadeto $($this,headenFlower) 1
  361.                 }
  362.             }
  363.             
  364.             if {[ozGet itemNigilisBean] == "pickedUp"} {
  365.                 oz'event {
  366.                     oz'widget::x $($this,nigilisSeed) [itf'inventory::xpos 2]
  367.                     oz'widget::y $($this,nigilisSeed) [itf'inventory::ypos 0]
  368.                     oz'widget::fadeto $($this,nigilisSeed) 1
  369.                 }
  370.             }
  371.  
  372.             if {[ozGet puzzleNigilisTree] == "complete" && [ozGet "itemNigilisFruit"] != "pickedUp"} {
  373.                 oz'event {
  374.                     oz'widget::x $($this,nigilisFruit) [itf'inventory::xpos 2]
  375.                     oz'widget::y $($this,nigilisFruit) [itf'inventory::ypos 0]
  376.                     oz'button::disable $($this,nigilisFruit)
  377.                     oz'widget::fadeto $($this,nigilisFruit) 1
  378.                 }
  379.             }
  380.  
  381.             if {[ozGet puzzleNigilisTree] == "complete" && [ozGet "itemNigilisFruit"] == "pickedUp"} {
  382.                 oz'event {
  383.                     oz'widget::x $($this,nigilisFruit) [itf'inventory::xpos 2]
  384.                     oz'widget::y $($this,nigilisFruit) [itf'inventory::ypos 0]
  385.                     oz'button::enable $($this,nigilisFruit)
  386.                     oz'widget::fadeto $($this,nigilisFruit) 1
  387.                 }
  388.             }
  389.             
  390.             if {[ozGet puzzleRepairedPendant] == "complete" || [ozGet puzzleBrokePendant] != "complete"} {
  391.                 oz'event {
  392.                     oz'widget::x $($this,pendant) [itf'inventory::xpos 0]
  393.                     oz'widget::y $($this,pendant) [itf'inventory::ypos 1]
  394.                     oz'widget::fadeto $($this,pendant) 1
  395.                 }
  396.             }
  397.  
  398.             if {[ozGet puzzleBrokePendant] == "complete" && [ozGet puzzleRepairedPendant] != "complete"} {
  399.                 oz'event {
  400.                     oz'widget::x $($this,brokenPendant) [itf'inventory::xpos 0]
  401.                     oz'widget::y $($this,brokenPendant) [itf'inventory::ypos 1]
  402.                     oz'widget::fadeto $($this,brokenPendant) 1
  403.                 }
  404.             }
  405.  
  406.             if {[ozGet pendantTools] == "pickedUp"} {
  407.                 oz'event {
  408.                     oz'widget::x $($this,caretakerTools) [itf'inventory::xpos 1]
  409.                     oz'widget::y $($this,caretakerTools) [itf'inventory::ypos 1]
  410.                     oz'widget::fadeto $($this,caretakerTools) 1
  411.                 }
  412.             }
  413.  
  414.             if {[ozGet minotaurMazeFigurines] == "pickedUp"} {
  415.                 if {[ozGet puzzleMidgard] != "complete"} {
  416.                     oz'event {
  417.                         oz'widget::x $($this,figurine) [itf'inventory::xpos 2]
  418.                         oz'widget::y $($this,figurine) [itf'inventory::ypos 1]
  419.                         oz'widget::fadeto $($this,figurine) 1
  420.                     }
  421.                 } else {
  422.                     oz'event {
  423.                         oz'widget::x $($this,figurineS) [itf'inventory::xpos 2]
  424.                         oz'widget::y $($this,figurineS) [itf'inventory::ypos 1]
  425.                         oz'widget::fadeto $($this,figurineS) 1
  426.                     }
  427.                 }
  428.             }
  429.         
  430.             if {[ozGet itemCirclet] == "pickedUp"} {
  431.                 oz'event {
  432.                     oz'widget::x $($this,circlet) [itf'inventory::xpos 0]
  433.                     oz'widget::y $($this,circlet) [itf'inventory::ypos 2]
  434.                     oz'widget::fadeto $($this,circlet) 1
  435.                 }
  436.             }
  437.     
  438.             if {[ozGet itemStaff] == "pickedUp"} {
  439.                 oz'event {
  440.                     oz'widget::x $($this,magicalStaff) [itf'inventory::xpos 1]
  441.                     oz'widget::y $($this,magicalStaff) [itf'inventory::ypos 2]
  442.                     oz'widget::fadeto $($this,magicalStaff) 1
  443.                 }
  444.             }
  445.         
  446.             if {[ozGet itemKeyRing] == "pickedUp"} {
  447.                 oz'event {
  448.                     oz'widget::x $($this,keyRing) [itf'inventory::xpos 0]
  449.                     oz'widget::y $($this,keyRing) [itf'inventory::ypos 3]
  450.                     oz'widget::fadeto $($this,keyRing) 1
  451.                 }
  452.             }
  453.         
  454.             if {[ozGet itemBrassKey] == "pickedUp"} {
  455.                 if {[ozGet puzzleMidgard] != "complete"} {
  456.                     oz'event {
  457.                         oz'widget::x $($this,caretakerKey) [itf'inventory::xpos 1]
  458.                         oz'widget::y $($this,caretakerKey) [itf'inventory::ypos 3]
  459.                         oz'widget::fadeto $($this,caretakerKey) 1
  460.                     }
  461.                 } else {
  462.                     oz'event {
  463.                         oz'widget::x $($this,caretakerKeyS) [itf'inventory::xpos 1]
  464.                         oz'widget::y $($this,caretakerKeyS) [itf'inventory::ypos 3]
  465.                         oz'widget::fadeto $($this,caretakerKeyS) 1
  466.                     }
  467.                 }
  468.             }
  469.  
  470.             if {[ozGet itemDragonClaw] == "pickedUp"} {
  471.                 oz'event {
  472.                     oz'widget::x $($this,dragonClaw) [itf'inventory::xpos 3]
  473.                     oz'widget::y $($this,dragonClaw) [itf'inventory::ypos 0]
  474.                     oz'widget::fadeto $($this,dragonClaw) 1
  475.                 }
  476.             }
  477.  
  478.             if {[ozGet itemWolfDribble] == "pickedUp"} {
  479.                 oz'event {
  480.                     oz'widget::x $($this,wolfDrool) [itf'inventory::xpos 4]
  481.                     oz'widget::y $($this,wolfDrool) [itf'inventory::ypos 0]
  482.                     oz'widget::fadeto $($this,wolfDrool) 1
  483.                 }
  484.             }
  485.             
  486.             if {[ozGet itemCatHair] == "pickedUp"} {
  487.                 oz'event {
  488.                     oz'widget::x $($this,catHair) [itf'inventory::xpos 5]
  489.                     oz'widget::y $($this,catHair) [itf'inventory::ypos 0]
  490.                     oz'widget::fadeto $($this,catHair) 1
  491.                 }
  492.             }
  493.  
  494.             if {[ozGet itemCelestePortrait] == "pickedUp"} {
  495.                 oz'event {
  496.                     oz'widget::x $($this,celeste) [itf'inventory::xpos 3]
  497.                     oz'widget::y $($this,celeste) [itf'inventory::ypos 1]
  498.                     oz'widget::fadeto $($this,celeste) 1
  499.                 }
  500.             }
  501.             
  502.             if {[ozGet itemAleunderRoot] == "pickedUp"} {
  503.                 oz'event {
  504.                     oz'widget::x $($this,aleunderRoot) [itf'inventory::xpos 4]
  505.                     oz'widget::y $($this,aleunderRoot) [itf'inventory::ypos 1]
  506.                     oz'widget::fadeto $($this,aleunderRoot) 1
  507.                 }
  508.             }
  509.             
  510.             if {[ozGet itemDragonvaleMoss] == "pickedUp"} {
  511.                 oz'event {
  512.                     oz'widget::x $($this,oracleMoss) [itf'inventory::xpos 5]
  513.                     oz'widget::y $($this,oracleMoss) [itf'inventory::ypos 1]
  514.                     oz'widget::fadeto $($this,oracleMoss) 1
  515.                 }
  516.             }
  517.  
  518.             if {[ozGet itemSoulDust] == "pickedUp"} {
  519.                 oz'event {
  520.                     oz'widget::x $($this,soulDust) [itf'inventory::xpos 2]
  521.                     oz'widget::y $($this,soulDust) [itf'inventory::ypos 3]
  522.                     oz'widget::fadeto $($this,soulDust) 1
  523.                 }
  524.             }
  525.             
  526.             if {[ozGet itemHugePearl] == "pickedUp"} {
  527.                 oz'event {
  528.                     oz'widget::x $($this,pearl) [itf'inventory::xpos 3]
  529.                     oz'widget::y $($this,pearl) [itf'inventory::ypos 3]
  530.                     oz'widget::fadeto $($this,pearl) 1
  531.                 }
  532.             }
  533.             
  534.             if {[ozGet itemEternalFlame] == "pickedUp"} {
  535.                 oz'event {
  536.                     oz'widget::x $($this,eternalFlame) [itf'inventory::xpos 4]
  537.                     oz'widget::y $($this,eternalFlame) [itf'inventory::ypos 3]
  538.                     oz'widget::fadeto $($this,eternalFlame) 1
  539.                 }
  540.             }
  541.             
  542.             if {[ozGet itemMeteorite] == "pickedUp"} {
  543.                 oz'event {
  544.                     oz'widget::x $($this,starFragment) [itf'inventory::xpos 5]
  545.                     oz'widget::y $($this,starFragment) [itf'inventory::ypos 3]
  546.                     oz'widget::fadeto $($this,starFragment) 1
  547.                 }
  548.             }
  549.  
  550.             if {[ozGet artRoomBall] == "pickedUp"} {
  551.                 oz'event {
  552.                     oz'widget::x $($this,libraryBallAqua) [itf'inventory::xpos 2]
  553.                     oz'widget::y $($this,libraryBallAqua) [itf'inventory::ypos 2]
  554.                     oz'widget::fadeto $($this,libraryBallAqua) 1
  555.                 }
  556.             }
  557.             
  558.             if {[ozGet observatoryBall] == "pickedUp"} {
  559.                 oz'event {
  560.                     oz'widget::x $($this,libraryBallPink) [itf'inventory::xpos 5]
  561.                     oz'widget::y $($this,libraryBallPink) [itf'inventory::ypos 2]
  562.                     oz'widget::fadeto $($this,libraryBallPink) 1
  563.                 }
  564.             }
  565.             
  566.             if {[ozGet solariumBall] == "pickedUp"} {
  567.                 oz'event {
  568.                     oz'widget::x $($this,libraryBallEntrance) [itf'inventory::xpos 4]
  569.                     oz'widget::y $($this,libraryBallEntrance) [itf'inventory::ypos 2]
  570.                     oz'widget::fadeto $($this,libraryBallEntrance) 1
  571.                 }
  572.             }
  573.  
  574.             if {[ozGet forgeBall] == "pickedUp"} {
  575.                 oz'event {
  576.                     oz'widget::x $($this,libraryBallBrown) [itf'inventory::xpos 3]
  577.                     oz'widget::y $($this,libraryBallBrown) [itf'inventory::ypos 2]
  578.                     oz'widget::fadeto $($this,libraryBallBrown) 1
  579.                 }
  580.             }
  581.  
  582.         }
  583.  
  584.        if {$n == 2} {
  585.             if {[ozGet itemWineCaveClue] == "pickedUp"} {
  586.                 oz'event {
  587.                     oz'widget::x $($this,wineCaveClue) [itf'inventory::xpos 0]
  588.                     oz'widget::y $($this,wineCaveClue) [itf'inventory::ypos 0]
  589.                     oz'widget::fadeto $($this,wineCaveClue) 1
  590.                 }
  591.             }
  592.  
  593.             if {[ozGet itemCaretakerNote] == "pickedUp"} {
  594.                 oz'event {
  595.                     oz'widget::x $($this,caretakerNote) [itf'inventory::xpos 0]
  596.                     oz'widget::y $($this,caretakerNote) [itf'inventory::ypos 1]
  597.                     oz'widget::fadeto $($this,caretakerNote) 1
  598.                 }
  599.             }
  600.  
  601.             if {[ozGet itemNoteBook] == "pickedUp"} {
  602.                 oz'event {
  603.                     oz'widget::x $($this,noteBook) [itf'inventory::xpos 0]
  604.                     oz'widget::y $($this,noteBook) [itf'inventory::ypos 2]
  605.                     oz'widget::fadeto $($this,noteBook) 1
  606.                 }
  607.             }
  608.                 
  609.             if {[ozGet itemDoll] == "pickedUp"} {
  610.                 if {[ozGet puzzleMidgard] != "complete"} {
  611.                     oz'event {
  612.                         oz'widget::x $($this,doll) [itf'inventory::xpos 0]
  613.                         oz'widget::y $($this,doll) [itf'inventory::ypos 3]
  614.                         oz'widget::fadeto $($this,doll) 1
  615.                     }
  616.                 } else {
  617.                     oz'event {
  618.                         oz'widget::x $($this,dollS) [itf'inventory::xpos 0]
  619.                         oz'widget::y $($this,dollS) [itf'inventory::ypos 3]
  620.                         oz'widget::fadeto $($this,dollS) 1
  621.                     }
  622.                 }
  623.             }
  624.                 
  625.             if {[ozGet itemPagesYewlockLeaves] == "pickedUp"} {
  626.                 oz'event {
  627.                     oz'widget::x $($this,yewlockLeavesPage) [itf'inventory::xpos 1]
  628.                     oz'widget::y $($this,yewlockLeavesPage) [itf'inventory::ypos 0]
  629.                     oz'widget::fadeto $($this,yewlockLeavesPage) 1
  630.                 }
  631.             }
  632.                 
  633.             if {[ozGet itemPagesNigilis] == "pickedUp"} {
  634.                 oz'event {
  635.                     oz'widget::x $($this,nigilisPage) [itf'inventory::xpos 1]
  636.                     oz'widget::y $($this,nigilisPage) [itf'inventory::ypos 1]
  637.                     oz'widget::fadeto $($this,nigilisPage) 1
  638.                 }
  639.             }
  640.                 
  641.             if {[ozGet itemPagesHeadenFlower] == "pickedUp"} {
  642.                 if {[ozGet puzzleMidgard] == "pickedUp"} {
  643.                     oz'event {
  644.                         oz'widget::x $($this,headenFlowerPage) [itf'inventory::xpos 1]
  645.                         oz'widget::y $($this,headenFlowerPage) [itf'inventory::ypos 2]
  646.                         oz'widget::fadeto $($this,headenFlowerPage) 1
  647.                     }
  648.                 } else {
  649.                     oz'event {
  650.                         oz'widget::x $($this,headenFlowerPageS) [itf'inventory::xpos 1]
  651.                         oz'widget::y $($this,headenFlowerPageS) [itf'inventory::ypos 2]
  652.                         oz'widget::fadeto $($this,headenFlowerPageS) 1
  653.                     }
  654.                 }
  655.             }
  656.  
  657.             if {[ozGet itemNathanielNotes] == "pickedUp"} {
  658.                 oz'event {
  659.                     oz'widget::x $($this,handWrittenNotes) [itf'inventory::xpos 3]
  660.                     oz'widget::y $($this,handWrittenNotes) [itf'inventory::ypos 1]
  661.                     oz'widget::fadeto $($this,handWrittenNotes) 1
  662.                 }
  663.             }
  664.             
  665.             if {[ozGet itemOrbNotes] == "pickedUp"} {
  666.                 oz'event {
  667.                     oz'widget::x $($this,orbNotes) [itf'inventory::xpos 3]
  668.                     oz'widget::y $($this,orbNotes) [itf'inventory::ypos 0]
  669.                     oz'widget::fadeto $($this,orbNotes) 1
  670.                 }
  671.             }
  672.             
  673.             if {[ozGet itemSpellbook] == "pickedUp"} {
  674.                 oz'event {
  675.                     oz'widget::x $($this,spellbook) [itf'inventory::xpos 1]
  676.                     oz'widget::y $($this,spellbook) [itf'inventory::ypos 3]
  677.                     oz'widget::fadeto $($this,spellbook) 1
  678.                 }
  679.             }
  680.             
  681.             if {[ozGet itemArtRoomClue] == "pickedUp"} {
  682.                 oz'event {
  683.                     oz'widget::x $($this,tapestryArtRoom) [itf'inventory::xpos 2]
  684.                     oz'widget::y $($this,tapestryArtRoom) [itf'inventory::ypos 2]
  685.                     oz'widget::fadeto $($this,tapestryArtRoom) 1
  686.                 }
  687.             }
  688.             
  689.             if {[ozGet itemForgeClue] == "pickedUp"} {
  690.                 oz'event {
  691.                     oz'widget::x $($this,tapestryForge) [itf'inventory::xpos 2]
  692.                     oz'widget::y $($this,tapestryForge) [itf'inventory::ypos 1]
  693.                     oz'widget::fadeto $($this,tapestryForge) 1
  694.                 }
  695.             }
  696.             
  697.             if {[ozGet itemObservatoryClue] == "pickedUp"} {
  698.                 oz'event {
  699.                     oz'widget::x $($this,tapestryObservatory) [itf'inventory::xpos 2]
  700.                     oz'widget::y $($this,tapestryObservatory) [itf'inventory::ypos 0]
  701.                     oz'widget::fadeto $($this,tapestryObservatory) 1
  702.                 }
  703.             }
  704.             
  705.             if {[ozGet itemSolariumClue] == "pickedUp"} {
  706.                 oz'event {
  707.                     oz'widget::x $($this,tapestrySolarium) [itf'inventory::xpos 2]
  708.                     oz'widget::y $($this,tapestrySolarium) [itf'inventory::ypos 3]
  709.                     oz'widget::fadeto $($this,tapestrySolarium) 1
  710.                 }
  711.             }
  712.         }
  713.         
  714.         setThreadID 0
  715.     }
  716.  
  717.     proc hide {this} {
  718.         oz'widget::fadeto $($this,bg1) 0
  719.         oz'widget::fadeto $($this,bg2) 0
  720.  
  721.         oz'widget::fadeto $($this,yewlockLeavesBlue)   0
  722.         oz'widget::fadeto $($this,yewlockLeavesRed)    0
  723.         oz'widget::fadeto $($this,yewlockLeavesWhite)  0
  724.         oz'widget::fadeto $($this,yewlockLeavesYellow) 0
  725.         oz'widget::fadeto $($this,headenFlower)        0
  726.         oz'widget::fadeto $($this,nigilisSeed)         0
  727.         oz'widget::fadeto $($this,nigilisFruit)        0
  728.         oz'widget::fadeto $($this,pendant)             0
  729.         oz'widget::fadeto $($this,wineBottle)          0
  730.         oz'widget::fadeto $($this,brokenPendant)       0
  731.         oz'widget::fadeto $($this,caretakerTools)      0
  732.         oz'widget::fadeto $($this,figurine)            0
  733.         oz'widget::fadeto $($this,figurineS)           0
  734.         oz'widget::fadeto $($this,circlet)             0
  735.         oz'widget::fadeto $($this,magicalStaff)        0
  736.         oz'widget::fadeto $($this,keyRing)             0
  737.         oz'widget::fadeto $($this,caretakerKey)        0
  738.         oz'widget::fadeto $($this,caretakerKeyS)       0
  739.  
  740.         oz'widget::fadeto $($this,wineCaveClue)        0
  741.         oz'widget::fadeto $($this,caretakerNote)       0
  742.         oz'widget::fadeto $($this,noteBook)            0
  743.         oz'widget::fadeto $($this,doll)                0
  744.         oz'widget::fadeto $($this,dollS)               0
  745.         oz'widget::fadeto $($this,yewlockLeavesPage)   0
  746.         oz'widget::fadeto $($this,nigilisPage)         0
  747.         oz'widget::fadeto $($this,headenFlowerPage)    0
  748.         oz'widget::fadeto $($this,headenFlowerPageS)   0
  749.  
  750.         oz'widget::fadeto $($this,aleunderRoot)        0
  751.         oz'widget::fadeto $($this,catHair)             0
  752.         oz'widget::fadeto $($this,celeste)             0
  753.         oz'widget::fadeto $($this,dragonClaw)          0
  754.         oz'widget::fadeto $($this,eternalFlame)        0
  755.         oz'widget::fadeto $($this,libraryBallAqua)     0
  756.         oz'widget::fadeto $($this,libraryBallBrown)    0
  757.         oz'widget::fadeto $($this,libraryBallEntrance) 0
  758.         oz'widget::fadeto $($this,libraryBallPink)     0
  759.         oz'widget::fadeto $($this,oracleMoss)          0
  760.         oz'widget::fadeto $($this,pearl)               0
  761.         oz'widget::fadeto $($this,soulDust)            0
  762.         oz'widget::fadeto $($this,starFragment)        0
  763.         oz'widget::fadeto $($this,wolfDrool)           0
  764.  
  765.         oz'widget::fadeto $($this,handWrittenNotes)    0
  766.         oz'widget::fadeto $($this,orbNotes)            0
  767.         oz'widget::fadeto $($this,spellbook)           0
  768.         oz'widget::fadeto $($this,tapestryArtRoom)     0
  769.         oz'widget::fadeto $($this,tapestryForge)       0
  770.         oz'widget::fadeto $($this,tapestryObservatory) 0
  771.         oz'widget::fadeto $($this,tapestrySolarium)    0
  772.     }
  773.  
  774.     proc showdesc1 {this obj} {
  775.         itf'sidebar::hide $::itf::sidebar
  776.         itf'desc::show $::itf::desc $obj -inv
  777.     }
  778.  
  779.     proc showdesc2 {this obj} {
  780.         itf'sidebar::hide $::itf::sidebar
  781.         itf'desc::show $::itf::desc $obj -notebook
  782.     }
  783.  
  784.     proc showicon {this obj x y} {
  785.         catch {
  786.             oz'widget::x $($this,$obj) $x
  787.             oz'widget::y $($this,$obj) $y
  788.             oz'widget::fadeto $($this,$obj) 1 0.25
  789.         }
  790.     }
  791.     
  792.     proc hideicon {this} {
  793.         oz'widget::fadeto $($this,yewlockLeavesBlue)   0 0.25
  794.         oz'widget::fadeto $($this,yewlockLeavesRed)    0 0.25
  795.         oz'widget::fadeto $($this,yewlockLeavesWhite)  0 0.25
  796.         oz'widget::fadeto $($this,yewlockLeavesYellow) 0 0.25
  797.         oz'widget::fadeto $($this,headenFlower)        0 0.25
  798.         oz'widget::fadeto $($this,nigilisSeed)         0 0.25
  799.         oz'widget::fadeto $($this,nigilisFruit)        0 0.25
  800.         oz'widget::fadeto $($this,pendant)             0 0.25
  801.         oz'widget::fadeto $($this,wineBottle)          0 0.25
  802.         oz'widget::fadeto $($this,brokenPendant)       0 0.25
  803.         oz'widget::fadeto $($this,caretakerTools)      0 0.25
  804.         oz'widget::fadeto $($this,figurine)            0 0.25
  805.         oz'widget::fadeto $($this,figurineS)           0 0.25
  806.         oz'widget::fadeto $($this,circlet)             0 0.25
  807.         oz'widget::fadeto $($this,magicalStaff)        0 0.25
  808.         oz'widget::fadeto $($this,keyRing)             0 0.25
  809.         oz'widget::fadeto $($this,caretakerKey)        0 0.25
  810.         oz'widget::fadeto $($this,caretakerKeyS)       0 0.25
  811.  
  812.         oz'widget::fadeto $($this,wineCaveClue)        0 0.25
  813.         oz'widget::fadeto $($this,caretakerNote)       0 0.25
  814.         oz'widget::fadeto $($this,noteBook)            0 0.25
  815.         oz'widget::fadeto $($this,doll)                0 0.25
  816.         oz'widget::fadeto $($this,dollS)               0 0.25
  817.         oz'widget::fadeto $($this,yewlockLeavesPage)   0 0.25
  818.         oz'widget::fadeto $($this,nigilisPage)         0 0.25
  819.         oz'widget::fadeto $($this,headenFlowerPage)    0 0.25
  820.         oz'widget::fadeto $($this,headenFlowerPageS)   0 0.25
  821.  
  822.         oz'widget::fadeto $($this,aleunderRoot)        0 0.25
  823.         oz'widget::fadeto $($this,catHair)             0 0.25
  824.         oz'widget::fadeto $($this,celeste)             0 0.25
  825.         oz'widget::fadeto $($this,dragonClaw)          0 0.25
  826.         oz'widget::fadeto $($this,eternalFlame)        0 0.25
  827.         oz'widget::fadeto $($this,libraryBallAqua)     0 0.25
  828.         oz'widget::fadeto $($this,libraryBallBrown)    0 0.25
  829.         oz'widget::fadeto $($this,libraryBallEntrance) 0 0.25
  830.         oz'widget::fadeto $($this,libraryBallPink)     0 0.25
  831.         oz'widget::fadeto $($this,oracleMoss)          0 0.25
  832.         oz'widget::fadeto $($this,pearl)               0 0.25
  833.         oz'widget::fadeto $($this,soulDust)            0 0.25
  834.         oz'widget::fadeto $($this,starFragment)        0 0.25
  835.         oz'widget::fadeto $($this,wolfDrool)           0 0.25
  836.  
  837.         oz'widget::fadeto $($this,handWrittenNotes)    0 0.25
  838.         oz'widget::fadeto $($this,orbNotes)            0 0.25
  839.         oz'widget::fadeto $($this,spellbook)           0 0.25
  840.         oz'widget::fadeto $($this,tapestryArtRoom)     0 0.25
  841.         oz'widget::fadeto $($this,tapestryForge)       0 0.25
  842.         oz'widget::fadeto $($this,tapestryObservatory) 0 0.25
  843.         oz'widget::fadeto $($this,tapestrySolarium)    0 0.25
  844.     }
  845.     
  846.     proc xpos {x} {
  847.         return [expr 0.093750 + $x * 0.125000]
  848.     }
  849.  
  850.     proc ypos {y} {
  851.         return [expr 0.166666 + $y * 0.166666]
  852.     }
  853.  
  854.     proc enter {this} {
  855.         oz'mouse::cursor +100
  856.     }
  857.  
  858.     proc leave {this} {
  859.         oz'mouse::cursor -100
  860.     }
  861. }
  862.  
  863.