#! /usr/bin/perl
#
#
use GD;

   local($nm);
   local(%COLOR);
   local($bludot,$reddot,$gredot,$grydot,$orgdot,$yeldot);

        $fn="images/leiden4.png";

	$w = new GD::Image(20,20);
        $wc= $w->colorAllocate(255,255,255);
	$w->fill(10,10,$wc);

	$nm = new GD::Image($fn) || die "Could not open file: $fn\n";
	($width,$heigth)=$nm->getBounds();
        for ($x=0;$x<$width;$x++) 
        {
	   $nm->copy($w,$x,0,0,0,20,20);
	   $nm->copy($w,$x,$heigth-20,0,0,20,20);
        }
        for ($y=0;$y<$heigth;$y++) 
        {
	   $nm->copy($w,0,$y,0,0,20,20);
	   $nm->copy($w,$width-20,$y,0,0,20,20);
        }

	$COLOR{white}  	= $nm->colorAllocate(255,255,255);

	$COLOR{black}  	= $nm->colorAllocate(0,0,0);
	$COLOR{red}    	= $nm->colorAllocate(255,0,0);
	$COLOR{green}  	= $nm->colorAllocate(0,255,0);
	$COLOR{orange} 	= $nm->colorAllocate(255,165,0);
	$COLOR{gray}   	= $nm->colorAllocate(150,150,150);
	$COLOR{blue}   	= $nm->colorAllocate(0,0,255);
	$COLOR{margenta}  	= $nm->colorAllocate(255,0,255);
	$COLOR{cyan}  	= $nm->colorAllocate(0,150,255);
	$COLOR{yellow}  	= $nm->colorAllocate(255,200,0);
	$COLOR{ltblue}        = $nm->colorAllocate(180,180,255);


	$COLOR{"gdStyled"}=gdStyled; 

   	$bludot=GD::Image->new("images/bludot10.png");
   	$reddot=GD::Image->new("images/reddot10.png");
   	$gredot=GD::Image->new("images/gredot10.png");
   	$grydot=GD::Image->new("images/grydot10.png");
   	$orgdot=GD::Image->new("images/orgdot10.png");
   	$yeldot=GD::Image->new("images/yeldot10.png");

### link CNodeHans-CNodeAA24 to short: 0
   $nm->line(517+0,405+0,517+280,405+190,$COLOR{blue}); # CNodeRoomburgh2-CNodeAA24
   $nm->line(517+0,405+-1,517+280,405+189,$COLOR{blue}); # CNodeRoomburgh2-CNodeAA24
   $nm->line(517+0,405+1,517+280,405+191,$COLOR{blue}); # CNodeRoomburgh2-CNodeAA24
   $nm->line(517+0,405+-2,517+280,405+188,$COLOR{blue}); # CNodeRoomburgh2-CNodeAA24
   $nm->line(517+0,405+2,517+280,405+192,$COLOR{blue}); # CNodeRoomburgh2-CNodeAA24
   $nm->line(205+0,465+0,205+36,465+37,$COLOR{blue}); # CNodeHaagwijk-CNodeAJSoft
   $nm->line(205+-1,465+0,205+35,465+37,$COLOR{blue}); # CNodeHaagwijk-CNodeAJSoft
   $nm->line(205+1,465+0,205+37,465+37,$COLOR{blue}); # CNodeHaagwijk-CNodeAJSoft
   $nm->line(205+-2,465+0,205+34,465+37,$COLOR{blue}); # CNodeHaagwijk-CNodeAJSoft
   $nm->line(205+2,465+0,205+38,465+37,$COLOR{blue}); # CNodeHaagwijk-CNodeAJSoft
   $nm->line(205+0,420+45,205+44,420+0,$COLOR{blue}); # CNodeRV-CNodeAJSoft
   $nm->line(205+-1,420+45,205+43,420+0,$COLOR{blue}); # CNodeRV-CNodeAJSoft
   $nm->line(205+1,420+45,205+45,420+0,$COLOR{blue}); # CNodeRV-CNodeAJSoft
   $nm->line(205+-2,420+45,205+42,420+0,$COLOR{blue}); # CNodeRV-CNodeAJSoft
   $nm->line(205+2,420+45,205+46,420+0,$COLOR{blue}); # CNodeRV-CNodeAJSoft
   $nm->line(261+0,179+0,261+93,179+21,$COLOR{blue}); # CNodeRabo-CNodeAZC
   $nm->line(261+0,179+-1,261+93,179+20,$COLOR{blue}); # CNodeRabo-CNodeAZC
   $nm->line(261+0,179+1,261+93,179+22,$COLOR{blue}); # CNodeRabo-CNodeAZC
   $nm->line(261+0,179+-2,261+93,179+19,$COLOR{blue}); # CNodeRabo-CNodeAZC
   $nm->line(261+0,179+2,261+93,179+23,$COLOR{blue}); # CNodeRabo-CNodeAZC

   $COLOR{mycolor}=$nm->colorAllocate(0,180,0);
   $nm->line(159+0,179+39,159+102,179+0,$COLOR{blue}); # CNodeUniGor-CNodeAZC
   $nm->line(159+0,179+38,159+102,179+-1,$COLOR{blue}); # CNodeUniGor-CNodeAZC
   $nm->line(159+0,179+40,159+102,179+1,$COLOR{blue}); # CNodeUniGor-CNodeAZC
   $nm->line(159+0,179+37,159+102,179+-2,$COLOR{blue}); # CNodeUniGor-CNodeAZC
   $nm->line(159+0,179+41,159+102,179+2,$COLOR{blue}); # CNodeUniGor-CNodeAZC
### link CNodeLMkempers2-CNodeBDboon to short: 0
   $nm->line(203+0,469+0,203+38,469+33,$COLOR{blue}); # CNodeHaagwijk-CNodeBizet
   $nm->line(203+0,469+-1,203+38,469+32,$COLOR{blue}); # CNodeHaagwijk-CNodeBizet
   $nm->line(203+0,469+1,203+38,469+34,$COLOR{blue}); # CNodeHaagwijk-CNodeBizet
   $nm->line(203+0,469+-2,203+38,469+31,$COLOR{blue}); # CNodeHaagwijk-CNodeBizet
   $nm->line(203+0,469+2,203+38,469+35,$COLOR{blue}); # CNodeHaagwijk-CNodeBizet
### link CNodeAJSoft-CNodeBizet to short: 4

   $COLOR{mycolor}=$nm->colorAllocate(0,180,146);
   $nm->line(234+0,26+0,234+216,26+60,$COLOR{blue}); # CNodeLijtweg1-CNodeBroekplein
   $nm->line(234+0,26+-1,234+216,26+59,$COLOR{blue}); # CNodeLijtweg1-CNodeBroekplein
   $nm->line(234+0,26+1,234+216,26+61,$COLOR{blue}); # CNodeLijtweg1-CNodeBroekplein
   $nm->line(234+0,26+-2,234+216,26+58,$COLOR{blue}); # CNodeLijtweg1-CNodeBroekplein
   $nm->line(234+0,26+2,234+216,26+62,$COLOR{blue}); # CNodeLijtweg1-CNodeBroekplein
   $nm->setStyle(($COLOR{green}) x 10 , (gdTransparent) x 5);

   $COLOR{mycolor}=$nm->colorAllocate(8,0,180);
   $nm->line(392+0,86+124,392+58,86+0,$COLOR{blue}); # CNodeSOM-CNodeBroekplein
   $nm->line(392+-1,86+124,392+57,86+0,$COLOR{blue}); # CNodeSOM-CNodeBroekplein
   $nm->line(392+1,86+124,392+59,86+0,$COLOR{blue}); # CNodeSOM-CNodeBroekplein
   $nm->line(392+-2,86+124,392+56,86+0,$COLOR{blue}); # CNodeSOM-CNodeBroekplein
   $nm->line(392+2,86+124,392+60,86+0,$COLOR{blue}); # CNodeSOM-CNodeBroekplein
   $nm->line(450+0,86+0,450+10,86+31,$COLOR{blue}); # CNodeRosmolen-CNodeBroekplein
   $nm->line(450+-1,86+0,450+9,86+31,$COLOR{blue}); # CNodeRosmolen-CNodeBroekplein
   $nm->line(450+1,86+0,450+11,86+31,$COLOR{blue}); # CNodeRosmolen-CNodeBroekplein
   $nm->line(450+-2,86+0,450+8,86+31,$COLOR{blue}); # CNodeRosmolen-CNodeBroekplein
   $nm->line(450+2,86+0,450+12,86+31,$COLOR{blue}); # CNodeRosmolen-CNodeBroekplein

   $COLOR{mycolor}=$nm->colorAllocate(0,180,0);
   $nm->line(159+0,197+21,159+71,197+0,$COLOR{blue}); # CNodeUniGor-CNodeBrug
   $nm->line(159+0,197+20,159+71,197+-1,$COLOR{blue}); # CNodeUniGor-CNodeBrug
   $nm->line(159+0,197+22,159+71,197+1,$COLOR{blue}); # CNodeUniGor-CNodeBrug
   $nm->line(159+0,197+19,159+71,197+-2,$COLOR{blue}); # CNodeUniGor-CNodeBrug
   $nm->line(159+0,197+23,159+71,197+2,$COLOR{blue}); # CNodeUniGor-CNodeBrug

   $COLOR{mycolor}=$nm->colorAllocate(0,180,0);
   $nm->line(230+0,32+165,230+4,32+0,$COLOR{blue}); # CNodeLijtweg3-CNodeBrug
   $nm->line(230+-1,32+165,230+3,32+0,$COLOR{blue}); # CNodeLijtweg3-CNodeBrug
   $nm->line(230+1,32+165,230+5,32+0,$COLOR{blue}); # CNodeLijtweg3-CNodeBrug
   $nm->line(230+-2,32+165,230+2,32+0,$COLOR{blue}); # CNodeLijtweg3-CNodeBrug
   $nm->line(230+2,32+165,230+6,32+0,$COLOR{blue}); # CNodeLijtweg3-CNodeBrug
### link CNodeCeTIM3-CNodeBurcht to short: 10

   $COLOR{mycolor}=$nm->colorAllocate(0,180,0);
   $nm->line(159+0,218+0,159+72,218+21,$COLOR{blue}); # CNodeUniGor-CNodeCamimplants
   $nm->line(159+0,218+-1,159+72,218+20,$COLOR{blue}); # CNodeUniGor-CNodeCamimplants
   $nm->line(159+0,218+1,159+72,218+22,$COLOR{blue}); # CNodeUniGor-CNodeCamimplants
   $nm->line(159+0,218+-2,159+72,218+19,$COLOR{blue}); # CNodeUniGor-CNodeCamimplants
   $nm->line(159+0,218+2,159+72,218+23,$COLOR{blue}); # CNodeUniGor-CNodeCamimplants

   $COLOR{mycolor}=$nm->colorAllocate(0,180,0);
   $nm->line(231+0,32+207,231+3,32+0,$COLOR{blue}); # CNodeLijtweg3-CNodeCamimplants
   $nm->line(231+-1,32+207,231+2,32+0,$COLOR{blue}); # CNodeLijtweg3-CNodeCamimplants
   $nm->line(231+1,32+207,231+4,32+0,$COLOR{blue}); # CNodeLijtweg3-CNodeCamimplants
   $nm->line(231+-2,32+207,231+1,32+0,$COLOR{blue}); # CNodeLijtweg3-CNodeCamimplants
   $nm->line(231+2,32+207,231+5,32+0,$COLOR{blue}); # CNodeLijtweg3-CNodeCamimplants
   $nm->line(199+0,239+100,199+32,239+0,$COLOR{blue}); # CNodeJorg-CNodeCamimplants
   $nm->line(199+-1,239+100,199+31,239+0,$COLOR{blue}); # CNodeJorg-CNodeCamimplants
   $nm->line(199+1,239+100,199+33,239+0,$COLOR{blue}); # CNodeJorg-CNodeCamimplants
   $nm->line(199+-2,239+100,199+30,239+0,$COLOR{blue}); # CNodeJorg-CNodeCamimplants
   $nm->line(199+2,239+100,199+34,239+0,$COLOR{blue}); # CNodeJorg-CNodeCamimplants
   $nm->line(199+0,316+23,199+128,316+0,$COLOR{blue}); # CNodeJorg-CNodeCope
   $nm->line(199+0,316+22,199+128,316+-1,$COLOR{blue}); # CNodeJorg-CNodeCope
   $nm->line(199+0,316+24,199+128,316+1,$COLOR{blue}); # CNodeJorg-CNodeCope
   $nm->line(199+0,316+21,199+128,316+-2,$COLOR{blue}); # CNodeJorg-CNodeCope
   $nm->line(199+0,316+25,199+128,316+2,$COLOR{blue}); # CNodeJorg-CNodeCope
   $nm->line(327+0,316+0,327+24,316+20,$COLOR{blue}); # CNodeVosko1-CNodeCope
   $nm->line(327+0,316+-1,327+24,316+19,$COLOR{blue}); # CNodeVosko1-CNodeCope
   $nm->line(327+0,316+1,327+24,316+21,$COLOR{blue}); # CNodeVosko1-CNodeCope
   $nm->line(327+0,316+-2,327+24,316+18,$COLOR{blue}); # CNodeVosko1-CNodeCope
   $nm->line(327+0,316+2,327+24,316+22,$COLOR{blue}); # CNodeVosko1-CNodeCope
   $nm->line(327+0,316+0,327+34,316+18,$COLOR{blue}); # CNodeStadhuis1-CNodeCope
   $nm->line(327+0,316+-1,327+34,316+17,$COLOR{blue}); # CNodeStadhuis1-CNodeCope
   $nm->line(327+0,316+1,327+34,316+19,$COLOR{blue}); # CNodeStadhuis1-CNodeCope
   $nm->line(327+0,316+-2,327+34,316+16,$COLOR{blue}); # CNodeStadhuis1-CNodeCope
   $nm->line(327+0,316+2,327+34,316+20,$COLOR{blue}); # CNodeStadhuis1-CNodeCope
### link CNodeVosko2-CNodeDirkx to short: 9
   $nm->line(450+0,500+95,450+46,500+0,$COLOR{blue}); # CNodeJVC-CNodeDuivenHok
   $nm->line(450+-1,500+95,450+45,500+0,$COLOR{blue}); # CNodeJVC-CNodeDuivenHok
   $nm->line(450+1,500+95,450+47,500+0,$COLOR{blue}); # CNodeJVC-CNodeDuivenHok
   $nm->line(450+-2,500+95,450+44,500+0,$COLOR{blue}); # CNodeJVC-CNodeDuivenHok
   $nm->line(450+2,500+95,450+48,500+0,$COLOR{blue}); # CNodeJVC-CNodeDuivenHok
   $nm->line(392+0,210+0,392+58,210+385,$COLOR{blue}); # CNodeSOM-CNodeDuivenHok
   $nm->line(392+-1,210+0,392+57,210+385,$COLOR{blue}); # CNodeSOM-CNodeDuivenHok
   $nm->line(392+1,210+0,392+59,210+385,$COLOR{blue}); # CNodeSOM-CNodeDuivenHok
   $nm->line(392+-2,210+0,392+56,210+385,$COLOR{blue}); # CNodeSOM-CNodeDuivenHok
   $nm->line(392+2,210+0,392+60,210+385,$COLOR{blue}); # CNodeSOM-CNodeDuivenHok
   $nm->line(249+0,420+0,249+504,420+175,$COLOR{blue}); # CNodeRV-CNodeGandalf
   $nm->line(249+0,420+-1,249+504,420+174,$COLOR{blue}); # CNodeRV-CNodeGandalf
   $nm->line(249+0,420+1,249+504,420+176,$COLOR{blue}); # CNodeRV-CNodeGandalf
   $nm->line(249+0,420+-2,249+504,420+173,$COLOR{blue}); # CNodeRV-CNodeGandalf
   $nm->line(249+0,420+2,249+504,420+177,$COLOR{blue}); # CNodeRV-CNodeGandalf

   $COLOR{mycolor}=$nm->colorAllocate(0,180,0);
   $nm->line(157+0,342+29,157+39,342+0,$COLOR{blue}); # CNodeJorg2-CNodeGer
   $nm->line(157+0,342+28,157+39,342+-1,$COLOR{blue}); # CNodeJorg2-CNodeGer
   $nm->line(157+0,342+30,157+39,342+1,$COLOR{blue}); # CNodeJorg2-CNodeGer
   $nm->line(157+0,342+27,157+39,342+-2,$COLOR{blue}); # CNodeJorg2-CNodeGer
   $nm->line(157+0,342+31,157+39,342+2,$COLOR{blue}); # CNodeJorg2-CNodeGer

   $COLOR{mycolor}=$nm->colorAllocate(0,180,0);
   $nm->line(157+0,371+0,157+48,371+94,$COLOR{blue}); # CNodeAJSoft-CNodeGer
   $nm->line(157+-1,371+0,157+47,371+94,$COLOR{blue}); # CNodeAJSoft-CNodeGer
   $nm->line(157+1,371+0,157+49,371+94,$COLOR{blue}); # CNodeAJSoft-CNodeGer
   $nm->line(157+-2,371+0,157+46,371+94,$COLOR{blue}); # CNodeAJSoft-CNodeGer
   $nm->line(157+2,371+0,157+50,371+94,$COLOR{blue}); # CNodeAJSoft-CNodeGer
   $nm->line(797+0,277+318,797+0,277+0,$COLOR{blue}); # CNodeWBRotary1-CNodeGerard
   $nm->line(797+-1,277+318,797+-1,277+0,$COLOR{blue}); # CNodeWBRotary1-CNodeGerard
   $nm->line(797+1,277+318,797+1,277+0,$COLOR{blue}); # CNodeWBRotary1-CNodeGerard
   $nm->line(797+-2,277+318,797+-2,277+0,$COLOR{blue}); # CNodeWBRotary1-CNodeGerard
   $nm->line(797+2,277+318,797+2,277+0,$COLOR{blue}); # CNodeWBRotary1-CNodeGerard
### link CNodeHans-CNodeGerard to short: 0
   $nm->line(517+0,355+55,517+177,355+0,$COLOR{blue}); # CNodeRoomburgh1-CNodeGraficall
   $nm->line(517+0,355+54,517+177,355+-1,$COLOR{blue}); # CNodeRoomburgh1-CNodeGraficall
   $nm->line(517+0,355+56,517+177,355+1,$COLOR{blue}); # CNodeRoomburgh1-CNodeGraficall
   $nm->line(517+0,355+53,517+177,355+-2,$COLOR{blue}); # CNodeRoomburgh1-CNodeGraficall
   $nm->line(517+0,355+57,517+177,355+2,$COLOR{blue}); # CNodeRoomburgh1-CNodeGraficall

   $COLOR{mycolor}=$nm->colorAllocate(0,180,0);
   $nm->line(338+0,375+0,338+13,375+78,$COLOR{blue}); # CNodeIMI-CNodeGrip
   $nm->line(338+-1,375+0,338+12,375+78,$COLOR{blue}); # CNodeIMI-CNodeGrip
   $nm->line(338+1,375+0,338+14,375+78,$COLOR{blue}); # CNodeIMI-CNodeGrip
   $nm->line(338+-2,375+0,338+11,375+78,$COLOR{blue}); # CNodeIMI-CNodeGrip
   $nm->line(338+2,375+0,338+15,375+78,$COLOR{blue}); # CNodeIMI-CNodeGrip

   $COLOR{mycolor}=$nm->colorAllocate(0,180,0);
   $nm->line(351+0,453+0,351+30,453+25,$COLOR{blue}); # CNodeROCl-CNodeGrip
   $nm->line(351+0,453+-1,351+30,453+24,$COLOR{blue}); # CNodeROCl-CNodeGrip
   $nm->line(351+0,453+1,351+30,453+26,$COLOR{blue}); # CNodeROCl-CNodeGrip
   $nm->line(351+0,453+-2,351+30,453+23,$COLOR{blue}); # CNodeROCl-CNodeGrip
   $nm->line(351+0,453+2,351+30,453+27,$COLOR{blue}); # CNodeROCl-CNodeGrip

   $COLOR{mycolor}=$nm->colorAllocate(0,104,180);
   $nm->line(694+0,206+149,694+103,206+0,$COLOR{blue}); # CNodeGraficall-CNodeHMKerk2
   $nm->line(694+-1,206+149,694+102,206+0,$COLOR{blue}); # CNodeGraficall-CNodeHMKerk2
   $nm->line(694+1,206+149,694+104,206+0,$COLOR{blue}); # CNodeGraficall-CNodeHMKerk2
   $nm->line(694+-2,206+149,694+101,206+0,$COLOR{blue}); # CNodeGraficall-CNodeHMKerk2
   $nm->line(694+2,206+149,694+105,206+0,$COLOR{blue}); # CNodeGraficall-CNodeHMKerk2
   $nm->line(392+0,196+14,392+405,196+0,$COLOR{gray}); # CNodeSOM-CNodeHMgw2
### link CNodeHMKerk2-CNodeHMgw2 to short: 10

   $COLOR{mycolor}=$nm->colorAllocate(0,180,0);
   $nm->line(153+0,36+182,153+127,36+0,$COLOR{blue}); # CNodeUniGorN-CNodeHofwijck
   $nm->line(153+-1,36+182,153+126,36+0,$COLOR{blue}); # CNodeUniGorN-CNodeHofwijck
   $nm->line(153+1,36+182,153+128,36+0,$COLOR{blue}); # CNodeUniGorN-CNodeHofwijck
   $nm->line(153+-2,36+182,153+125,36+0,$COLOR{blue}); # CNodeUniGorN-CNodeHofwijck
   $nm->line(153+2,36+182,153+129,36+0,$COLOR{blue}); # CNodeUniGorN-CNodeHofwijck

   $COLOR{mycolor}=$nm->colorAllocate(0,180,0);
   $nm->line(234+0,32+0,234+46,32+4,$COLOR{blue}); # CNodeLijtweg3-CNodeHofwijck
   $nm->line(234+0,32+-1,234+46,32+3,$COLOR{blue}); # CNodeLijtweg3-CNodeHofwijck
   $nm->line(234+0,32+1,234+46,32+5,$COLOR{blue}); # CNodeLijtweg3-CNodeHofwijck
   $nm->line(234+0,32+-2,234+46,32+2,$COLOR{blue}); # CNodeLijtweg3-CNodeHofwijck
   $nm->line(234+0,32+2,234+46,32+6,$COLOR{blue}); # CNodeLijtweg3-CNodeHofwijck
   $nm->line(390+0,268+69,390+29,268+0,$COLOR{blue}); # CNodeCeTIM2-CNodeHoutmarkt
   $nm->line(390+-1,268+69,390+28,268+0,$COLOR{blue}); # CNodeCeTIM2-CNodeHoutmarkt
   $nm->line(390+1,268+69,390+30,268+0,$COLOR{blue}); # CNodeCeTIM2-CNodeHoutmarkt
   $nm->line(390+-2,268+69,390+27,268+0,$COLOR{blue}); # CNodeCeTIM2-CNodeHoutmarkt
   $nm->line(390+2,268+69,390+31,268+0,$COLOR{blue}); # CNodeCeTIM2-CNodeHoutmarkt
   $nm->setStyle(($COLOR{green}) x 10 , (gdTransparent) x 5);

   $COLOR{mycolor}=$nm->colorAllocate(19,0,180);
   $nm->line(392+0,210+0,392+27,210+58,$COLOR{blue}); # CNodeSOM-CNodeHoutmarkt
   $nm->line(392+-1,210+0,392+26,210+58,$COLOR{blue}); # CNodeSOM-CNodeHoutmarkt
   $nm->line(392+1,210+0,392+28,210+58,$COLOR{blue}); # CNodeSOM-CNodeHoutmarkt
   $nm->line(392+-2,210+0,392+25,210+58,$COLOR{blue}); # CNodeSOM-CNodeHoutmarkt
   $nm->line(392+2,210+0,392+29,210+58,$COLOR{blue}); # CNodeSOM-CNodeHoutmarkt

   $COLOR{mycolor}=$nm->colorAllocate(0,180,0);
   $nm->line(249+0,343+77,249+86,343+0,$COLOR{blue}); # CNodeRV-CNodeHuub
   $nm->line(249+0,343+76,249+86,343+-1,$COLOR{blue}); # CNodeRV-CNodeHuub
   $nm->line(249+0,343+78,249+86,343+1,$COLOR{blue}); # CNodeRV-CNodeHuub
   $nm->line(249+0,343+75,249+86,343+-2,$COLOR{blue}); # CNodeRV-CNodeHuub
   $nm->line(249+0,343+79,249+86,343+2,$COLOR{blue}); # CNodeRV-CNodeHuub
### link CNodeVosko1-CNodeHuub to short: 17
   $nm->setStyle(($COLOR{red}) x 8 , (gdTransparent) x 8);

   $COLOR{mycolor}=$nm->colorAllocate(28,0,180);
   $nm->line(381+0,440+38,381+27,440+0,$COLOR{blue}); # CNodeROCl-CNodeIntCom
   $nm->line(381+-1,440+38,381+26,440+0,$COLOR{blue}); # CNodeROCl-CNodeIntCom
   $nm->line(381+1,440+38,381+28,440+0,$COLOR{blue}); # CNodeROCl-CNodeIntCom
   $nm->line(381+-2,440+38,381+25,440+0,$COLOR{blue}); # CNodeROCl-CNodeIntCom
   $nm->line(381+2,440+38,381+29,440+0,$COLOR{blue}); # CNodeROCl-CNodeIntCom

   $COLOR{mycolor}=$nm->colorAllocate(0,180,0);
   $nm->line(381+0,478+0,381+115,478+22,$COLOR{blue}); # CNodeROCl-CNodeJVC
   $nm->line(381+0,478+-1,381+115,478+21,$COLOR{blue}); # CNodeROCl-CNodeJVC
   $nm->line(381+0,478+1,381+115,478+23,$COLOR{blue}); # CNodeROCl-CNodeJVC
   $nm->line(381+0,478+-2,381+115,478+20,$COLOR{blue}); # CNodeROCl-CNodeJVC
   $nm->line(381+0,478+2,381+115,478+24,$COLOR{blue}); # CNodeROCl-CNodeJVC
   $nm->line(496+0,405+95,496+21,405+0,$COLOR{blue}); # CNodeRoomburgh2-CNodeJVC
   $nm->line(496+-1,405+95,496+20,405+0,$COLOR{blue}); # CNodeRoomburgh2-CNodeJVC
   $nm->line(496+1,405+95,496+22,405+0,$COLOR{blue}); # CNodeRoomburgh2-CNodeJVC
   $nm->line(496+-2,405+95,496+19,405+0,$COLOR{blue}); # CNodeRoomburgh2-CNodeJVC
   $nm->line(496+2,405+95,496+23,405+0,$COLOR{blue}); # CNodeRoomburgh2-CNodeJVC
   $nm->line(199+0,339+0,199+149,339+70,$COLOR{blue}); # CNodeJorg-CNodeJasper
   $nm->line(199+0,339+-1,199+149,339+69,$COLOR{blue}); # CNodeJorg-CNodeJasper
   $nm->line(199+0,339+1,199+149,339+71,$COLOR{blue}); # CNodeJorg-CNodeJasper
   $nm->line(199+0,339+-2,199+149,339+68,$COLOR{blue}); # CNodeJorg-CNodeJasper
   $nm->line(199+0,339+2,199+149,339+72,$COLOR{blue}); # CNodeJorg-CNodeJasper
   $nm->line(348+0,337+72,348+42,337+0,$COLOR{blue}); # CNodeCeTIM2-CNodeJasper
   $nm->line(348+-1,337+72,348+41,337+0,$COLOR{blue}); # CNodeCeTIM2-CNodeJasper
   $nm->line(348+1,337+72,348+43,337+0,$COLOR{blue}); # CNodeCeTIM2-CNodeJasper
   $nm->line(348+-2,337+72,348+40,337+0,$COLOR{blue}); # CNodeCeTIM2-CNodeJasper
   $nm->line(348+2,337+72,348+44,337+0,$COLOR{blue}); # CNodeCeTIM2-CNodeJasper

   $COLOR{mycolor}=$nm->colorAllocate(0,180,0);
   $nm->line(348+0,409+0,348+33,409+69,$COLOR{blue}); # CNodeROCl-CNodeJasper
   $nm->line(348+-1,409+0,348+32,409+69,$COLOR{blue}); # CNodeROCl-CNodeJasper
   $nm->line(348+1,409+0,348+34,409+69,$COLOR{blue}); # CNodeROCl-CNodeJasper
   $nm->line(348+-2,409+0,348+31,409+69,$COLOR{blue}); # CNodeROCl-CNodeJasper
   $nm->line(348+2,409+0,348+35,409+69,$COLOR{blue}); # CNodeROCl-CNodeJasper
   $nm->line(153+0,20+198,153+644,20+0,$COLOR{blue}); # CNodeUniGorN-CNodeKaag
   $nm->line(153+0,20+197,153+644,20+-1,$COLOR{blue}); # CNodeUniGorN-CNodeKaag
   $nm->line(153+0,20+199,153+644,20+1,$COLOR{blue}); # CNodeUniGorN-CNodeKaag
   $nm->line(153+0,20+196,153+644,20+-2,$COLOR{blue}); # CNodeUniGorN-CNodeKaag
   $nm->line(153+0,20+200,153+644,20+2,$COLOR{blue}); # CNodeUniGorN-CNodeKaag
   $nm->line(153+0,20+198,153+644,20+0,$COLOR{blue}); # CNodeUniGorN-CNodeKaag2
   $nm->line(153+0,20+197,153+644,20+-1,$COLOR{blue}); # CNodeUniGorN-CNodeKaag2
   $nm->line(153+0,20+199,153+644,20+1,$COLOR{blue}); # CNodeUniGorN-CNodeKaag2
   $nm->line(153+0,20+196,153+644,20+-2,$COLOR{blue}); # CNodeUniGorN-CNodeKaag2
   $nm->line(153+0,20+200,153+644,20+2,$COLOR{blue}); # CNodeUniGorN-CNodeKaag2
### link CNodeSHFortis-CNodeKoster to short: 0
   $nm->line(241+0,453+49,241+63,453+0,$COLOR{blue}); # CNodeHaagwijk-CNodeLCPL
   $nm->line(241+0,453+48,241+63,453+-1,$COLOR{blue}); # CNodeHaagwijk-CNodeLCPL
   $nm->line(241+0,453+50,241+63,453+1,$COLOR{blue}); # CNodeHaagwijk-CNodeLCPL
   $nm->line(241+0,453+47,241+63,453+-2,$COLOR{blue}); # CNodeHaagwijk-CNodeLCPL
   $nm->line(241+0,453+51,241+63,453+2,$COLOR{blue}); # CNodeHaagwijk-CNodeLCPL
   $nm->line(304+0,453+0,304+47,453+0,$COLOR{blue}); # CNodeGrip-CNodeLCPL
   $nm->line(304+0,453+-1,304+47,453+-1,$COLOR{blue}); # CNodeGrip-CNodeLCPL
   $nm->line(304+0,453+1,304+47,453+1,$COLOR{blue}); # CNodeGrip-CNodeLCPL
   $nm->line(304+0,453+-2,304+47,453+-2,$COLOR{blue}); # CNodeGrip-CNodeLCPL
   $nm->line(304+0,453+2,304+47,453+2,$COLOR{blue}); # CNodeGrip-CNodeLCPL
### link CNodeLMkempers1-CNodeLMdorp to short: 0
   $nm->dashedLine(-9000+0,20+46680,-9000+9797,20+0,$COLOR{gray}); # CNodeRWgemhuis2-CNodeLMstruykverwo1
   $nm->line(797+0,20+186,797+0,20+0,$COLOR{blue}); # CNodeHMKerk2-CNodeLMstruykverwo1
   $nm->line(797+-1,20+186,797+-1,20+0,$COLOR{blue}); # CNodeHMKerk2-CNodeLMstruykverwo1
   $nm->line(797+1,20+186,797+1,20+0,$COLOR{blue}); # CNodeHMKerk2-CNodeLMstruykverwo1
   $nm->line(797+-2,20+186,797+-2,20+0,$COLOR{blue}); # CNodeHMKerk2-CNodeLMstruykverwo1
   $nm->line(797+2,20+186,797+2,20+0,$COLOR{blue}); # CNodeHMKerk2-CNodeLMstruykverwo1
### link CNodeLMkempers1-CNodeLMstruykverwo2 to short: 0

   $COLOR{mycolor}=$nm->colorAllocate(0,67,180);
   $nm->line(159+0,218+0,159+144,218+12,$COLOR{blue}); # CNodeUniGor-CNodeLebkov
   $nm->line(159+0,218+-1,159+144,218+11,$COLOR{blue}); # CNodeUniGor-CNodeLebkov
   $nm->line(159+0,218+1,159+144,218+13,$COLOR{blue}); # CNodeUniGor-CNodeLebkov
   $nm->line(159+0,218+-2,159+144,218+10,$COLOR{blue}); # CNodeUniGor-CNodeLebkov
   $nm->line(159+0,218+2,159+144,218+14,$COLOR{blue}); # CNodeUniGor-CNodeLebkov
   $nm->line(303+0,200+30,303+51,200+0,$COLOR{blue}); # CNodeRabo-CNodeLebkov
   $nm->line(303+0,200+29,303+51,200+-1,$COLOR{blue}); # CNodeRabo-CNodeLebkov
   $nm->line(303+0,200+31,303+51,200+1,$COLOR{blue}); # CNodeRabo-CNodeLebkov
   $nm->line(303+0,200+28,303+51,200+-2,$COLOR{blue}); # CNodeRabo-CNodeLebkov
   $nm->line(303+0,200+32,303+51,200+2,$COLOR{blue}); # CNodeRabo-CNodeLebkov

   $COLOR{mycolor}=$nm->colorAllocate(0,180,0);
   $nm->line(234+0,32+0,234+27,32+147,$COLOR{blue}); # CNodeAZC-CNodeLijtweg3
   $nm->line(234+-1,32+0,234+26,32+147,$COLOR{blue}); # CNodeAZC-CNodeLijtweg3
   $nm->line(234+1,32+0,234+28,32+147,$COLOR{blue}); # CNodeAZC-CNodeLijtweg3
   $nm->line(234+-2,32+0,234+25,32+147,$COLOR{blue}); # CNodeAZC-CNodeLijtweg3
   $nm->line(234+2,32+0,234+29,32+147,$COLOR{blue}); # CNodeAZC-CNodeLijtweg3
   $nm->line(398+0,400+0,398+119,400+10,$COLOR{blue}); # CNodeRoomburgh1-CNodeLorentzhof
   $nm->line(398+0,400+-1,398+119,400+9,$COLOR{blue}); # CNodeRoomburgh1-CNodeLorentzhof
   $nm->line(398+0,400+1,398+119,400+11,$COLOR{blue}); # CNodeRoomburgh1-CNodeLorentzhof
   $nm->line(398+0,400+-2,398+119,400+8,$COLOR{blue}); # CNodeRoomburgh1-CNodeLorentzhof
   $nm->line(398+0,400+2,398+119,400+12,$COLOR{blue}); # CNodeRoomburgh1-CNodeLorentzhof
   $nm->line(241+0,400+102,241+157,400+0,$COLOR{blue}); # CNodeHaagwijk-CNodeLorentzhof
   $nm->line(241+0,400+101,241+157,400+-1,$COLOR{blue}); # CNodeHaagwijk-CNodeLorentzhof
   $nm->line(241+0,400+103,241+157,400+1,$COLOR{blue}); # CNodeHaagwijk-CNodeLorentzhof
   $nm->line(241+0,400+100,241+157,400+-2,$COLOR{blue}); # CNodeHaagwijk-CNodeLorentzhof
   $nm->line(241+0,400+104,241+157,400+2,$COLOR{blue}); # CNodeHaagwijk-CNodeLorentzhof
   $nm->setStyle(($COLOR{red}) x 8 , (gdTransparent) x 8);
   $nm->line(327+0,287+29,327+6,287+0,$COLOR{blue}); # CNodeCope-CNodeLvLn
   $nm->line(327+-1,287+29,327+5,287+0,$COLOR{blue}); # CNodeCope-CNodeLvLn
   $nm->line(327+1,287+29,327+7,287+0,$COLOR{blue}); # CNodeCope-CNodeLvLn
   $nm->line(327+-2,287+29,327+4,287+0,$COLOR{blue}); # CNodeCope-CNodeLvLn
   $nm->line(327+2,287+29,327+8,287+0,$COLOR{blue}); # CNodeCope-CNodeLvLn

   $COLOR{mycolor}=$nm->colorAllocate(0,180,0);
   $nm->line(333+0,287+0,333+55,287+44,$COLOR{blue}); # CNodeCeTIM3-CNodeLvLn
   $nm->line(333+0,287+-1,333+55,287+43,$COLOR{blue}); # CNodeCeTIM3-CNodeLvLn
   $nm->line(333+0,287+1,333+55,287+45,$COLOR{blue}); # CNodeCeTIM3-CNodeLvLn
   $nm->line(333+0,287+-2,333+55,287+42,$COLOR{blue}); # CNodeCeTIM3-CNodeLvLn
   $nm->line(333+0,287+2,333+55,287+46,$COLOR{blue}); # CNodeCeTIM3-CNodeLvLn
   $nm->line(345+0,287+0,345+22,287+41,$COLOR{blue}); # CNodeStadhuis2-CNodeLvLn2
   $nm->line(345+-1,287+0,345+21,287+41,$COLOR{blue}); # CNodeStadhuis2-CNodeLvLn2
   $nm->line(345+1,287+0,345+23,287+41,$COLOR{blue}); # CNodeStadhuis2-CNodeLvLn2
   $nm->line(345+-2,287+0,345+20,287+41,$COLOR{blue}); # CNodeStadhuis2-CNodeLvLn2
   $nm->line(345+2,287+0,345+24,287+41,$COLOR{blue}); # CNodeStadhuis2-CNodeLvLn2
   $nm->line(345+0,200+87,345+9,200+0,$COLOR{blue}); # CNodeRabo-CNodeLvLn2
   $nm->line(345+-1,200+87,345+8,200+0,$COLOR{blue}); # CNodeRabo-CNodeLvLn2
   $nm->line(345+1,200+87,345+10,200+0,$COLOR{blue}); # CNodeRabo-CNodeLvLn2
   $nm->line(345+-2,200+87,345+7,200+0,$COLOR{blue}); # CNodeRabo-CNodeLvLn2
   $nm->line(345+2,200+87,345+11,200+0,$COLOR{blue}); # CNodeRabo-CNodeLvLn2
### link CNodeIMI-CNodeLvLz to short: 12

   $COLOR{mycolor}=$nm->colorAllocate(1,0,180);
   $nm->line(345+0,337+28,345+45,337+0,$COLOR{blue}); # CNodeCeTIM2-CNodeLvLz
   $nm->line(345+0,337+27,345+45,337+-1,$COLOR{blue}); # CNodeCeTIM2-CNodeLvLz
   $nm->line(345+0,337+29,345+45,337+1,$COLOR{blue}); # CNodeCeTIM2-CNodeLvLz
   $nm->line(345+0,337+26,345+45,337+-2,$COLOR{blue}); # CNodeCeTIM2-CNodeLvLz
   $nm->line(345+0,337+30,345+45,337+2,$COLOR{blue}); # CNodeCeTIM2-CNodeLvLz
   $nm->line(381+0,429+49,381+73,429+0,$COLOR{blue}); # CNodeROCl-CNodeMarten
   $nm->line(381+0,429+48,381+73,429+-1,$COLOR{blue}); # CNodeROCl-CNodeMarten
   $nm->line(381+0,429+50,381+73,429+1,$COLOR{blue}); # CNodeROCl-CNodeMarten
   $nm->line(381+0,429+47,381+73,429+-2,$COLOR{blue}); # CNodeROCl-CNodeMarten
   $nm->line(381+0,429+51,381+73,429+2,$COLOR{blue}); # CNodeROCl-CNodeMarten
   $nm->line(388+0,331+0,388+66,331+98,$COLOR{blue}); # CNodeCeTIM3-CNodeMarten
   $nm->line(388+-1,331+0,388+65,331+98,$COLOR{blue}); # CNodeCeTIM3-CNodeMarten
   $nm->line(388+1,331+0,388+67,331+98,$COLOR{blue}); # CNodeCeTIM3-CNodeMarten
   $nm->line(388+-2,331+0,388+64,331+98,$COLOR{blue}); # CNodeCeTIM3-CNodeMarten
   $nm->line(388+2,331+0,388+68,331+98,$COLOR{blue}); # CNodeCeTIM3-CNodeMarten

   $COLOR{mycolor}=$nm->colorAllocate(0,180,0);
   $nm->line(10+0,20+0,10+195,20+445,$COLOR{blue}); # CNodeAJSoft-CNodeMeca
   $nm->line(10+-1,20+0,10+194,20+445,$COLOR{blue}); # CNodeAJSoft-CNodeMeca
   $nm->line(10+1,20+0,10+196,20+445,$COLOR{blue}); # CNodeAJSoft-CNodeMeca
   $nm->line(10+-2,20+0,10+193,20+445,$COLOR{blue}); # CNodeAJSoft-CNodeMeca
   $nm->line(10+2,20+0,10+197,20+445,$COLOR{blue}); # CNodeAJSoft-CNodeMeca
### link CNodeCeTIM3-CNodeOBLc to short: 5
   $nm->line(113+0,336+77,113+238,336+0,$COLOR{blue}); # CNodeVosko2-CNodeOBLste
   $nm->line(113+0,336+76,113+238,336+-1,$COLOR{blue}); # CNodeVosko2-CNodeOBLste
   $nm->line(113+0,336+78,113+238,336+1,$COLOR{blue}); # CNodeVosko2-CNodeOBLste
   $nm->line(113+0,336+75,113+238,336+-2,$COLOR{blue}); # CNodeVosko2-CNodeOBLste
   $nm->line(113+0,336+79,113+238,336+2,$COLOR{blue}); # CNodeVosko2-CNodeOBLste
### link CNodeSHFortis-CNodePPFortis to short: 0

   $COLOR{mycolor}=$nm->colorAllocate(0,180,0);
   $nm->line(388+0,331+0,388+17,331+46,$COLOR{blue}); # CNodeCeTIM3-CNodePlantsoen
   $nm->line(388+-1,331+0,388+16,331+46,$COLOR{blue}); # CNodeCeTIM3-CNodePlantsoen
   $nm->line(388+1,331+0,388+18,331+46,$COLOR{blue}); # CNodeCeTIM3-CNodePlantsoen
   $nm->line(388+-2,331+0,388+15,331+46,$COLOR{blue}); # CNodeCeTIM3-CNodePlantsoen
   $nm->line(388+2,331+0,388+19,331+46,$COLOR{blue}); # CNodeCeTIM3-CNodePlantsoen

   $COLOR{mycolor}=$nm->colorAllocate(0,180,0);
   $nm->line(398+0,377+23,398+7,377+0,$COLOR{blue}); # CNodeLorentzhof-CNodePlantsoen
   $nm->line(398+-1,377+23,398+6,377+0,$COLOR{blue}); # CNodeLorentzhof-CNodePlantsoen
   $nm->line(398+1,377+23,398+8,377+0,$COLOR{blue}); # CNodeLorentzhof-CNodePlantsoen
   $nm->line(398+-2,377+23,398+5,377+0,$COLOR{blue}); # CNodeLorentzhof-CNodePlantsoen
   $nm->line(398+2,377+23,398+9,377+0,$COLOR{blue}); # CNodeLorentzhof-CNodePlantsoen
   $nm->line(367+0,340+0,367+38,340+37,$COLOR{gray}); # CNodeStadhuis4-CNodePlantsoen2
   $nm->line(241+0,478+24,241+140,478+0,$COLOR{blue}); # CNodeHaagwijk-CNodeROCl
   $nm->line(241+0,478+23,241+140,478+-1,$COLOR{blue}); # CNodeHaagwijk-CNodeROCl
   $nm->line(241+0,478+25,241+140,478+1,$COLOR{blue}); # CNodeHaagwijk-CNodeROCl
   $nm->line(241+0,478+22,241+140,478+-2,$COLOR{blue}); # CNodeHaagwijk-CNodeROCl
   $nm->line(241+0,478+26,241+140,478+2,$COLOR{blue}); # CNodeHaagwijk-CNodeROCl

   $COLOR{mycolor}=$nm->colorAllocate(0,180,150);
   $nm->line(249+0,337+83,249+141,337+0,$COLOR{blue}); # CNodeCeTIM2-CNodeRV
   $nm->line(249+0,337+82,249+141,337+-1,$COLOR{blue}); # CNodeCeTIM2-CNodeRV
   $nm->line(249+0,337+84,249+141,337+1,$COLOR{blue}); # CNodeCeTIM2-CNodeRV
   $nm->line(249+0,337+81,249+141,337+-2,$COLOR{blue}); # CNodeCeTIM2-CNodeRV
   $nm->line(249+0,337+85,249+141,337+2,$COLOR{blue}); # CNodeCeTIM2-CNodeRV

   $COLOR{mycolor}=$nm->colorAllocate(0,180,70);
   $nm->line(199+0,339+0,199+50,339+81,$COLOR{blue}); # CNodeJorg-CNodeRV
   $nm->line(199+-1,339+0,199+49,339+81,$COLOR{blue}); # CNodeJorg-CNodeRV
   $nm->line(199+1,339+0,199+51,339+81,$COLOR{blue}); # CNodeJorg-CNodeRV
   $nm->line(199+-2,339+0,199+48,339+81,$COLOR{blue}); # CNodeJorg-CNodeRV
   $nm->line(199+2,339+0,199+52,339+81,$COLOR{blue}); # CNodeJorg-CNodeRV
   $nm->dashedLine(-9000+0,287+46413,-9000+9797,287+0,$COLOR{gray}); # CNodeWBRotary2-CNodeRWgemhuis2
   $nm->line(460+0,99+18,460+74,99+0,$COLOR{blue}); # CNodeRosmolen-CNodeRegenboog
   $nm->line(460+0,99+17,460+74,99+-1,$COLOR{blue}); # CNodeRosmolen-CNodeRegenboog
   $nm->line(460+0,99+19,460+74,99+1,$COLOR{blue}); # CNodeRosmolen-CNodeRegenboog
   $nm->line(460+0,99+16,460+74,99+-2,$COLOR{blue}); # CNodeRosmolen-CNodeRegenboog
   $nm->line(460+0,99+20,460+74,99+2,$COLOR{blue}); # CNodeRosmolen-CNodeRegenboog
   $nm->line(173+0,342+22,173+23,342+0,$COLOR{blue}); # CNodeJorg2-CNodeRobijn
   $nm->line(173+0,342+21,173+23,342+-1,$COLOR{blue}); # CNodeJorg2-CNodeRobijn
   $nm->line(173+0,342+23,173+23,342+1,$COLOR{blue}); # CNodeJorg2-CNodeRobijn
   $nm->line(173+0,342+20,173+23,342+-2,$COLOR{blue}); # CNodeJorg2-CNodeRobijn
   $nm->line(173+0,342+24,173+23,342+2,$COLOR{blue}); # CNodeJorg2-CNodeRobijn

   $COLOR{mycolor}=$nm->colorAllocate(0,180,116);
   $nm->line(159+0,218+0,159+14,218+146,$COLOR{blue}); # CNodeUniGor-CNodeRobijn
   $nm->line(159+-1,218+0,159+13,218+146,$COLOR{blue}); # CNodeUniGor-CNodeRobijn
   $nm->line(159+1,218+0,159+15,218+146,$COLOR{blue}); # CNodeUniGor-CNodeRobijn
   $nm->line(159+-2,218+0,159+12,218+146,$COLOR{blue}); # CNodeUniGor-CNodeRobijn
   $nm->line(159+2,218+0,159+16,218+146,$COLOR{blue}); # CNodeUniGor-CNodeRobijn

   $COLOR{mycolor}=$nm->colorAllocate(0,180,125);
   $nm->line(173+0,364+0,173+32,364+101,$COLOR{blue}); # CNodeAJSoft-CNodeRobijn
   $nm->line(173+-1,364+0,173+31,364+101,$COLOR{blue}); # CNodeAJSoft-CNodeRobijn
   $nm->line(173+1,364+0,173+33,364+101,$COLOR{blue}); # CNodeAJSoft-CNodeRobijn
   $nm->line(173+-2,364+0,173+30,364+101,$COLOR{blue}); # CNodeAJSoft-CNodeRobijn
   $nm->line(173+2,364+0,173+34,364+101,$COLOR{blue}); # CNodeAJSoft-CNodeRobijn
   $nm->line(381+0,405+73,381+136,405+0,$COLOR{blue}); # CNodeROCl-CNodeRoomburgh2
   $nm->line(381+0,405+72,381+136,405+-1,$COLOR{blue}); # CNodeROCl-CNodeRoomburgh2
   $nm->line(381+0,405+74,381+136,405+1,$COLOR{blue}); # CNodeROCl-CNodeRoomburgh2
   $nm->line(381+0,405+71,381+136,405+-2,$COLOR{blue}); # CNodeROCl-CNodeRoomburgh2
   $nm->line(381+0,405+75,381+136,405+2,$COLOR{blue}); # CNodeROCl-CNodeRoomburgh2
   $nm->line(460+0,117+0,460+57,117+293,$COLOR{blue}); # CNodeRoomburgh1-CNodeRosmolen
   $nm->line(460+-1,117+0,460+56,117+293,$COLOR{blue}); # CNodeRoomburgh1-CNodeRosmolen
   $nm->line(460+1,117+0,460+58,117+293,$COLOR{blue}); # CNodeRoomburgh1-CNodeRosmolen
   $nm->line(460+-2,117+0,460+55,117+293,$COLOR{blue}); # CNodeRoomburgh1-CNodeRosmolen
   $nm->line(460+2,117+0,460+59,117+293,$COLOR{blue}); # CNodeRoomburgh1-CNodeRosmolen
   $nm->setStyle(($COLOR{green}) x 10 , (gdTransparent) x 5);

   $COLOR{mycolor}=$nm->colorAllocate(0,180,48);
   $nm->line(388+0,331+0,388+107,331+59,$COLOR{blue}); # CNodeCeTIM3-CNodeRuben
   $nm->line(388+0,331+-1,388+107,331+58,$COLOR{blue}); # CNodeCeTIM3-CNodeRuben
   $nm->line(388+0,331+1,388+107,331+60,$COLOR{blue}); # CNodeCeTIM3-CNodeRuben
   $nm->line(388+0,331+-2,388+107,331+57,$COLOR{blue}); # CNodeCeTIM3-CNodeRuben
   $nm->line(388+0,331+2,388+107,331+61,$COLOR{blue}); # CNodeCeTIM3-CNodeRuben
   $nm->line(495+0,390+0,495+22,390+20,$COLOR{blue}); # CNodeRoomburgh1-CNodeRuben
   $nm->line(495+0,390+-1,495+22,390+19,$COLOR{blue}); # CNodeRoomburgh1-CNodeRuben
   $nm->line(495+0,390+1,495+22,390+21,$COLOR{blue}); # CNodeRoomburgh1-CNodeRuben
   $nm->line(495+0,390+-2,495+22,390+18,$COLOR{blue}); # CNodeRoomburgh1-CNodeRuben
   $nm->line(495+0,390+2,495+22,390+22,$COLOR{blue}); # CNodeRoomburgh1-CNodeRuben

   $COLOR{mycolor}=$nm->colorAllocate(0,180,0);
   $nm->line(354+0,90+110,354+52,90+0,$COLOR{blue}); # CNodeRabo-CNodeRudi
   $nm->line(354+-1,90+110,354+51,90+0,$COLOR{blue}); # CNodeRabo-CNodeRudi
   $nm->line(354+1,90+110,354+53,90+0,$COLOR{blue}); # CNodeRabo-CNodeRudi
   $nm->line(354+-2,90+110,354+50,90+0,$COLOR{blue}); # CNodeRabo-CNodeRudi
   $nm->line(354+2,90+110,354+54,90+0,$COLOR{blue}); # CNodeRabo-CNodeRudi
   $nm->line(406+0,90+0,406+54,90+27,$COLOR{blue}); # CNodeRosmolen-CNodeRudi
   $nm->line(406+0,90+-1,406+54,90+26,$COLOR{blue}); # CNodeRosmolen-CNodeRudi
   $nm->line(406+0,90+1,406+54,90+28,$COLOR{blue}); # CNodeRosmolen-CNodeRudi
   $nm->line(406+0,90+-2,406+54,90+25,$COLOR{blue}); # CNodeRosmolen-CNodeRudi
   $nm->line(406+0,90+2,406+54,90+29,$COLOR{blue}); # CNodeRosmolen-CNodeRudi

   $COLOR{mycolor}=$nm->colorAllocate(0,180,0);
   $nm->line(234+0,32+0,234+172,32+58,$COLOR{blue}); # CNodeLijtweg3-CNodeRudi
   $nm->line(234+0,32+-1,234+172,32+57,$COLOR{blue}); # CNodeLijtweg3-CNodeRudi
   $nm->line(234+0,32+1,234+172,32+59,$COLOR{blue}); # CNodeLijtweg3-CNodeRudi
   $nm->line(234+0,32+-2,234+172,32+56,$COLOR{blue}); # CNodeLijtweg3-CNodeRudi
   $nm->line(234+0,32+2,234+172,32+60,$COLOR{blue}); # CNodeLijtweg3-CNodeRudi

   $COLOR{mycolor}=$nm->colorAllocate(0,180,0);
   $nm->line(375+0,300+0,375+13,300+31,$COLOR{blue}); # CNodeCeTIM3-CNodeRund
   $nm->line(375+-1,300+0,375+12,300+31,$COLOR{blue}); # CNodeCeTIM3-CNodeRund
   $nm->line(375+1,300+0,375+14,300+31,$COLOR{blue}); # CNodeCeTIM3-CNodeRund
   $nm->line(375+-2,300+0,375+11,300+31,$COLOR{blue}); # CNodeCeTIM3-CNodeRund
   $nm->line(375+2,300+0,375+15,300+31,$COLOR{blue}); # CNodeCeTIM3-CNodeRund

   $COLOR{mycolor}=$nm->colorAllocate(0,180,0);
   $nm->line(351+0,300+36,351+24,300+0,$COLOR{blue}); # CNodeVosko1-CNodeRund
   $nm->line(351+-1,300+36,351+23,300+0,$COLOR{blue}); # CNodeVosko1-CNodeRund
   $nm->line(351+1,300+36,351+25,300+0,$COLOR{blue}); # CNodeVosko1-CNodeRund
   $nm->line(351+-2,300+36,351+22,300+0,$COLOR{blue}); # CNodeVosko1-CNodeRund
   $nm->line(351+2,300+36,351+26,300+0,$COLOR{blue}); # CNodeVosko1-CNodeRund

   $COLOR{mycolor}=$nm->colorAllocate(0,180,0);
   $nm->line(184+0,32+27,184+50,32+0,$COLOR{blue}); # CNodeLijtweg3-CNodeRustenborch
   $nm->line(184+0,32+26,184+50,32+-1,$COLOR{blue}); # CNodeLijtweg3-CNodeRustenborch
   $nm->line(184+0,32+28,184+50,32+1,$COLOR{blue}); # CNodeLijtweg3-CNodeRustenborch
   $nm->line(184+0,32+25,184+50,32+-2,$COLOR{blue}); # CNodeLijtweg3-CNodeRustenborch
   $nm->line(184+0,32+29,184+50,32+2,$COLOR{blue}); # CNodeLijtweg3-CNodeRustenborch

   $COLOR{mycolor}=$nm->colorAllocate(0,180,0);
   $nm->line(153+0,59+159,153+31,59+0,$COLOR{blue}); # CNodeUniGorN-CNodeRustenborch
   $nm->line(153+-1,59+159,153+30,59+0,$COLOR{blue}); # CNodeUniGorN-CNodeRustenborch
   $nm->line(153+1,59+159,153+32,59+0,$COLOR{blue}); # CNodeUniGorN-CNodeRustenborch
   $nm->line(153+-2,59+159,153+29,59+0,$COLOR{blue}); # CNodeUniGorN-CNodeRustenborch
   $nm->line(153+2,59+159,153+33,59+0,$COLOR{blue}); # CNodeUniGorN-CNodeRustenborch
### link CNodeVosko1-CNodeStadhuis1 to short: 10
   $nm->line(367+0,210+118,367+25,210+0,$COLOR{blue}); # CNodeSOM-CNodeStadhuis2
   $nm->line(367+-1,210+118,367+24,210+0,$COLOR{blue}); # CNodeSOM-CNodeStadhuis2
   $nm->line(367+1,210+118,367+26,210+0,$COLOR{blue}); # CNodeSOM-CNodeStadhuis2
   $nm->line(367+-2,210+118,367+23,210+0,$COLOR{blue}); # CNodeSOM-CNodeStadhuis2
   $nm->line(367+2,210+118,367+27,210+0,$COLOR{blue}); # CNodeSOM-CNodeStadhuis2
### link CNodeCeTIM2-CNodeStadhuis3 to short: 17
### link CNodeVosko2-CNodeThomas to short: 19

   $COLOR{mycolor}=$nm->colorAllocate(0,157,180);
   $nm->line(338+0,355+20,338+13,355+0,$COLOR{blue}); # CNodeIMI-CNodeThomas
   $nm->line(338+-1,355+20,338+12,355+0,$COLOR{blue}); # CNodeIMI-CNodeThomas
   $nm->line(338+1,355+20,338+14,355+0,$COLOR{blue}); # CNodeIMI-CNodeThomas
   $nm->line(338+-2,355+20,338+11,355+0,$COLOR{blue}); # CNodeIMI-CNodeThomas
   $nm->line(338+2,355+20,338+15,355+0,$COLOR{blue}); # CNodeIMI-CNodeThomas
   $nm->line(797+0,277+287,797+0,277+0,$COLOR{gray}); # CNodeWBRotary1-CNodeTrekkertrek
   $nm->setStyle(($COLOR{red}) x 8 , (gdTransparent) x 8);

   $COLOR{mycolor}=$nm->colorAllocate(0,180,80);
   $nm->line(159+0,218+0,159+168,218+98,$COLOR{blue}); # CNodeCope-CNodeUniGor
   $nm->line(159+0,218+-1,159+168,218+97,$COLOR{blue}); # CNodeCope-CNodeUniGor
   $nm->line(159+0,218+1,159+168,218+99,$COLOR{blue}); # CNodeCope-CNodeUniGor
   $nm->line(159+0,218+-2,159+168,218+96,$COLOR{blue}); # CNodeCope-CNodeUniGor
   $nm->line(159+0,218+2,159+168,218+100,$COLOR{blue}); # CNodeCope-CNodeUniGor
### link CNodeMeca-CNodeVAIPS to short: 0
   $nm->setStyle(($COLOR{green}) x 10 , (gdTransparent) x 5);

   $COLOR{mycolor}=$nm->colorAllocate(0,180,0);
   $nm->line(392+0,210+0,392+405,210+0,$COLOR{blue}); # CNodeSOM-CNodeVeldbies
   $nm->line(392+0,210+-1,392+405,210+-1,$COLOR{blue}); # CNodeSOM-CNodeVeldbies
   $nm->line(392+0,210+1,392+405,210+1,$COLOR{blue}); # CNodeSOM-CNodeVeldbies
   $nm->line(392+0,210+-2,392+405,210+-2,$COLOR{blue}); # CNodeSOM-CNodeVeldbies
   $nm->line(392+0,210+2,392+405,210+2,$COLOR{blue}); # CNodeSOM-CNodeVeldbies

   $COLOR{mycolor}=$nm->colorAllocate(0,180,0);
   $nm->line(694+0,277+78,694+103,277+0,$COLOR{blue}); # CNodeGraficall-CNodeWBRotary1
   $nm->line(694+0,277+77,694+103,277+-1,$COLOR{blue}); # CNodeGraficall-CNodeWBRotary1
   $nm->line(694+0,277+79,694+103,277+1,$COLOR{blue}); # CNodeGraficall-CNodeWBRotary1
   $nm->line(694+0,277+76,694+103,277+-2,$COLOR{blue}); # CNodeGraficall-CNodeWBRotary1
   $nm->line(694+0,277+80,694+103,277+2,$COLOR{blue}); # CNodeGraficall-CNodeWBRotary1

   $COLOR{mycolor}=$nm->colorAllocate(0,180,0);
   $nm->line(261+0,163+16,261+31,163+0,$COLOR{blue}); # CNodeAZC-CNodeWP
   $nm->line(261+0,163+15,261+31,163+-1,$COLOR{blue}); # CNodeAZC-CNodeWP
   $nm->line(261+0,163+17,261+31,163+1,$COLOR{blue}); # CNodeAZC-CNodeWP
   $nm->line(261+0,163+14,261+31,163+-2,$COLOR{blue}); # CNodeAZC-CNodeWP
   $nm->line(261+0,163+18,261+31,163+2,$COLOR{blue}); # CNodeAZC-CNodeWP
   $nm->line(261+0,172+7,261+84,172+0,$COLOR{blue}); # CNodeAZC-CNodeWissel
   $nm->line(261+0,172+6,261+84,172+-1,$COLOR{blue}); # CNodeAZC-CNodeWissel
   $nm->line(261+0,172+8,261+84,172+1,$COLOR{blue}); # CNodeAZC-CNodeWissel
   $nm->line(261+0,172+5,261+84,172+-2,$COLOR{blue}); # CNodeAZC-CNodeWissel
   $nm->line(261+0,172+9,261+84,172+2,$COLOR{blue}); # CNodeAZC-CNodeWissel
   $nm->line(345+0,172+0,345+47,172+38,$COLOR{blue}); # CNodeSOM-CNodeWissel
   $nm->line(345+0,172+-1,345+47,172+37,$COLOR{blue}); # CNodeSOM-CNodeWissel
   $nm->line(345+0,172+1,345+47,172+39,$COLOR{blue}); # CNodeSOM-CNodeWissel
   $nm->line(345+0,172+-2,345+47,172+36,$COLOR{blue}); # CNodeSOM-CNodeWissel
   $nm->line(345+0,172+2,345+47,172+40,$COLOR{blue}); # CNodeSOM-CNodeWissel
   $nm->dashedLine(490+0,277+318,490+307,277+0,$COLOR{gray}); # CNodeWBRotary1-CNodeZTMAalstln
   $nm->line(392+0,210+0,392+131,210+86,$COLOR{blue}); # CNodeSOM-CNodeZijloever
   $nm->line(392+0,210+-1,392+131,210+85,$COLOR{blue}); # CNodeSOM-CNodeZijloever
   $nm->line(392+0,210+1,392+131,210+87,$COLOR{blue}); # CNodeSOM-CNodeZijloever
   $nm->line(392+0,210+-2,392+131,210+84,$COLOR{blue}); # CNodeSOM-CNodeZijloever
   $nm->line(392+0,210+2,392+131,210+88,$COLOR{blue}); # CNodeSOM-CNodeZijloever
   $nm->line(517+0,296+114,517+6,296+0,$COLOR{blue}); # CNodeRoomburgh1-CNodeZijloever
   $nm->line(517+-1,296+114,517+5,296+0,$COLOR{blue}); # CNodeRoomburgh1-CNodeZijloever
   $nm->line(517+1,296+114,517+7,296+0,$COLOR{blue}); # CNodeRoomburgh1-CNodeZijloever
   $nm->line(517+-2,296+114,517+4,296+0,$COLOR{blue}); # CNodeRoomburgh1-CNodeZijloever
   $nm->line(517+2,296+114,517+8,296+0,$COLOR{blue}); # CNodeRoomburgh1-CNodeZijloever
   $nm->line(523+0,296+0,523+171,296+59,$COLOR{blue}); # CNodeGraficall-CNodeZijloever
   $nm->line(523+0,296+-1,523+171,296+58,$COLOR{blue}); # CNodeGraficall-CNodeZijloever
   $nm->line(523+0,296+1,523+171,296+60,$COLOR{blue}); # CNodeGraficall-CNodeZijloever
   $nm->line(523+0,296+-2,523+171,296+57,$COLOR{blue}); # CNodeGraficall-CNodeZijloever
   $nm->line(523+0,296+2,523+171,296+61,$COLOR{blue}); # CNodeGraficall-CNodeZijloever
   $nm->line(78+0,342+33,78+118,342+0,$COLOR{blue}); # CNodeJorg2-CNodeZwaluwak
   $nm->line(78+0,342+32,78+118,342+-1,$COLOR{blue}); # CNodeJorg2-CNodeZwaluwak
   $nm->line(78+0,342+34,78+118,342+1,$COLOR{blue}); # CNodeJorg2-CNodeZwaluwak
   $nm->line(78+0,342+31,78+118,342+-2,$COLOR{blue}); # CNodeJorg2-CNodeZwaluwak
   $nm->line(78+0,342+35,78+118,342+2,$COLOR{blue}); # CNodeJorg2-CNodeZwaluwak
   $nm->line(78+0,218+157,78+81,218+0,$COLOR{blue}); # CNodeUniGor-CNodeZwaluwak
   $nm->line(78+-1,218+157,78+80,218+0,$COLOR{blue}); # CNodeUniGor-CNodeZwaluwak
   $nm->line(78+1,218+157,78+82,218+0,$COLOR{blue}); # CNodeUniGor-CNodeZwaluwak
   $nm->line(78+-2,218+157,78+79,218+0,$COLOR{blue}); # CNodeUniGor-CNodeZwaluwak
   $nm->line(78+2,218+157,78+83,218+0,$COLOR{blue}); # CNodeUniGor-CNodeZwaluwak
   $nm->line(78+0,375+0,78+35,375+38,$COLOR{blue}); # CNodeOBLste-CNodeZwaluwak
   $nm->line(78+-1,375+0,78+34,375+38,$COLOR{blue}); # CNodeOBLste-CNodeZwaluwak
   $nm->line(78+1,375+0,78+36,375+38,$COLOR{blue}); # CNodeOBLste-CNodeZwaluwak
   $nm->line(78+-2,375+0,78+33,375+38,$COLOR{blue}); # CNodeOBLste-CNodeZwaluwak
   $nm->line(78+2,375+0,78+37,375+38,$COLOR{blue}); # CNodeOBLste-CNodeZwaluwak
   $nm->line(82+0,342+100,82+114,342+0,$COLOR{blue}); # CNodeJorg2-CNodeZwaluwmz
   $nm->line(82+0,342+99,82+114,342+-1,$COLOR{blue}); # CNodeJorg2-CNodeZwaluwmz
   $nm->line(82+0,342+101,82+114,342+1,$COLOR{blue}); # CNodeJorg2-CNodeZwaluwmz
   $nm->line(82+0,342+98,82+114,342+-2,$COLOR{blue}); # CNodeJorg2-CNodeZwaluwmz
   $nm->line(82+0,342+102,82+114,342+2,$COLOR{blue}); # CNodeJorg2-CNodeZwaluwmz
   $nm->line(82+0,413+29,82+31,413+0,$COLOR{blue}); # CNodeOBLste-CNodeZwaluwmz
   $nm->line(82+0,413+28,82+31,413+-1,$COLOR{blue}); # CNodeOBLste-CNodeZwaluwmz
   $nm->line(82+0,413+30,82+31,413+1,$COLOR{blue}); # CNodeOBLste-CNodeZwaluwmz
   $nm->line(82+0,413+27,82+31,413+-2,$COLOR{blue}); # CNodeOBLste-CNodeZwaluwmz
   $nm->line(82+0,413+31,82+31,413+2,$COLOR{blue}); # CNodeOBLste-CNodeZwaluwmz
   $nm->line(82+0,442+0,82+123,442+23,$COLOR{blue}); # CNodeAJSoft-CNodeZwaluwmz
   $nm->line(82+0,442+-1,82+123,442+22,$COLOR{blue}); # CNodeAJSoft-CNodeZwaluwmz
   $nm->line(82+0,442+1,82+123,442+24,$COLOR{blue}); # CNodeAJSoft-CNodeZwaluwmz
   $nm->line(82+0,442+-2,82+123,442+21,$COLOR{blue}); # CNodeAJSoft-CNodeZwaluwmz
   $nm->line(82+0,442+2,82+123,442+25,$COLOR{blue}); # CNodeAJSoft-CNodeZwaluwmz
   
      $nm->copy($gredot,792,590,0,0,10,10); # CNodeAA24
   $nm->string(gdSmallFont,774,588.666666666667,AA24,$COLOR{black});
   $nm->copy($gredot,200,460,0,0,10,10); # CNodeAJSoft
   $nm->string(gdSmallFont,210,458.666666666667,AJSoft,$COLOR{black});
   $nm->copy($gredot,256,174,0,0,10,10); # CNodeAZC
   $nm->string(gdSmallFont,266,172.666666666667,AZC,$COLOR{black});
   $nm->copy($gredot,792,15,0,0,10,10); # CNodeBDboon
   $nm->string(gdSmallFont,802,13.6666666666667,BDboon,$COLOR{black});
   $nm->copy($gredot,198,464,0,0,10,10); # CNodeBizet
   $nm->string(gdSmallFont,208,462.666666666667,Bizet,$COLOR{black});
   $nm->copy($gredot,445,81,0,0,10,10); # CNodeBroekplein
   $nm->string(gdSmallFont,455,79.6666666666667,Broekplein,$COLOR{black});
   $nm->copy($gredot,225,192,0,0,10,10); # CNodeBrug
   $nm->string(gdSmallFont,235,190.666666666667,Brug,$COLOR{black});
   $nm->copy($gredot,374,321,0,0,10,10); # CNodeBurcht
   $nm->string(gdSmallFont,384,319.666666666667,Burcht,$COLOR{black});
   $nm->copy($gredot,226,234,0,0,10,10); # CNodeCamimplants
   $nm->string(gdSmallFont,236,232.666666666667,Camimplants,$COLOR{black});
   $nm->copy($gredot,389,326,0,0,10,10); # CNodeCeTIM1
   $nm->string(gdSmallFont,399,324.666666666667,CeTIM1,$COLOR{black});
   $nm->copy($gredot,385,332,0,0,10,10); # CNodeCeTIM2
   $nm->string(gdSmallFont,395,330.666666666667,CeTIM2,$COLOR{black});
   $nm->copy($gredot,383,326,0,0,10,10); # CNodeCeTIM3
   $nm->string(gdSmallFont,357,324.666666666667,CeTIM3,$COLOR{black});
   $nm->copy($gredot,322,311,0,0,10,10); # CNodeCope
   $nm->string(gdSmallFont,304,309.666666666667,Cope,$COLOR{black});
   $nm->copy($gredot,350,340,0,0,10,10); # CNodeDirkx
   $nm->string(gdSmallFont,360,338.666666666667,Dirkx,$COLOR{black});
   $nm->copy($gredot,445,590,0,0,10,10); # CNodeDuivenHok
   $nm->string(gdSmallFont,455,588.666666666667,DuivenHok,$COLOR{black});
   $nm->copy($gredot,748,590,0,0,10,10); # CNodeGandalf
   $nm->string(gdSmallFont,718,588.666666666667,Gandalf,$COLOR{black});
   $nm->copy($gredot,152,366,0,0,10,10); # CNodeGer
   $nm->string(gdSmallFont,162,364.666666666667,Ger,$COLOR{black});
   $nm->copy($gredot,792,590,0,0,10,10); # CNodeGerard
   $nm->string(gdSmallFont,766,588.666666666667,Gerard,$COLOR{black});
   $nm->copy($gredot,689,350,0,0,10,10); # CNodeGraficall
   $nm->string(gdSmallFont,699,348.666666666667,Graficall,$COLOR{black});
   $nm->copy($gredot,346,448,0,0,10,10); # CNodeGrip
   $nm->string(gdSmallFont,356,446.666666666667,Grip,$COLOR{black});
   $nm->copy($gredot,792,211,0,0,10,10); # CNodeHMKerk1
   $nm->string(gdSmallFont,802,209.666666666667,HMKerk1,$COLOR{black});
   $nm->copy($gredot,792,201,0,0,10,10); # CNodeHMKerk2
   $nm->string(gdSmallFont,762,199.666666666667,HMKerk2,$COLOR{black});
   $nm->copy($grydot,792,191,0,0,10,10); # CNodeHMgw2
   $nm->string(gdSmallFont,770,189.666666666667,HMgw2,$COLOR{black});
   $nm->copy($grydot,792,395,0,0,10,10); # CNodeHWFortis
   $nm->string(gdSmallFont,802,393.666666666667,HWFortis,$COLOR{black});
   $nm->copy($gredot,236,497,0,0,10,10); # CNodeHaagwijk
   $nm->string(gdSmallFont,246,495.666666666667,Haagwijk,$COLOR{black});
   $nm->copy($gredot,792,590,0,0,10,10); # CNodeHans
   $nm->string(gdSmallFont,774,588.666666666667,Hans,$COLOR{black});
   $nm->copy($gredot,275,31,0,0,10,10); # CNodeHofwijck
   $nm->string(gdSmallFont,285,29.6666666666667,Hofwijck,$COLOR{black});
   $nm->copy($gredot,414,263,0,0,10,10); # CNodeHoutmarkt
   $nm->string(gdSmallFont,424,261.666666666667,Houtmarkt,$COLOR{black});
   $nm->copy($gredot,330,338,0,0,10,10); # CNodeHuub
   $nm->string(gdSmallFont,312,336.666666666667,Huub,$COLOR{black});
   $nm->copy($gredot,333,370,0,0,10,10); # CNodeIMI
   $nm->string(gdSmallFont,343,368.666666666667,IMI,$COLOR{black});
   $nm->copy($gredot,403,435,0,0,10,10); # CNodeIntCom
   $nm->string(gdSmallFont,377,433.666666666667,IntCom,$COLOR{black});
   $nm->copy($gredot,491,495,0,0,10,10); # CNodeJVC
   $nm->string(gdSmallFont,501,493.666666666667,JVC,$COLOR{black});
   $nm->copy($gredot,343,404,0,0,10,10); # CNodeJasper
   $nm->string(gdSmallFont,317,402.666666666667,Jasper,$COLOR{black});
   $nm->copy($gredot,194,334,0,0,10,10); # CNodeJorg
   $nm->string(gdSmallFont,176,332.666666666667,Jorg,$COLOR{black});
   $nm->copy($gredot,191,337,0,0,10,10); # CNodeJorg2
   $nm->string(gdSmallFont,169,335.666666666667,Jorg2,$COLOR{black});
   $nm->copy($gredot,792,15,0,0,10,10); # CNodeKaag
   $nm->string(gdSmallFont,774,13.6666666666667,Kaag,$COLOR{black});
   $nm->copy($gredot,792,15,0,0,10,10); # CNodeKaag2
   $nm->string(gdSmallFont,802,13.6666666666667,Kaag2,$COLOR{black});
   $nm->copy($grydot,792,590,0,0,10,10); # CNodeKoster
   $nm->string(gdSmallFont,802,588.666666666667,Koster,$COLOR{black});
   $nm->copy($gredot,299,448,0,0,10,10); # CNodeLCPL
   $nm->string(gdSmallFont,309,446.666666666667,LCPL,$COLOR{black});
   $nm->copy($gredot,792,15,0,0,10,10); # CNodeLMcederplein
   $nm->string(gdSmallFont,742,13.6666666666667,LMcederplein,$COLOR{black});
   $nm->copy($gredot,792,15,0,0,10,10); # CNodeLMdorp
   $nm->string(gdSmallFont,766,13.6666666666667,LMdorp,$COLOR{black});
   $nm->copy($gredot,792,15,0,0,10,10); # CNodeLMkempers1
   $nm->string(gdSmallFont,750,13.6666666666667,LMkempers1,$COLOR{black});
   $nm->copy($gredot,792,15,0,0,10,10); # CNodeLMkempers2
   $nm->string(gdSmallFont,802,13.6666666666667,LMkempers2,$COLOR{black});
   $nm->copy($gredot,792,15,0,0,10,10); # CNodeLMstruykverwo1
   $nm->string(gdSmallFont,734,13.6666666666667,LMstruykverwo1,$COLOR{black});
   $nm->copy($gredot,792,15,0,0,10,10); # CNodeLMstruykverwo2
   $nm->string(gdSmallFont,802,13.6666666666667,LMstruykverwo2,$COLOR{black});
   $nm->copy($gredot,298,225,0,0,10,10); # CNodeLebkov
   $nm->string(gdSmallFont,308,223.666666666667,Lebkov,$COLOR{black});
   $nm->copy($gredot,229,21,0,0,10,10); # CNodeLijtweg1
   $nm->string(gdSmallFont,195,19.6666666666667,Lijtweg1,$COLOR{black});
   $nm->copy($gredot,226,24,0,0,10,10); # CNodeLijtweg2
   $nm->string(gdSmallFont,236,22.6666666666667,Lijtweg2,$COLOR{black});
   $nm->copy($gredot,229,27,0,0,10,10); # CNodeLijtweg3
   $nm->string(gdSmallFont,195,25.6666666666667,Lijtweg3,$COLOR{black});
   $nm->copy($gredot,393,395,0,0,10,10); # CNodeLorentzhof
   $nm->string(gdSmallFont,403,393.666666666667,Lorentzhof,$COLOR{black});
   $nm->copy($gredot,328,282,0,0,10,10); # CNodeLvLn
   $nm->string(gdSmallFont,338,280.666666666667,LvLn,$COLOR{black});
   $nm->copy($gredot,340,282,0,0,10,10); # CNodeLvLn2
   $nm->string(gdSmallFont,350,280.666666666667,LvLn2,$COLOR{black});
   $nm->copy($gredot,340,360,0,0,10,10); # CNodeLvLz
   $nm->string(gdSmallFont,350,358.666666666667,LvLz,$COLOR{black});
   $nm->copy($gredot,449,424,0,0,10,10); # CNodeMarten
   $nm->string(gdSmallFont,423,422.666666666667,Marten,$COLOR{black});
   $nm->copy($gredot,5,15,0,0,10,10); # CNodeMeca
   $nm->string(gdSmallFont,15,13.6666666666667,Meca,$COLOR{black});
   $nm->copy($gredot,378,323,0,0,10,10); # CNodeOBLc
   $nm->string(gdSmallFont,360,321.666666666667,OBLc,$COLOR{black});
   $nm->copy($gredot,108,408,0,0,10,10); # CNodeOBLste
   $nm->string(gdSmallFont,118,406.666666666667,OBLste,$COLOR{black});
   $nm->copy($grydot,792,590,0,0,10,10); # CNodePPFortis
   $nm->string(gdSmallFont,802,588.666666666667,PPFortis,$COLOR{black});
   $nm->copy($gredot,400,372,0,0,10,10); # CNodePlantsoen
   $nm->string(gdSmallFont,410,370.666666666667,Plantsoen,$COLOR{black});
   $nm->copy($grydot,400,372,0,0,10,10); # CNodePlantsoen2
   $nm->string(gdSmallFont,410,370.666666666667,Plantsoen2,$COLOR{black});
   $nm->copy($gredot,376,473,0,0,10,10); # CNodeROCl
   $nm->string(gdSmallFont,386,471.666666666667,ROCl,$COLOR{black});
   $nm->copy($gredot,244,415,0,0,10,10); # CNodeRV
   $nm->string(gdSmallFont,254,413.666666666667,RV,$COLOR{black});
   $nm->copy($gredot,-9005,46695,0,0,10,10); # CNodeRWgemhuis1
   $nm->string(gdSmallFont,-9047,46693.6666666667,RWgemhuis1,$COLOR{black});
   $nm->copy($grydot,-9005,46695,0,0,10,10); # CNodeRWgemhuis2
   $nm->string(gdSmallFont,-8995,46693.6666666667,RWgemhuis2,$COLOR{black});
   $nm->copy($gredot,349,195,0,0,10,10); # CNodeRabo
   $nm->string(gdSmallFont,359,193.666666666667,Rabo,$COLOR{black});
   $nm->copy($gredot,529,94,0,0,10,10); # CNodeRegenboog
   $nm->string(gdSmallFont,539,92.6666666666667,Regenboog,$COLOR{black});
   $nm->copy($gredot,168,359,0,0,10,10); # CNodeRobijn
   $nm->string(gdSmallFont,178,357.666666666667,Robijn,$COLOR{black});
   $nm->copy($gredot,512,405,0,0,10,10); # CNodeRoomburgh1
   $nm->string(gdSmallFont,522,403.666666666667,Roomburgh1,$COLOR{black});
   $nm->copy($gredot,512,400,0,0,10,10); # CNodeRoomburgh2
   $nm->string(gdSmallFont,522,398.666666666667,Roomburgh2,$COLOR{black});
   $nm->copy($gredot,455,112,0,0,10,10); # CNodeRosmolen
   $nm->string(gdSmallFont,465,110.666666666667,Rosmolen,$COLOR{black});
   $nm->copy($gredot,490,385,0,0,10,10); # CNodeRuben
   $nm->string(gdSmallFont,500,383.666666666667,Ruben,$COLOR{black});
   $nm->copy($gredot,401,85,0,0,10,10); # CNodeRudi
   $nm->string(gdSmallFont,383,83.6666666666667,Rudi,$COLOR{black});
   $nm->copy($gredot,370,295,0,0,10,10); # CNodeRund
   $nm->string(gdSmallFont,380,293.666666666667,Rund,$COLOR{black});
   $nm->copy($gredot,179,54,0,0,10,10); # CNodeRustenborch
   $nm->string(gdSmallFont,133,52.6666666666667,Rustenborch,$COLOR{black});
   $nm->copy($grydot,792,590,0,0,10,10); # CNodeSHFortis
   $nm->string(gdSmallFont,802,588.666666666667,SHFortis,$COLOR{black});
   $nm->copy($gredot,387,205,0,0,10,10); # CNodeSOM
   $nm->string(gdSmallFont,397,203.666666666667,SOM,$COLOR{black});
   $nm->copy($gredot,356,329,0,0,10,10); # CNodeStadhuis1
   $nm->string(gdSmallFont,366,327.666666666667,Stadhuis1,$COLOR{black});
   $nm->copy($gredot,362,323,0,0,10,10); # CNodeStadhuis2
   $nm->string(gdSmallFont,372,321.666666666667,Stadhuis2,$COLOR{black});
   $nm->copy($gredot,368,329,0,0,10,10); # CNodeStadhuis3
   $nm->string(gdSmallFont,378,327.666666666667,Stadhuis3,$COLOR{black});
   $nm->copy($gredot,362,335,0,0,10,10); # CNodeStadhuis4
   $nm->string(gdSmallFont,372,333.666666666667,Stadhuis4,$COLOR{black});
   $nm->copy($gredot,346,350,0,0,10,10); # CNodeThomas
   $nm->string(gdSmallFont,356,348.666666666667,Thomas,$COLOR{black});
   $nm->copy($grydot,792,559,0,0,10,10); # CNodeTrekkertrek
   $nm->string(gdSmallFont,802,557.666666666667,Trekkertrek,$COLOR{black});
   $nm->copy($gredot,154,213,0,0,10,10); # CNodeUniGor
   $nm->string(gdSmallFont,164,211.666666666667,UniGor,$COLOR{black});
   $nm->copy($gredot,148,213,0,0,10,10); # CNodeUniGorN
   $nm->string(gdSmallFont,118,211.666666666667,UniGorN,$COLOR{black});
   $nm->copy($gredot,5,15,0,0,10,10); # CNodeVAIPS
   $nm->string(gdSmallFont,15,13.6666666666667,VAIPS,$COLOR{black});
   $nm->copy($gredot,792,205,0,0,10,10); # CNodeVeldbies
   $nm->string(gdSmallFont,802,203.666666666667,Veldbies,$COLOR{black});
   $nm->copy($gredot,346,331,0,0,10,10); # CNodeVosko1
   $nm->string(gdSmallFont,320,329.666666666667,Vosko1,$COLOR{black});
   $nm->copy($gredot,346,331,0,0,10,10); # CNodeVosko2
   $nm->string(gdSmallFont,356,329.666666666667,Vosko2,$COLOR{black});
   $nm->copy($gredot,792,272,0,0,10,10); # CNodeWBRotary1
   $nm->string(gdSmallFont,754,270.666666666667,WBRotary1,$COLOR{black});
   $nm->copy($gredot,792,282,0,0,10,10); # CNodeWBRotary2
   $nm->string(gdSmallFont,802,280.666666666667,WBRotary2,$COLOR{black});
   $nm->copy($gredot,287,158,0,0,10,10); # CNodeWP
   $nm->string(gdSmallFont,297,156.666666666667,WP,$COLOR{black});
   $nm->copy($gredot,340,167,0,0,10,10); # CNodeWissel
   $nm->string(gdSmallFont,314,165.666666666667,Wissel,$COLOR{black});
   $nm->copy($grydot,485,590,0,0,10,10); # CNodeZTMAalstln
   $nm->string(gdSmallFont,495,588.666666666667,ZTMAalstln,$COLOR{black});
   $nm->copy($gredot,518,291,0,0,10,10); # CNodeZijloever
   $nm->string(gdSmallFont,528,289.666666666667,Zijloever,$COLOR{black});
   $nm->copy($gredot,73,370,0,0,10,10); # CNodeZwaluwak
   $nm->string(gdSmallFont,83,368.666666666667,Zwaluwak,$COLOR{black});
   $nm->copy($gredot,77,437,0,0,10,10); # CNodeZwaluwmz
   $nm->string(gdSmallFont,87,435.666666666667,Zwaluwmz,$COLOR{black});
   $nm->copy($gredot,439,590,0,0,10,10); # CNodeZwet
   $nm->string(gdSmallFont,421,588.666666666667,Zwet,$COLOR{black});
   $nm->copy($gredot,319,316,0,0,10,10); # proxy1
   $nm->string(gdSmallFont,329,314.666666666667,proxy1,$COLOR{black});
   $nm->copy($gredot,394,330,0,0,10,10); # proxy2
   $nm->string(gdSmallFont,404,328.666666666667,proxy2,$COLOR{black});
   $nm->copy($gredot,238,420,0,0,10,10); # proxy3
   $nm->string(gdSmallFont,212,418.666666666667,proxy3,$COLOR{black});

   $nm->string(gdSmallFont,450,580,"Generated at: Thu Jul 28 14:59:59 2005 (rev: 4640)",$COLOR{black});
   $nm->string(gdSmallFont,0,0,"Generated at: Thu Jul 28 14:59:59 2005 (rev: 4640)",$COLOR{black});   
   open (F,">output/2005-07.jpg") || die "Bad file descriptor images/history.jpg";
   print F $nm->jpeg(85);
   close F;