home *** CD-ROM | disk | FTP | other *** search
/ Shocking The Web CD-ROM / SHOCK_CD.ISO / pc / tutorial / ch08_lgo / tutor.dir / 00234.txt < prev    next >
Encoding:
Text File  |  1996-12-06  |  216 b   |  11 lines
  1. global gSWAflag
  2. on idle
  3.   if gSWAflag = 1 then 
  4.     set SWAStatus = the state of member "SWAHolder"
  5.       if SWAStatus = 2 then
  6.          set gSWAFlag = 0
  7.          Play (member "SWAHolder")
  8.       end if
  9.    end if
  10. end
  11.