home *** CD-ROM | disk | FTP | other *** search
/ Shocking The Web CD-ROM / SHOCK_CD.ISO / pc / tutorial / ch08_lgo / tutor.dcr / 00225.txt < prev    next >
Encoding:
Text File  |  1996-12-06  |  221 b   |  9 lines
  1. on mouseDown
  2.    set SWAStatus = the state of member "SWAHolder"
  3.    if (SWAstatus < = 2) or (SWAstatus = 4) then
  4.       play (member "SWAHolder")
  5.    else if SWAstatus = 3 then
  6.       pause (member "SWAHolder")
  7.    end if
  8. end
  9.