.\" resistor.pic -- an eletronics resistor symbol .\" $Id$ .\" Carlos Duarte, 971126 .\" .PS # define resistor_h { [ a = .04 b = .04 for i = 1 to 4 by 1 do { line down b right a/2 line up 2*b right a line down b right a/2 } ] } define resistor_v { [ a=.04 b=.04 for i = 1 to 4 by 1 do { line left b down a/2 line right 2*b down a line left b down a/2 } ] } line left .5 resistor_h "R1" at last [].s - (0,.1) line .5 at last [].w; line down resistor_v "R2" at last [].e + (.1,0) line .5 at last [].s .PE