#You SHALL not pass
#O Knights of Ni, we have brought you your shrubbery. May we go now?

:start
Send "Drop target*"
Waitfor ">"
Setdelaytrigger delay :delayed 500
pause

:delayed
send "find online players*"
:newtext
Killalltriggers
Settextlinetrigger none :start "None"
Settextlinetrigger blank :blank
pause

:blank
setvar $line CURRENTLINE
isNumber $tmp $line
If ($tmp = FALSE)
goto :newtext
end

Send "use user " $tmp " as target*"

:watcher
Send "view target*"
SetTextlineTrigger watch :watch "Sector ="
pause

:watch
getword CURRENTLINE $currentSec 3
setVar $idx 1
While ($idx <= 10)
  If ($currentSec = $idx)
     goto :watcher
  else
   add $idx 1
end
end

send "exec target.move(1)*"
halt

#We Are Borg   Kaus/2012
#Revisions changes @ Bottom of the script
#-- BugTracker:
#-- Next Todo: Basic Code
#
#TestVar's
SetVar $ExpansionDelay 1

#---Setup
Send "Drop All*"
getrnd $Origin 1 10000
getrnd $Date 7 31
getrnd $Time 1 12
#getrnd $ExpansionDelay 60 180

#---Variables
#SetVar $ED ($ExpansionDelay * 60000)
SetVar $ED ($ExpansionDelay * 3000)

#---Check
#Check above variables to see if they should start

#---Start
Send "use sector " $Origin " as TarSec*"
Send "exec game.postevent({Fr+}!!!Warning -- Federation Perimeter Defenses Have Gone Offline -- Warning!!!)*"
Send "exec game.postevent({k}. )*"
Send "exec game.postevent({w+}Tactical report's show a wormhole opening in sec...t.o .r.. /System Error)*"
Send "exec game.postevent({k}. )*"
Send "exec game.postevent({w} --------------------Incoming message on all subspace channels----------------)*"
Send "exec game.postevent({k}. )*"
Send "exec game.postevent({r+}We are the Borg. Lower your shields and surrender your ships. We will add your) *"
Send "exec game.postevent({r+}biological and technological distinctiveness to our own. Your culture will adapt to service us.) *"
Send "exec game.postevent({k}                       .{r+}You Will Be Assimilated{k-}.) *"
Send "set TarSec.Nebulae=" #34 "Borg Space" #34 "*"
Send "set TarSec.Beacon=" #34 "The Invasion Has Begun" #34 "*"

#---Delay for expansion
SetDelaytrigger Delay :Delay 1000
pause

:Delay
Send "view TarSec*"
Waitfor "ArmidMines"

:Next
Killalltriggers
SetTextlineTrigger WarpCount :wc "WarpCount = "
SetTextlineTrigger Warps :warps "Warps = ("
Pause

:wc
getWord CURRENTLINE $WC 3
goto :Next

:warps
SetVar $line CURRENTLINE
SetVar $idx 0
While ($idx <> $WC)
  Add $idx 1
  Add $cnt 1
  Getword $line $NextTar[$idx] (2+$idx)
  Striptext $NextTar[$idx] ","
  Striptext $NextTar[$idx] "("
  Striptext $NextTar[$idx] ")"
end

#---Expansion
:Loopt
SetDelayTrigger Delay1 :Delay1 $ED
pause

:Delay1
While ($WC >= 1)
Send "Drop NextTar*"
Send "use sector " $NextTar[$WC] " as NextTar*"
Send "set NextTar.Nebulae=" #34 "Borg Space" #34 "*"
Subtract $WC 1
goto :Loopt
end

Halt

#-----------------------------------------------------------Revisions and 2do----------------------------------------------------
#Intentions  -  Borg Backend
# - Invasion via Nebula, Incrimential Ships, Intelligent Aliens, Interactive gameplay
# - Borg invaded worlds, BorgQueen, Borg Cube, Borg Scout, Borg Sphere, Unimatrix 1
# - Takes normal game and morph's slowly into Star Trek version, STORYLINE/INTERACTIVE
##