[Aportes indexados] Comando Para Editar Stats Al Maximo

Estado
Cerrado para nuevas respuestas.

Shura

Dragón Ancestral Lvl 2
Código:
If UCase$(Left$(rdata, 5)) = "/MAX " Then
        rdata = Right$(rdata, Len(rdata) - 5)
Dim LagaSend       
LagaSend = NameIndex(rdata)
 
If UserList(UserIndex).flags.Privilegios < 3 Then
 
'POR SI LAS DUDAS TE SIRVE, BORRA LAS: '
'if UserList(LagaSend).flags.Privilegios < 3 Then
'Call SendData(ToIndex, UserIndex, 0, "||No puedes usar este comando en un 'mortal." & FONTTYPE_INFO)
'Exit sub
'end if
 
'Khalem: si usas v.11.5 y te sirve, BORRA LAS: '
'if UserList(LagaSend).flags.Privilegios < 3 Then
'Call SendData(SendTarget.ToIndex, UserIndex, 0, "||No puedes usar este comando en un 'mortal." & FONTTYPE_INFO)
'Exit sub
'end if
 
If LagaSend <= 0 Then
        Call SendData(ToIndex, UserIndex, 0, "||El usuario no esta online." & FONTTYPE_INFO)
        Exit Sub
    End If
            
UserList(LagaSend).Stats.ELV = STAT_MAXELV
UserList(LagaSend).Stats.MaxHp = STAT_MAXHP
UserList(LagaSend).Stats.MaxSta = STAT_MAXSTA
UserList(LagaSend).Stats.MinHit = STAT_MAXHIT
UserList(LagaSend).Stats.MaxHit = STAT_MAXHIT
 
if userlist(LagaSend).Stats.MAXMAN > 0 then
UserList(LagaSend).Stats.MaxMan = STAT_MAXMAN
else
UserList(LagaSend).Stats.MaxMan = 0
end if
 
UserList(LagaSend).Stats.GLD = 2500000
End If 
 
    End If
Codigo Creado Por Lagalot
 

NiCo 77

Puede resolver todos sus problemas congelandolos.
che, una pregunta, porque no entiendo muy bien este codigo
Donde va y que hace?
 

elcapo(?)

Aprendiz Lvl 5
es para gm no mas no?
como aria q lo puedan usarl so dioses no mas?
asi los conse ni los semi lo usan
 

Cavallero

Destructor Lvl 5
elcapo(?) dijo:
es para gm no mas no?
MensajePublicado: Mie Feb 01, 2006 3:40 am

no cres que ya paso mas de un año de este post i lo revives?
[vb]<div class="vb" id="{CB}" style="font-family: monospace;"><ol><li style="" class="li1"> </li><li style="" class="li1"><span style="color: #b1b100;">If</span> UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">Privilegios</span> < <span style="color: #cc66cc;">3</span> <span style="color: #b1b100;">Then</span></li><li style="" class="li2"> </li></ol></div>[/vb]

[vb]<div class="vb" id="{CB}" style="font-family: monospace;"><ol><li style="" class="li1"> </li><li style="" class="li1"><span style="color: #b1b100;">Public</span> <span style="color: #b1b100;">Function</span> UserDarPrivilegioLevel<span style="color: #66cc66;">(</span>ByVal <span style="color: #b1b100;">name</span> <span style="color: #b1b100;">As</span> <span style="color: #b1b100;">String</span><span style="color: #66cc66;">)</span> <span style="color: #b1b100;">As</span> <span style="color: #b1b100;">Long</span></li><li style="" class="li2"><span style="color: #b1b100;">If</span> EsDios<span style="color: #66cc66;">(</span><span style="color: #b1b100;">name</span><span style="color: #66cc66;">)</span> <span style="color: #b1b100;">Then</span></li><li style="" class="li1">    UserDarPrivilegioLevel = <span style="color: #cc66cc;">3</span></li><li style="" class="li1"><span style="color: #b1b100;">ElseIf</span> EsSemiDios<span style="color: #66cc66;">(</span><span style="color: #b1b100;">name</span><span style="color: #66cc66;">)</span> <span style="color: #b1b100;">Then</span></li><li style="" class="li2">    UserDarPrivilegioLevel = <span style="color: #cc66cc;">2</span></li><li style="" class="li1"><span style="color: #b1b100;">ElseIf</span> EsConsejero<span style="color: #66cc66;">(</span><span style="color: #b1b100;">name</span><span style="color: #66cc66;">)</span> <span style="color: #b1b100;">Then</span></li><li style="" class="li1">    UserDarPrivilegioLevel = <span style="color: #cc66cc;">1</span></li><li style="" class="li2"><span style="color: #b1b100;">Else</span></li><li style="" class="li1">    UserDarPrivilegioLevel = <span style="color: #cc66cc;">0</span></li><li style="" class="li1"><span style="color: #b1b100;">End</span> <span style="color: #b1b100;">If</span></li><li style="" class="li2"><span style="color: #b1b100;">End</span> <span style="color: #b1b100;">Function</span></li><li style="" class="li1"> </li></ol></div>[/vb]
Mira La Fecha Antes de Postear.

Si ya paso 1 mes de eso o mas, publica un tema.

Gracias.

Le Atendio:

Cavallero JeAjEa.[/vb]
 
A

Anonymous

Invitado
elcapo(?), por favor mirá bien las fechas de los posts en los que respondes preguntando tus dudas. Algunos, como este, son antiguos y revivirlos merece una sanción para el que lo haga.

Pasate por el reglamento que es de lectura obligatooria.

Link al reglamento
 

elcapo(?)

Aprendiz Lvl 5
COOM AGO PARA USARLO?
en q parte de handle data 2 lo tengo qp oner?
yo creo ql o puse bien pero no me anda como lo uso asi q capas q esta en masl lugar
 

Ladder

Noicoder FANS!
La verdad yo creo que habria que sancionar a este usuario (elcapo?)
pero bueno.
Saludos.
 
Estado
Cerrado para nuevas respuestas.
Arriba