home *** CD-ROM | disk | FTP | other *** search
/ Weekend Europe 2 / LonelyPlanet.iso / pc / install.dxr / 00008_setStartText.ls < prev    next >
Encoding:
Text File  |  2003-07-21  |  314 b   |  14 lines
  1. property pSprite, pName
  2. global gLanguage, gTextList
  3.  
  4. on beginSprite me
  5.   pSprite = sprite(me.spriteNum)
  6.   pName = pSprite.member.name
  7.   welcomeText = gTextList.welcome[gLanguage]
  8.   if not voidp(gLanguage) then
  9.     if pSprite.member.type = #text then
  10.       pSprite.member.text = welcomeText
  11.     end if
  12.   end if
  13. end
  14.