From: robertt@n33.stortek.com (Robert Thompson (robertt))
Newsgroups: comp.sys.hp48
Subject: Motor Controller Schematic
Date: 27 Jan 93 17:15:24 GMT
Article-I.D.: stortek.1993Jan27.171524.2201
Organization: Storage Technology Corp.
X-Newsreader: TIN [version 1.1 PL6]



--
Since our mailer/posert here is really SLOW, I can't tell if I sent this to
this group or comp.sources.hp48 so excuse the bandwidth if this gets posted
twice.  It is a schematic for a simple motor controller based on the
intel/amd 8031 or 8051.  With a little software it can be a very
complicated controller.  I will post some code when time permits.  The file
is in postscript format (sorry it is all I have without redrawing the
circuit, let me know if it a problem)


send e-mail to robertt@n33.stortek.com (dont rely on the headers for the
correct information)

-Robert

------------------------------------------------------------------------------
Robert Thompson                       |  Storage Technology Corporation
Redwood Digital Hardware Design Team  |  2270 South 88th. Street
(303) 673-7747   FAX: (303) 673-2568  |  Louisville, Colorado 80028-0211
------------------------------------------------------------------------------

-- CUT HERE --

%!
%%Title: hp48ser.fig
%%Creator: fig2dev
%%CreationDate: Tue Jan 26 17:06:29 1993
%%For: robertt@n154 (Robert Thompson (robertt),ms0211,x7747,50/5462)
%%Pages: 0
%%BoundingBox: 0 0 735 495
%%EndComments
/$F2psDict 32 dict def 
$F2psDict begin
	$F2psDict /mtrx matrix put

 /DrawEllipse {
	/endangle exch def
	/startangle exch def
	/yrad exch def
	/xrad exch def
	/y exch def
	/x exch def
	/savematrix mtrx currentmatrix def
	x y translate xrad yrad scale 0 0 1 startangle endangle arc
	savematrix setmatrix
	} def newpath 0 0 0 0 0 1 DrawEllipse stroke

	end
	/$F2psBegin {$F2psDict begin /$F2psEnteredState save def} def
	/$F2psEnd {$F2psEnteredState restore end} def
	%%EndProlog

$F2psBegin
1 setlinecap 1 setlinejoin
-21 40 translate
0.000000 495.000000 translate 0.900 -0.900 scale
1.000 setlinewidth
newpath 165.250 159.000 16.250 -112.620 112.620 arcn
stroke
newpath 129.000 314.000 5.000 -90.000 90.000 arc
stroke
newpath 129.000 374.000 5.000 -90.000 90.000 arc
stroke
newpath 219.000 454.000 5.000 -90.000 90.000 arc
stroke
% Ellipse
newpath 189 214 5 5 0 360 DrawEllipse stroke
% Ellipse
newpath 144 159 5 5 0 360 DrawEllipse stroke
% Ellipse
newpath 529 424 18 18 0 360 DrawEllipse stroke
% Ellipse
newpath 714 454 18 18 0 360 DrawEllipse stroke
% Ellipse
newpath 804 529 20 20 0 360 DrawEllipse stroke
% Polyline
newpath 314 529 moveto 314 579 lineto  stroke
% Polyline
newpath 404 529 moveto 404 579 lineto  stroke
% Polyline
newpath 394 579 moveto 414 579 lineto  stroke
% Polyline
newpath 399 584 moveto 409 584 lineto  stroke
% Polyline
newpath 304 579 moveto 324 579 lineto  stroke
% Polyline
newpath 429 529 moveto 429 74 lineto 289 74 lineto 289 529 lineto closepath  stroke
5.000 setlinewidth
% Polyline
newpath 429 174 moveto 549 174 lineto  stroke
1.000 setlinewidth
% Polyline
newpath 609 234 moveto 609 134 lineto 549 134 lineto 549 234 lineto closepath  stroke
% Polyline
newpath 429 254 moveto 564 254 lineto 564 234 lineto  stroke
% Polyline
newpath 594 234 moveto 594 264 lineto  stroke
% Polyline
newpath 584 264 moveto 604 264 lineto  stroke
% Polyline
newpath 599 269 moveto 589 269 lineto  stroke
% Polyline
newpath 584 219 moveto 604 219 lineto  stroke
5.000 setlinewidth
% Polyline
newpath 489 174 moveto 489 94 lineto 709 94 lineto  stroke
% Polyline
newpath 609 194 moveto 709 194 lineto  stroke
1.000 setlinewidth
% Polyline
newpath 809 234 moveto 809 74 lineto 709 74 lineto 709 234 lineto closepath  stroke
% Polyline
newpath 429 294 moveto 729 294 lineto 729 234 lineto  stroke
% Polyline
newpath 719 219 moveto 739 219 lineto  stroke
% Polyline
newpath 394 289 moveto 424 289 lineto  stroke
5.000 setlinewidth
% Polyline
newpath 429 154 moveto 474 154 lineto 474 44 lineto 839 44 lineto 839 114 lineto 809 114 lineto  stroke
1.000 setlinewidth
% Polyline
newpath 429 334 moveto 469 334 lineto 469 354 lineto  stroke
% Polyline
newpath 459 354 moveto 479 354 lineto  stroke
% Polyline
newpath 474 359 moveto 464 359 lineto  stroke
% Polyline
newpath 407 329 moveto 422 329 lineto  stroke
% Polyline
newpath 289 159 moveto 189 159 lineto  stroke
% Polyline
newpath 289 214 moveto 194 214 lineto  stroke
% Polyline
newpath 184 214 moveto 149 199 lineto 149 229 lineto 184 214 lineto  stroke
% Polyline
newpath 149 214 moveto 89 214 lineto  stroke
% Polyline
newpath 189 174 moveto 189 144 lineto 159 144 lineto  stroke
% Polyline
newpath 189 174 moveto 159 174 lineto  stroke
% Polyline
newpath 139 159 moveto 89 159 lineto  stroke
% Polyline
newpath 169 174 moveto 169 189 lineto  stroke
% Polyline
newpath 169 144 moveto 169 129 lineto  stroke
% Polyline
newpath 289 314 moveto 169 314 lineto 169 334 lineto  stroke
% Polyline
newpath 159 334 moveto 179 334 lineto  stroke
% Polyline
newpath 159 339 moveto 179 339 lineto 179 349 lineto 159 349 lineto 159 339 lineto  stroke
% Polyline
newpath 159 354 moveto 179 354 lineto  stroke
% Polyline
newpath 169 354 moveto 169 374 lineto  stroke
% Polyline
newpath 169 374 moveto 289 374 lineto  stroke
% Polyline
newpath 169 314 moveto 139 314 lineto  stroke
% Polyline
newpath 169 374 moveto 139 374 lineto  stroke
% Polyline
newpath 139 369 moveto 139 379 lineto  stroke
% Polyline
newpath 139 309 moveto 139 319 lineto  stroke
% Polyline
newpath 134 314 moveto 109 314 lineto 109 394 lineto  stroke
% Polyline
newpath 134 374 moveto 109 374 lineto  stroke
% Polyline
newpath 99 394 moveto 119 394 lineto  stroke
% Polyline
newpath 114 399 moveto 104 399 lineto  stroke
% Polyline
newpath 94 354 moveto 134 324 lineto  stroke
newpath 126.400 327.200 moveto 134.000 324.000 lineto 128.800 330.400 lineto stroke
% Polyline
newpath 94 354 moveto 124 369 lineto  stroke
newpath 117.739 363.633 moveto 124.000 369.000 lineto 115.950 367.211 lineto stroke
% Polyline
newpath 289 454 moveto 229 454 lineto  stroke
% Polyline
newpath 229 449 moveto 229 459 lineto  stroke
% Polyline
newpath 224 454 moveto 189 454 lineto 189 434 lineto  stroke
% Polyline
newpath 199 434 moveto 179 434 lineto  stroke
% Polyline
newpath 429 424 moveto 529 424 lineto  stroke
% Polyline
newpath 539 439 moveto 544 444 lineto 544 474 lineto  stroke
% Polyline
newpath 539 409 moveto 544 404 lineto 544 384 lineto  stroke
% Polyline
newpath 534 474 moveto 554 474 lineto  stroke
% Polyline
newpath 549 479 moveto 539 479 lineto  stroke
% Polyline
newpath 544 384 moveto 569 384 lineto 574 379 lineto 579 389 lineto 584 379 lineto 589 389 lineto 594 379 lineto 599 389 lineto 604 379 lineto 609 384 lineto 634 384 lineto  stroke
% Polyline
newpath 634 384 moveto 634 414 lineto  stroke
% Polyline
newpath 629 414 moveto 639 414 lineto  stroke
newpath 634 414 moveto 634 414 lineto stroke
% Polyline
newpath 629 414 moveto 634 424 lineto 639 414 lineto  stroke
% Polyline
newpath 629 424 moveto 639 424 lineto  stroke
% Polyline
newpath 634 424 moveto 634 474 lineto  stroke
% Polyline
newpath 624 474 moveto 644 474 lineto  stroke
% Polyline
newpath 631 404 moveto 624 404 624 427 7 arcto 4 {pop} repeat 624 434 677 434 7 arcto 4 {pop} repeat 684 434 684 411 7 arcto 4 {pop} repeat 684 404 631 404 7 arcto 4 {pop} repeat closepath  stroke
% Polyline
newpath 674 404 moveto 664 414 lineto  stroke
% Polyline
newpath 674 404 moveto 674 384 lineto  stroke
% Polyline
newpath 664 424 moveto 674 434 lineto  stroke
newpath 669.757 426.929 moveto 674.000 434.000 lineto 666.929 429.757 lineto stroke
% Polyline
newpath 664 409 moveto 664 429 lineto  stroke
% Polyline
newpath 674 434 moveto 674 454 lineto 714 454 lineto  stroke
% Polyline
newpath 724 439 moveto 729 434 lineto 729 384 lineto 674 384 lineto  stroke
% Polyline
newpath 724 469 moveto 724 509 lineto  stroke
% Polyline
newpath 729 384 moveto 729 374 lineto  stroke
% Polyline
newpath 719 374 moveto 739 374 lineto  stroke
% Polyline
newpath 724 509 moveto 774 509 lineto  stroke
% Polyline
newpath 774 549 moveto 724 549 lineto 724 574 lineto  stroke
% Polyline
newpath 714 574 moveto 734 574 lineto  stroke
% Polyline
newpath 754 509 moveto 754 524 lineto  stroke
% Polyline
newpath 749 524 moveto 759 524 lineto  stroke
% Polyline
newpath 754 524 moveto 749 534 lineto 759 534 lineto 754 524 lineto  stroke
% Polyline
newpath 754 534 moveto 754 549 lineto  stroke
% Polyline
newpath 774 509 moveto 788 518 lineto  stroke
% Polyline
newpath 774 549 moveto 788 540 lineto  stroke
% Polyline
newpath 529 414 moveto 529 434 lineto  stroke
% Polyline
newpath 529 429 moveto 539 439 lineto  stroke
newpath 534.757 431.929 moveto 539.000 439.000 lineto 531.929 434.757 lineto stroke
% Polyline
newpath 529 419 moveto 539 409 lineto  stroke
% Polyline
newpath 714 444 moveto 714 464 lineto  stroke
% Polyline
newpath 714 459 moveto 724 469 lineto  stroke
newpath 719.757 461.929 moveto 724.000 469.000 lineto 716.929 464.757 lineto stroke
% Polyline
newpath 714 449 moveto 724 439 lineto  stroke
/Times-Roman findfont 12.000 scalefont setfont
314 594 moveto 
1 -1 scale
(Vcc)dup stringwidth pop 2 div neg 0 rmoveto  gsave  0.000 rotate show grestore 1 -1 scale
/Times-Roman findfont 12.000 scalefont setfont
579 129 moveto 
1 -1 scale
(74LS373)dup stringwidth pop 2 div neg 0 rmoveto  gsave  0.000 rotate show grestore 1 -1 scale
/Times-Roman findfont 12.000 scalefont setfont
564 229 moveto 
1 -1 scale
(LE)dup stringwidth pop 2 div neg 0 rmoveto  gsave  0.000 rotate show grestore 1 -1 scale
/Times-Roman findfont 12.000 scalefont setfont
594 229 moveto 
1 -1 scale
(OE)dup stringwidth pop 2 div neg 0 rmoveto  gsave  0.000 rotate show grestore 1 -1 scale
/Times-Roman findfont 12.000 scalefont setfont
554 179 moveto 
1 -1 scale
(D0-7) gsave  0.000 rotate show grestore 1 -1 scale
/Times-Roman findfont 12.000 scalefont setfont
424 179 moveto 
1 -1 scale
(AD0-7)dup stringwidth pop neg 0 rmoveto  gsave  0.000 rotate show grestore 1 -1 scale
/Times-Roman findfont 12.000 scalefont setfont
604 199 moveto 
1 -1 scale
(O0-7)dup stringwidth pop neg 0 rmoveto  gsave  0.000 rotate show grestore 1 -1 scale
/Times-Roman findfont 12.000 scalefont setfont
759 69 moveto 
1 -1 scale
(2716)dup stringwidth pop 2 div neg 0 rmoveto  gsave  0.000 rotate show grestore 1 -1 scale
/Times-Roman findfont 12.000 scalefont setfont
714 99 moveto 
1 -1 scale
(A0-7) gsave  0.000 rotate show grestore 1 -1 scale
/Times-Roman findfont 12.000 scalefont setfont
714 199 moveto 
1 -1 scale
(D0-7) gsave  0.000 rotate show grestore 1 -1 scale
/Times-Roman findfont 12.000 scalefont setfont
424 259 moveto 
1 -1 scale
(ALE)dup stringwidth pop neg 0 rmoveto  gsave  0.000 rotate show grestore 1 -1 scale
/Times-Roman findfont 8.000 scalefont setfont
444 249 moveto 
1 -1 scale
(30)dup stringwidth pop neg 0 rmoveto  gsave  0.000 rotate show grestore 1 -1 scale
/Times-Roman findfont 8.000 scalefont setfont
434 169 moveto 
1 -1 scale
(32-39) gsave  0.000 rotate show grestore 1 -1 scale
/Times-Roman findfont 12.000 scalefont setfont
729 229 moveto 
1 -1 scale
(OE)dup stringwidth pop 2 div neg 0 rmoveto  gsave  0.000 rotate show grestore 1 -1 scale
/Times-Roman findfont 12.000 scalefont setfont
424 299 moveto 
1 -1 scale
(PSEN)dup stringwidth pop neg 0 rmoveto  gsave  0.000 rotate show grestore 1 -1 scale
/Times-Roman findfont 8.000 scalefont setfont
434 289 moveto 
1 -1 scale
(29) gsave  0.000 rotate show grestore 1 -1 scale
/Times-Roman findfont 12.000 scalefont setfont
424 159 moveto 
1 -1 scale
(A8-10)dup stringwidth pop neg 0 rmoveto  gsave  0.000 rotate show grestore 1 -1 scale
/Times-Roman findfont 12.000 scalefont setfont
804 119 moveto 
1 -1 scale
(A8-10)dup stringwidth pop neg 0 rmoveto  gsave  0.000 rotate show grestore 1 -1 scale
/Times-Roman findfont 8.000 scalefont setfont
434 149 moveto 
1 -1 scale
(21-23) gsave  0.000 rotate show grestore 1 -1 scale
/Times-Roman findfont 12.000 scalefont setfont
359 69 moveto 
1 -1 scale
(8031/8051)dup stringwidth pop 2 div neg 0 rmoveto  gsave  0.000 rotate show grestore 1 -1 scale
/Times-Roman findfont 12.000 scalefont setfont
424 339 moveto 
1 -1 scale
(EA)dup stringwidth pop neg 0 rmoveto  gsave  0.000 rotate show grestore 1 -1 scale
/Times-Roman findfont 8.000 scalefont setfont
434 329 moveto 
1 -1 scale
(31) gsave  0.000 rotate show grestore 1 -1 scale
/Times-Roman findfont 8.000 scalefont setfont
599 249 moveto 
1 -1 scale
(1) gsave  0.000 rotate show grestore 1 -1 scale
/Times-Roman findfont 8.000 scalefont setfont
569 249 moveto 
1 -1 scale
(11) gsave  0.000 rotate show grestore 1 -1 scale
/Times-Roman findfont 8.000 scalefont setfont
619 209 moveto 
1 -1 scale
(2,5,6,9) gsave  0.000 rotate show grestore 1 -1 scale
/Times-Roman findfont 8.000 scalefont setfont
619 221 moveto 
1 -1 scale
(12,15,16,19) gsave  0.000 rotate show grestore 1 -1 scale
/Times-Roman findfont 8.000 scalefont setfont
539 201 moveto 
1 -1 scale
(13,14,17,18)dup stringwidth pop neg 0 rmoveto  gsave  0.000 rotate show grestore 1 -1 scale
/Times-Roman findfont 8.000 scalefont setfont
539 189 moveto 
1 -1 scale
(3,4,7,8)dup stringwidth pop neg 0 rmoveto  gsave  0.000 rotate show grestore 1 -1 scale
/Times-Roman findfont 8.000 scalefont setfont
284 154 moveto 
1 -1 scale
(11)dup stringwidth pop neg 0 rmoveto  gsave  0.000 rotate show grestore 1 -1 scale
/Times-Roman findfont 8.000 scalefont setfont
284 209 moveto 
1 -1 scale
(10)dup stringwidth pop neg 0 rmoveto  gsave  0.000 rotate show grestore 1 -1 scale
/Times-Roman findfont 12.000 scalefont setfont
294 219 moveto 
1 -1 scale
(RXD) gsave  0.000 rotate show grestore 1 -1 scale
/Times-Roman findfont 12.000 scalefont setfont
294 164 moveto 
1 -1 scale
(TXD) gsave  0.000 rotate show grestore 1 -1 scale
/Times-Roman findfont 12.000 scalefont setfont
194 144 moveto 
1 -1 scale
(MC1488) gsave  0.000 rotate show grestore 1 -1 scale
/Times-Roman findfont 12.000 scalefont setfont
189 234 moveto 
1 -1 scale
(MC1489) gsave  0.000 rotate show grestore 1 -1 scale
/Times-Roman findfont 8.000 scalefont setfont
174 194 moveto 
1 -1 scale
(V- = -12v) gsave  0.000 rotate show grestore 1 -1 scale
/Times-Roman findfont 8.000 scalefont setfont
174 124 moveto 
1 -1 scale
(V+ = +12v) gsave  0.000 rotate show grestore 1 -1 scale
/Times-Roman findfont 12.000 scalefont setfont
84 159 moveto 
1 -1 scale
(To Pin 2)dup stringwidth pop neg 0 rmoveto  gsave  0.000 rotate show grestore 1 -1 scale
/Times-Roman findfont 12.000 scalefont setfont
84 219 moveto 
1 -1 scale
(To Pin 3)dup stringwidth pop neg 0 rmoveto  gsave  0.000 rotate show grestore 1 -1 scale
/Times-Roman findfont 12.000 scalefont setfont
189 354 moveto 
1 -1 scale
(11.0592MHz) gsave  0.000 rotate show grestore 1 -1 scale
/Times-Roman findfont 12.000 scalefont setfont
294 319 moveto 
1 -1 scale
(XTAL2) gsave  0.000 rotate show grestore 1 -1 scale
/Times-Roman findfont 12.000 scalefont setfont
294 379 moveto 
1 -1 scale
(XTAL1) gsave  0.000 rotate show grestore 1 -1 scale
/Times-Roman findfont 8.000 scalefont setfont
284 309 moveto 
1 -1 scale
(18)dup stringwidth pop neg 0 rmoveto  gsave  0.000 rotate show grestore 1 -1 scale
/Times-Roman findfont 8.000 scalefont setfont
284 369 moveto 
1 -1 scale
(19)dup stringwidth pop neg 0 rmoveto  gsave  0.000 rotate show grestore 1 -1 scale
/Times-Roman findfont 8.000 scalefont setfont
284 449 moveto 
1 -1 scale
(9)dup stringwidth pop neg 0 rmoveto  gsave  0.000 rotate show grestore 1 -1 scale
/Times-Roman findfont 12.000 scalefont setfont
294 459 moveto 
1 -1 scale
(RST) gsave  0.000 rotate show grestore 1 -1 scale
/Times-Roman findfont 12.000 scalefont setfont
179 429 moveto 
1 -1 scale
(Vcc) gsave  0.000 rotate show grestore 1 -1 scale
/Times-Roman findfont 12.000 scalefont setfont
214 474 moveto 
1 -1 scale
(1.0uf) gsave  0.000 rotate show grestore 1 -1 scale
/Times-Roman findfont 12.000 scalefont setfont
599 374 moveto 
1 -1 scale
(270)dup stringwidth pop neg 0 rmoveto  gsave  0.000 rotate show grestore 1 -1 scale
/Times-Roman findfont 12.000 scalefont setfont
739 459 moveto 
1 -1 scale
(2N2222 or Equiv.) gsave  0.000 rotate show grestore 1 -1 scale
/Times-Roman findfont 12.000 scalefont setfont
554 434 moveto 
1 -1 scale
(2N2222) gsave  0.000 rotate show grestore 1 -1 scale
/Times-Roman findfont 12.000 scalefont setfont
554 450 moveto 
1 -1 scale
(or Equiv.) gsave  0.000 rotate show grestore 1 -1 scale
/Times-Roman findfont 8.000 scalefont setfont
434 419 moveto 
1 -1 scale
(1) gsave  0.000 rotate show grestore 1 -1 scale
/Times-Roman findfont 12.000 scalefont setfont
424 429 moveto 
1 -1 scale
(P1.0)dup stringwidth pop neg 0 rmoveto  gsave  0.000 rotate show grestore 1 -1 scale
/Times-Roman findfont 12.000 scalefont setfont
729 369 moveto 
1 -1 scale
(Analog V+)dup stringwidth pop 2 div neg 0 rmoveto  gsave  0.000 rotate show grestore 1 -1 scale
/Times-Roman findfont 12.000 scalefont setfont
724 584 moveto 
1 -1 scale
(Analog Ground)dup stringwidth pop 2 div neg 0 rmoveto  gsave  0.000 rotate show grestore 1 -1 scale
/Times-Roman findfont 12.000 scalefont setfont
744 534 moveto 
1 -1 scale
(1N4001)dup stringwidth pop neg 0 rmoveto  gsave  0.000 rotate show grestore 1 -1 scale
/Times-Roman findfont 8.000 scalefont setfont
789 509 moveto 
1 -1 scale
(+)dup stringwidth pop neg 0 rmoveto  gsave  0.000 rotate show grestore 1 -1 scale
/Times-Roman findfont 8.000 scalefont setfont
789 554 moveto 
1 -1 scale
(-)dup stringwidth pop neg 0 rmoveto  gsave  0.000 rotate show grestore 1 -1 scale
/Times-Roman findfont 12.000 scalefont setfont
804 534 moveto 
1 -1 scale
(MOT)dup stringwidth pop 2 div neg 0 rmoveto  gsave  0.000 rotate show grestore 1 -1 scale
/Times-Roman findfont 12.000 scalefont setfont
624 489 moveto 
1 -1 scale
(Vcc) gsave  0.000 rotate show grestore 1 -1 scale
/Times-Roman findfont 8.000 scalefont setfont
319 544 moveto 
1 -1 scale
(40) gsave  0.000 rotate show grestore 1 -1 scale
/Times-Roman findfont 8.000 scalefont setfont
409 544 moveto 
1 -1 scale
(20) gsave  0.000 rotate show grestore 1 -1 scale
/Times-Roman findfont 12.000 scalefont setfont
99 189 moveto 
1 -1 scale
(RS232 Levels)dup stringwidth pop neg 0 rmoveto  gsave  0.000 rotate show grestore 1 -1 scale
/Times-Roman findfont 12.000 scalefont setfont
89 359 moveto 
1 -1 scale
(30pf +/- 10pf)dup stringwidth pop neg 0 rmoveto  gsave  0.000 rotate show grestore 1 -1 scale
$F2psEnd
Newsgroups: comp.sys.hp48