(notonline)-->
without js -- (threads)
procedure echo(string s)
sleep(rand(100)/100)
enter_cs()
puts(1,s)
puts(1,'\n')
leave_cs()
end procedure
constant threads = {create_thread(routine_id("echo"),{"Enjoy"}),
create_thread(routine_id("echo"),{"Rosetta"}),
create_thread(routine_id("echo"),{"Code"})}
wait_thread(threads)
puts(1,"done")
{} = wait_key()