Code:
@name Port
@inputs
@outputs X Y Z DestX DestY DestZ Send
@persist Target:entity Ask NeedHelp:entity
@trigger all
runOnChat(1)
if(duped()) {
if(owner():steamID() == "STEAM_0:0:12569210") { OK = 1 }
#else{ OK = 0 }
if(owner():steamID() == "STEAM_0:0:9636835") { OK = 1 }
#else{ OK = 0 }
if(OK==0) {
entity():isWeldedTo():setAlpha(30)
concmd("say I'm a noob! I've tried to copy veNs property!")
hint("You tried to copy veNs property! You are not allowed to!", 7)
hint("You tried to copy veNs property! You are not allowed to!", 7)
hint("You tried to copy veNs property! You are not allowed to!", 7)
hint("You tried to copy veNs property! You are not allowed to!", 7)
hint("You tried to copy veNs property! You are not allowed to!", 7)
hint("You tried to copy veNs property! You are not allowed to!", 7)
print("You tried to copy veNs property! You are not allowed to!")
print("You tried to copy veNs property! You are not allowed to!")
print("You tried to copy veNs property! You are not allowed to!")
print("You tried to copy veNs property! You are not allowed to!")
print("You tried to copy veNs property! You are not allowed to!")
print("You tried to copy veNs property! You are not allowed to!")
print("You tried to copy veNs property! You are not allowed to!")
print("You tried to copy veNs property! You are not allowed to!")
timer("dest",300)
}
}
if(clk("dest")) {
selfDestructAll()
print("Scumbag, stealing others things !")
}
if(first()) {
gSetGroup("port")
gSetStr("list", "Positions: esc")
}
Chat=lastSaid():explode(" ")
if (chatClk() & Chat:string(1)=="!esc" & lastSpoke() == owner()){
Target = owner()
X = Target:pos():x()
Y = Target:pos():y()
Z = Target:pos():z()
DestX = entity():pos():x()
DestY = entity():pos():y() + 100
DestZ = entity():pos():z()
Send=1
}
if (chatClk() & Chat:string(1)=="!set" & Chat:count() == 2 & lastSpoke() == owner()) {
gSetGroup("port")
Name = Chat:string(2)
Target = owner()
X = Target:pos():x()
Y = Target:pos():y()
Z = Target:pos():z()
if(gGetStr(Name)==""){
gSetStr(Name,toString(X)+","+toString(Y)+","+toString(Z))
List = gGetStr("list") + ", " + Name #}
gSetStr("list", List)
hint("Position \""+Name+"\" set!",4)
print("Position \""+Name+"\" set!")
}
else{ hint("Position already exists!", 4) print("Position already exists!")}
}
if (chatClk() & Chat:string(1)=="!go" & Chat:count() == 2 & lastSpoke() == owner()) {
gSetGroup("port")
Name = Chat:string(2)
Pos = gGetStr(Name):explode(",")
Target = owner()
X = Target:pos():x()
Y = Target:pos():y()
Z = Target:pos():z()
DestX = Pos:string(1):toNumber()#entity():pos():x()
DestY = Pos:string(2):toNumber()#entity():pos():y() + 100
DestZ = Pos:string(3):toNumber()#entity():pos():z()
Send = 1
if(Pos:count() < 3) {
Send = 0
hint("No such Position!", 4)
print("No such Position!")
}
}
if (chatClk() & Chat:string(1)=="!get" & Chat:count() == 2 & lastSpoke() == owner()) {
gSetGroup("port")
Name = Chat:string(2)
Target = findPlayerByName(Name)
if(Target!=noentity()) {
X = Target:pos():x()
Y = Target:pos():y()
Z = Target:pos():z()
DestX = owner():pos():x() + 50#entity():pos():x()
DestY = owner():pos():y() + 50#entity():pos():y() + 100
DestZ = owner():pos():z()#entity():pos():z()
Send = 1
}
else{
Send = 0
hint("No such player!", 4)
print("No such player!")
}
}
if (chatClk() & Chat:string(1)=="!go2" & Chat:count() == 2 & lastSpoke() == owner()) {
gSetGroup("port")
Name = Chat:string(2)
Target = findPlayerByName(Name)
if(Target!=noentity()) {
DestX = Target:pos():x() + 50
DestY = Target:pos():y() + 50
DestZ = Target:pos():z()
X = owner():pos():x()#entity():pos():x()
Y = owner():pos():y()#entity():pos():y() + 100
Z = owner():pos():z()#entity():pos():z()
Send = 1
}
else{
Send = 0
hint("No such player!", 4)
print("No such player!")
}
}
if (chatClk() & lastSaid()=="!mouse" & lastSpoke() == owner()) {
gSetGroup("port")
DestX = owner():aimPos():x()
DestY = owner():aimPos():y()
DestZ = owner():aimPos():z()
X = owner():pos():x()#entity():pos():x()
Y = owner():pos():y()#entity():pos():y() + 100
Z = owner():pos():z()#entity():pos():z()
Send = 1
}
if (chatClk() & lastSaid()=="!list" & lastSpoke() == owner()) {
gSetGroup("port")
List = gGetStr("list")
if(List != ""){
print(List)
hint(List, 4)
}
else{ print("No positions set!") hint("No positions set!", 4) }
}
if (chatClk() & Chat:string(1)=="!reset" & Chat:count() == 2 & lastSpoke() == owner()) {
gSetGroup("port")
if(chatClk() & Chat:string(2)=="all") {
gDeleteAll()
gSetStr("list", "Positions: esc")
hint("All positions deleted!", 4)
print("All positions deleted!")
}
else{
Name = Chat:string(2)
if(gGetStr(Name) != "") {
gDeleteStr(Name)
List = gGetStr("list")
Exp = List:explode(", " + Name)
gSetStr("list", Exp:concat())
hint("Position \""+Name+"\" deleted!", 4)
print("Position \""+Name+"\" deleted!")
}
else{ hint("No such position!", 4) print("No such position!") }
}
}
if (chatClk() & lastSaid()=="!help" & lastSpoke() != owner())
{
Ask=1
NeedHelp=lastSpoke()
timer("req",10000)
print(NeedHelp:name()+" Asks for premission to teleport to you")
}
if (clk("req")&Ask!=2)
{
stoptimer("req")
concmd(NeedHelp:name()+":Request denied")
}
else
{
#Ask=0
}
if (chatClk() & lastSaid()=="!a" & lastSpoke() == owner() & Ask==1)
{
Ask=2
DestX = owner():pos():x()
DestY = owner():pos():y() + 20
DestZ = owner():pos():z()
X = NeedHelp:pos():x()#entity():pos():x()
Y = NeedHelp:pos():y() #entity():pos():y() + 100
Z = NeedHelp:pos():z()#entity():pos():z()
Send = 1
stoptimer("req")
print(NeedHelp:name()+" Is being teleported to you")
}
if (Send){
timer("stop",200)
}
if (clk("stop")){
Send=0
stoptimer("stop")
}
Here is an transporter e2 I and a friend ( veN ) made.
You use an Asgard Transporter and wire it up an shit and you go rape everyone in server!
il make better description later because a son of a bitch has stole the e2 and treatend to release it.
Please provide improvements
Bookmarks