home *** CD-ROM | disk | FTP | other *** search
/ Chip 1997 - Expo 2000 / Image.iso / t-online / decoder / formular.dir / 00080.ls < prev    next >
Encoding:
Text File  |  1997-02-10  |  371 b   |  14 lines
  1. on mouseDown
  2.   global angekreuzt
  3.   if the castNum of sprite 24 = 100 then
  4.     set the castNum of sprite 24 to 101
  5.     set angekreuzt to 1
  6.     put "Kostenlos!" into field "Kostenlos!"
  7.     alert("Bitte lesen Sie die Information zur Bevollm├ñchtigung.")
  8.   else
  9.     set the castNum of sprite 24 to 100
  10.     set angekreuzt to 0
  11.     put " " into field "Kostenlos!"
  12.   end if
  13. end
  14.