Just put Photon Guard v1.5 up at Grimmy's, the script allows you to defend a dead-end or buble with auto fire/retreat on adjacent hit. As of now only supports direct warp, take a peek feedback welcome! Thanks

Grimmy is down but I wanted to let everyonek now I have completed some modifications to my Photon Guard script, I have added the ability to use TWarp, Express warp, or adjacent warp to retreat to sectors. I have eliminated all but one line of subspace chatter and added some warnings. I will be adding the ability with 2.5 to select multpile warp types based off retreat sector. I have tested this script and all appears to function extermely well and fast! Please check it out and let me know what you think, will post on Grimmy's when it comes back up:

#Ender's Phonton Guard v2.0
#Will do adjacent photon and retreat to sector, and reload photons
#Great for turn games to wack invasion of tunnel
#Ability to select warp type, adjacent, express, or TWarp


echo ANSI_12 & "*Ender's Photon Guard v2.0 with TWarp!*"
echo ANSI_15 & "*Please ensure that you are at command prompt, ensure that if you are doing express warp

your path is clear, if you are using TWarp a fig is down at retreat sector!*"

setVar $compare 1
setVar $line 1
Delete photon.txt

:Retreat
echo ANSI_13 & "*How many retreat sectors would you like to have?*"
getInput $howMany "How many sectors do you want to add to retreat to?"

echo ANSI_15 & "* Are the retreat sectors adjacent? *"
getInput $adjacent "(Y)es / (N)O"

If ($adjacent = "Y") or ($adjacent = "y")
echo ANSI_12 & "*Retreat sector Adjacent, no retreat type needed*"
setVar $string "*"
goto :AddSector
End

If ($adjacent = "N") or ($adjacent = "n")
echo ANSI_15 & "*How would you like to get to retreat sectors? *"
getInput $warp "(E)xpress warp / (T)rans warp"
If ($warp = "E") or ($warp = "e")
echo ANSI_12 & "*Retreat type is express, make sure your path is clear!*"
setVar $string "* e"
goto :AddSector
End

If ($warp = "T") or ($warp = "t")
setVar $string "* y y"
echo ANSI_12 & "*Retreat type TWarp make sure that figther is in retreat sector!*"
End
End

:AddSector
echo ANSI_13 & "*What is the " $compare " sector you want to add to your reatreat list?*"
getInput $Number "What is your retreat sector?"

Write photon.txt $Number

If ($compare <> $howMany)
Add $compare 1
goto :AddSector
end

Send "'Ender's Photon Guard is armed! Using " $howMany " retreat points! *"

:getSector
Send "d"
setTextLineTrigger getting :getting "Sector :"
PAUSE
:getting
getword currentline $sector 3

:all
getSector $sector $sectordata
setTextLineTrigger fighit :fighit "Deployed Fighters"
PAUSE
:fighit
getword currentline $fighit 5
striptext $fighit ":"

Read photon.txt $Number $line

If ($fighit = $sectordata.warp[1])
send "c p y" $fighit "*q"
Send "'Photons away! Retreating *"
Send "'Photon launched into " $fighit "*"
Send $Number
send $string
end

If ($fighit = $sectordata.warp[2])
send "c p y" $fighit "*q"
Send "'Photons away! Retreating *"
Send "'Photon launched into " $fighit "*"
Send $Number
send $string
end

If ($fighit = $sectordata.warp[3])
send "c p y" $fighit "*q"
Send "'Photons away! Retreating *"
Send "'Photon launched into " $fighit "*"
Send $Number
send $string
end

If ($fighit = $sectordata.warp[4])
send "c p y" $fighit "*q"
Send "'Photons away! Retreating *"
Send "'Photon launched into " $fighit "*"
Send $Number
send $string
end

If ($fighit = $sectordata.warp[5])
send "c p y" $fighit "*q"
Send "'Photons away! Retreating *"
Send "'Photon launched into " $fighit "*"
Send $Number
send $string
end

If ($fighit = $sectordata.warp[6])
send "c p y" $fighit "*q"
Send "'Photons away! Retreating *"
Send "'Photon launched into " $fighit "*"
Send $Number
send $string
end

KillAllTriggers
Add $line 1
goto :getSector
HALT