如何使用Fortran输出不同颜色的文字

Fortran 不支持直接输出不同颜色的文字，但可以通过 ANSI 转义序列来实现。例如，要输出红色的文字，可以使用以下代码：

write(*,*) char(27)//"[31m"//'Hello, World!'//char(27)//"[0m"

其中，char(27) 表示 ASCII 码为 27 的字符，也可以写成字符常量 "'\033'"。"[31m" 表示设置前景色为红色，"[0m" 表示重置颜色为默认值。可以根据需要修改颜色代码。

相关问题

如何使用Fortran输出绿色的文字

您可以使用以下代码在 Fortran 中输出绿色的文字：

program green_text
implicit none
write(*, "(a, a)", advance="no") &
"&033[32m", "This text is green!", &
"&033[0m" ! Reset color to default
end program green_text

请注意，这里使用的是 ANSI 转义序列，其中 "&033" 表示 ESC 键的 ASCII 码。"&033[32m" 表示将文本颜色设置为绿色，"&033[0m" 则表示将颜色重置为默认值。

如何使用Fortran在屏幕上输出不同颜色的文字

您可以使用Fortran中的ANSI控制码来在屏幕上输出不同颜色的文字。例如，使用ANSI控制码“\033[31m”可以将文本颜色设置为红色。以下是一个Fortran代码示例：

program colored_text
implicit none
write(*, '(a)') 'This is normal text'
write(*, '(a)') '\033[31mThis is red text\033[0m'
write(*, '(a)') '\033[32mThis is green text\033[0m'
write(*, '(a)') '\033[33mThis is yellow text\033[0m'
write(*, '(a)') '\033[34mThis is blue text\033[0m'
write(*, '(a)') '\033[35mThis is magenta text\033[0m'
write(*, '(a)') '\033[36mThis is cyan text\033[0m'
end program colored_text

请注意，ANSI控制码的格式为“\033[颜色代码m”，其中颜色代码可以是31到36之间的数字。在输出完彩色文本后，必须使用“\033[0m”控制码将文本颜色重置为默认颜色。