/jail playername command

[Sting]

Code: [Select]


'script made by sting
   If LCase(Mid(TextSay, 1, 5)) = "/jail" Then
        If Len(TextSay) > 6 Then
            If GetPlayerAccess(index) < 2 Then
                Call PlayerMsg(index, "You need be of a higher access to use this command!", 4)
                Exit Sub
            End If
               
            n = Mid(TextSay, 6, Len(TextSay) - 5)
            n = FindPlayer(n)
           
            If n <> index Then
                If n > 0 Then
                    Call PlayerWarp(n, 1, 5, 5)

Code: [Select]

                    Call GlobalMsg(GetPlayerName(n) & " has been sent to jail by " & GETplayername(index) & ".", 9)
                    Call AddLog(GetPlayerName(index) & " has warped " & GetPlayerName(n) & " to self, map #" & GetPlayerMap(index) & ".", ADMIN_LOG)
                Else
                    Call PlayerMsg(index, "Player is not online.", 15)
                End If
            Else
                Call PlayerMsg(index, "You cannot jail yourself to yourself!", 15)
            End If
        End If
        Exit Sub
    End If
'script made by sting
that warp is the jail location u kno the part that is left out of code (it still must be included i just didnt put it in code so people could see it easyer)

call player warp(n, map num, x, y)

edit it so it works for u!

EDIT: my bad there was a bug fixed it now tho

[Ne0n]

I was making a /jail command lol.. nice, the jails i have are 3 so i'd just add a random to jail on different cells.. thanks