PC Plus SuperCD (UK) 1995 June/PC_PLUS.BIN/crt/charmap.dir/00036.ls

Text File | 1995-03-23 | 865 b | 83 lines

on startMovie
  global x
  set x to 0
  puppetSprite(9, 1)
  puppetSprite(10, 1)
  puppetSprite(11, 1)
  puppetSprite(12, 1)
  puppetSprite(13, 1)
  puppetSprite(14, 1)
  puppetSprite(15, 1)
  puppetSprite(16, 0)
end

on first
  beep()
end

on second
  beep()
  puppetSound("char 1")
end

on third
  beep()
  go(marker(1))
end

on char2
  beep()
  puppetSound("char 2")
end

on char3
  puppetSound("char 3")
end

on char3A
  puppetSound("char 3")
end

on char4
  puppetSound("char 4")
end

on char4a
  beep()
  puppetSound("char 4")
end

on char6
  puppetSound("char 6")
end

on char6a
  beep()
  puppetSound("char 6")
end

on char7a
  beep()
  puppetSound("char 7")
end

on char8a
  beep()
  puppetSound("char 8")
end

on char9a
  beep()
  puppetSound("char 9")
end

on char10a
  beep()
  puppetSound("char10")
end

on char11a
  beep()
  puppetSound("char11")
end