home *** CD-ROM | disk | FTP | other *** search
/ Interactive Bible for Kids - The Life of Paul / Paul.iso / mac / MASTRCST.DIR / 00067_Script_67 < prev    next >
Text File  |  1996-09-12  |  591b  |  27 lines
  1. on exitFrame
  2.   global rca,rcb,rcc,rdmch,AG
  3.   put 1 into AG
  4.   repeat with i = 1 to 48
  5.     set the cursor of sprite i to 0
  6.   end repeat
  7.   
  8.   cursor 200
  9.   
  10.   set rdmch = random (3)
  11.   if rdmch = 1 then
  12.     set the puppet of sprite rcb to true
  13.     set the puppet of sprite rcc to true
  14.     updatestage
  15.   end if
  16.   if rdmch = 2 then
  17.     set the puppet of sprite rca to true
  18.     set the puppet of sprite rcc to true
  19.     updatestage
  20.   end if
  21.   if rdmch = 3 then
  22.     set the puppet of sprite rca to true
  23.     set the puppet of sprite rcb to true
  24.     updatestage
  25.   end if
  26.   
  27. end