[Aportes indexados] Sistema de Consultas Básico

Estado
Cerrado para nuevas respuestas.

MoChiX

Newbie Lvl 1
Esto lo ponen en el TCP_HandleData2, yo x mi parte lo puse bajo el End Case del /GM

Ahi va:

[vb]<div class="vb" id="{CB}" style="font-family: monospace;"><ol><li style="" class="li1"><span style="color: #808080;">' _____________</span></li><li style="" class="li1"><span style="color: #808080;">'|             |</span></li><li style="" class="li2"><span style="color: #808080;">'| M O C H I X |</span></li><li style="" class="li1"><span style="color: #808080;">'|             |</span></li><li style="" class="li1"><span style="color: #808080;">' ¯¯¯¯¯¯¯¯¯¯¯¯¯</span></li><li style="" class="li2">    Select <span style="color: #b1b100;">Case</span> <span style="color: #b1b100;">UCase</span>$<span style="color: #66cc66;">(</span><span style="color: #b1b100;">Left</span>$<span style="color: #66cc66;">(</span>rdata, <span style="color: #cc66cc;">17</span><span style="color: #66cc66;">)</span><span style="color: #66cc66;">)</span></li><li style="" class="li1">        <span style="color: #b1b100;">Case</span> <span style="color: #ffffff;">"/EMPEZARCONSULTAS"</span></li><li style="" class="li1">        tIndex = NameIndex<span style="color: #66cc66;">(</span>Ayuda.<span style="color: #66cc66;">VerElemento</span><span style="color: #66cc66;">(</span><span style="color: #cc66cc;">1</span><span style="color: #66cc66;">)</span><span style="color: #66cc66;">)</span></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;">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> WarpUserChar<span style="color: #66cc66;">(</span>UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</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>, UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Pos</span>.<span style="color: #66cc66;">X</span>, UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Pos</span>.<span style="color: #66cc66;">Y</span> + <span style="color: #cc66cc;">1</span><span style="color: #66cc66;">)</span></li><li style="" class="li1">                <span style="color: #b1b100;">Call</span> SendData<span style="color: #66cc66;">(</span>ToAll, <span style="color: #cc66cc;">0</span>, <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;">" empieza a dar consultas, pueden empezar a mandar /GM"</span> & FONTTYPE_SERVER<span style="color: #66cc66;">)</span></li><li style="" class="li2">                <span style="color: #b1b100;">Call</span> Ayuda.<span style="color: #66cc66;">Quitar</span><span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span></li><li style="" class="li1">                UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">Consultando</span> = <span style="color: #b1b100;">True</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: #b1b100;">End</span> Select</li><li style="" class="li1"><span style="color: #808080;">' _____________</span></li><li style="" class="li2"><span style="color: #808080;">'|             |</span></li><li style="" class="li1"><span style="color: #808080;">'| M O C H I X |</span></li><li style="" class="li1"><span style="color: #808080;">'|             |</span></li><li style="" class="li2"><span style="color: #808080;">' ¯¯¯¯¯¯¯¯¯¯¯¯¯</span></li><li style="" class="li1">    Select <span style="color: #b1b100;">Case</span> <span style="color: #b1b100;">UCase</span>$<span style="color: #66cc66;">(</span><span style="color: #b1b100;">Left</span><span style="color: #66cc66;">(</span>rdata, <span style="color: #cc66cc;">10</span><span style="color: #66cc66;">)</span><span style="color: #66cc66;">)</span></li><li style="" class="li1">        <span style="color: #b1b100;">Case</span> <span style="color: #ffffff;">"/SIGUIENTE"</span></li><li style="" class="li2">        tIndex = NameIndex<span style="color: #66cc66;">(</span>Ayuda.<span style="color: #66cc66;">VerElemento</span><span style="color: #66cc66;">(</span><span style="color: #cc66cc;">1</span><span style="color: #66cc66;">)</span><span style="color: #66cc66;">)</span></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;">0</span> <span style="color: #b1b100;">Then</span></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;">Consultando</span> = <span style="color: #b1b100;">True</span> <span style="color: #b1b100;">Then</span></li><li style="" class="li2">                <span style="color: #b1b100;">Call</span> WarpUserChar<span style="color: #66cc66;">(</span>UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</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>, UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Pos</span>.<span style="color: #66cc66;">X</span>, UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Pos</span>.<span style="color: #66cc66;">Y</span> + <span style="color: #cc66cc;">1</span><span style="color: #66cc66;">)</span></li><li style="" class="li1">                <span style="color: #b1b100;">Call</span> Ayuda.<span style="color: #66cc66;">Quitar</span><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 estás en modo Consulta!"</span> & FONTTYPE_INFO<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">    <span style="color: #b1b100;">End</span> Select</li><li style="" class="li1"><span style="color: #808080;">' _____________</span></li><li style="" class="li1"><span style="color: #808080;">'|             |</span></li><li style="" class="li2"><span style="color: #808080;">'| M O C H I X |</span></li><li style="" class="li1"><span style="color: #808080;">'|             |</span></li><li style="" class="li1"><span style="color: #808080;">' ¯¯¯¯¯¯¯¯¯¯¯¯¯</span></li><li style="" class="li2">    Select <span style="color: #b1b100;">Case</span> <span style="color: #b1b100;">UCase</span>$<span style="color: #66cc66;">(</span><span style="color: #b1b100;">Left</span>$<span style="color: #66cc66;">(</span>rdata, <span style="color: #cc66cc;">18</span><span style="color: #66cc66;">)</span><span style="color: #66cc66;">)</span></li><li style="" class="li1">        <span style="color: #b1b100;">Case</span> <span style="color: #ffffff;">"/TERMINARCONSULTAS"</span></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;">0</span> <span style="color: #b1b100;">Then</span></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;">Consultando</span> = <span style="color: #b1b100;">True</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, <span style="color: #cc66cc;">0</span>, <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;">" ha terminado de dar consultas"</span> & FONTTYPE_SERVER<span style="color: #66cc66;">)</span></li><li style="" class="li1">                UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">Consultando</span> = <span style="color: #b1b100;">False</span></li><li style="" class="li2">                <span style="color: #b1b100;">Else</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;">"||¡No estás en modo Consulta!"</span> & FONTTYPE_INFO<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;">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="li1">    <span style="color: #b1b100;">End</span> Select</li></ol></div>[/vb]

Y en Declararaciones buscan:

[vb]<div class="vb" id="{CB}" style="font-family: monospace;"><ol><li style="" class="li1">    Comerciando <span style="color: #b1b100;">As</span> <span style="color: #b1b100;">Boolean</span></li></ol></div>[/vb]

Y abajo ponen

[vb]<div class="vb" id="{CB}" style="font-family: monospace;"><ol><li style="" class="li1">    Consultando <span style="color: #b1b100;">As</span> <span style="color: #b1b100;">Boolean</span></li></ol></div>[/vb]

CÓDIGO 100% HECHO POR MI

salu2! :D
 

Pocho

Oráculo Lvl 3
lo q hace esto, el usuario manda la consulta


y el gm pone /siguienteconsulta, yl o lleva a el, despues al otro, por orden ^
 

MoChiX

Newbie Lvl 1
Jejeje bueno lo que hace es que cualquier GM, para facilitarles todo el proceso de (/SHOW SOS, SACAR, /IRA ..., y de nuevo)

Es.. al escribir /EMPEZARCONSULTAS, inicia el MODO CONSULTA, eso da aviso a todos los usuarios que el gm "MoChiX" ta dando consulta y lo teleporta automaticamente al primer pibe de la cola de SHOW SOS.. cuando termina con ese, pone /SIGUIENTE y esto hace q vaya al siguiente que pidio /GM y asi sucesivamente..

luego, para terminar el MODO CONSULTA pone /TERMINARCONSULTAS, esto da aviso y la gente que el gm "MoChiX" deja de dar consultas y listo :)

PD: Este es mi primer código asique los que encuentren bugs avisan ;)

Salu2
 

Thron

Destructor Lvl 5
MoChiX dijo:
Jejeje bueno lo que hace es que cualquier GM, para facilitarles todo el proceso de (/SHOW SOS, SACAR, /IRA ..., y de nuevo)

Es.. al escribir /EMPEZARCONSULTAS, inicia el MODO CONSULTA, eso da aviso a todos los usuarios que el gm "MoChiX" ta dando consulta y lo teleporta automaticamente al primer pibe de la cola de SHOW SOS.. cuando termina con ese, pone /SIGUIENTE y esto hace q vaya al siguiente que pidio /GM y asi sucesivamente..

luego, para terminar el MODO CONSULTA pone /TERMINARCONSULTAS, esto da aviso y la gente que el gm "MoChiX" deja de dar consultas y listo :)

PD: Este es mi primer código asique los que encuentren bugs avisan ;)

Salu2

Mmm a mi me gusta mas el sistema que hay... ;)

/ira *** es lindo /panelgm ;)
 

MoChiX

Newbie Lvl 1
Este sistema, aunq lo implementes, es OPCIONAL

No interfiere en nada con el /PANELGM ni nada de eso..

Algunos GM lo usaran, otros usaran lo otro

Gustos son gustos :p

SaLu2
 
A

Anonymous

Invitado
yol o probe..


me tira error en esta linea

[vb]<div class="vb" id="{CB}" style="font-family: monospace;"><ol><li style="" class="li1"><span style="color: #b1b100;">Call</span> WarpUserChar<span style="color: #66cc66;">(</span>UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</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>, UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Pos</span>.<span style="color: #66cc66;">X</span>, UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Pos</span>.<span style="color: #66cc66;">Y</span> + <span style="color: #cc66cc;">1</span><span style="color: #66cc66;">)</span></li></ol></div>[/vb]

me señala USERLIST, me dice que no coinciden los tipos o algo asi xDD

eso pasa en los comandos /empezarconsulta y /siguiente (en los 2 que estan =P)

xD


saludos
 

MoChiX

Newbie Lvl 1
Muchas gracias.. :D

Realmente me parecía que iba a tener error en eso :p

Despues veo como lo arreglo :p

saludinhos
 

MoChiX

Newbie Lvl 1
Bueno ahora si modifique algunas cositas.. por favor solo posteo aqui para que prueben, sino primero lo probaria con algun sv pero no puedo :S..

asique se los dejo a la buena gente :p

Bueno si leyeron el anterior, declaren Consultando (el post de mas arriba)

y ahora ta más modificada la cosa

[vb]<div class="vb" id="{CB}" style="font-family: monospace;"><ol><li style="" class="li1"><span style="color: #808080;">' _____________</span></li><li style="" class="li1"><span style="color: #808080;">'|             |</span></li><li style="" class="li2"><span style="color: #808080;">'| M O C H I X |</span></li><li style="" class="li1"><span style="color: #808080;">'|             |</span></li><li style="" class="li1"><span style="color: #808080;">' ¯¯¯¯¯¯¯¯¯¯¯¯¯</span></li><li style="" class="li2">    Select <span style="color: #b1b100;">Case</span> <span style="color: #b1b100;">UCase</span>$<span style="color: #66cc66;">(</span><span style="color: #b1b100;">Left</span>$<span style="color: #66cc66;">(</span>rdata, <span style="color: #cc66cc;">17</span><span style="color: #66cc66;">)</span><span style="color: #66cc66;">)</span></li><li style="" class="li1">        <span style="color: #b1b100;">Case</span> <span style="color: #ffffff;">"/EMPEZARCONSULTAS"</span></li><li style="" class="li1">               tIndex = UserList<span style="color: #66cc66;">(</span>Ayuda.<span style="color: #66cc66;">PopByVal</span><span style="color: #66cc66;">)</span></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;">Privilegios</span> > <span style="color: #cc66cc;">0</span> <span style="color: #b1b100;">Then</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> WarpUserChar<span style="color: #66cc66;">(</span>UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</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>, UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Pos</span>.<span style="color: #66cc66;">X</span>, UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Pos</span>.<span style="color: #66cc66;">Y</span> + <span style="color: #cc66cc;">1</span><span style="color: #66cc66;">)</span></li><li style="" class="li2">                <span style="color: #b1b100;">Call</span> SendData<span style="color: #66cc66;">(</span>ToAll, <span style="color: #cc66cc;">0</span>, <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;">" empieza a dar consultas, pueden empezar a mandar /GM"</span> & FONTTYPE_SERVER<span style="color: #66cc66;">)</span></li><li style="" class="li1">                <span style="color: #b1b100;">Call</span> Ayuda.<span style="color: #66cc66;">Quitar</span><span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span></li><li style="" class="li1">                UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">Consultando</span> = <span style="color: #b1b100;">True</span></li><li style="" class="li2">                <span style="color: #b1b100;">Else</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;">"||No hay más gente en la lista de consultas, por favor, salga del MODO CONSULTA"</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">            <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"><span style="color: #808080;">' _____________</span></li><li style="" class="li1"><span style="color: #808080;">'|             |</span></li><li style="" class="li1"><span style="color: #808080;">'| M O C H I X |</span></li><li style="" class="li2"><span style="color: #808080;">'|             |</span></li><li style="" class="li1"><span style="color: #808080;">' ¯¯¯¯¯¯¯¯¯¯¯¯¯</span></li><li style="" class="li1">    Select <span style="color: #b1b100;">Case</span> <span style="color: #b1b100;">UCase</span>$<span style="color: #66cc66;">(</span><span style="color: #b1b100;">Left</span><span style="color: #66cc66;">(</span>rdata, <span style="color: #cc66cc;">10</span><span style="color: #66cc66;">)</span><span style="color: #66cc66;">)</span></li><li style="" class="li2">        <span style="color: #b1b100;">Case</span> <span style="color: #ffffff;">"/SIGUIENTE"</span></li><li style="" class="li1">        tIndex = UserList<span style="color: #66cc66;">(</span>Ayuda.<span style="color: #66cc66;">PopByVal</span><span style="color: #66cc66;">)</span></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;">0</span> <span style="color: #b1b100;">Then</span></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;">Consultando</span> = <span style="color: #b1b100;">True</span> <span style="color: #b1b100;">Then</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> WarpUserChar<span style="color: #66cc66;">(</span>UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</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>, UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Pos</span>.<span style="color: #66cc66;">X</span>, UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Pos</span>.<span style="color: #66cc66;">Y</span> + <span style="color: #cc66cc;">1</span><span style="color: #66cc66;">)</span></li><li style="" class="li2">                    <span style="color: #b1b100;">Call</span> Ayuda.<span style="color: #66cc66;">Quitar</span><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="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;">"||No hay más gente en la lista de consultas, por favor, salga del MODO CONSULTA"</span> & 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">                <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 estás en modo Consulta!"</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;">Exit</span> <span style="color: #b1b100;">Sub</span></li><li style="" class="li1">    <span style="color: #b1b100;">End</span> Select</li><li style="" class="li1"><span style="color: #808080;">' _____________</span></li><li style="" class="li2"><span style="color: #808080;">'|             |</span></li><li style="" class="li1"><span style="color: #808080;">'| M O C H I X |</span></li><li style="" class="li1"><span style="color: #808080;">'|             |</span></li><li style="" class="li2"><span style="color: #808080;">' ¯¯¯¯¯¯¯¯¯¯¯¯¯</span></li><li style="" class="li1">Select <span style="color: #b1b100;">Case</span> <span style="color: #b1b100;">UCase</span>$<span style="color: #66cc66;">(</span><span style="color: #b1b100;">Left</span>$<span style="color: #66cc66;">(</span>rdata, <span style="color: #cc66cc;">18</span><span style="color: #66cc66;">)</span><span style="color: #66cc66;">)</span></li><li style="" class="li1">        <span style="color: #b1b100;">Case</span> <span style="color: #ffffff;">"/TERMINARCONSULTAS"</span></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;">Privilegios</span> > <span style="color: #cc66cc;">0</span> <span style="color: #b1b100;">Then</span></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;">Consultando</span> = <span style="color: #b1b100;">True</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, <span style="color: #cc66cc;">0</span>, <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;">" ha terminado de dar consultas"</span> & FONTTYPE_SERVER<span style="color: #66cc66;">)</span></li><li style="" class="li2">                UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">Consultando</span> = <span style="color: #b1b100;">False</span></li><li style="" class="li1">                <span style="color: #b1b100;">Else</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;">"||¡No estás en modo Consulta!"</span> & FONTTYPE_INFO<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;">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">    <span style="color: #b1b100;">End</span> Select</li></ol></div>[/vb]
 

NikoTe

Destructor Lvl 6
asd

No es mejor hacer la lista del sos poner unos menuses con los comandos, la lista de users y abajo una richtextbox que diga lo que quiere el usuario??
Me parece que es mejor y mas comodo Suerte^^
 

Orion

Newbie Lvl 5
tira el mismo error que antes, en la parte de

[vb]<div class="vb" id="{CB}" style="font-family: monospace;"><ol><li style="" class="li1">    Select <span style="color: #b1b100;">Case</span> <span style="color: #b1b100;">UCase</span>$<span style="color: #66cc66;">(</span><span style="color: #b1b100;">Left</span>$<span style="color: #66cc66;">(</span>rdata, <span style="color: #cc66cc;">17</span><span style="color: #66cc66;">)</span><span style="color: #66cc66;">)</span></li><li style="" class="li1">        <span style="color: #b1b100;">Case</span> <span style="color: #ffffff;">"/EMPEZARCONSULTAS"</span></li><li style="" class="li2">               tIndex = UserList<span style="color: #66cc66;">(</span>Ayuda.<span style="color: #66cc66;">PopByVal</span><span style="color: #66cc66;">)</span> <span style="color: #808080;">' <<<<<<<<<<<<<<< ERROR</span></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;">0</span> <span style="color: #b1b100;">Then</span></li></ol></div>[/vb]


lo marque a la linea, el error me marca "USERLIST" (como antes) y dice que no coinciden los tipos
 

MoChiX

Newbie Lvl 1
Bueno ahora he modificado nuevamente, (y testie de paso):

[vb]<div class="vb" id="{CB}" style="font-family: monospace;"><ol><li style="" class="li1"> </li><li style="" class="li1"><span style="color: #808080;">' _____________</span></li><li style="" class="li2"><span style="color: #808080;">'|             |</span></li><li style="" class="li1"><span style="color: #808080;">'| M O C H I X |</span></li><li style="" class="li1"><span style="color: #808080;">'|             |</span></li><li style="" class="li2"><span style="color: #808080;">' ¯¯¯¯¯¯¯¯¯¯¯¯¯</span></li><li style="" class="li1">    Select <span style="color: #b1b100;">Case</span> <span style="color: #b1b100;">UCase</span>$<span style="color: #66cc66;">(</span><span style="color: #b1b100;">Left</span>$<span style="color: #66cc66;">(</span>rdata, <span style="color: #cc66cc;">17</span><span style="color: #66cc66;">)</span><span style="color: #66cc66;">)</span></li><li style="" class="li1">        <span style="color: #b1b100;">Case</span> <span style="color: #ffffff;">"/EMPEZARCONSULTAS"</span></li><li style="" class="li2">               tIndex = Ayuda.<span style="color: #66cc66;">PopByVal</span></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;">0</span> <span style="color: #b1b100;">Then</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> WarpUserChar<span style="color: #66cc66;">(</span>UserIndex, UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Pos</span>.<span style="color: #66cc66;">Map</span>, UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Pos</span>.<span style="color: #66cc66;">X</span>, UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Pos</span>.<span style="color: #66cc66;">Y</span> + <span style="color: #cc66cc;">1</span><span style="color: #66cc66;">)</span></li><li style="" class="li1">                <span style="color: #b1b100;">Call</span> SendData<span style="color: #66cc66;">(</span>ToAll, <span style="color: #cc66cc;">0</span>, <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;">" empieza a dar consultas, pueden empezar a mandar /GM"</span> & FONTTYPE_SERVER<span style="color: #66cc66;">)</span></li><li style="" class="li1">                <span style="color: #b1b100;">Call</span> Ayuda.<span style="color: #66cc66;">Quitar</span><span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span></li><li style="" class="li2">                UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">Consultando</span> = <span style="color: #b1b100;">True</span></li><li style="" class="li1">                <span style="color: #b1b100;">Else</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;">"||No hay más gente en la lista de consultas, por favor, salga del MODO CONSULTA"</span> & 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">            <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: #b1b100;">End</span> Select</li><li style="" class="li1"><span style="color: #808080;">' _____________</span></li><li style="" class="li2"><span style="color: #808080;">'|             |</span></li><li style="" class="li1"><span style="color: #808080;">'| M O C H I X |</span></li><li style="" class="li1"><span style="color: #808080;">'|             |</span></li><li style="" class="li2"><span style="color: #808080;">' ¯¯¯¯¯¯¯¯¯¯¯¯¯</span></li><li style="" class="li1">    Select <span style="color: #b1b100;">Case</span> <span style="color: #b1b100;">UCase</span>$<span style="color: #66cc66;">(</span><span style="color: #b1b100;">Left</span><span style="color: #66cc66;">(</span>rdata, <span style="color: #cc66cc;">10</span><span style="color: #66cc66;">)</span><span style="color: #66cc66;">)</span></li><li style="" class="li1">        <span style="color: #b1b100;">Case</span> <span style="color: #ffffff;">"/SIGUIENTE"</span></li><li style="" class="li2">        tIndex = Ayuda.<span style="color: #66cc66;">PopByVal</span></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;">0</span> <span style="color: #b1b100;">Then</span></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;">Consultando</span> = <span style="color: #b1b100;">True</span> <span style="color: #b1b100;">Then</span></li><li style="" class="li2">                    <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> WarpUserChar<span style="color: #66cc66;">(</span>UserIndex, UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Pos</span>.<span style="color: #66cc66;">Map</span>, UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Pos</span>.<span style="color: #66cc66;">X</span>, UserList<span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Pos</span>.<span style="color: #66cc66;">Y</span> + <span style="color: #cc66cc;">1</span><span style="color: #66cc66;">)</span></li><li style="" class="li1">                    <span style="color: #b1b100;">Call</span> Ayuda.<span style="color: #66cc66;">Quitar</span><span style="color: #66cc66;">(</span>tIndex<span style="color: #66cc66;">)</span></li><li style="" class="li2">                    <span style="color: #b1b100;">Else</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;">"||No hay más gente en la lista de consultas, por favor, salga del MODO CONSULTA"</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">                <span style="color: #b1b100;">Else</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;">"||¡No estás en modo Consulta!"</span> & 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">            <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: #b1b100;">End</span> Select</li><li style="" class="li1"><span style="color: #808080;">' _____________</span></li><li style="" class="li2"><span style="color: #808080;">'|             |</span></li><li style="" class="li1"><span style="color: #808080;">'| M O C H I X |</span></li><li style="" class="li1"><span style="color: #808080;">'|             |</span></li><li style="" class="li2"><span style="color: #808080;">' ¯¯¯¯¯¯¯¯¯¯¯¯¯</span></li><li style="" class="li1">Select <span style="color: #b1b100;">Case</span> <span style="color: #b1b100;">UCase</span>$<span style="color: #66cc66;">(</span><span style="color: #b1b100;">Left</span>$<span style="color: #66cc66;">(</span>rdata, 1Cool<span style="color: #66cc66;">)</span></li><li style="" class="li1">        <span style="color: #b1b100;">Case</span> <span style="color: #ffffff;">"/TERMINARCONSULTAS"</span></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;">Privilegios</span> > <span style="color: #cc66cc;">0</span> <span style="color: #b1b100;">Then</span></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;">Consultando</span> = <span style="color: #b1b100;">True</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, <span style="color: #cc66cc;">0</span>, <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;">" ha terminado de dar consultas"</span> & FONTTYPE_SERVER<span style="color: #66cc66;">)</span></li><li style="" class="li2">                UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">Consultando</span> = <span style="color: #b1b100;">False</span></li><li style="" class="li1">                <span style="color: #b1b100;">Else</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;">"||¡No estás en modo Consulta!"</span> & 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">            <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: #b1b100;">End</span> Select</li></ol></div>[/vb]

Llega a pasar de nuevo y hasta que este bien el codigo, testeado y todo y sea 100% funcional no lo posteo d nuevo :oops:

ACUERDENSE DE DECLARAR "consultando"
 

Orion

Newbie Lvl 5
mochix...

lo probe otra vez xD

y paso esto:


entre con 2 users y el GM, mande gm con llos users, puse /empezarconsulta y no paso nada... puse /siguiente a ver que onda y se me salio el juego



xD

saludos!

capaz que hice algo mal...


lo que hice fue declarar consultando y poner el code abajo de /gm


we

saludos!


ale
 
Estado
Cerrado para nuevas respuestas.
Arriba