sleep(ms)={
  while((ms-=gettime()) > 0,);
};
dot()=print1(Strchr([7]));sleep(250);
dash()=print1(Strchr([7]));sleep(10);print1(Strchr([7]));sleep(10);print1(Strchr([7]));sleep(250);
Morse(s)={
  s=Vec(s);
  for(i=1,#s,
    if(s[i] == ".", dot(),
      if(s[i] == "-", dash(), sleep(250))
    )
  )
};

Morse("...---...")