Passport/passport.iso/pc/passport/grammar.dxr/Internal_14.ls

Text File | 1998-02-02 | 340 b | 26 lines

on startMovie
  global Topic
  set Topic to "28"
  Cursors([2, -12])
  AddToHistory()
  SetDynamics()
  pass()
end

on SetDynamics
  global Language
  SetGlobalDynamics()
  case Language of
    "G":
      go(2)
    "E":
      go(3)
    "F":
      go(4)
    "S":
      go(5)
    otherwise:
      alert("Language sconosciuto")
  end case
end