RosettaCodeData/Task/Terminal-control-Inverse-video/J/terminal-control-inverse-video.j
Ingy döt Net 68f8f3e56b all tasks
2013-04-11 01:07:29 -07:00

5 lines
322 B
Text

;:';:,#.*."3,(C.A.)/\/&.:;:' NB. some output beforehand
attributes REVERSEVIDEO NB. does as it says
2 o.^:a:0 NB. solve the fixed point equation cos(x) == x
attributes OFF NB. no more blinky flashy
parseFrench=:;:,#.*."3,(C.A.)/\/&.:;: NB. just kidding! More output.