1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
|
#!/usr/bin/env python
# Append to effective python path so that can find plplot modules.
from plplot_python_start import *
import sys
from plplot import *
from numpy import *
x = [0.5]
y = [0.5]
title = [
"Large Circle + Light Diagonal Cross with plptex",
"Ascii Asterisk with plptex",
"Plplot Encoded Unicode Indexed Asterisk with plptex",
"Plplot Encoded Hershey Indexed Asterisk with plptex",
"Asterisk with plsym",
"Asterisk with plpoin",
]
ifunicode = True
# Parse and process command line arguments
plparseopts(sys.argv, PL_PARSE_FULL)
# Initialize plplot
plinit()
for kind in range(6):
pladv(0)
plvpor(0.1, 0.9, 0.1, 0.9)
plwind(0., 1., 0., 1.)
# Just to show edges of viewport
plcol0(1)
plbox("bc", 0., 0, "bc", 0., 0)
plcol0(2)
plschr(0., 1.)
plmtex("t", 1., 0.5, 0.5, title[kind])
k=0
for size in 2.**arange(2,-3,-1):
k+=1
plcol0(k)
if kind==0:
if ifunicode:
plschr(0., 4.*size)
# LARGE CIRCLE has a centre of symmetry which is about one-eighth the
# radius below the centre of symmetry of the box for DejaVu Sans.
plptex(0.5, 0.5, 1., 0., 0.5, "#[0x25ef]")
# BOX DRAWINGS LIGHT DIAGONAL CROSS is one of the best centred symmetrical
# glyphs I have found using gucharmap for DejaVu Sans.
plptex(0.5, 0.5, 1., 0., 0.5, "#[0x2573]")
else:
plschr(0., 4.*size)
plptex(0.5, 0.5, 1., 0., 0.5, "#(907)")
elif kind ==1:
# Print an ascii asterisk using plptex
plschr(0., 8.*size)
plptex(0.5, 0.5, 1., 0., 0.5, "*")
elif kind ==2:
# Print a (PLplot encoded) unicode indexed asterisk using plptex
plschr(0., 8.*size)
plptex(0.5, 0.5, 1., 0., 0.5, "#[0x002a]")
elif kind ==3:
# Print a (PLplot encoded) Hershey indexed asterisk using plptex
plschr(0., 8.*size)
plptex(0.5, 0.5, 1., 0., 0.5, "#(728)")
elif kind ==4:
# Print an asterisk using plsym
plssym(0., 8.*size)
plsym(x, y, 728)
elif kind ==5:
# Print an asterisk using plpoin
plssym(0., 8.*size)
plpoin(x, y, 3)
# Terminate plplot
plend()
|
