#!/usr/bin/perl
#
$node = 65;

for($i = 1; $i < $node; $i++ ){
    print "NODE SITE_$i\n";
    print "\tLABEL $i\n";
    print "\tPOSITION CENTER_IMAGE\n\n";		
	}

##</code><code>##

NODE SITE_64
         LABEL 64
         POSITION CENTER_IMAGE

##</code><code>##

POSITION CENTER_IMAGE 0r360
POSITION CENTER_IMAGE 5r360
POSITION CENTER_IMAGE 10r360.