package Ablation;
use Exporter;
#use Tie::File::AsHash;
use Math::Trig;
use Image::Magick;
use Lens;
use Cloud;
#This package actually maintains a list of all the spots fired during the program
#At the end, it can collate them into an image of the chip.  

$VERSION = 0.01;
@ISA = qw(G_code1_25 Exporter);
@EXPORT 		= qw(new Depth Remove Destroy);
@EXPORT_OK 		= qw();
return 1;
use lib "/Users/peterhowell/Documents/2007/Ablated_Waveguides/modules/";
use constant PI =>  4 * atan2 1, 1;

my $dir = "/Users/peterhowell/Library/Programing/Spots/";
my @apertures;	#maintains a list of all the apertures that have been used.
my @spots;		#catalogue of all the spots that have been laid down
				
#create new spot data structure.  Right now I'm assuming that the 
sub new {}

#Linear motion without cutting
sub G0 {}

sub G1 {}

#clockwise rotation
sub G2 {}

#anticlockwise rotation
sub G3 {}
	
sub Make_Lens {}
	
#fire a single pulse at the given coordinates
sub Pulse {}

#Sets the modes of the laser (on, off) and (spacing/pulse)
#This replaces L_ON and L_OFF
#if called without a clear mode it simply reports the current mode
sub Laser {}

sub Spacing {}

#Put in all the initial stuff
sub Init {}

sub Change_Aperture {}

sub Home {}

sub _place_pulse {}

sub _place_line {}

sub _place_circle {}
	
sub _angledif {}

#Shut down the module and clean up the memory space
#but first save the image of the ablation
sub Destroy {}
		
1;