#!/usr/bin/php
<?php

require_once('../complex.php');

// Height of the Strand
$zmax = 8;
// How many z's are one turn
$zturn = 0.25;
// The granularity
$zstep = 0.01;
// The angular distance between the two strands ... 180 degree gives a symmetrical strand.
$sepa = 180-90;
// Thickness of the strands.
$t = 0.25;

$radius = 1;



echo '
#include "colors.inc"

global_settings	{
	ambient_light rgb <3, 3, 3>
}

light_source	{
	<-1,40,-40>
	color White
}

camera	{
	location <0, 11, 0>
	look_at <0,4,0>
}

#declare sc1 = sphere {
	<0,0,0>,
	'.$t.'
	texture{
		pigment { Red }
		finish	{
			ambient 0.1
			diffuse 0.9
			phong 1
		}
	}
}
#declare sc2 = sphere {
	<0,0,0>,
	'.$t.'
	texture{
		pigment { Blue }
		finish	{
			ambient 0.1
			diffuse 0.9
			phong 1
		}
	}
}
';

$da = 360.0*$zturn;

for ($z = 0; $z <= $zmax; $z+=$zstep)	{
	$s1 = new complex($radius, $da*$z, true, true);
	$s2 = new complex($radius, $da*$z+$sepa, true, true);
	echo '
object	{
	sc1
	translate
	<'.$s1->re.', '.$z.', '.$s1->im.'>
}
object	{
	sc2
	translate
	<'.$s2->re.', '.$z.', '.$s2->im.'>
}
';
}



?>