[Aportes indexados] Implemento al /MOD

Estado
Cerrado para nuevas respuestas.

DarkThom

Oráculo Lvl 3
[Servidor] Implemento al /MOD

Bueno Aca les Dejo el Codigo Para Poner un Pequeño Agregado al MOD
La Energia , Hambre y Mana

Buscan :

[vb]<div class="vb" id="{CB}" style="font-family: monospace;"><ol><li style="" class="li1">        <span style="color: #b1b100;">Case</span> <span style="color: #ffffff;">"EXP"</span> <span style="color: #808080;">'/mod yo exp 9995000</span></li><li style="" class="li1">            <span style="color: #b1b100;">If</span> tIndex <= <span style="color: #cc66cc;">0</span> <span style="color: #b1b100;">Then</span></li><li style="" class="li2">                <span style="color: #b1b100;">Call</span> SendData<span style="color: #66cc66;">(</span>ToIndex, UserIndex, <span style="color: #cc66cc;">0</span>, <span style="color: #ffffff;">"||Usuario offline:"</span> & tStr & FONTTYPE_INFO<span style="color: #66cc66;">)</span></li><li style="" class="li1">                <span style="color: #b1b100;">Exit</span> <span style="color: #b1b100;">Sub</span></li><li style="" class="li1">            <span style="color: #b1b100;">End</span> <span style="color: #b1b100;">If</span></li><li style="" class="li2">            </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;">EsRolesMaster</span> <span style="color: #b1b100;">Then</span> <span style="color: #b1b100;">Exit</span> <span style="color: #b1b100;">Sub</span></li><li style="" class="li1">            <span style="color: #b1b100;">If</span> <span style="color: #b1b100;">val</span><span style="color: #66cc66;">(</span>Arg2<span style="color: #66cc66;">)</span> < <span style="color: #cc66cc;">9999999999</span># <span style="color: #b1b100;">Then</span></li><li style="" class="li2">                <span style="color: #b1b100;">If</span> UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Stats</span>.<span style="color: #b1b100;">Exp</span> + <span style="color: #b1b100;">val</span><span style="color: #66cc66;">(</span>Arg2<span style="color: #66cc66;">)</span> > _</li><li style="" class="li1">                   UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Stats</span>.<span style="color: #66cc66;">ELU</span> <span style="color: #b1b100;">Then</span></li><li style="" class="li1">                   <span style="color: #b1b100;">Dim</span> resto</li><li style="" class="li2">                   resto = <span style="color: #b1b100;">val</span><span style="color: #66cc66;">(</span>Arg2<span style="color: #66cc66;">)</span> - UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Stats</span>.<span style="color: #66cc66;">ELU</span></li><li style="" class="li1">                   UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Stats</span>.<span style="color: #b1b100;">Exp</span> = UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Stats</span>.<span style="color: #b1b100;">Exp</span> + UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Stats</span>.<span style="color: #66cc66;">ELU</span></li><li style="" class="li1">                   <span style="color: #b1b100;">Call</span> CheckUserLevel<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span></li><li style="" class="li2">                   UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Stats</span>.<span style="color: #b1b100;">Exp</span> = UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Stats</span>.<span style="color: #b1b100;">Exp</span> + resto</li><li style="" class="li1">                <span style="color: #b1b100;">Else</span></li><li style="" class="li1">                   UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Stats</span>.<span style="color: #b1b100;">Exp</span> = <span style="color: #b1b100;">val</span><span style="color: #66cc66;">(</span>Arg2<span style="color: #66cc66;">)</span></li><li style="" class="li2">                <span style="color: #b1b100;">End</span> <span style="color: #b1b100;">If</span></li><li style="" class="li1">                <span style="color: #b1b100;">Call</span> SendUserStatsBox<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span></li><li style="" class="li1">            <span style="color: #b1b100;">Else</span></li><li style="" class="li2">                <span style="color: #b1b100;">Call</span> SendData<span style="color: #66cc66;">(</span>ToIndex, UserIndex, <span style="color: #cc66cc;">0</span>, <span style="color: #ffffff;">"||No esta permitido utilizar valores mayores a mucho. Su comando ha quedado en los logs del juego."</span> & FONTTYPE_INFO<span style="color: #66cc66;">)</span></li><li style="" class="li1">                <span style="color: #b1b100;">Exit</span> <span style="color: #b1b100;">Sub</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;">Case</span> <span style="color: #ffffff;">"BODY"</span></li><li style="" class="li1">            <span style="color: #b1b100;">If</span> tIndex <= <span style="color: #cc66cc;">0</span> <span style="color: #b1b100;">Then</span></li><li style="" class="li1">                <span style="color: #b1b100;">Call</span> WriteVar<span style="color: #66cc66;">(</span>CharPath & Replace$<span style="color: #66cc66;">(</span>ReadField<span style="color: #66cc66;">(</span><span style="color: #cc66cc;">1</span>, rdata, <span style="color: #cc66cc;">32</span><span style="color: #66cc66;">)</span>, <span style="color: #ffffff;">"+"</span>, <span style="color: #ffffff;">" "</span><span style="color: #66cc66;">)</span> & <span style="color: #ffffff;">".chr"</span>, <span style="color: #ffffff;">"INIT"</span>, <span style="color: #ffffff;">"Head"</span>, Arg2<span style="color: #66cc66;">)</span></li><li style="" class="li2">                <span style="color: #b1b100;">Call</span> SendData<span style="color: #66cc66;">(</span>ToIndex, UserIndex, <span style="color: #cc66cc;">0</span>, <span style="color: #ffffff;">"||Charfile Alterado:"</span> & tStr & FONTTYPE_INFO<span style="color: #66cc66;">)</span></li><li style="" class="li1">                <span style="color: #b1b100;">Exit</span> <span style="color: #b1b100;">Sub</span></li><li style="" class="li1">            <span style="color: #b1b100;">End</span> <span style="color: #b1b100;">If</span></li><li style="" class="li2">            </li><li style="" class="li1">            <span style="color: #b1b100;">Call</span> ChangeUserChar<span style="color: #66cc66;">(</span>ToMap, <span style="color: #cc66cc;">0</span>, UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Pos</span>.<span style="color: #66cc66;">Map</span>, tIndex, <span style="color: #b1b100;">val</span><span style="color: #66cc66;">(</span>Arg2<span style="color: #66cc66;">)</span>, UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Char</span>.<span style="color: #66cc66;">Head</span>, UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Char</span>.<span style="color: #66cc66;">Heading</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Char</span>.<span style="color: #66cc66;">WeaponAnim</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Char</span>.<span style="color: #66cc66;">ShieldAnim</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Char</span>.<span style="color: #66cc66;">CascoAnim</span><span style="color: #66cc66;">)</span></li><li style="" class="li1">            <span style="color: #b1b100;">Exit</span> <span style="color: #b1b100;">Sub</span></li><li style="" class="li2">        <span style="color: #b1b100;">Case</span> <span style="color: #ffffff;">"HEAD"</span></li><li style="" class="li1">            <span style="color: #b1b100;">If</span> tIndex <= <span style="color: #cc66cc;">0</span> <span style="color: #b1b100;">Then</span></li><li style="" class="li1">                <span style="color: #b1b100;">Call</span> WriteVar<span style="color: #66cc66;">(</span>CharPath & Replace$<span style="color: #66cc66;">(</span>ReadField<span style="color: #66cc66;">(</span><span style="color: #cc66cc;">1</span>, rdata, <span style="color: #cc66cc;">32</span><span style="color: #66cc66;">)</span>, <span style="color: #ffffff;">"+"</span>, <span style="color: #ffffff;">" "</span><span style="color: #66cc66;">)</span> & <span style="color: #ffffff;">".chr"</span>, <span style="color: #ffffff;">"INIT"</span>, <span style="color: #ffffff;">"Body"</span>, Arg2<span style="color: #66cc66;">)</span></li><li style="" class="li2">                <span style="color: #b1b100;">Call</span> SendData<span style="color: #66cc66;">(</span>ToIndex, UserIndex, <span style="color: #cc66cc;">0</span>, <span style="color: #ffffff;">"||Charfile Alterado:"</span> & tStr & FONTTYPE_INFO<span style="color: #66cc66;">)</span></li><li style="" class="li1">                <span style="color: #b1b100;">Exit</span> <span style="color: #b1b100;">Sub</span></li><li style="" class="li1">            <span style="color: #b1b100;">End</span> <span style="color: #b1b100;">If</span></li><li style="" class="li2">            </li><li style="" class="li1">            <span style="color: #b1b100;">Call</span> ChangeUserChar<span style="color: #66cc66;">(</span>ToMap, <span style="color: #cc66cc;">0</span>, UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Pos</span>.<span style="color: #66cc66;">Map</span>, tIndex, UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Char</span>.<span style="color: #66cc66;">Body</span>, <span style="color: #b1b100;">val</span><span style="color: #66cc66;">(</span>Arg2<span style="color: #66cc66;">)</span>, UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Char</span>.<span style="color: #66cc66;">Heading</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Char</span>.<span style="color: #66cc66;">WeaponAnim</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Char</span>.<span style="color: #66cc66;">ShieldAnim</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Char</span>.<span style="color: #66cc66;">CascoAnim</span><span style="color: #66cc66;">)</span></li><li style="" class="li1">            <span style="color: #b1b100;">Exit</span> <span style="color: #b1b100;">Sub</span></li><li style="" class="li2">        <span style="color: #b1b100;">Case</span> <span style="color: #ffffff;">"CRI"</span></li><li style="" class="li1">            <span style="color: #b1b100;">If</span> tIndex <= <span style="color: #cc66cc;">0</span> <span style="color: #b1b100;">Then</span></li><li style="" class="li1">                <span style="color: #b1b100;">Call</span> SendData<span style="color: #66cc66;">(</span>ToIndex, UserIndex, <span style="color: #cc66cc;">0</span>, <span style="color: #ffffff;">"||Usuario offline:"</span> & tStr & FONTTYPE_INFO<span style="color: #66cc66;">)</span></li><li style="" class="li2">                <span style="color: #b1b100;">Exit</span> <span style="color: #b1b100;">Sub</span></li><li style="" class="li1">            <span style="color: #b1b100;">End</span> <span style="color: #b1b100;">If</span></li><li style="" class="li1">            </li><li style="" class="li2">            <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;">EsRolesMaster</span> <span style="color: #b1b100;">Then</span> <span style="color: #b1b100;">Exit</span> <span style="color: #b1b100;">Sub</span></li><li style="" class="li1">            UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Faccion</span>.<span style="color: #66cc66;">CriminalesMatados</span> = <span style="color: #b1b100;">val</span><span style="color: #66cc66;">(</span>Arg2<span style="color: #66cc66;">)</span></li><li style="" class="li1">            <span style="color: #b1b100;">Exit</span> <span style="color: #b1b100;">Sub</span></li><li style="" class="li2">        <span style="color: #b1b100;">Case</span> <span style="color: #ffffff;">"CIU"</span></li><li style="" class="li1">            <span style="color: #b1b100;">If</span> tIndex <= <span style="color: #cc66cc;">0</span> <span style="color: #b1b100;">Then</span></li><li style="" class="li1">                <span style="color: #b1b100;">Call</span> SendData<span style="color: #66cc66;">(</span>ToIndex, UserIndex, <span style="color: #cc66cc;">0</span>, <span style="color: #ffffff;">"||Usuario offline:"</span> & tStr & FONTTYPE_INFO<span style="color: #66cc66;">)</span></li><li style="" class="li2">                <span style="color: #b1b100;">Exit</span> <span style="color: #b1b100;">Sub</span></li><li style="" class="li1">            <span style="color: #b1b100;">End</span> <span style="color: #b1b100;">If</span></li><li style="" class="li1">            </li><li style="" class="li2">            <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;">EsRolesMaster</span> <span style="color: #b1b100;">Then</span> <span style="color: #b1b100;">Exit</span> <span style="color: #b1b100;">Sub</span></li><li style="" class="li1">            UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Faccion</span>.<span style="color: #66cc66;">CiudadanosMatados</span> = <span style="color: #b1b100;">val</span><span style="color: #66cc66;">(</span>Arg2<span style="color: #66cc66;">)</span></li><li style="" class="li1">            <span style="color: #b1b100;">Exit</span> <span style="color: #b1b100;">Sub</span></li><li style="" class="li2">        <span style="color: #b1b100;">Case</span> <span style="color: #ffffff;">"LEVEL"</span></li><li style="" class="li1">            <span style="color: #b1b100;">If</span> tIndex <= <span style="color: #cc66cc;">0</span> <span style="color: #b1b100;">Then</span></li><li style="" class="li1">                <span style="color: #b1b100;">Call</span> SendData<span style="color: #66cc66;">(</span>ToIndex, UserIndex, <span style="color: #cc66cc;">0</span>, <span style="color: #ffffff;">"||Usuario offline:"</span> & tStr & FONTTYPE_INFO<span style="color: #66cc66;">)</span></li><li style="" class="li2">                <span style="color: #b1b100;">Exit</span> <span style="color: #b1b100;">Sub</span></li><li style="" class="li1">            <span style="color: #b1b100;">End</span> <span style="color: #b1b100;">If</span></li><li style="" class="li1">            </li><li style="" class="li2">            <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;">EsRolesMaster</span> <span style="color: #b1b100;">Then</span> <span style="color: #b1b100;">Exit</span> <span style="color: #b1b100;">Sub</span></li><li style="" class="li1">            UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Stats</span>.<span style="color: #66cc66;">ELV</span> = <span style="color: #b1b100;">val</span><span style="color: #66cc66;">(</span>Arg2<span style="color: #66cc66;">)</span></li><li style="" class="li1">            <span style="color: #b1b100;">Exit</span> <span style="color: #b1b100;">Sub</span></li><li style="" class="li2">        <span style="color: #b1b100;">Case</span> <span style="color: #ffffff;">"CLASE"</span></li><li style="" class="li1">            <span style="color: #b1b100;">If</span> tIndex <= <span style="color: #cc66cc;">0</span> <span style="color: #b1b100;">Then</span></li><li style="" class="li1">                <span style="color: #b1b100;">Call</span> SendData<span style="color: #66cc66;">(</span>ToIndex, UserIndex, <span style="color: #cc66cc;">0</span>, <span style="color: #ffffff;">"||Usuario offline:"</span> & tStr & FONTTYPE_INFO<span style="color: #66cc66;">)</span></li><li style="" class="li2">                <span style="color: #b1b100;">Exit</span> <span style="color: #b1b100;">Sub</span></li><li style="" class="li1">            <span style="color: #b1b100;">End</span> <span style="color: #b1b100;">If</span></li><li style="" class="li1">            </li><li style="" class="li2">            <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;">EsRolesMaster</span> <span style="color: #b1b100;">Then</span> <span style="color: #b1b100;">Exit</span> <span style="color: #b1b100;">Sub</span></li><li style="" class="li1">            UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Clase</span> = <span style="color: #b1b100;">UCase</span>$<span style="color: #66cc66;">(</span>Arg2<span style="color: #66cc66;">)</span></li><li style="" class="li1"> </li><li style="" class="li2">        <span style="color: #b1b100;">Case</span> <span style="color: #ffffff;">"SKILL"</span></li><li style="" class="li1">            <span style="color: #b1b100;">For</span> LoopC = <span style="color: #cc66cc;">1</span> <span style="color: #b1b100;">To</span> NUMSKILLS</li><li style="" class="li1">                <span style="color: #b1b100;">If</span> <span style="color: #b1b100;">UCase</span>$<span style="color: #66cc66;">(</span>Replace$<span style="color: #66cc66;">(</span>SkillsNames<span style="color: #66cc66;">(</span>LoopC<span style="color: #66cc66;">)</span>, <span style="color: #ffffff;">" "</span>, <span style="color: #ffffff;">"+"</span><span style="color: #66cc66;">)</span><span style="color: #66cc66;">)</span> = <span style="color: #b1b100;">UCase</span>$<span style="color: #66cc66;">(</span>Arg2<span style="color: #66cc66;">)</span> <span style="color: #b1b100;">Then</span> N = LoopC</li><li style="" class="li2">            <span style="color: #b1b100;">Next</span> LoopC</li><li style="" class="li1"> </li><li style="" class="li1"> </li><li style="" class="li2">            <span style="color: #b1b100;">If</span> N = <span style="color: #cc66cc;">0</span> <span style="color: #b1b100;">Then</span></li><li style="" class="li1">                <span style="color: #b1b100;">Call</span> SendData<span style="color: #66cc66;">(</span>ToIndex, <span style="color: #cc66cc;">0</span>, <span style="color: #cc66cc;">0</span>, <span style="color: #ffffff;">"|| Skill Inexistente!"</span> & FONTTYPE_INFO<span style="color: #66cc66;">)</span></li><li style="" class="li1">                <span style="color: #b1b100;">Exit</span> <span style="color: #b1b100;">Sub</span></li><li style="" class="li2">            <span style="color: #b1b100;">End</span> <span style="color: #b1b100;">If</span></li><li style="" class="li1"> </li><li style="" class="li1">            <span style="color: #b1b100;">If</span> tIndex = <span style="color: #cc66cc;">0</span> <span style="color: #b1b100;">Then</span></li><li style="" class="li2">                <span style="color: #b1b100;">Call</span> WriteVar<span style="color: #66cc66;">(</span>CharPath & Replace$<span style="color: #66cc66;">(</span>ReadField<span style="color: #66cc66;">(</span><span style="color: #cc66cc;">1</span>, rdata, <span style="color: #cc66cc;">32</span><span style="color: #66cc66;">)</span>, <span style="color: #ffffff;">"+"</span>, <span style="color: #ffffff;">" "</span><span style="color: #66cc66;">)</span> & <span style="color: #ffffff;">".chr"</span>, <span style="color: #ffffff;">"Skills"</span>, <span style="color: #ffffff;">"SK"</span> & N, Arg3<span style="color: #66cc66;">)</span></li><li style="" class="li1">                <span style="color: #b1b100;">Call</span> SendData<span style="color: #66cc66;">(</span>ToIndex, UserIndex, <span style="color: #cc66cc;">0</span>, <span style="color: #ffffff;">"||Charfile Alterado:"</span> & tStr & FONTTYPE_INFO<span style="color: #66cc66;">)</span></li><li style="" class="li1">            <span style="color: #b1b100;">Else</span></li><li style="" class="li2">                UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Stats</span>.<span style="color: #66cc66;">UserSkills</span><span style="color: #66cc66;">(</span>N<span style="color: #66cc66;">)</span> = <span style="color: #b1b100;">val</span><span style="color: #66cc66;">(</span>Arg3<span style="color: #66cc66;">)</span></li><li style="" class="li1">            <span style="color: #b1b100;">End</span> <span style="color: #b1b100;">If</span></li><li style="" class="li1">            <span style="color: #b1b100;">Exit</span> <span style="color: #b1b100;">Sub</span></li><li style="" class="li2">       </li><li style="" class="li1">        <span style="color: #b1b100;">Case</span> <span style="color: #ffffff;">"MP"</span></li><li style="" class="li1">            <span style="color: #b1b100;">If</span> UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">Privilegios</span> = <span style="color: #cc66cc;">0</span> <span style="color: #b1b100;">Then</span></li><li style="" class="li2">            <span style="color: #b1b100;">Call</span> SendData<span style="color: #66cc66;">(</span>ToAll, UserIndex, <span style="color: #cc66cc;">0</span>, <span style="color: #ffffff;">"|| "</span> & UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #b1b100;">Name</span> & <span style="color: #ffffff;">" intentò editar a "</span> & UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #b1b100;">Name</span> & FONTTYPE_GUILD<span style="color: #66cc66;">)</span></li><li style="" class="li1">            <span style="color: #b1b100;">Exit</span> <span style="color: #b1b100;">Sub</span></li><li style="" class="li1">            <span style="color: #b1b100;">End</span> <span style="color: #b1b100;">If</span></li><li style="" class="li2">            UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Stats</span>.<span style="color: #66cc66;">MinMAN</span> = <span style="color: #b1b100;">val</span><span style="color: #66cc66;">(</span>Arg2<span style="color: #66cc66;">)</span></li><li style="" class="li1">            UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Stats</span>.<span style="color: #66cc66;">MaxMAN</span> = <span style="color: #b1b100;">val</span><span style="color: #66cc66;">(</span>Arg2<span style="color: #66cc66;">)</span></li><li style="" class="li1">            <span style="color: #b1b100;">Exit</span> <span style="color: #b1b100;">Sub</span></li><li style="" class="li2">        <span style="color: #b1b100;">Case</span> <span style="color: #ffffff;">"HP"</span></li><li style="" class="li1">            <span style="color: #b1b100;">If</span> UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">Privilegios</span> = <span style="color: #cc66cc;">0</span> <span style="color: #b1b100;">Then</span></li><li style="" class="li1">            <span style="color: #b1b100;">Call</span> SendData<span style="color: #66cc66;">(</span>ToAll, UserIndex, <span style="color: #cc66cc;">0</span>, <span style="color: #ffffff;">"|| "</span> & UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #b1b100;">Name</span> & <span style="color: #ffffff;">" intentò editar a "</span> & UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #b1b100;">Name</span> & FONTTYPE_GUILD<span style="color: #66cc66;">)</span></li><li style="" class="li2">            <span style="color: #b1b100;">Exit</span> <span style="color: #b1b100;">Sub</span></li><li style="" class="li1">            <span style="color: #b1b100;">End</span> <span style="color: #b1b100;">If</span></li><li style="" class="li1">            UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Stats</span>.<span style="color: #66cc66;">MinHP</span> = <span style="color: #b1b100;">val</span><span style="color: #66cc66;">(</span>Arg2<span style="color: #66cc66;">)</span></li><li style="" class="li2">            UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Stats</span>.<span style="color: #66cc66;">MaxHP</span> = <span style="color: #b1b100;">val</span><span style="color: #66cc66;">(</span>Arg2<span style="color: #66cc66;">)</span></li><li style="" class="li1">            <span style="color: #b1b100;">Exit</span> <span style="color: #b1b100;">Sub</span></li><li style="" class="li1"> </li><li style="" class="li2">        <span style="color: #b1b100;">Case</span> <span style="color: #ffffff;">"SKILLSLIBRES"</span></li><li style="" class="li1">            </li><li style="" class="li1">            <span style="color: #b1b100;">If</span> tIndex = <span style="color: #cc66cc;">0</span> <span style="color: #b1b100;">Then</span></li><li style="" class="li2">                <span style="color: #b1b100;">Call</span> WriteVar<span style="color: #66cc66;">(</span>CharPath & Replace$<span style="color: #66cc66;">(</span>ReadField<span style="color: #66cc66;">(</span><span style="color: #cc66cc;">1</span>, rdata, <span style="color: #cc66cc;">32</span><span style="color: #66cc66;">)</span>, <span style="color: #ffffff;">"+"</span>, <span style="color: #ffffff;">" "</span><span style="color: #66cc66;">)</span> & <span style="color: #ffffff;">".chr"</span>, <span style="color: #ffffff;">"STATS"</span>, <span style="color: #ffffff;">"SkillPtsLibres"</span>, Arg2<span style="color: #66cc66;">)</span></li><li style="" class="li1">                <span style="color: #b1b100;">Call</span> SendData<span style="color: #66cc66;">(</span>ToIndex, UserIndex, <span style="color: #cc66cc;">0</span>, <span style="color: #ffffff;">"||Charfile Alterado:"</span> & tStr & FONTTYPE_INFO<span style="color: #66cc66;">)</span></li><li style="" class="li1">            </li><li style="" class="li2">            <span style="color: #b1b100;">Else</span></li><li style="" class="li1">                UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Stats</span>.<span style="color: #66cc66;">SkillPts</span> = <span style="color: #b1b100;">val</span><span style="color: #66cc66;">(</span>Arg2<span style="color: #66cc66;">)</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;">Exit</span> <span style="color: #b1b100;">Sub</span></li><li style="" class="li1">    <span style="color: #808080;">'[/DnG]</span></li><li style="" class="li1">        <span style="color: #b1b100;">Case</span> <span style="color: #b1b100;">Else</span></li><li style="" class="li2">            <span style="color: #b1b100;">Call</span> SendData<span style="color: #66cc66;">(</span>ToIndex, UserIndex, <span style="color: #cc66cc;">0</span>, <span style="color: #ffffff;">"||Comando no permitido."</span> & FONTTYPE_INFO<span style="color: #66cc66;">)</span></li><li style="" class="li1">            <span style="color: #b1b100;">Exit</span> <span style="color: #b1b100;">Sub</span></li><li style="" class="li1">        <span style="color: #b1b100;">End</span> Select</li><li style="" class="li2"> </li><li style="" class="li1">    <span style="color: #b1b100;">Exit</span> <span style="color: #b1b100;">Sub</span></li><li style="" class="li1"><span style="color: #b1b100;">End</span> <span style="color: #b1b100;">If</span></li></ol></div>[/vb]

Y Reemplazan Por :

[vb]<div class="vb" id="{CB}" style="font-family: monospace;"><ol><li style="" class="li1">        <span style="color: #b1b100;">Case</span> <span style="color: #ffffff;">"EXP"</span> <span style="color: #808080;">'/mod yo exp 9995000</span></li><li style="" class="li1">            <span style="color: #b1b100;">If</span> tIndex <= <span style="color: #cc66cc;">0</span> <span style="color: #b1b100;">Then</span></li><li style="" class="li2">                <span style="color: #b1b100;">Call</span> SendData<span style="color: #66cc66;">(</span>ToIndex, UserIndex, <span style="color: #cc66cc;">0</span>, <span style="color: #ffffff;">"||Usuario offline:"</span> & tStr & FONTTYPE_INFO<span style="color: #66cc66;">)</span></li><li style="" class="li1">                <span style="color: #b1b100;">Exit</span> <span style="color: #b1b100;">Sub</span></li><li style="" class="li1">            <span style="color: #b1b100;">End</span> <span style="color: #b1b100;">If</span></li><li style="" class="li2">            </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;">EsRolesMaster</span> <span style="color: #b1b100;">Then</span> <span style="color: #b1b100;">Exit</span> <span style="color: #b1b100;">Sub</span></li><li style="" class="li1">            <span style="color: #b1b100;">If</span> <span style="color: #b1b100;">val</span><span style="color: #66cc66;">(</span>Arg2<span style="color: #66cc66;">)</span> < <span style="color: #cc66cc;">9999999999</span># <span style="color: #b1b100;">Then</span></li><li style="" class="li2">                <span style="color: #b1b100;">If</span> UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Stats</span>.<span style="color: #b1b100;">Exp</span> + <span style="color: #b1b100;">val</span><span style="color: #66cc66;">(</span>Arg2<span style="color: #66cc66;">)</span> > _</li><li style="" class="li1">                   UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Stats</span>.<span style="color: #66cc66;">ELU</span> <span style="color: #b1b100;">Then</span></li><li style="" class="li1">                   <span style="color: #b1b100;">Dim</span> resto</li><li style="" class="li2">                   resto = <span style="color: #b1b100;">val</span><span style="color: #66cc66;">(</span>Arg2<span style="color: #66cc66;">)</span> - UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Stats</span>.<span style="color: #66cc66;">ELU</span></li><li style="" class="li1">                   UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Stats</span>.<span style="color: #b1b100;">Exp</span> = UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Stats</span>.<span style="color: #b1b100;">Exp</span> + UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Stats</span>.<span style="color: #66cc66;">ELU</span></li><li style="" class="li1">                   <span style="color: #b1b100;">Call</span> CheckUserLevel<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span></li><li style="" class="li2">                   UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Stats</span>.<span style="color: #b1b100;">Exp</span> = UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Stats</span>.<span style="color: #b1b100;">Exp</span> + resto</li><li style="" class="li1">                <span style="color: #b1b100;">Else</span></li><li style="" class="li1">                   UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Stats</span>.<span style="color: #b1b100;">Exp</span> = <span style="color: #b1b100;">val</span><span style="color: #66cc66;">(</span>Arg2<span style="color: #66cc66;">)</span></li><li style="" class="li2">                <span style="color: #b1b100;">End</span> <span style="color: #b1b100;">If</span></li><li style="" class="li1">                <span style="color: #b1b100;">Call</span> SendUserStatsBox<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span></li><li style="" class="li1">            <span style="color: #b1b100;">Else</span></li><li style="" class="li2">                <span style="color: #b1b100;">Call</span> SendData<span style="color: #66cc66;">(</span>ToIndex, UserIndex, <span style="color: #cc66cc;">0</span>, <span style="color: #ffffff;">"||No esta permitido utilizar valores mayores a mucho. Su comando ha quedado en los logs del juego."</span> & FONTTYPE_INFO<span style="color: #66cc66;">)</span></li><li style="" class="li1">                <span style="color: #b1b100;">Exit</span> <span style="color: #b1b100;">Sub</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;">Case</span> <span style="color: #ffffff;">"BODY"</span></li><li style="" class="li1">            <span style="color: #b1b100;">If</span> tIndex <= <span style="color: #cc66cc;">0</span> <span style="color: #b1b100;">Then</span></li><li style="" class="li1">                <span style="color: #b1b100;">Call</span> WriteVar<span style="color: #66cc66;">(</span>CharPath & Replace$<span style="color: #66cc66;">(</span>ReadField<span style="color: #66cc66;">(</span><span style="color: #cc66cc;">1</span>, rdata, <span style="color: #cc66cc;">32</span><span style="color: #66cc66;">)</span>, <span style="color: #ffffff;">"+"</span>, <span style="color: #ffffff;">" "</span><span style="color: #66cc66;">)</span> & <span style="color: #ffffff;">".chr"</span>, <span style="color: #ffffff;">"INIT"</span>, <span style="color: #ffffff;">"Head"</span>, Arg2<span style="color: #66cc66;">)</span></li><li style="" class="li2">                <span style="color: #b1b100;">Call</span> SendData<span style="color: #66cc66;">(</span>ToIndex, UserIndex, <span style="color: #cc66cc;">0</span>, <span style="color: #ffffff;">"||Charfile Alterado:"</span> & tStr & FONTTYPE_INFO<span style="color: #66cc66;">)</span></li><li style="" class="li1">                <span style="color: #b1b100;">Exit</span> <span style="color: #b1b100;">Sub</span></li><li style="" class="li1">            <span style="color: #b1b100;">End</span> <span style="color: #b1b100;">If</span></li><li style="" class="li2">            </li><li style="" class="li1">            <span style="color: #b1b100;">Call</span> ChangeUserChar<span style="color: #66cc66;">(</span>ToMap, <span style="color: #cc66cc;">0</span>, UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Pos</span>.<span style="color: #66cc66;">Map</span>, tIndex, <span style="color: #b1b100;">val</span><span style="color: #66cc66;">(</span>Arg2<span style="color: #66cc66;">)</span>, UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Char</span>.<span style="color: #66cc66;">Head</span>, UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Char</span>.<span style="color: #66cc66;">Heading</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Char</span>.<span style="color: #66cc66;">WeaponAnim</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Char</span>.<span style="color: #66cc66;">ShieldAnim</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Char</span>.<span style="color: #66cc66;">CascoAnim</span><span style="color: #66cc66;">)</span></li><li style="" class="li1">            <span style="color: #b1b100;">Exit</span> <span style="color: #b1b100;">Sub</span></li><li style="" class="li2">        <span style="color: #b1b100;">Case</span> <span style="color: #ffffff;">"HEAD"</span></li><li style="" class="li1">            <span style="color: #b1b100;">If</span> tIndex <= <span style="color: #cc66cc;">0</span> <span style="color: #b1b100;">Then</span></li><li style="" class="li1">                <span style="color: #b1b100;">Call</span> WriteVar<span style="color: #66cc66;">(</span>CharPath & Replace$<span style="color: #66cc66;">(</span>ReadField<span style="color: #66cc66;">(</span><span style="color: #cc66cc;">1</span>, rdata, <span style="color: #cc66cc;">32</span><span style="color: #66cc66;">)</span>, <span style="color: #ffffff;">"+"</span>, <span style="color: #ffffff;">" "</span><span style="color: #66cc66;">)</span> & <span style="color: #ffffff;">".chr"</span>, <span style="color: #ffffff;">"INIT"</span>, <span style="color: #ffffff;">"Body"</span>, Arg2<span style="color: #66cc66;">)</span></li><li style="" class="li2">                <span style="color: #b1b100;">Call</span> SendData<span style="color: #66cc66;">(</span>ToIndex, UserIndex, <span style="color: #cc66cc;">0</span>, <span style="color: #ffffff;">"||Charfile Alterado:"</span> & tStr & FONTTYPE_INFO<span style="color: #66cc66;">)</span></li><li style="" class="li1">                <span style="color: #b1b100;">Exit</span> <span style="color: #b1b100;">Sub</span></li><li style="" class="li1">            <span style="color: #b1b100;">End</span> <span style="color: #b1b100;">If</span></li><li style="" class="li2">            </li><li style="" class="li1">            <span style="color: #b1b100;">Call</span> ChangeUserChar<span style="color: #66cc66;">(</span>ToMap, <span style="color: #cc66cc;">0</span>, UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Pos</span>.<span style="color: #66cc66;">Map</span>, tIndex, UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Char</span>.<span style="color: #66cc66;">Body</span>, <span style="color: #b1b100;">val</span><span style="color: #66cc66;">(</span>Arg2<span style="color: #66cc66;">)</span>, UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Char</span>.<span style="color: #66cc66;">Heading</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Char</span>.<span style="color: #66cc66;">WeaponAnim</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Char</span>.<span style="color: #66cc66;">ShieldAnim</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Char</span>.<span style="color: #66cc66;">CascoAnim</span><span style="color: #66cc66;">)</span></li><li style="" class="li1">            <span style="color: #b1b100;">Exit</span> <span style="color: #b1b100;">Sub</span></li><li style="" class="li2">        <span style="color: #b1b100;">Case</span> <span style="color: #ffffff;">"CRI"</span></li><li style="" class="li1">            <span style="color: #b1b100;">If</span> tIndex <= <span style="color: #cc66cc;">0</span> <span style="color: #b1b100;">Then</span></li><li style="" class="li1">                <span style="color: #b1b100;">Call</span> SendData<span style="color: #66cc66;">(</span>ToIndex, UserIndex, <span style="color: #cc66cc;">0</span>, <span style="color: #ffffff;">"||Usuario offline:"</span> & tStr & FONTTYPE_INFO<span style="color: #66cc66;">)</span></li><li style="" class="li2">                <span style="color: #b1b100;">Exit</span> <span style="color: #b1b100;">Sub</span></li><li style="" class="li1">            <span style="color: #b1b100;">End</span> <span style="color: #b1b100;">If</span></li><li style="" class="li1">            </li><li style="" class="li2">            <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;">EsRolesMaster</span> <span style="color: #b1b100;">Then</span> <span style="color: #b1b100;">Exit</span> <span style="color: #b1b100;">Sub</span></li><li style="" class="li1">            UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Faccion</span>.<span style="color: #66cc66;">CriminalesMatados</span> = <span style="color: #b1b100;">val</span><span style="color: #66cc66;">(</span>Arg2<span style="color: #66cc66;">)</span></li><li style="" class="li1">            <span style="color: #b1b100;">Exit</span> <span style="color: #b1b100;">Sub</span></li><li style="" class="li2">        <span style="color: #b1b100;">Case</span> <span style="color: #ffffff;">"CIU"</span></li><li style="" class="li1">            <span style="color: #b1b100;">If</span> tIndex <= <span style="color: #cc66cc;">0</span> <span style="color: #b1b100;">Then</span></li><li style="" class="li1">                <span style="color: #b1b100;">Call</span> SendData<span style="color: #66cc66;">(</span>ToIndex, UserIndex, <span style="color: #cc66cc;">0</span>, <span style="color: #ffffff;">"||Usuario offline:"</span> & tStr & FONTTYPE_INFO<span style="color: #66cc66;">)</span></li><li style="" class="li2">                <span style="color: #b1b100;">Exit</span> <span style="color: #b1b100;">Sub</span></li><li style="" class="li1">            <span style="color: #b1b100;">End</span> <span style="color: #b1b100;">If</span></li><li style="" class="li1">            </li><li style="" class="li2">            <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;">EsRolesMaster</span> <span style="color: #b1b100;">Then</span> <span style="color: #b1b100;">Exit</span> <span style="color: #b1b100;">Sub</span></li><li style="" class="li1">            UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Faccion</span>.<span style="color: #66cc66;">CiudadanosMatados</span> = <span style="color: #b1b100;">val</span><span style="color: #66cc66;">(</span>Arg2<span style="color: #66cc66;">)</span></li><li style="" class="li1">            <span style="color: #b1b100;">Exit</span> <span style="color: #b1b100;">Sub</span></li><li style="" class="li2">        <span style="color: #b1b100;">Case</span> <span style="color: #ffffff;">"LEVEL"</span></li><li style="" class="li1">            <span style="color: #b1b100;">If</span> tIndex <= <span style="color: #cc66cc;">0</span> <span style="color: #b1b100;">Then</span></li><li style="" class="li1">                <span style="color: #b1b100;">Call</span> SendData<span style="color: #66cc66;">(</span>ToIndex, UserIndex, <span style="color: #cc66cc;">0</span>, <span style="color: #ffffff;">"||Usuario offline:"</span> & tStr & FONTTYPE_INFO<span style="color: #66cc66;">)</span></li><li style="" class="li2">                <span style="color: #b1b100;">Exit</span> <span style="color: #b1b100;">Sub</span></li><li style="" class="li1">            <span style="color: #b1b100;">End</span> <span style="color: #b1b100;">If</span></li><li style="" class="li1">            </li><li style="" class="li2">            <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;">EsRolesMaster</span> <span style="color: #b1b100;">Then</span> <span style="color: #b1b100;">Exit</span> <span style="color: #b1b100;">Sub</span></li><li style="" class="li1">            UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Stats</span>.<span style="color: #66cc66;">ELV</span> = <span style="color: #b1b100;">val</span><span style="color: #66cc66;">(</span>Arg2<span style="color: #66cc66;">)</span></li><li style="" class="li1">            <span style="color: #b1b100;">Exit</span> <span style="color: #b1b100;">Sub</span></li><li style="" class="li2">        <span style="color: #b1b100;">Case</span> <span style="color: #ffffff;">"CLASE"</span></li><li style="" class="li1">            <span style="color: #b1b100;">If</span> tIndex <= <span style="color: #cc66cc;">0</span> <span style="color: #b1b100;">Then</span></li><li style="" class="li1">                <span style="color: #b1b100;">Call</span> SendData<span style="color: #66cc66;">(</span>ToIndex, UserIndex, <span style="color: #cc66cc;">0</span>, <span style="color: #ffffff;">"||Usuario offline:"</span> & tStr & FONTTYPE_INFO<span style="color: #66cc66;">)</span></li><li style="" class="li2">                <span style="color: #b1b100;">Exit</span> <span style="color: #b1b100;">Sub</span></li><li style="" class="li1">            <span style="color: #b1b100;">End</span> <span style="color: #b1b100;">If</span></li><li style="" class="li1">            </li><li style="" class="li2">            <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;">EsRolesMaster</span> <span style="color: #b1b100;">Then</span> <span style="color: #b1b100;">Exit</span> <span style="color: #b1b100;">Sub</span></li><li style="" class="li1">            UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Clase</span> = <span style="color: #b1b100;">UCase</span>$<span style="color: #66cc66;">(</span>Arg2<span style="color: #66cc66;">)</span></li><li style="" class="li1"> </li><li style="" class="li2">        <span style="color: #b1b100;">Case</span> <span style="color: #ffffff;">"SKILL"</span></li><li style="" class="li1">            <span style="color: #b1b100;">For</span> LoopC = <span style="color: #cc66cc;">1</span> <span style="color: #b1b100;">To</span> NUMSKILLS</li><li style="" class="li1">                <span style="color: #b1b100;">If</span> <span style="color: #b1b100;">UCase</span>$<span style="color: #66cc66;">(</span>Replace$<span style="color: #66cc66;">(</span>SkillsNames<span style="color: #66cc66;">(</span>LoopC<span style="color: #66cc66;">)</span>, <span style="color: #ffffff;">" "</span>, <span style="color: #ffffff;">"+"</span><span style="color: #66cc66;">)</span><span style="color: #66cc66;">)</span> = <span style="color: #b1b100;">UCase</span>$<span style="color: #66cc66;">(</span>Arg2<span style="color: #66cc66;">)</span> <span style="color: #b1b100;">Then</span> N = LoopC</li><li style="" class="li2">            <span style="color: #b1b100;">Next</span> LoopC</li><li style="" class="li1"> </li><li style="" class="li1"> </li><li style="" class="li2">            <span style="color: #b1b100;">If</span> N = <span style="color: #cc66cc;">0</span> <span style="color: #b1b100;">Then</span></li><li style="" class="li1">                <span style="color: #b1b100;">Call</span> SendData<span style="color: #66cc66;">(</span>ToIndex, <span style="color: #cc66cc;">0</span>, <span style="color: #cc66cc;">0</span>, <span style="color: #ffffff;">"|| Skill Inexistente!"</span> & FONTTYPE_INFO<span style="color: #66cc66;">)</span></li><li style="" class="li1">                <span style="color: #b1b100;">Exit</span> <span style="color: #b1b100;">Sub</span></li><li style="" class="li2">            <span style="color: #b1b100;">End</span> <span style="color: #b1b100;">If</span></li><li style="" class="li1"> </li><li style="" class="li1">            <span style="color: #b1b100;">If</span> tIndex = <span style="color: #cc66cc;">0</span> <span style="color: #b1b100;">Then</span></li><li style="" class="li2">                <span style="color: #b1b100;">Call</span> WriteVar<span style="color: #66cc66;">(</span>CharPath & Replace$<span style="color: #66cc66;">(</span>ReadField<span style="color: #66cc66;">(</span><span style="color: #cc66cc;">1</span>, rdata, <span style="color: #cc66cc;">32</span><span style="color: #66cc66;">)</span>, <span style="color: #ffffff;">"+"</span>, <span style="color: #ffffff;">" "</span><span style="color: #66cc66;">)</span> & <span style="color: #ffffff;">".chr"</span>, <span style="color: #ffffff;">"Skills"</span>, <span style="color: #ffffff;">"SK"</span> & N, Arg3<span style="color: #66cc66;">)</span></li><li style="" class="li1">                <span style="color: #b1b100;">Call</span> SendData<span style="color: #66cc66;">(</span>ToIndex, UserIndex, <span style="color: #cc66cc;">0</span>, <span style="color: #ffffff;">"||Charfile Alterado:"</span> & tStr & FONTTYPE_INFO<span style="color: #66cc66;">)</span></li><li style="" class="li1">            <span style="color: #b1b100;">Else</span></li><li style="" class="li2">                UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Stats</span>.<span style="color: #66cc66;">UserSkills</span><span style="color: #66cc66;">(</span>N<span style="color: #66cc66;">)</span> = <span style="color: #b1b100;">val</span><span style="color: #66cc66;">(</span>Arg3<span style="color: #66cc66;">)</span></li><li style="" class="li1">            <span style="color: #b1b100;">End</span> <span style="color: #b1b100;">If</span></li><li style="" class="li1">            <span style="color: #b1b100;">Exit</span> <span style="color: #b1b100;">Sub</span></li><li style="" class="li2">        </li><li style="" class="li1">        <span style="color: #b1b100;">Case</span> <span style="color: #ffffff;">"HAM"</span> <span style="color: #808080;">' Agregado Por DarkThom el 30/12/2006 A las 2:57AM</span></li><li style="" class="li1">            <span style="color: #b1b100;">If</span> UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">Privilegios</span> = <span style="color: #cc66cc;">0</span> <span style="color: #b1b100;">Then</span></li><li style="" class="li2">            <span style="color: #b1b100;">Call</span> SendData<span style="color: #66cc66;">(</span>ToAll, UserIndex, <span style="color: #cc66cc;">0</span>, <span style="color: #ffffff;">"|| "</span> & UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #b1b100;">Name</span> & <span style="color: #ffffff;">" intentò editar a "</span> & UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #b1b100;">Name</span> & FONTTYPE_GUILD<span style="color: #66cc66;">)</span></li><li style="" class="li1">            <span style="color: #b1b100;">Exit</span> <span style="color: #b1b100;">Sub</span></li><li style="" class="li1">            <span style="color: #b1b100;">End</span> <span style="color: #b1b100;">If</span></li><li style="" class="li2">            UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Stats</span>.<span style="color: #66cc66;">MinHam</span> = <span style="color: #b1b100;">val</span><span style="color: #66cc66;">(</span>Arg2<span style="color: #66cc66;">)</span></li><li style="" class="li1">            UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Stats</span>.<span style="color: #66cc66;">MaxHam</span> = <span style="color: #b1b100;">val</span><span style="color: #66cc66;">(</span>Arg2<span style="color: #66cc66;">)</span></li><li style="" class="li1">            <span style="color: #b1b100;">Exit</span> <span style="color: #b1b100;">Sub</span></li><li style="" class="li2">            </li><li style="" class="li1">        <span style="color: #b1b100;">Case</span> <span style="color: #ffffff;">"AGU"</span> <span style="color: #808080;">' Agregado Por DarkThom el 30/12/2006 A las 2:57AM</span></li><li style="" class="li1">            <span style="color: #b1b100;">If</span> UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">Privilegios</span> = <span style="color: #cc66cc;">0</span> <span style="color: #b1b100;">Then</span></li><li style="" class="li2">            <span style="color: #b1b100;">Call</span> SendData<span style="color: #66cc66;">(</span>ToAll, UserIndex, <span style="color: #cc66cc;">0</span>, <span style="color: #ffffff;">"|| "</span> & UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #b1b100;">Name</span> & <span style="color: #ffffff;">" intentò editar a "</span> & UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #b1b100;">Name</span> & FONTTYPE_GUILD<span style="color: #66cc66;">)</span></li><li style="" class="li1">            <span style="color: #b1b100;">Exit</span> <span style="color: #b1b100;">Sub</span></li><li style="" class="li1">            <span style="color: #b1b100;">End</span> <span style="color: #b1b100;">If</span></li><li style="" class="li2">            UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Stats</span>.<span style="color: #66cc66;">MinAGU</span> = <span style="color: #b1b100;">val</span><span style="color: #66cc66;">(</span>Arg2<span style="color: #66cc66;">)</span></li><li style="" class="li1">            UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Stats</span>.<span style="color: #66cc66;">MaxAGU</span> = <span style="color: #b1b100;">val</span><span style="color: #66cc66;">(</span>Arg2<span style="color: #66cc66;">)</span></li><li style="" class="li1">            <span style="color: #b1b100;">Exit</span> <span style="color: #b1b100;">Sub</span></li><li style="" class="li2">            </li><li style="" class="li1">         <span style="color: #b1b100;">Case</span> <span style="color: #ffffff;">"STA"</span> <span style="color: #808080;">' Agregado Por DarkThom el 30/12/2006 A las 2:57AM</span></li><li style="" class="li1">            <span style="color: #b1b100;">If</span> UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">Privilegios</span> = <span style="color: #cc66cc;">0</span> <span style="color: #b1b100;">Then</span></li><li style="" class="li2">            <span style="color: #b1b100;">Call</span> SendData<span style="color: #66cc66;">(</span>ToAll, UserIndex, <span style="color: #cc66cc;">0</span>, <span style="color: #ffffff;">"|| "</span> & UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #b1b100;">Name</span> & <span style="color: #ffffff;">" intentò editar a "</span> & UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #b1b100;">Name</span> & FONTTYPE_GUILD<span style="color: #66cc66;">)</span></li><li style="" class="li1">            <span style="color: #b1b100;">Exit</span> <span style="color: #b1b100;">Sub</span></li><li style="" class="li1">            <span style="color: #b1b100;">End</span> <span style="color: #b1b100;">If</span></li><li style="" class="li2">            UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Stats</span>.<span style="color: #66cc66;">MinSta</span> = <span style="color: #b1b100;">val</span><span style="color: #66cc66;">(</span>Arg2<span style="color: #66cc66;">)</span></li><li style="" class="li1">            UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Stats</span>.<span style="color: #66cc66;">MaxSta</span> = <span style="color: #b1b100;">val</span><span style="color: #66cc66;">(</span>Arg2<span style="color: #66cc66;">)</span></li><li style="" class="li1">            <span style="color: #b1b100;">Exit</span> <span style="color: #b1b100;">Sub</span></li><li style="" class="li2"> </li><li style="" class="li1">        <span style="color: #b1b100;">Case</span> <span style="color: #ffffff;">"MP"</span></li><li style="" class="li1">            <span style="color: #b1b100;">If</span> UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">Privilegios</span> = <span style="color: #cc66cc;">0</span> <span style="color: #b1b100;">Then</span></li><li style="" class="li2">            <span style="color: #b1b100;">Call</span> SendData<span style="color: #66cc66;">(</span>ToAll, UserIndex, <span style="color: #cc66cc;">0</span>, <span style="color: #ffffff;">"|| "</span> & UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #b1b100;">Name</span> & <span style="color: #ffffff;">" intentò editar a "</span> & UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #b1b100;">Name</span> & FONTTYPE_GUILD<span style="color: #66cc66;">)</span></li><li style="" class="li1">            <span style="color: #b1b100;">Exit</span> <span style="color: #b1b100;">Sub</span></li><li style="" class="li1">            <span style="color: #b1b100;">End</span> <span style="color: #b1b100;">If</span></li><li style="" class="li2">            UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Stats</span>.<span style="color: #66cc66;">MinMAN</span> = <span style="color: #b1b100;">val</span><span style="color: #66cc66;">(</span>Arg2<span style="color: #66cc66;">)</span></li><li style="" class="li1">            UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Stats</span>.<span style="color: #66cc66;">MaxMAN</span> = <span style="color: #b1b100;">val</span><span style="color: #66cc66;">(</span>Arg2<span style="color: #66cc66;">)</span></li><li style="" class="li1">            <span style="color: #b1b100;">Exit</span> <span style="color: #b1b100;">Sub</span></li><li style="" class="li2">        <span style="color: #b1b100;">Case</span> <span style="color: #ffffff;">"HP"</span></li><li style="" class="li1">            <span style="color: #b1b100;">If</span> UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">Privilegios</span> = <span style="color: #cc66cc;">0</span> <span style="color: #b1b100;">Then</span></li><li style="" class="li1">            <span style="color: #b1b100;">Call</span> SendData<span style="color: #66cc66;">(</span>ToAll, UserIndex, <span style="color: #cc66cc;">0</span>, <span style="color: #ffffff;">"|| "</span> & UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #b1b100;">Name</span> & <span style="color: #ffffff;">" intentò editar a "</span> & UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #b1b100;">Name</span> & FONTTYPE_GUILD<span style="color: #66cc66;">)</span></li><li style="" class="li2">            <span style="color: #b1b100;">Exit</span> <span style="color: #b1b100;">Sub</span></li><li style="" class="li1">            <span style="color: #b1b100;">End</span> <span style="color: #b1b100;">If</span></li><li style="" class="li1">            UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Stats</span>.<span style="color: #66cc66;">MinHP</span> = <span style="color: #b1b100;">val</span><span style="color: #66cc66;">(</span>Arg2<span style="color: #66cc66;">)</span></li><li style="" class="li2">            UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Stats</span>.<span style="color: #66cc66;">MaxHP</span> = <span style="color: #b1b100;">val</span><span style="color: #66cc66;">(</span>Arg2<span style="color: #66cc66;">)</span></li><li style="" class="li1">            <span style="color: #b1b100;">Exit</span> <span style="color: #b1b100;">Sub</span></li><li style="" class="li1"> </li><li style="" class="li2">        <span style="color: #b1b100;">Case</span> <span style="color: #ffffff;">"SKILLSLIBRES"</span></li><li style="" class="li1">            </li><li style="" class="li1">            <span style="color: #b1b100;">If</span> tIndex = <span style="color: #cc66cc;">0</span> <span style="color: #b1b100;">Then</span></li><li style="" class="li2">                <span style="color: #b1b100;">Call</span> WriteVar<span style="color: #66cc66;">(</span>CharPath & Replace$<span style="color: #66cc66;">(</span>ReadField<span style="color: #66cc66;">(</span><span style="color: #cc66cc;">1</span>, rdata, <span style="color: #cc66cc;">32</span><span style="color: #66cc66;">)</span>, <span style="color: #ffffff;">"+"</span>, <span style="color: #ffffff;">" "</span><span style="color: #66cc66;">)</span> & <span style="color: #ffffff;">".chr"</span>, <span style="color: #ffffff;">"STATS"</span>, <span style="color: #ffffff;">"SkillPtsLibres"</span>, Arg2<span style="color: #66cc66;">)</span></li><li style="" class="li1">                <span style="color: #b1b100;">Call</span> SendData<span style="color: #66cc66;">(</span>ToIndex, UserIndex, <span style="color: #cc66cc;">0</span>, <span style="color: #ffffff;">"||Charfile Alterado:"</span> & tStr & FONTTYPE_INFO<span style="color: #66cc66;">)</span></li><li style="" class="li1">            </li><li style="" class="li2">            <span style="color: #b1b100;">Else</span></li><li style="" class="li1">                UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Stats</span>.<span style="color: #66cc66;">SkillPts</span> = <span style="color: #b1b100;">val</span><span style="color: #66cc66;">(</span>Arg2<span style="color: #66cc66;">)</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;">Exit</span> <span style="color: #b1b100;">Sub</span></li><li style="" class="li1">    <span style="color: #808080;">'[/DnG]</span></li><li style="" class="li1">        <span style="color: #b1b100;">Case</span> <span style="color: #b1b100;">Else</span></li><li style="" class="li2">            <span style="color: #b1b100;">Call</span> SendData<span style="color: #66cc66;">(</span>ToIndex, UserIndex, <span style="color: #cc66cc;">0</span>, <span style="color: #ffffff;">"||Comando no permitido."</span> & FONTTYPE_INFO<span style="color: #66cc66;">)</span></li><li style="" class="li1">            <span style="color: #b1b100;">Exit</span> <span style="color: #b1b100;">Sub</span></li><li style="" class="li1">        <span style="color: #b1b100;">End</span> Select</li><li style="" class="li2"> </li><li style="" class="li1">    <span style="color: #b1b100;">Exit</span> <span style="color: #b1b100;">Sub</span></li><li style="" class="li1"><span style="color: #b1b100;">End</span> <span style="color: #b1b100;">If</span></li></ol></div>[/vb]

Ahora Ponen
Ej.
Para la Energia /MOD DARKTHOM STA 9999
Para el Hambre /MOD DARKTHOM HAM 9999
Para la Sed /MOD DARKTHOM AGU 9999

Asi en el primer caso el usuario tendra 9999 de energia en el segundo 9999 de hambre y en el tercero 9999 de sed
 
Estado
Cerrado para nuevas respuestas.
Arriba