Terminal control/Inverse video: Difference between revisions

Content added Content deleted
(→‎{{header|Ruby}}: Added Ruby)
(Rename Perl 6 -> Raku, alphabetize, minor clean-up)
Line 67: Line 67:
return DllCall( "SetConsoleTextAttribute", UPtr, hConsole, UShort, Attributes)
return DllCall( "SetConsoleTextAttribute", UPtr, hConsole, UShort, Attributes)
}</lang>
}</lang>

=={{header|AWK}}==
=={{header|AWK}}==
<lang awk>BEGIN {
<lang awk>BEGIN {
Line 256: Line 257:
parseFrench=:;:,#.*."3,(C.A.)/\/&.:;: NB. just kidding! More output.
parseFrench=:;:,#.*."3,(C.A.)/\/&.:;: NB. just kidding! More output.
</lang>
</lang>



=={{header|Julia}}==
=={{header|Julia}}==
Line 328: Line 328:
print "normal\n";</lang>
print "normal\n";</lang>


=={{header|Perl 6}}==
<lang perl6>say "normal";
run "tput", "rev";
say "reversed";
run "tput", "sgr0";
say "normal";</lang>
=={{header|Phix}}==
=={{header|Phix}}==
<lang Phix>--
<lang Phix>--
Line 360: Line 354:


print "\033[7mReversed\033[m Normal"</lang>
print "\033[7mReversed\033[m Normal"</lang>



=={{header|Racket}}==
=={{header|Racket}}==
Line 375: Line 368:
(charterm-display "World"))
(charterm-display "World"))
</lang>
</lang>

=={{header|Raku}}==
(formerly Perl 6)
<lang perl6>say "normal";
run "tput", "rev";
say "reversed";
run "tput", "sgr0";
say "normal";</lang>


=={{header|REXX}}==
=={{header|REXX}}==
Line 395: Line 396:
{{Works with|Ubuntu|14.04}}
{{Works with|Ubuntu|14.04}}
<lang ruby>puts "\033[7mReversed\033[m Normal"</lang>
<lang ruby>puts "\033[7mReversed\033[m Normal"</lang>

=={{header|Scala}}==
=={{header|Scala}}==
{{Works with|Ubuntu|14.04}}
{{Works with|Ubuntu|14.04}}