www.ClassicTW.com
https://mail.black-squirrel.com/

Ender’s Corner
https://mail.black-squirrel.com/viewtopic.php?f=15&t=18465		 Page 1 of 1
Author:  PhoieX [ Sat Jan 20, 2007 1:56 pm ]
Post subject: 
Here I will be posting work on my new scripts. The first of this installment is going to be my new, "Auto Defense" the hope of this script is to combine reloader, with some advanced options, for maximum planet, port, and sector protection. Here's what I got so far;

#Ender's Auto Defense v1.0
send "'Ender's Auto Defense v1.0 loaded! *"

:planetDefense   
    echo ANSI_13 & "*Are you defending planets?*"
    getInput $planetDefense "(Y)es / (N)o"

    if ($planetDefense = "y") or ($planetDefense = "Y")
        clientMessage "Activating Planet Defense Option! Please, standby!"
        goto :planetDefense2
    else
        goto :portDefense
    end

:planetDefense2
    echo ANSI_13 & "*Would you like to reload figs?*"
    getInput $reloadFigs "(Y)es / (N)o"

        if ($reloadFigs = "y") or ($reloadFigs = "Y")
            echo ANSI_13 & "*What planet do we grab figs from?*"
            getInput $planetNumberF "Planet #"
        end
   
    echo ANSI_13 & "*Would you like to reload shields?*"
    getInput $reloadShields "(Y)es / (N)o"

        if ($reloadShields = "y") or ($reloadShields = "Y")
            echo ANSI_13 & "*What planet do we grab shields from?*"
            getInput $reloadShields "Planet #"
        end
   
    echo ANSI_13 & "*Shall we photon adjacents upon hit?*"
    getInput $photonAdjacent "(Y)es / (N)o"

        if ($photonAdjacent = "y") or ($photonAdjacent = "Y")
            clientMessage "Getting adjacents"
            Send "d"
            setTextLineTrigger getting :getting "Sector  :"
            PAUSE
            :getting
            getword currentline $sector 3
        end
   
    send "'Ender's Auto Defense running hot at my ta! Watch your Butt! *"
    clientMessage "Pausing here to wait for someone to hit adjacent. Photons are hot!"

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

    If ($fighit = $sectordata.warp[1])
        send "c p y" $fighit "*qsh"
        Send "'Photons away! Auto Defense powering up! *"
        Send "'Photon launched into " $fighit "*"
    end

    If ($fighit = $sectordata.warp[2])
        send "c p y" $fighit "*qsh"
        Send "'Photons away! Auto Defense powering up! *"
        Send "'Photon launched into " $fighit "*"
    end

    If ($fighit = $sectordata.warp[3])
        send "c p y" $fighit "*qsh"
        Send "'Photons away! Auto Defense powering up! *"
        Send "'Photon launched into " $fighit "*"
    end

    If ($fighit = $sectordata.warp[4])
        send "c p y" $fighit "*qsh"
        Send "'Photons away! Auto Defense powering up! *"
        Send "'Photon launched into " $fighit "*"
    end

    If ($fighit = $sectordata.warp[5])
        send "c p y" $fighit "*qsh"
        Send "'Photons away! Auto Defense powering up! *"
        Send "'Photon launched into " $fighit "*"
    end

    If ($fighit = $sectordata.warp[6])
        send "c p y" $fighit "*qsh"
        Send "'Photons away! Auto Defense powering up! *"
        Send "'Photon launched into " $fighit "*"
    end

   
:portDefense
    echo ANSI_13 & "*Are you defending a port?*"
    getInput $portDefense "(Y)es / (N)o"
   
    if ($portDefense = "y") or ($portDefense = "Y")
        clientMessage "Activating Port Defense Option! Please, standby!"
        goto :$portDefense2
    else
        goto :deadEndDefense
    end

:portDefense2
    HALT

:deadEndDefense
    echo ANSI_13 & "*Are you defending a dead end?*"
    getInput $deadEndDefense "(Y)es / (N)o"
   
    if ($deadEndDefense = "y") or ($deadEndDefense = "Y")
        clientMessage "Activating Dead End Defense Option! Please, standby!"
        goto :$deadEndDefense2
    else
        goto :HALT
    end

:deadEndDefense2
    HALT

:HALT
    clientMessage "This script only currently allows for the previouslly listed options!"
    clientMessage "This script only currently allows for the previouslly listed options!"
    clientMessage "This script only currently allows for the previouslly listed options!"
    clientMessage "This script only currently allows for the previouslly listed options!"
HALT
   

As you can see, a work in progress, in a nut shell i'm combining some of my better scripts, like dock photon, and auto_responder to create one hell of a script for afk defense of assets...
   
Page 1 of 1 All times are UTC - 5 hours
Powered by phpBB © 2000, 2002, 2005, 2007 phpBB Group
http://www.phpbb.com/