Manual Reference Pages - pixel (3m_pixel)

NAME

pixel(3f) - [M_pixel] set pixel to current color (LICENSE:PD)

Synopsis
Description
Options
Example
Author
License

SYNOPSIS

definition:

   elemental impure subroutine pixel(row,column,indx)
   integer,intent(in)          :: row
   integer,intent(in)          :: column
   integer,intent(in),optional :: indx

DESCRIPTION

Directly set a pixel to the current or specified color index. The ROW and COLUMN start at 1.

OPTIONS

ROW row number in P_pixel to set
0 < ROW < size(P_pixel,dim=1)-1.

COLUMN column number in P_pixel to set
0 < COLUMN < size(P_pixel,dim=2)-1.

INDX color index to set pixel array to. Optional

EXAMPLE

Sample program

   program demo_pixel
   use :: M_pixel
   implicit none
      call prefsize(10,10) ! set up drawing surface
      call mapcolor(0,255,255,255)
      call mapcolor(1,255,000,000)
      call mapcolor(2,255,255,000)
      call mapcolor(3,255,000,255)
      call mapcolor(4,000,255,255)
      call mapcolor(5,000,255,000)
      call mapcolor(6,000,000,255)
      call mapcolor(7,000,000,000)
      call vinit()
      call color(0)
      call clear()
      call color(1)
      call pixel(1,1)
      call color(3)
      call pixel(3,3)
      call pixel(5,5,5)
      call print_ascii()
      call vexit()
   end program demo_pixel

Results:

1000000000 0000000000 0030000000 0000000000 0000500000 0000000000 0000000000 0000000000 0000000000 0000000000

AUTHOR

John S. Urban

LICENSE

Public Domain

Nemo Release 3.1

pixel (3m_pixel)

April 21, 2023

Generated by manServer 1.08 from ab105eb1-9c4d-449f-a061-6f3bd0c4780d using man macros.

ROW	row number in P_pixel to set 0 < ROW < size(P_pixel,dim=1)-1.
COLUMN	column number in P_pixel to set 0 < COLUMN < size(P_pixel,dim=2)-1.
INDX	color index to set pixel array to. Optional