Stargate E2s

[ryan260193]

Hi does anyone has any e2s involving avons stargate pack and/or CAP that they would be willing to share :P

[whosdr]

@name Chat Dialer V3
@inputs [Gate Iris]:wirelink
@persist [DialAddress]:number
@persist [Address Disabled Key]:string
@persist [Ranks]:table
@persist [O]:entity
if (first() | dupefinished()) {
    Ranks[owner():name(),number] = 9000
    runOnFile(1)
    fileLoad("sg_ranks.txt")
    O = owner()
    runOnChat(1)
    Key = "-"
}
 
#Fast dial
 
if (~Gate | first() | dupefinished()) {Gate["Dial Mode",number] = 1}
 
if (fileClk()) {
    if (fileRead()) {
        Ranks = glonDecodeTable(fileRead())
        print("Rank file loaded.")
    } else {
        print("Error loading rank files.")
        print("Use -regen to re-genorate.")
    }
}
 
if (chatClk(O)) {
    if (O:lastSaid():lower() == "-regen") {
        Ranks[owner():name(),number] = 9000
        fileWrite("sg_ranks.txt",glonEncode(Ranks))
    }
}
 
 
if (chatClk()) {
    Ply = lastSpoke()
    Rank = Ranks[Ply:name(),number]
    Explode = Ply:lastSaid():lower():explode(" ")
    Arg1 = Explode[1,string]:sub(1,1)
    Arg2 = Explode[1,string]:sub(2,Explode[1,string]:length())
    Arg3 = Explode[2,string]
    Arg4 = Explode[3,string]


    if (Arg1 == Key) {
        if (Ply == owner()) {hideChat(1)}
        if (Rank >= 3) {
            if (Arg2 == "rank") {
                Player = findPlayerByName(Arg3)
                SetRank = Arg4:toNumber()
                if (Arg4 & Player) {
                    if (Ranks[Player:name(),number] < Rank) {
                        Ranks[Player:name(),number] = SetRank
                        fileWrite("sg_ranks.txt",glonEncode(Ranks))
                    }
                }
            }
 
            if (Arg2 == "key") {
                if (Arg3:length() == 1) {
                    Key = Arg3:index(1)
                }
            }
 
            if (Arg2 == "disable") {
                if (Arg3 == "all" | Arg3 == "inbound" | Arg3 == "outbound" | Arg3 == "none") {
                    Disabled = Arg3
                }
            }
        }
 
        if (Rank >= 2) {
            if (Arg2 == "dial") {
                Address = Arg3
                if (Address:length() == 6) {
                    timer("dial",20)
                    DialAddress = 0
                }
            }
 
            if (Arg2 == "retry") {timer("dial",20),DialAddress = 0}
 
            if (Arg2 == "close") {
                Gate["Close",number] = 1
                timer("Close",20)
            }
 
        }
 
 
    }
 
 
    if (Rank >= 1) {
        if (Arg2 == "iris") {
            if (Arg3 == "open") {
                Iris["Activate",number] = 0
            } elseif (Arg3 == "close") {
                Iris["Activate",number] = 1
            } else {
                Iris["Activate",number] = !Iris["Activated",number]
            }
        }
       
        if (Arg2 == "mode") {
            Gate["Dial Mode",number] = Arg3:replace("fast","1"):replace("slow","0"):toNumber()
        }
       
    }
 
}
 
 
if (clk("dial")) {
    DialAddress++
    if (DialAddress < 7) {
        Gate["Dial Address",number] = toByte(Address:index(DialAddress))
        timer("dial",20)
    } else {
        Gate["Dial Address",number] = 13
    }
}
 
if (clk("close")) {Gate["Close",number] = 0}
 
if (Disabled != "none") {timer("disabled",1000)}
 
if (clk("disabled")) {
    if (Disabled == "all") {
        if (Gate["Active",number]) {
            Gate["Close",number] = 1
            timer("close",20)
        }
    } elseif (Disabled == "inbound") {
        if (Gate["Active",number] & Gate["Inbound",number]) {
            Gate["Close",number] = 1
            timer("close",20)
        }
    } elseif (Disabled == "outbound") {
        if (Gate["Active",number] & !Gate["Inbound",number]) {
            Gate["Close",number] = 1
            timer("close",20)
        }
    }
}

Paste it, type -regen for the first time it's pasted (In total, not per server).

Commands:
-rank *name* *0-3*
-mode *fast/slow/1/0*
-iris *open/close/1/0*
-key *character*
-dial *address*

Note that the 'key' command changes the prefix. So -rank could become #rank after running -key #.

[ryan260193]

thanks wouldnt suppose u would have one that makes walter call out the chevron each time a chevron is engaged :L

[whosdr]

Probably somewhere. I've years and thus hundreds of them around.

Edit:

Old code, but should do the trick.

@name 
@inputs Chevron
if (Chevron <= 6) {soundPlay(1,1000,"stargate/walter/c"+Chevron+".mp3")}
if (Chevron == 7) {soundPlay(1,1000,"stargate/walter/c7_locked.mp3")}
if (Chevron == -7) {soundPlay(1,1000,"stargate/walter/c7_failed.mp3")}

[ryan260193]

thanks

[EastBayWilly]

I remember making a remote Stargate disabler. Basically when it's activated the nearest stargate is unable to dial out or in. Fun times on some servers with that one.

"What the fuck, my stargates broken, it won't dial out!"
"Nope, I've sabotaged it."
"No you didnt, prop protection bro."
"Wire bro."
"Shut it off!"
"Nah, you're species is a threat to me, I'm happy knowing your stuck on your planet."
"Ffffffffffffffffffffff-"

[editline]10th May 2011[/editline]

For servers where the only inputs allowed are buttons I just set up a wire receiver. Wireless activation. Otherwise I'd be stuck too.