home *** CD-ROM | disk | FTP | other *** search
/ PC Home 49 / PC_Home_Issue_49.iso / e-on / eon01.dir / 00104.ls < prev    next >
Encoding:
Text File  |  1996-02-14  |  1.7 KB  |  83 lines

  1. on mouseUp
  2.   puppetSound(2, cast "clik")
  3.   updateStage()
  4.   startTimer()
  5.   repeat while the timer < 10
  6.   end repeat
  7.   if word 1 of field "kirk" = "2459" then
  8.     go("c1")
  9.   end if
  10.   if word 1 of field "kirk" = "1360" then
  11.     go("c2")
  12.   end if
  13.   if word 1 of field "kirk" = "2259" then
  14.     go("c3")
  15.   end if
  16.   if word 1 of field "kirk" = "1583" then
  17.     go("c4")
  18.   end if
  19.   if word 1 of field "kirk" = "1894" then
  20.     go("c5")
  21.   end if
  22.   if word 1 of field "kirk" = "1172" then
  23.     go("c6")
  24.   end if
  25.   if word 1 of field "kirk" = "1478" then
  26.     go("c7")
  27.   end if
  28.   if word 1 of field "kirk" = "2312" then
  29.     go("c8")
  30.   end if
  31.   if word 1 of field "kirk" = "2036" then
  32.     go("c9")
  33.   end if
  34.   if word 1 of field "kirk" = "1626" then
  35.     go("c10")
  36.   end if
  37.   if word 1 of field "kirk" = "6992" then
  38.     go("c11")
  39.   end if
  40.   if word 1 of field "kirk" = "2402" then
  41.     go("c12")
  42.   end if
  43.   if word 1 of field "kirk" = "1344" then
  44.     go("c13")
  45.   end if
  46.   if word 1 of field "kirk" = "7273" then
  47.     go("c14")
  48.   end if
  49.   if word 1 of field "kirk" = "4816" then
  50.     go("c15")
  51.   end if
  52.   if word 1 of field "kirk" = "1099" then
  53.     go("c16")
  54.   end if
  55.   if word 1 of field "kirk" = "2526" then
  56.     go("c17")
  57.   end if
  58.   if word 1 of field "kirk" = "5734" then
  59.     go("c18")
  60.   end if
  61.   if word 1 of field "kirk" = "1997" then
  62.     go("c19")
  63.   end if
  64.   if word 1 of field "kirk" = "9211" then
  65.     go("c20")
  66.   end if
  67.   if word 1 of field "kirk" = "2154" then
  68.     go("c21")
  69.   end if
  70.   if word 1 of field "kirk" = "3672" then
  71.     go("c22")
  72.   end if
  73.   if word 1 of field "kirk" = "8620" then
  74.     go("c23")
  75.   end if
  76.   if word 1 of field "kirk" = "1230" then
  77.     go("c24")
  78.   end if
  79.   if word 1 of field "kirk" = "1727" then
  80.     go("c25")
  81.   end if
  82. end
  83.