<?xml version="1.0" encoding="UTF-8"?>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=UTF-8" />
<title></title>
<style type="text/css">
<!--
body{margin-left:10px;margin-right:10px;margin-top:10px;margin-bottom:10px;}
-->
</style>
</head>
<body marginleft="10" marginright="10" margintop="10" marginbottom="10">
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#000000" style="font-family:Arial;font-size:10pt;color:#000000;">Here is a pstricks workaround of the twisted wires that I wanted. But still, in general I would be happy if all pstricks parameters could be defined from postscript values.</font></div>
<br />
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#000000" style="font-family:Arial;font-size:10pt;color:#000000;">Poul Riis</font></div>
<br />
<br />
<br />
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;">\documentclass[a4paper]{article}</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;">\usepackage[svgnames,x11names]{xcolor}</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;">\usepackage{pstricks-add}</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;">\usepackage{multido}</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;">\usepackage[top=2cm,bottom=1.5cm,left=1.5cm,right=0.5cm]{geometry}</font></div>
<br />
<br />
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;">\newcommand{\psTwisting}[6]{%startpointx,startpointy,linewidth, number of twists (one half twist added at the ends), color1, color2</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;">\psset{linewidth=#3}</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;">\pstVerb{%</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;"> /lw #3 def</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;"> /xws #1 def</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;"> /yws #2 def</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;"> /nmax #4 def</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;"> /xws1 xws lw 2 div sub def</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;"> /xws2 xws lw 2 div add def</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;"> /amp lw 2 div def</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;"> /lambda lw 10 mul def</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;"> /npts 36 def</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;"> /deltat 1 npts div def</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;"> /lambda1 lambda 10 mul def</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;"> /amp1 amp 100 mul def</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;"> }%</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;"> \pnode(!xws1 yws){P1}</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;"> \pnode(!xws1 lw add yws lambda 2 div sub){P2}</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;"> \nccurve[angleA=270,angleB=90,ncurv=1,linecolor=#5]{-}{P1}{P2}</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;"> \multido{\nn=0+1}{#4}{</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;"> \pnode(!xws2 yws lambda \nn\space mul sub){P1}</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;"> \pnode(!xws2 lw sub yws lambda \nn\space mul sub lambda 2 div sub){P2}</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;"> \pnode(!xws2 yws lambda \nn\space mul sub lambda sub){P3}</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;"> \nccurve[angleA=270,angleB=90,ncurv=1,linecolor=#6]{-}{P1}{P2}</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;"> \nccurve[angleA=270,angleB=90,ncurv=1,linecolor=#6]{-}{P2}{P3}</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;"> \pnode(!xws2 yws lambda \nn\space mul sub lambda 2 div sub){P1}</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;"> \pnode(!xws2 lw sub yws lambda \nn\space mul sub lambda 2 div sub lambda 2 div sub){P2}</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;"> \pnode(!xws2 yws lambda \nn\space mul sub lambda sub lambda 2 div sub){P3}</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;"> \nccurve[angleA=270,angleB=90,ncurv=1,linecolor=#5]{-}{P1}{P2}</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;"> \nccurve[angleA=270,angleB=90,ncurv=1,linecolor=#5]{-}{P2}{P3}</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;">}</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;">\pnode(!xws2 yws lambda nmax mul sub){P1}</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;">\pnode(!xws2 lw sub yws lambda nmax mul sub lambda 2 div sub){P2}</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;">\nccurve[angleA=270,angleB=90,ncurv=1,linecolor=#6]{-}{P1}{P2}</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;">\pnode(!xws1 yws){P1}</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;">\pnode(!xws1 amp1 sub yws lambda1 2 div add){Ll}</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;">\nccurve[angleA=90,angleB=270,ncurv=1,linecolor=#5]{-}{P1}{Ll}</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;">\pnode(!xws2 yws){P1}</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;">\pnode(!xws2 amp1 add yws lambda1 2 div add){Lr}</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;">\nccurve[angleA=90,angleB=270,ncurv=1,linecolor=#6]{-}{P1}{Lr}</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;">}%Now leads can be connected to points Ll and Lr...</font></div>
<br />
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;">\parindent=0pt</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;">\thispagestyle{empty}</font></div>
<br />
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;">\begin{document}</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;">~\\</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;">\psset{unit=1cm}</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;">\begin{center}</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;">\begin{pspicture}(-8,-10)(8,8)</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;">%\psaxes(0,0)(-8,-10)(8,8)</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;"> \psTwisting{0}{0}{0.1}{6}{Coral2}{Ivory4}%startpointx,startpointy,linewidth, number of twists (one half twist added at the ends), color1, color2</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;">\end{pspicture}</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;">\end{center}</font></div>
<div align="left" style="text-align:left;"><font face="Arial" size="+0" color="#0000DD" style="font-family:Arial;font-size:10pt;color:#0000DD;">\end{document}</font></div>
</body>
</html>