get-style in pen%
Returns the pen style. See
pen% for information about possible styles.
( -> symbol in send a-pen get-style)'(transparent solid xor hilite dot long-dash short-dash dot-dash xor-dot xor-long-dash xor-short-dash xor-dot-dash)