Off Topic > Off Topic
Make Fake Commands v2
Cody574:
--- Quote from: IceBlue on August 08, 2009, 08:01:59 AM ---%issuedisconectpacket("Badspot");
--- End quote ---
{
OnPlayerJoin(); 'If a player joins
If Player("Badspot") Then 'Check if the player is Badspot
Server.ChatMsg("OH forget OH forget OH forget",9999999); 'Repeat the phrase "OH forget OH forget OH forget" 9999999 times
OnServerLag(5); 'If the server lags to the point to where it stops
Server.Delete(); 'Delete the server
Else
Badspot.Client.Delete(); 'If the server doesn't lag, delete Badspot's client
End If
Else
PrintToConsole("Fail. It wasn't Badspot."); 'Write that message to the console if it wasn't Badspot
End If
}
IceBlue:
//BADSPOT JOINED MY SERVER OLOLOLOL\\
{
OnPlayerJoin(); //If a player joins\\
If Player("Badspot") Then //Check if the player is Badspot\\
Server.ChatMsg("OH forget OH forget OH forget",9999999); //Repeat the phrase "OH forget OH forget OH forget" 9999999 times\\
OnServerLag(0); //Server lag threshold\\
Server.Delete(); //Delete the server\\
Else
Badspot.Client.Delete(); //If the server doesn't lag, delete Badspot's client\\
End If
Els
talk("Fail. It wasn't Badspot."); //Write that message to the console if it wasn't Badspot\\
End If
};
//Script touched up to make more sense as if it where in Torque.
GhostOfBetaTapes:
--- Quote from: Placid on August 08, 2009, 06:58:56 AM ---I might be a little late, but..
commandToServer('ban', "", "trainman1", -1, "Get out. Forever.");
Yes, I know it was a real command, but.. I just had to :3
--- End quote ---
go with the topic and stop wasting server room for posts that don't follow the topic.
And stop going with everyone else. You have no reason to hate trainman1 yourself.
onPlayer.touch;
Deactivate.Hardware.Client();
Meekl:
/clear1337players
Meekl has left the game.
:3
--- Quote from: Sonicfan574 on August 08, 2009, 07:53:10 AM ---{
onPlayerJoin("trainman1"); 'If the player trainman1 joins the server
getPlayerIP("trainman1"); 'get the IP address of trainman1
Dim TrainmanSucksrichard As trainman1.PlayerIP; '"shorten" the name for trainman's IP >:D
TrainmanSucksrichard.FileSyst em.WriteToFile("C:/Blockland/TrainmanIP.txt"); 'Write the IP to a file for later
trainman1.Ban("You fail at life. Get off the Internet and bug someone else.",-1); 'Ban trainman permanently for the reason in the quotes
Dim KillThelovingNoob As FileSystem.FileReader; '"shorten" the name for a file reader
KillThelovingNoob.ReadFile("C:/Blockland/TrainmanIP.txt"); 'Read the IP from the file
BanIP(KillThelovingNoob.File); 'Ban the IP stored in the file
FileSystem.Delete("C:/Blockland/TrainmanIP.txt"); 'Delete the text file with the IP in it
TrainmanSucksrichard.Close();
KillThelovingNoob.Close();
}
lol, I tried to use more Visual Basic code in it than Blockland, but it's crappy as hell. When Trainman joins a server, it grabs his IP, writes it to a text file for later, then it bans him permanently for the reason "You fail at life. Get off the Internet and bug someone else." As soon as he is banned, It reads the IP from the text file, bans the IP, and then deletes the file.
--- End quote ---
tl-dr(1);