Pro One: Netcracker Netscape Navigator/ProOne: Netcracker Netscape Navigator.iso/pc/nc/nct02040.geo/00029_MAS2.ls

Text File | 1997-03-19 | 3.5 KB | 252 lines

on setSB_Sprite int
  global SB_Sprite
  set SB_Sprite to int
end

on getSB_Sprite
  global SB_Sprite
  return SB_Sprite
end

on setDIC_Sprite int
  global DIC_Sprite
  set DIC_Sprite to int
end

on getDIC_Sprite
  global DIC_Sprite
  return DIC_Sprite
end

on setMAP_Sprite int
  global MAP_Sprite
  set MAP_Sprite to int
end

on getMAP_Sprite
  global MAP_Sprite
  return MAP_Sprite
end

on setUCP_Sprite int
  global UCP_Sprite
  set UCP_Sprite to int
end

on getUCP_Sprite
  global UCP_Sprite
  return UCP_Sprite
end

on setSTUDY_Sprite int
  global STUDY_Sprite
  set STUDY_Sprite to int
end

on getSTUDY_Sprite
  global STUDY_Sprite
  return STUDY_Sprite
end

on setOK_Sprite int
  global OK_Sprite
  set OK_Sprite to int
end

on getOK_Sprite
  global OK_Sprite
  return OK_Sprite
end

on setPLAY_Sprite int
  global PLAY_Sprite
  set PLAY_Sprite to int
end

on getPLAY_Sprite
  global PLAY_Sprite
  return PLAY_Sprite
end

on setTimer int
  global theTime
  set theTime to int
end

on getTimer
  global theTime
  return theTime
end

on setMovieSprite int
  global MovieSprite
  set MovieSprite to int
end

on getMovieSprite
  global MovieSprite
  return MovieSprite
end

on setMovieTime movieNum, int
  global movieTime
  put int into item movieNum of movieTime
end

on getMovieTime movieNum
  global movieTime
  return item movieNum of movieTime
end

on setRollName str
  global RollName
  set RollName to str
end

on getRollName
  global RollName
  return RollName
end

on setUcpBg_Sprite int
  global UcpBg_Sprite
  set UcpBg_Sprite to int
end

on getUcpBg_Sprite
  global UcpBg_Sprite
  return UcpBg_Sprite
end

on setRIGHT_Sprite int
  global RIGHT_Sprite
  set RIGHT_Sprite to int
end

on getRIGHT_Sprite
  global RIGHT_Sprite
  return RIGHT_Sprite
end

on setLEFT_Sprite int
  global LEFT_Sprite
  set LEFT_Sprite to int
end

on getLEFT_Sprite
  global LEFT_Sprite
  return LEFT_Sprite
end

on setUcpPage_Sprite int
  global UcpPage_Sprite
  set UcpPage_Sprite to int
end

on getUcpPage_Sprite
  global UcpPage_Sprite
  return UcpPage_Sprite
end

on setCLOSE_Sprite int
  global CLOSE_Sprite
  set CLOSE_Sprite to int
end

on getCLOSE_Sprite
  global CLOSE_Sprite
  return CLOSE_Sprite
end

on setStudyWindow_Sprite int
  global StudyWindow_Sprite
  set StudyWindow_Sprite to int
end

on getStudyWindow_Sprite
  global StudyWindow_Sprite
  return StudyWindow_Sprite
end

on setCloseStudy_Sprite int
  global CloseStudy_Sprite
  set CloseStudy_Sprite to int
end

on getCloseStudy_Sprite
  global CloseStudy_Sprite
  return CloseStudy_Sprite
end

on SetNumOfPages int
  global NumOfPages
  set NumOfPages to int
end

on getNumOfPages
  global NumOfPages
  return NumOfPages
end

on setPageNumber int
  global PageNumber
  set PageNumber to int
end

on getPageNumber
  global PageNumber
  return PageNumber
end

on setUCP_Mode bool
  global UCP_Mode
  set UCP_Mode to bool
end

on getUCP_Mode
  global UCP_Mode
  return UCP_Mode
end

on setBtnsStatusVec
  global BtnsStatusVec
  repeat with i = getSB_Sprite() to getPLAY_Sprite()
    put the name of cast the castNum of sprite i into item i - (getSB_Sprite() - 1) of BtnsStatusVec
  end repeat
end

on getBtnsStatusVec
  global BtnsStatusVec
  return BtnsStatusVec
end

on SetNext int
  global next
  set next to int
end

on getNext
  global next
  return next
end

on setSourceMovie str
  global SourceMovie
  set SourceMovie to str
end

on getSourceMovie
  global SourceMovie
  return SourceMovie
end

on setStudy_Mode bool
  global Study_Mode
  set Study_Mode to bool
end

on getStudy_Mode
  global Study_Mode
  return Study_Mode
end