#!/usr/bin/php
<?php
//Datei öffnen
$fileout = fopen('/dev/ttyS0', 'w') or die;

fwrite($fileout,'PA0,0;'); // Fahre Stift zu Position 0,0
fwrite($fileout,'PD;'); // Senke Stift
fwrite($fileout,'PA4500,7000,9000,0;'); // Fahre Stift zu Position 4500,7000, dann zu 9000,0
sierpinski(9000,0,0,0,4500,7000,6); // Rekursives Zeichnen
fwrite($fileout,'PU;'); // Hebe Stift

fclose($fileout);

function sierpinski($ax,$ay,$bx,$by,$cx,$cy,$i)
{
	global $fileout;
	fwrite($fileout,'PA'.((int)(($ax+$bx)/2)).','.((int)(($ay+$by)/2)).';');
	
	if ($i > 1)
	{
		sierpinski((int)(($bx+$ax)/2),(int)(($by+$ay)/2),(int)(($bx+$cx)/2),(int)(($by+$cy)/2),$bx,$by,$i-1);
		sierpinski((int)(($cx+$bx)/2),(int)(($cy+$by)/2),(int)(($cx+$ax)/2),(int)(($cy+$ay)/2),$cx,$cy,$i-1);
		sierpinski((int)(($ax+$cx)/2),(int)(($ay+$cy)/2),(int)(($ax+$bx)/2),(int)(($ay+$by)/2),$ax,$ay,$i-1);
	}
	
	fwrite($fileout,'PA'.$bx.','.$by.';');
}