home *** CD-ROM | disk | FTP | other *** search
/ Corbis Images Sampler - Red / RED.iso / pc / Interface / inter.dxr / 00040_anselcap.ls < prev    next >
Encoding:
Text File  |  1999-12-21  |  1.4 KB  |  39 lines
  1. property spriteNum, pMySpriteRef
  2. global gName
  3.  
  4. on beginSprite me
  5.   pMySpriteRef = sprite(me.spriteNum)
  6.   currMember = pMySpriteRef.member
  7.   gName = member(currMember).name
  8.   if gName = "AD001123" then
  9.     member("caption").text = "AD001123" & RETURN & "Dogwood Plant in Yosemite National Park"
  10.   end if
  11.   if gName = "AD001096" then
  12.     member("caption").text = "AD001096" & RETURN & "Frozen Lake and Cliffs"
  13.   end if
  14.   if gName = "AD001219" then
  15.     member("caption").text = "AD001219" & RETURN & "Dorothea Lange, Berkeley, California, 1965"
  16.   end if
  17.   if gName = "AD001143" then
  18.     member("caption").text = "AD001143" & RETURN & "Farm Family in Melones"
  19.   end if
  20.   if gName = "AD001169" then
  21.     member("caption").text = "AD001169" & RETURN & "Adams' Shadow on Stone"
  22.   end if
  23.   if gName = "AD001083" then
  24.     member("caption").text = "AD001083" & RETURN & "Bridalveil Fall"
  25.   end if
  26.   if gName = "AD001032" then
  27.     member("caption").text = "AD001032" & RETURN & "Alfred Stieglitz Sits Under Georgia O'Keeffe Painting"
  28.   end if
  29.   if gName = "AD002189" then
  30.     member("caption").text = "AD002189" & RETURN & "Moonrise, Joshua Tree National Monument, California"
  31.   end if
  32.   if gName = "AD002190" then
  33.     member("caption").text = "AD002190" & RETURN & "Saguaro Cactus, Arizona"
  34.   end if
  35.   if gName = "AD001050" then
  36.     member("caption").text = "AD001050" & RETURN & "Moon Over Half Dome"
  37.   end if
  38. end
  39.