Subversion Repositories svn.mios

Rev

Rev 1117 | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
809 tk 1
%!PS-Adobe-3.0
1231 tk 2
%%Title: mbhp_lcd_mios32.ps
3
%%Creator: XCircuit v3.8 rev45
4
%%CreationDate: Sat Jan  5 17:17:29 2019
809 tk 5
%%Pages: 1
6
%%BoundingBox: 0 0 612 792
7
%%DocumentNeededResources: font Helvetica Courier
8
%%EndComments
9
%%BeginProlog
10
%
11
%  PostScript prolog for output from xcircuit
1231 tk 12
%  Version: 3.8
809 tk 13
%
14
%  Electrical circuit (and otherwise general) drawing program
15
%
1231 tk 16
%  Written by Tim Edwards 8/5/93--11/1/10  (tim.edwards@multigig.com)
809 tk 17
%  The Johns Hopkins University (1993-2004)
1231 tk 18
%  MultiGiG, Inc. (2004-2012)
809 tk 19
%
1231 tk 20
%%BeginResource: procset XCIRCproc 3.8 0
809 tk 21
%
22
% supporting definitions --- these are the primary xcircuit types.
23
 
24
/XCIRCsave save def
25
/topmat matrix currentmatrix def
26
 
27
/fontslant { /slant exch def [1 0 slant 1 0 0]
28
    exch findfont exch makefont dup length dict /ndict exch def
29
    { 1 index /FID ne { ndict 3 1 roll put } { pop pop } ifelse } forall
30
    ndict definefont pop} def
31
/ul { dup type /stringtype eq showflag 1 eq and { gsave
32
   currentpoint topmat setmatrix 0 0 moveto 2 index stringwidth pop (_)
33
   false charpath flattenpath pathbbox grestore exch pop 1 index
34
   sub setlinewidth exch pop currentpoint 3 -1 roll add moveto 0
35
   rlineto stroke moveto } if } def
36
/ol { dup type /stringtype eq showflag 1 eq and { gsave gsave
37
   currentpoint topmat setmatrix 2 index stringwidth pop 3 index
38
   true charpath flattenpath pathbbox grestore exch pop
39
   exch pop topmat setmatrix (_) true charpath pathbbox grestore
40
   exch pop 1 index sub setlinewidth exch pop currentpoint
41
   exch 4 1 roll exch sub add moveto pop 0 rlineto stroke
42
   moveto } if } def
43
/stW { gsave currentpoint newpath moveto true charpath flattenpath
44
	pathbbox pop exch pop sub grestore } def
45
/Ts {mark Tabs aload pop counttomark 1 add array astore /Tabs exch def Tabs
46
 
47
/Tbn {mark Tabs aload pop counttomark dup 2 add 1 roll cleartomark 1 sub} def
48
/Tb { 0 1 Tbn {Tabs exch get dup currentpoint pop lt
49
	{currentpoint exch pop moveto exit} {pop} ifelse } for } def
50
/Tf { Tbn -1 0 {Tabs exch get dup currentpoint pop gt
51
	{currentpoint exch pop moveto exit} {pop} ifelse } for } def
52
/qS { (aa) stW (a a) stW sub 4 div 0 Kn } def
53
/hS { qS qS } def
54
/pspc 0 def
55
/cf0 { scalefont setfont } bind def
56
/Kn { dup kY add /kY exch def rmoveto } bind def
57
/ss { /fscale fscale 0.67 mul def currentfont 0.67 cf0 0 fscale0 fscale mul
58
	0.33 mul neg Kn} def
59
/Ss { /fscale fscale 0.67 mul def currentfont 0.67 cf0 0 fscale0 fscale mul
60
	0.67 mul Kn } def
61
/ns { 0 kY neg Kn /kY 0 def /fscale 1.0 def xfont0 1.0 cf0 } def
1231 tk 62
/MR { /twidth exch def } def
809 tk 63
/CR { ns 0 /Bline Bline fscale0 neg add def Bline moveto } def
64
/cf { dup type /realtype ne {1.0} if exch findfont exch kY 0 eq
65
	{ 40 mul dup /fscale0 exch def cf0 /xfont0 currentfont def}
66
	{fscale0 mul fscale mul cf0} ifelse } def
67
/ctmk { counttomark dup 2 add -1 roll pop } bind def
1231 tk 68
/label { gsave translate 0 0 moveto dup scale neg
69
	/rotval exch def /twidth 100000 def /just exch def just 384 and
70
 
71
	gt {gsave rotval rotate 0 1 dtransform gsave pagemat setmatrix
72
	idtransform exch grestore 1 0 dtransform gsave pagemat setmatrix
73
	idtransform exch grestore dup abs 1e-9 lt {pop mul 0 gt} {3 1 roll
74
	pop pop 0 lt} ifelse grestore {-1 /rotval rotval neg def /just just
75
	dup 3 and 1 ne {3 xor} if def} {1} ifelse exch -1e-9 lt {-1 /rotval
76
	rotval neg def /just just dup 12 and 4 ne {12 xor} if def} {1}
77
	ifelse scale } if /showflag 0 def /fspc pspc def /Bline 0 def /Tabs
78
 
79
	1 0 dtransform exch atan rotate {exch dup type /stringtype eq {gsave
80
        dup gsave newpath 0 0 moveto true charpath flattenpath pathbbox pop
81
	exch pop exch pop grestore currentpoint pop add twidth
82
	ge {grestore CR exch 1 add dup 2 add {CR} exch 1 roll exch} {grestore}
83
	ifelse true charpath flattenpath} {dup type /arraytype eq {exec} {12
84
	string cvs true charpath flattenpath} ifelse} ifelse} repeat exch pop
85
	pathbbox grestore 3 -1 roll pop 3 1 roll just 1 and 0 gt {just 2 and
86
 
87
	fspc add} ifelse exch Bline exch just 4 and 0 gt {just 8 and 0 gt
88
	{exch pop neg fspc sub} {add 0.5 mul neg} ifelse} {pop neg fspc add}
89
	ifelse rotval rotate Kn currentpoint translate /showflag 1 def /Bline
90
 
91
	/stringtype eq {mshow} {dup type /arraytype eq {exec} {12 string cvs
92
	mshow} ifelse} ifelse} repeat grestore endclip} def
809 tk 93
/pinlabel { 4 index 32 and 0 ne hlevel 0 eq or { /pspc 10 def label
94
	/pspc 0 def } { pop pop pop pop pop {pop} repeat } ifelse } def
95
/pinglobal { pinlabel } def
96
/infolabel { pinlabel } def
1231 tk 97
/graphic { gsave 4 index cvx exec /DataSource get resetfile translate 0 0
98
	moveto neg rotate dup scale cvx exec image grestore endclip} def
809 tk 99
 
100
/scb { setrgbcolor } bind def  /sce { defColor aload pop scb } bind def
101
/cRedef {/defColor currentcolor 3 array astore def} def
102
/begingate {dup type /dicttype ne {1 dict} if begin	% default params
103
	dup type /dicttype ne {1 dict} if begin		% instanced params
1231 tk 104
	/hlevel hlevel 1 add def /defColor currentcolor sce 3 array astore
105
	def gsave sce translate 0 0 moveto neg rotate dup type /nametype
106
	eq not { dup abs currentlinewidth exch div setlinewidth } { pop }
107
	ifelse dup abs scale clipped 1 and 1 eq {/clipped clipped 1 add def}
108
	if} bind def
809 tk 109
/endgate { /hlevel hlevel 1 sub def grestore defColor aload pop cRedef
1231 tk 110
	scb end end endclip} bind def
809 tk 111
 
112
/hlevel 0 def
1231 tk 113
/endclip {clipped 1 and 1 eq {grestore /clipped clipped 1 sub def} if} def
809 tk 114
/tmpa [1 0 0 1 0 0] def
115
/gar {8 8 true tmpa {<c0 c0 00 00 0c 0c 00 00>} imagemask} bind
116
{8 8 true tmpa {<30 70 60 02 03 07 06 20>} imagemask} bind
117
{8 8 true tmpa {<0c 1e 1e 0c c0 e1 e1 c0>} imagemask} bind
118
{8 8 true tmpa {<0f 0f 0f 0f f0 f0 f0 f0>} imagemask} bind
119
{8 8 true tmpa {<3f f3 e1 e1 f3 3f 1e 1e>} imagemask} bind
120
{8 8 true tmpa {<df cf 8f 9f fd fc f8 f9>} imagemask} bind
121
{8 8 true tmpa {<ff 3f 3f ff ff f3 f3 ff>} imagemask} bind 7 array astore def
122
/ppaint { gsave clip tmpa dup setmatrix pathbbox neg exch neg 4 2 roll
123
  neg 4 -1 roll 2 copy gt {exch} if 8 div ceiling 8 mul 4 2 roll neg 2 copy
124
  gt {exch} if 8 div ceiling 8 mul 3 -1 roll -8 5 -1 roll
125
  { 3 index exch 5 exch put dup -8 3 index { 3 index
126
  exch 4 exch put 3 index exec } for } for pop pop pop pop grestore } bind def
127
/setstyles {
1231 tk 128
  currentlinewidth mul setlinewidth /style exch def style 2048 and 0 gt
129
  clipped 1 and 0 eq and {clip newpath /clipped clipped 1 add def} {
809 tk 130
  style 1 and 0 gt not {closepath} if
1231 tk 131
  style 1024 and 0 gt {2 setlinecap 0 setlinejoin} if
809 tk 132
  style 2 and 0 gt {currentlinewidth 4 mul dup 2 array astore 0 setdash} if
133
  style 4 and 0 gt {0.5 currentlinewidth 4 mul 2 array astore 0 setdash} if
134
  gsave style 16 and 0 gt { style 224 and -5 bitshift style 256 and 0 gt {
135
  7 exch sub 8 div dup 1 exch sub currentrgbcolor 3 array astore
136
  {3 copy mul add 4 1 roll pop} forall pop pop setrgbcolor eofill}
137
  {dup 7 lt {gar exch get ppaint} {pop eofill} ifelse} ifelse}
138
  {style 256 and 0 gt {1 setgray eofill} if} ifelse grestore style 8 and 0 gt
1231 tk 139
  style 512 eq or {newpath} {stroke} ifelse grestore endclip} ifelse} def
809 tk 140
 
1231 tk 141
/addtoy {exch dup dup 2 mul 3 add 1 roll -1 1 { 4 1 roll dup 4 1 roll add
142
	4 -1 roll 2 mul 1 add index 2 mul 2 add 2 roll} for pop} def
143
/addtoy1 {1 exch addtoy pop} def
144
/addtoy3 {3 exch addtoy pop} def
145
/addtoy4 {4 exch addtoy pop} def
146
/addtox {exch dup dup 2 mul 3 add 1 roll -1 1 { 4 1 roll dup 4 1 roll 3 -1 roll
147
	add exch 4 -1 roll 2 mul 1 add index 2 mul 2 add 2 roll} for pop} def
148
/addtox1 {1 exch addtox pop} def
149
/addtox3 {3 exch addtox pop} def
150
/addtox4 {4 exch addtox pop} def
809 tk 151
/polygon { gsave /num exch def moveto num 1 sub {lineto} repeat setstyles } def
152
/xcarc   { gsave newpath arc setstyles } def
153
/elb { matrix currentmatrix 7 -1 roll 7 -1 roll translate 5 1 roll 4 -1 roll
154
	3 index div 1 scale } def
155
/ele { 0 4 1 roll 0 4 1 roll } bind def
156
/ellipse { gsave elb newpath ele arc setmatrix setstyles } def
157
/pellip  { elb ele arc setmatrix } def
158
/nellip  { elb ele arcn setmatrix } def
159
/spline  { gsave moveto curveto setstyles } def
160
/polyc   { {lineto} repeat } bind def
161
/beginpath { gsave moveto } bind def
162
/endpath { setstyles } bind def
1231 tk 163
/bop	 { 1 setlinecap 2 setlinejoin 6 setmiterlimit 0 0 0 scb cRedef
164
	/clipped 0 def} def
809 tk 165
/psinsertion {/PSobj save def /showpage {} def /setpagedevice {pop} def bop
166
	rotate translate dup scale} def
167
/end_insert {PSobj restore} def
168
/setpagemat {/pagemat matrix currentmatrix def} def
169
/inchscale  {setpagemat 0.375 mul dup scale} def
170
/cmscale    {setpagemat 0.35433071 mul dup scale} def
171
 
172
%%EndResource
173
%%EndProlog
174
 
175
% XCircuit output starts here.
176
 
177
%%BeginSetup
178
 
179
 
180
%%EndSetup
181
 
1231 tk 182
%%Page: mbhp_lcd_mios32 1
809 tk 183
%%PageOrientation: Portrait
184
%%PageBoundingBox: 0 0 612 792
185
/pgsave save def bop
186
% 32.00 8.00 gridspace
187
1.1034 inchscale
188
2.6000 setlinewidth 166 821 translate
189
 
190
(Vss) {/Helvetica cf} 2 20 90 0.500 101 -144 label
191
(Vdd) {/Helvetica cf} 2 20 90 0.500 133 -144 label
192
(V0) {/Helvetica cf} 2 20 90 0.500 165 -144 label
193
(RS) {/Helvetica cf} 2 20 90 0.500 197 -144 label
194
(R/W) {/Helvetica cf} 2 20 90 0.500 229 -144 label
195
(E) {/Helvetica cf} 2 20 90 0.500 261 -144 label
196
(D0) {/Helvetica cf} 2 20 90 0.500 293 -144 label
197
(D1) {/Helvetica cf} 2 20 90 0.500 325 -144 label
198
(D2) {/Helvetica cf} 2 20 90 0.500 357 -144 label
199
(D3) {/Helvetica cf} 2 20 90 0.500 389 -144 label
200
(D4) {/Helvetica cf} 2 20 90 0.500 421 -144 label
201
(D5) {/Helvetica cf} 2 20 90 0.500 453 -144 label
202
(D6) {/Helvetica cf} 2 20 90 0.500 485 -144 label
203
(D7) {/Helvetica cf} 2 20 90 0.500 517 -144 label
204
(Displaytech C162 \(Front\)) {/Helvetica cf} 2 21 0 0.500 427 -224 label
205
240 1.000 88 -96 88 -128 104 -128 104 -96 4 polygon
206
240 1.000 120 -96 120 -128 136 -128 136 -96 4 polygon
207
240 1.000 152 -96 152 -128 168 -128 168 -96 4 polygon
208
240 1.000 184 -96 184 -128 200 -128 200 -96 4 polygon
209
240 1.000 216 -96 216 -128 232 -128 232 -96 4 polygon
210
240 1.000 248 -96 248 -128 264 -128 264 -96 4 polygon
211
240 1.000 280 -96 280 -128 296 -128 296 -96 4 polygon
212
240 1.000 312 -96 312 -128 328 -128 328 -96 4 polygon
213
240 1.000 344 -96 344 -128 360 -128 360 -96 4 polygon
214
240 1.000 376 -96 376 -128 392 -128 392 -96 4 polygon
215
240 1.000 408 -96 408 -128 424 -128 424 -96 4 polygon
216
240 1.000 440 -96 440 -128 456 -128 456 -96 4 polygon
217
240 1.000 472 -96 472 -128 488 -128 488 -96 4 polygon
218
240 1.000 504 -96 504 -128 520 -128 520 -96 4 polygon
219
240 1.000 536 -96 536 -128 552 -128 552 -96 4 polygon
220
240 1.000 568 -96 568 -128 584 -128 584 -96 4 polygon
221
(LED-) {/Helvetica cf} 2 20 90 0.500 581 -144 label
222
(LED+) {/Helvetica cf} 2 20 90 0.500 549 -144 label
223
(1) {/Helvetica cf} 2 20 0 0.500 72 -128 label
224
(16) {/Helvetica cf} 2 20 0 0.500 600 -128 label
225
 
226
 
227
1 1.000 808 -128 16 0.000 360.000 xcarc
228
1 1.000 808 -368 16 0.000 360.000 xcarc
229
1 1.000 40 -368 16 0.000 360.000 xcarc
230
1 1.000 40 -128 16 0.000 360.000 xcarc
231
1.000 0.000 0.000 scb
232
(Other displays mostly have the same pinning, but it *could* be mirrored!)
233
{/Helvetica cf} 2 21 0 0.500 427 -257 label
234
(Pin 15 and 16 are only available on Backlight LCDs) {/Helvetica cf} 2 21 0
235
0.500 427 -289 label
236
0.000 0.000 1.000 scb
237
(Vd) {/Courier cf} 2 23 0 0.500 864 552 label
238
(RS) {/Courier cf} 2 23 0 0.500 864 488 label
239
(E) {/Courier cf} 2 23 0 0.500 864 424 label
240
(D1) {/Courier cf} 2 23 0 0.500 864 360 label
241
(D3) {/Courier cf} 2 23 0 0.500 864 296 label
242
(D5) {/Courier cf} 2 23 0 0.500 864 232 label
243
(D7) {/Courier cf} 2 23 0 0.500 864 168 label
244
(B-) {/Courier cf} 2 23 0 0.500 864 104 label
245
(B+) {/Courier cf} 2 20 0 0.500 912 104 label
246
(D6) {/Courier cf} 2 20 0 0.500 912 168 label
247
(D4) {/Courier cf} 2 20 0 0.500 912 232 label
248
(D2) {/Courier cf} 2 20 0 0.500 912 296 label
249
(RW) {/Courier cf} 2 20 0 0.500 912 424 label
250
(V0) {/Courier cf} 2 20 0 0.500 912 488 label
251
(Vs) {/Courier cf} 2 20 0 0.500 912 552 label
252
(D0) {/Courier cf} 2 20 0 0.500 912 360 label
253
sce
254
1 1.000 864 568 11 0.000 360.000 xcarc
255
1 1.000 864 504 11 0.000 360.000 xcarc
256
1 1.000 864 440 11 0.000 360.000 xcarc
257
1 1.000 864 376 11 0.000 360.000 xcarc
258
1 1.000 864 312 11 0.000 360.000 xcarc
259
1 1.000 864 248 11 0.000 360.000 xcarc
260
1 1.000 864 184 11 0.000 360.000 xcarc
261
1 1.000 864 120 11 0.000 360.000 xcarc
262
1 1.000 912 120 11 0.000 360.000 xcarc
263
1 1.000 912 184 11 0.000 360.000 xcarc
264
1 1.000 912 248 11 0.000 360.000 xcarc
265
1 1.000 912 312 11 0.000 360.000 xcarc
266
1 1.000 912 376 11 0.000 360.000 xcarc
267
1 1.000 912 440 11 0.000 360.000 xcarc
268
1 1.000 912 504 11 0.000 360.000 xcarc
269
1 1.000 912 568 11 0.000 360.000 xcarc
270
 
1117 tk 271
(J15A of MBHP_CORE_LPC17 Module) {/Helvetica cf} 2 21 0 0.500 891 664 label
809 tk 272
(The \(optional\) second Display can be connected to J15B) {/Helvetica cf} 2 21
273
 
274
 
275
368 1.000 944 392 944 296 952 296 952 392 4 polygon
276
1.000 0.000 0.000 scb
277
225 3.000 576 -112 576 120 864 120 3 polygon
1117 tk 278
225 3.000 912 120 896 96 544 96 544 -112 4 polygon
809 tk 279
225 3.000 512 -112 512 184 864 184 3 polygon
1117 tk 280
225 3.000 912 184 896 160 480 160 480 -112 4 polygon
809 tk 281
225 3.000 448 -112 448 248 864 248 3 polygon
1117 tk 282
225 3.000 912 248 896 224 416 224 416 -112 4 polygon
809 tk 283
225 3.000 384 -112 384 312 864 312 3 polygon
1117 tk 284
225 3.000 912 312 896 288 352 288 352 -112 4 polygon
809 tk 285
225 3.000 320 -112 320 376 864 376 3 polygon
1117 tk 286
225 3.000 912 376 896 352 288 352 288 -112 4 polygon
809 tk 287
225 3.000 256 -112 256 440 864 440 3 polygon
1117 tk 288
225 3.000 912 440 896 416 224 416 224 -112 4 polygon
809 tk 289
225 3.000 192 -112 192 504 864 504 3 polygon
1117 tk 290
225 3.000 912 504 896 480 160 480 160 -112 4 polygon
809 tk 291
225 3.000 128 -112 128 568 864 568 3 polygon
1117 tk 292
225 3.000 912 568 896 544 96 544 96 -112 4 polygon
809 tk 293
(Sometimes \(especially 2x40 LCDs\) they are called A and K) {/Helvetica cf} 2
294
21 0 0.500 427 -313 label
1231 tk 295
(Order of wires is *NOT* matching) {/Courier cf} 2 20 0 0.500 624 24 label
1117 tk 296
(with flat ribbon cable) {/Courier cf} 2 20 0 0.500 624 0 label
809 tk 297
pgsave restore showpage
298
 
299
%%Trailer
300
XCIRCsave restore
301
%%EOF