This application selects by label a graphics-database  picture of a specified device. If such a picture is found then it becomes the current picture on exit, otherwise the input picture remains current. Labels in the database are stored in the case supplied when they were created. However, the comparisons of the label you supply with the labels in the database are made in uppercase, and leading spaces are ignored.

Should the label not be found the current picture is unchanged.

DEVICE = DEVICE (Read)

LABEL = LITERAL (Read)

picsel GALAXY

This makes the picture labelled "GALAXY" the current picture on the current graphics device. Should there be no picture of this name, the current picture is unchanged.

picsel A3 xwindows

This makes the picture labelled "A3" the current picture on the xwindows device. Should there be no picture of this name, the current picture is unchanged.

KAPPA: PICDATA, PICDEF, PICEMPTY, PICENTIRE, PICFRAME, PICLABEL, PICLAST, PICVIS.