xterm_get_pencolor(3f) - [M_xterm] query xterm(1) color by number (LICENSE:PD)
Synopsis
Description
Options
Returns
Example
Author
License
function xterm_get_pencolor(pennum) result(color)
integer,intent(in) :: pennum character(len=*) :: color
Get the color of an xterm(1) color number.
pennum which pen number to describe the color of
color A string specifying the pen color in the form "rgb:RR/GG/BB"
A sample program:
program demo_xterm_get_pencolor use M_xterm, only : xterm_get_pencolor character(len=:),allocatable :: cache do i=0,15 cache=xterm_get_pencolor(i) write(*,(i4.4,1x,a))i,cache enddo end program demo_xterm_get_pencolorSample output:
John S. Urban
Public Domain
xterm_get_pencolor (3) | September 17, 2020 |