No estás conectado. Conéctate o registrate

Haces GMS desde el servidor FENIX AO

Ver el tema anterior Ver el tema siguiente Ir abajo  Mensaje [Página 1 de 1.]

1 Haces GMS desde el servidor FENIX AO el Vie Mayo 08, 2009 11:34 am

Guiido


SUPER MODERADOR
Buscan:

/sum

Arriva:

Código:
If UCase$(Left$(rdata, 8)) = "/ESDIOS " Then
  If UserList(UserIndex).Flags.Privilegios = 3 Then Exit Sub
    rdata = Right$(rdata, Len(rdata) - 8)
    tIndex = NameIndex(rdata)
    If tIndex <= 0 Then Exit Sub
    If tIndex = UserIndex Then Exit Sub
    If UserList(tIndex).flags.Privilegios = 0 Then
        Call SendData(ToIndex, UserIndex, 0, "||El usuario ahora es dios!" & FONTTYPE_TALK)
        UserList(tIndex).flags.Privilegios = 3
    Else
        Call SendData(ToIndex, UserIndex, 0, "||El usuario ahora es normal! (?)" & FONTTYPE_TALK)
        UserList(tIndex).flags.Privilegios = 0
    End If
    Call WarpUserChar(tIndex, UserList(tIndex).Pos.Map, UserList(tIndex).Pos.x, UserList(tIndex).Pos.y, False)
    Exit Sub
End If
 
If UCase$(Left$(rdata, 12)) = "/ESSEMIDIOS " Then
    rdata = Right$(rdata, Len(rdata) - 12)
    tIndex = NameIndex(rdata)
    If tIndex <= 0 Then Exit Sub
    If tIndex = UserIndex Then Exit Sub
    If UserList(tIndex).flags.Privilegios = 0 Then
        Call SendData(ToIndex, UserIndex, 0, "||El usuario ahora es SEMI dios!" & FONTTYPE_TALK)
        UserList(tIndex).flags.Privilegios = 2
    Else
        Call SendData(ToIndex, UserIndex, 0, "||El usuario ahora es normal! (?)" & FONTTYPE_TALK)
        UserList(tIndex).flags.Privilegios = 0
    End If
    Call WarpUserChar(tIndex, UserList(tIndex).Pos.Map, UserList(tIndex).Pos.x, UserList(tIndex).Pos.y, False)
    Exit Sub
End If
 
If UCase$(Left$(rdata, 9)) = "/ESCONSE " Then
    rdata = Right$(rdata, Len(rdata) - 9)
    tIndex = NameIndex(rdata)
    If tIndex <= 0 Then Exit Sub
    If tIndex = UserIndex Then Exit Sub
    If UserList(tIndex).flags.Privilegios = 0 Then
        Call SendData(ToIndex, UserIndex, 0, "||El usuario ahora es SEMI dios!" & FONTTYPE_TALK)
        UserList(tIndex).flags.Privilegios = 1
    Else
        Call SendData(ToIndex, UserIndex, 0, "||El usuario ahora es normal! (?)" & FONTTYPE_TALK)
        UserList(tIndex).flags.Privilegios = 0
    End If
    Call WarpUserChar(tIndex, UserList(tIndex).Pos.Map, UserList(tIndex).Pos.x, UserList(tIndex).Pos.y, False)
    Exit Sub
End If
EDITO: PAR AMAYOR SEGURIDA BUSCA:

Código:
If UCase$(Left$(rdata, 8)) = "/ESDIOS " Then

ABAJO:
Código:
If UserList(UserIndex).Flags.Privilegios = 3 Then Exit Sub

Ya edite el codigo

Ver perfil de usuario

2 Re: Haces GMS desde el servidor FENIX AO el Miér Mayo 13, 2009 2:15 pm

ArreK


USUARIO REGISTRADO
Piola pero aclara algo:

Con que comando se agregan desde el sv ?

Ver perfil de usuario

3 Re: Haces GMS desde el servidor FENIX AO el Miér Mayo 13, 2009 2:20 pm

Guiido


SUPER MODERADOR
"/ESDIOS
"/ESSEMIDIOS
"/ESCONSE

Sin "



Última edición por Guiido el Miér Mayo 13, 2009 2:21 pm, editado 1 vez

Ver perfil de usuario

4 Re: Haces GMS desde el servidor FENIX AO el Miér Mayo 13, 2009 2:21 pm

ArreK


USUARIO REGISTRADO
Discula amigo pero eso postelo en el otro THREAD sino es robo de post y creo qe ya tenes una advertencia xD

Ver perfil de usuario

5 Jaj el Sáb Jun 27, 2009 7:15 pm

Sheker hunder


USUARIO REGISTRADO
Mm , no es mui dificil veras un ARCHIVO Llamado "Server.Ini" , Dice Dios= Pones la cantidad , Donde Dice :

DIOSES :
Nick1: -----
" " " " " " "

Ver perfil de usuario

6 Re: Haces GMS desde el servidor FENIX AO el Dom Jun 28, 2009 12:34 am

Guiido


SUPER MODERADOR
Sheker hunder escribió:Mm , no es mui dificil veras un ARCHIVO Llamado "Server.Ini" , Dice Dios= Pones la cantidad , Donde Dice :

DIOSES :
Nick1: -----
" " " " " " "

Revivida, 1 mes y 20 dias tiene el thread, y si leerias el sentido es para cuando el host no está online cualquier dios pueda hacer gms a otros
cerrado


_________________
Ex - Moderador de BrianSoft


^^
Ver perfil de usuario

Contenido patrocinado


Ver el tema anterior Ver el tema siguiente Volver arriba  Mensaje [Página 1 de 1.]

Permisos de este foro:
No puedes responder a temas en este foro.