So M()M Autokill? Okay, here is a snip from a few versions ago:
Code:
#=============================== AUTO KILL ==========================================
:autoKill
:kill
gosub :killthetriggers
gosub :quikstats
setVar $startingLocation $CURRENT_PROMPT
if ($startingLocation <> "Command")
if ($startingLocation = "Citadel")
if ($mode <> "Citkill")
setVar $user_command_line "citkill on override"
goto :runUserCommandLine
else
setVar $user_command_line "citkill off"
goto :runUserCommandLine
end
end
setVar $message "Wrong prompt for auto kill.*"
gosub :switchboard
goto :wait_for_command
end
if ($SHIP_MAX_ATTACK <= 0)
gosub :getShipStats
end
goSub :getSectorData
goSub :fastAttack
goto :wait_for_command
Ok, assume you made it past here, as no error message?
Code:
:fastAttack
setVar $targetString "a"
setVar $isFound FALSE
getWordPos $sectorData $beaconPos "[0m[35mBeacon [1;33m:"
:checkingFigs
if ($FIGHTERS > 0)
if ((($CURRENT_SECTOR > 10) AND ($CURRENT_SECTOR <> STARDOCK)) AND ($beaconPos > 0))
setVar $targetString $targetString&"*"
end
else
gosub :quikstats
if ($FIGHTERS <= 0)
echo ANSI_12 "*You have no fighters.*" ANSI_7
goto :stoppingPoint
else
goto :checkingFigs
end
end
if (($emptyShipCount + $fakeTraderCount + $realTraderCount) > 0)
setVar $i 0
while ($i < ($emptyShipCount + $fakeTraderCount))
setVar $targetString $targetString&"* "
add $i 1
end
setVar $c 1
while (($c <= $realTraderCount) AND ($isFound = FALSE))
if (($TRADERS[$c][1]) = ($CORP))
setVar $targetString $targetString&"* "
elseif ((($CURRENT_SECTOR <= 10) OR ($CURRENT_SECTOR = STARDOCK)) AND $TRADERS[$c][2] = TRUE)
setVar $targetString $targetString&"* "
else
setVar $isFound TRUE
setVar $targetString $targetString&"zy z"
end
add $c 1
end
else
setVar $message "You have no targets.*"
gosub :switchboard
goto :stoppingPoint
end
if ($isFound = TRUE)
setVar $attackString ""
while ($FIGHTERS > 0)
if ($FIGHTERS < $SHIP_MAX_ATTACK)
setVar $attackString $attackString&$targetString&$FIGHTERS&"* * "
setVar $FIGHTERS 0
else
setVar $attackString $attackString&$targetString&$SHIP_MAX_ATTACK&"* * "
setVar $FIGHTERS ($FIGHTERS - $SHIP_MAX_ATTACK)
end
end
else
setVar $message "You have no valid targets.*"
gosub :switchboard
goto :stoppingPoint
end
send $attackString&"* "
gosub :quikstats
:stoppingPoint
return
#============================ END AUTO KILL ============================================
So stuff to check I guess, is value of $message and $targetString?
Is the other player online at the time?
I should just go back to lurking...