send "/"

waitfor "Armd"
gettext CURRENTLINE $torps "Phot" "³Armd"
striptext $torps " "
striptext $sector " "

if ($torps = 0)
   echo ANSI_12 "** You don't have " ANSI_11 "any " ANSI_12 "ptorps!!!"
   echo ANSI_15 "** Shutting Down!"
   halt
end

echo ansi_12 "***Enter prelock sector to photon****"
getConsoleinput $preLockSector

getlength $preLockSector $len

cutText $preLockSector $digit ($len - 1) 1

send "cpy " $preLockSector

:lblStartWatch
  setTextTrigger figHit :figEnter "Report Sector " & $preLockSector & ":"
  setTextTrigger limpHit :limpActivate "Limpet mine in " & $preLockSector
  setDelayTrigger alive :alive 45000
  pause

:alive
  setDelayTrigger alive :alive 45000
  send #08 $digit
  pause

:limpActivate
  killtrigger figHit
  killtrigger alive
  send "* q"
  halt

:figEnter
   killtrigger limpHit
   killtrigger alive
   send "* q"
   halt
   
# below checks for alien hits - move up after "killtrigger limpHit" along with other spoof checks
    getwordpos CURRENTANSILINE $pos ": " & #27 & "[1;36m" & #27 & "[33m"
  if ($pos > 0)
     send #08 $digit
     goto :lblStartWatch
  end