[Aportes indexados] Codigo y Hechizo de Telep (by Pocho)

Estado
Cerrado para nuevas respuestas.
G

germu

Newbie Lvl 1
HECHIZO DE TELEPORT by 'Pocho'



En ModHechizo.bas Buscamos

[vb]<div class="vb" id="{CB}" style="font-family: monospace;"><ol><li style="" class="li1"><span style="color: #b1b100;">Else</span> <span style="color: #808080;">' /GS</span></li><li style="" class="li1">    </li><li style="" class="li2">    Select <span style="color: #b1b100;">Case</span> Hechizos<span style="color: #66cc66;">(</span>uh<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Tipo</span></li><li style="" class="li1">        <span style="color: #b1b100;">Case</span> uInvocacion <span style="color: #808080;">'</span></li><li style="" class="li1">            <span style="color: #b1b100;">Call</span> HechizoInvocacion<span style="color: #66cc66;">(</span>UserIndex, b<span style="color: #66cc66;">)</span></li><li style="" class="li2">        <span style="color: #b1b100;">Case</span> uEstado</li><li style="" class="li1">            <span style="color: #b1b100;">Call</span> HechizoTerrenoEstado<span style="color: #66cc66;">(</span>UserIndex, b<span style="color: #66cc66;">)</span></li><li style="" class="li1">        </li><li style="" class="li2">    <span style="color: #b1b100;">End</span> Select</li><li style="" class="li1"> </li><li style="" class="li1"> </li><li style="" class="li2"><span style="color: #b1b100;">End</span> <span style="color: #b1b100;">If</span></li></ol></div>[/vb]



y abajo agregamos:


[vb]<div class="vb" id="{CB}" style="font-family: monospace;"><ol><li style="" class="li1"><span style="color: #b1b100;">If</span> Hechizos<span style="color: #66cc66;">(</span>uh<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">TeleportX</span> = <span style="color: #cc66cc;">1</span> <span style="color: #b1b100;">Then</span></li><li style="" class="li1"><span style="color: #b1b100;">Dim</span> Mapaf, Xf, Yf <span style="color: #b1b100;">As</span> <span style="color: #b1b100;">Integer</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;">Portal</span> > <span style="color: #cc66cc;">0</span> <span style="color: #b1b100;">Then</span></li><li style="" class="li1"><span style="color: #b1b100;">Dim</span> TiemPoP <span style="color: #b1b100;">As</span> <span style="color: #b1b100;">Integer</span></li><li style="" class="li1"><span style="color: #b1b100;">Dim</span> ET <span style="color: #b1b100;">As</span> Obj </li><li style="" class="li2">ET.<span style="color: #66cc66;">Amount</span> = <span style="color: #cc66cc;">1</span> </li><li style="" class="li1">ET.<span style="color: #66cc66;">ObjIndex</span> = <span style="color: #cc66cc;">378</span> </li><li style="" class="li1">Mapaf = Hechizos<span style="color: #66cc66;">(</span>uh<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">TeleportXMap</span></li><li style="" class="li2">Xf = Hechizos<span style="color: #66cc66;">(</span>uh<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">TeleportXX</span></li><li style="" class="li1">Yf = Hechizos<span style="color: #66cc66;">(</span>uh<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">TeleportXY</span></li><li style="" class="li1">    TiemPoP = <span style="color: #cc66cc;">10</span> <span style="color: #808080;">' segundos</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;">Portal</span> = TiemPoP</li><li style="" class="li1">    <span style="color: #b1b100;">Call</span> MakeObj<span style="color: #66cc66;">(</span>ToMap, <span style="color: #cc66cc;">0</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Pos</span>.<span style="color: #66cc66;">Map</span>, ET, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Pos</span>.<span style="color: #66cc66;">Map</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">TargetX</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">TargetY</span><span style="color: #66cc66;">)</span></li><li style="" class="li1">    MapaF = <span style="color: #cc66cc;">1</span></li><li style="" class="li2">    Xf = <span style="color: #cc66cc;">50</span></li><li style="" class="li1">    Yf = <span style="color: #cc66cc;">70</span></li><li style="" class="li1">    MapData<span style="color: #66cc66;">(</span>UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Pos</span>.<span style="color: #66cc66;">Map</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">TargetX</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">TargetY</span><span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">TileExit</span>.<span style="color: #66cc66;">Map</span> = Mapaf</li><li style="" class="li2">    MapData<span style="color: #66cc66;">(</span>UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Pos</span>.<span style="color: #66cc66;">Map</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">TargetX</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">TargetY</span><span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">TileExit</span>.<span style="color: #66cc66;">x</span> = Xf</li><li style="" class="li1">    MapData<span style="color: #66cc66;">(</span>UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Pos</span>.<span style="color: #66cc66;">Map</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">TargetX</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">TargetY</span><span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">TileExit</span>.<span style="color: #66cc66;">y</span> = Yf</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;">Portal</span> = TiemPoP</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;">PortalM</span> = UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Pos</span>.<span style="color: #66cc66;">Map</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;">PortalX</span> = UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">TargetX</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;">PortalY</span> = UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">TargetY</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 puedes lanzar mas de un portal a la vez"</span> & <span style="color: #b1b100;">vbRed</span><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"> </li><li style="" class="li1"><span style="color: #b1b100;">End</span> <span style="color: #b1b100;">If</span></li></ol></div>[/vb]




Luego vamos a FileIO.bas y en el Sub CargarHechizos buscamos:

[vb]<div class="vb" id="{CB}" style="font-family: monospace;"><ol><li style="" class="li1"><span style="color: #808080;">'Llena la lista</span></li><li style="" class="li1"><span style="color: #b1b100;">For</span> Hechizo = <span style="color: #cc66cc;">1</span> <span style="color: #b1b100;">To</span> NumeroHechizos</li></ol></div>[/vb]


y abajo ponemos:

[vb]<div class="vb" id="{CB}" style="font-family: monospace;"><ol><li style="" class="li1">    Hechizos<span style="color: #66cc66;">(</span>Hechizo<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">TeleportX</span> = <span style="color: #b1b100;">val</span><span style="color: #66cc66;">(</span>Leer.<span style="color: #66cc66;">DarValor</span><span style="color: #66cc66;">(</span><span style="color: #ffffff;">"Hechizo"</span> & Hechizo, <span style="color: #ffffff;">"TeleportX"</span><span style="color: #66cc66;">)</span><span style="color: #66cc66;">)</span></li><li style="" class="li1">    Hechizos<span style="color: #66cc66;">(</span>Hechizo<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">TeleportXMap</span> = <span style="color: #b1b100;">val</span><span style="color: #66cc66;">(</span>Leer.<span style="color: #66cc66;">DarValor</span><span style="color: #66cc66;">(</span><span style="color: #ffffff;">"Hechizo"</span> & Hechizo, <span style="color: #ffffff;">"TeleportX"</span><span style="color: #66cc66;">)</span><span style="color: #66cc66;">)</span></li><li style="" class="li2">    Hechizos<span style="color: #66cc66;">(</span>Hechizo<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">TeleportXX</span> = <span style="color: #b1b100;">val</span><span style="color: #66cc66;">(</span>Leer.<span style="color: #66cc66;">DarValor</span><span style="color: #66cc66;">(</span><span style="color: #ffffff;">"Hechizo"</span> & Hechizo, <span style="color: #ffffff;">"TeleportX"</span><span style="color: #66cc66;">)</span><span style="color: #66cc66;">)</span></li><li style="" class="li1">    Hechizos<span style="color: #66cc66;">(</span>Hechizo<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">TeleportXY</span> = <span style="color: #b1b100;">val</span><span style="color: #66cc66;">(</span>Leer.<span style="color: #66cc66;">DarValor</span><span style="color: #66cc66;">(</span><span style="color: #ffffff;">"Hechizo"</span> & Hechizo, <span style="color: #ffffff;">"TeleportX"</span><span style="color: #66cc66;">)</span><span style="color: #66cc66;">)</span></li></ol></div>[/vb]


abajo tendremos que tener:

[vb]<div class="vb" id="{CB}" style="font-family: monospace;"><ol><li style="" class="li1">Hechizos<span style="color: #66cc66;">(</span>Hechizo<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Nombre</span> = Leer.<span style="color: #66cc66;">DarValor</span><span style="color: #66cc66;">(</span><span style="color: #ffffff;">"Hechizo"</span> & Hechizo, <span style="color: #ffffff;">"Nombre"</span><span style="color: #66cc66;">)</span> </li></ol></div>[/vb]


Segimos

En Declares.bas buscamos:


[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;">'************************ TIPOS *******************************</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"> </li><li style="" class="li1"><span style="color: #b1b100;">Type</span> tHechizo</li></ol></div>[/vb]



y abajo agregamos:

[vb]<div class="vb" id="{CB}" style="font-family: monospace;"><ol><li style="" class="li1">    TeleportX <span style="color: #b1b100;">As</span> <span style="color: #b1b100;">Integer</span></li><li style="" class="li1">    TeleportXMap <span style="color: #b1b100;">As</span> <span style="color: #b1b100;">Integer</span></li><li style="" class="li2">    TeleportXX <span style="color: #b1b100;">As</span> <span style="color: #b1b100;">Integer</span></li><li style="" class="li1">    TeleportXY <span style="color: #b1b100;">As</span> <span style="color: #b1b100;">Integer</span></li></ol></div>[/vb]


Luego vamos a General.bas y en Sub PasarSegundo() debajo de:

[vb]<div class="vb" id="{CB}" style="font-family: monospace;"><ol><li style="" class="li1">    <span style="color: #b1b100;">ElseIf</span> UserList<span style="color: #66cc66;">(</span>i<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">EstaEmpo</span> = <span style="color: #cc66cc;">1</span> <span style="color: #b1b100;">Then</span></li><li style="" class="li1">             UserList<span style="color: #66cc66;">(</span>i<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">EmpoCont</span> = UserList<span style="color: #66cc66;">(</span>i<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">EmpoCont</span> + <span style="color: #cc66cc;">1</span></li><li style="" class="li2">             <span style="color: #b1b100;">If</span> UserList<span style="color: #66cc66;">(</span>i<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">EmpoCont</span> = <span style="color: #cc66cc;">30</span> <span style="color: #b1b100;">Then</span></li><li style="" class="li1">                 </li><li style="" class="li1">                 <span style="color: #808080;">'If FileExist(CharPath & UserList(Z).Name & ".chr", vbNormal) Then</span></li><li style="" class="li2">                 <span style="color: #808080;">'esto siempre existe! sino no estaria logueado ;p</span></li><li style="" class="li1">                 </li><li style="" class="li1">                 <span style="color: #808080;">'TmpP = val(GetVar(CharPath & UserList(Z).Name & ".chr", "PENAS", "Cant"))</span></li><li style="" class="li2">                 <span style="color: #808080;">'Call WriteVar(CharPath & UserList(Z).Name & ".chr", "PENAS", "Cant", TmpP + 1)</span></li><li style="" class="li1">                 <span style="color: #808080;">'Call WriteVar(CharPath & UserList(Z).Name & ".chr", "PENAS", "P" & TmpP + 1, LCase$(UserList(Z).Name) & ": CARCEL " & 30 & "m, MOTIVO: Empollando" & " " & Date & " " & Time)</span></li><li style="" class="li1"> </li><li style="" class="li2">                 <span style="color: #808080;">'Call Encarcelar(Z, 30, "El sistema anti empollo")</span></li><li style="" class="li1">                 <span style="color: #b1b100;">Call</span> SendData<span style="color: #66cc66;">(</span>ToIndex, i, <span style="color: #cc66cc;">0</span>, <span style="color: #ffffff;">"!! Fuiste expulsado por permanecer muerto sobre un item"</span><span style="color: #66cc66;">)</span></li><li style="" class="li1">                 <span style="color: #808080;">'Call SendData(ToAdmins, Z, 0, "|| " & UserList(Z).Name & " Fue encarcelado por empollar" & FONTTYPE_INFO)</span></li><li style="" class="li2">                 UserList<span style="color: #66cc66;">(</span>i<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">EmpoCont</span> = <span style="color: #cc66cc;">0</span></li><li style="" class="li1">                 <span style="color: #b1b100;">Call</span> CloseSocket<span style="color: #66cc66;">(</span>i<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;">ElseIf</span> UserList<span style="color: #66cc66;">(</span>i<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">EmpoCont</span> = <span style="color: #cc66cc;">15</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, i, <span style="color: #cc66cc;">0</span>, <span style="color: #ffffff;">"|| LLevas 15 segundos bloqueando el item, muévete o serás desconectado."</span> & FONTTYPE_WARNING<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></ol></div>[/vb]



y agregamos:

[vb]<div class="vb" id="{CB}" style="font-family: monospace;"><ol><li style="" class="li1">         <span style="color: #b1b100;">If</span> UserList<span style="color: #66cc66;">(</span>i<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">Portal</span> = <span style="color: #cc66cc;">1</span> <span style="color: #b1b100;">Then</span></li><li style="" class="li1">         <span style="color: #b1b100;">Dim</span> mapa, x, y <span style="color: #b1b100;">As</span> <span style="color: #b1b100;">Integer</span></li><li style="" class="li2">         mapa = UserList<span style="color: #66cc66;">(</span>i<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">PortalM</span></li><li style="" class="li1">         x = UserList<span style="color: #66cc66;">(</span>i<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">PortalX</span></li><li style="" class="li1">         y = UserList<span style="color: #66cc66;">(</span>i<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">PortalY</span></li><li style="" class="li2">        <span style="color: #b1b100;">If</span> MapData<span style="color: #66cc66;">(</span>mapa, x, y<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">TileExit</span>.<span style="color: #66cc66;">Map</span> > <span style="color: #cc66cc;">0</span> <span style="color: #b1b100;">Then</span></li><li style="" class="li1">        <span style="color: #b1b100;">Call</span> EraseObj<span style="color: #66cc66;">(</span>ToMap, <span style="color: #cc66cc;">0</span>, mapa, MapData<span style="color: #66cc66;">(</span>mapa, x, y<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">OBJInfo</span>.<span style="color: #66cc66;">Amount</span>, mapa, x, y<span style="color: #66cc66;">)</span></li><li style="" class="li1">        <span style="color: #b1b100;">Call</span> EraseObj<span style="color: #66cc66;">(</span>ToMap, <span style="color: #cc66cc;">0</span>, MapData<span style="color: #66cc66;">(</span>mapa, x, y<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">TileExit</span>.<span style="color: #66cc66;">Map</span>, <span style="color: #cc66cc;">1</span>, MapData<span style="color: #66cc66;">(</span>mapa, x, y<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">TileExit</span>.<span style="color: #66cc66;">Map</span>, MapData<span style="color: #66cc66;">(</span>mapa, x, y<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">TileExit</span>.<span style="color: #66cc66;">x</span>, MapData<span style="color: #66cc66;">(</span>mapa, x, y<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">TileExit</span>.<span style="color: #66cc66;">y</span><span style="color: #66cc66;">)</span></li><li style="" class="li2">        MapData<span style="color: #66cc66;">(</span>mapa, x, y<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">TileExit</span>.<span style="color: #66cc66;">Map</span> = <span style="color: #cc66cc;">0</span></li><li style="" class="li1">        MapData<span style="color: #66cc66;">(</span>mapa, x, y<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">TileExit</span>.<span style="color: #66cc66;">x</span> = <span style="color: #cc66cc;">0</span></li><li style="" class="li1">        MapData<span style="color: #66cc66;">(</span>mapa, x, y<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">TileExit</span>.<span style="color: #66cc66;">y</span> = <span style="color: #cc66cc;">0</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">         UserList<span style="color: #66cc66;">(</span>i<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">Portal</span> = <span style="color: #cc66cc;">0</span></li><li style="" class="li2">         UserList<span style="color: #66cc66;">(</span>i<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">PortalM</span> = <span style="color: #cc66cc;">0</span></li><li style="" class="li1">         UserList<span style="color: #66cc66;">(</span>i<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">PortalY</span> = <span style="color: #cc66cc;">0</span></li><li style="" class="li1">         UserList<span style="color: #66cc66;">(</span>i<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">PortalX</span> = <span style="color: #cc66cc;">0</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> UserList<span style="color: #66cc66;">(</span>i<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">Portal</span> > <span style="color: #cc66cc;">1</span> <span style="color: #b1b100;">Then</span> UserList<span style="color: #66cc66;">(</span>i<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">Portal</span> = UserList<span style="color: #66cc66;">(</span>i<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">Portal</span> - <span style="color: #cc66cc;">1</span> </li></ol></div>[/vb]



nos quedaria ASÍ:

[vb]<div class="vb" id="{CB}" style="font-family: monospace;"><ol><li style="" class="li1">    <span style="color: #b1b100;">ElseIf</span> UserList<span style="color: #66cc66;">(</span>i<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">EstaEmpo</span> = <span style="color: #cc66cc;">1</span> <span style="color: #b1b100;">Then</span></li><li style="" class="li1">             UserList<span style="color: #66cc66;">(</span>i<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">EmpoCont</span> = UserList<span style="color: #66cc66;">(</span>i<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">EmpoCont</span> + <span style="color: #cc66cc;">1</span></li><li style="" class="li2">             <span style="color: #b1b100;">If</span> UserList<span style="color: #66cc66;">(</span>i<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">EmpoCont</span> = <span style="color: #cc66cc;">30</span> <span style="color: #b1b100;">Then</span></li><li style="" class="li1">                 </li><li style="" class="li1">                 <span style="color: #808080;">'If FileExist(CharPath & UserList(Z).Name & ".chr", vbNormal) Then</span></li><li style="" class="li2">                 <span style="color: #808080;">'esto siempre existe! sino no estaria logueado ;p</span></li><li style="" class="li1">                 </li><li style="" class="li1">                 <span style="color: #808080;">'TmpP = val(GetVar(CharPath & UserList(Z).Name & ".chr", "PENAS", "Cant"))</span></li><li style="" class="li2">                 <span style="color: #808080;">'Call WriteVar(CharPath & UserList(Z).Name & ".chr", "PENAS", "Cant", TmpP + 1)</span></li><li style="" class="li1">                 <span style="color: #808080;">'Call WriteVar(CharPath & UserList(Z).Name & ".chr", "PENAS", "P" & TmpP + 1, LCase$(UserList(Z).Name) & ": CARCEL " & 30 & "m, MOTIVO: Empollando" & " " & Date & " " & Time)</span></li><li style="" class="li1"> </li><li style="" class="li2">                 <span style="color: #808080;">'Call Encarcelar(Z, 30, "El sistema anti empollo")</span></li><li style="" class="li1">                 <span style="color: #b1b100;">Call</span> SendData<span style="color: #66cc66;">(</span>ToIndex, i, <span style="color: #cc66cc;">0</span>, <span style="color: #ffffff;">"!! Fuiste expulsado por permanecer muerto sobre un item"</span><span style="color: #66cc66;">)</span></li><li style="" class="li1">                 <span style="color: #808080;">'Call SendData(ToAdmins, Z, 0, "|| " & UserList(Z).Name & " Fue encarcelado por empollar" & FONTTYPE_INFO)</span></li><li style="" class="li2">                 UserList<span style="color: #66cc66;">(</span>i<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">EmpoCont</span> = <span style="color: #cc66cc;">0</span></li><li style="" class="li1">                 <span style="color: #b1b100;">Call</span> CloseSocket<span style="color: #66cc66;">(</span>i<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;">ElseIf</span> UserList<span style="color: #66cc66;">(</span>i<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">EmpoCont</span> = <span style="color: #cc66cc;">15</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, i, <span style="color: #cc66cc;">0</span>, <span style="color: #ffffff;">"|| LLevas 15 segundos bloqueando el item, muévete o serás desconectado."</span> & FONTTYPE_WARNING<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;">If</span> UserList<span style="color: #66cc66;">(</span>i<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">Portal</span> = <span style="color: #cc66cc;">1</span> <span style="color: #b1b100;">Then</span></li><li style="" class="li1">         <span style="color: #b1b100;">Dim</span> mapa, x, y <span style="color: #b1b100;">As</span> <span style="color: #b1b100;">Integer</span></li><li style="" class="li2">         mapa = UserList<span style="color: #66cc66;">(</span>i<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">PortalM</span></li><li style="" class="li1">         x = UserList<span style="color: #66cc66;">(</span>i<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">PortalX</span></li><li style="" class="li1">         y = UserList<span style="color: #66cc66;">(</span>i<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">PortalY</span></li><li style="" class="li2">        <span style="color: #b1b100;">If</span> MapData<span style="color: #66cc66;">(</span>mapa, x, y<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">TileExit</span>.<span style="color: #66cc66;">Map</span> > <span style="color: #cc66cc;">0</span> <span style="color: #b1b100;">Then</span></li><li style="" class="li1">        <span style="color: #b1b100;">Call</span> EraseObj<span style="color: #66cc66;">(</span>ToMap, <span style="color: #cc66cc;">0</span>, mapa, MapData<span style="color: #66cc66;">(</span>mapa, x, y<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">OBJInfo</span>.<span style="color: #66cc66;">Amount</span>, mapa, x, y<span style="color: #66cc66;">)</span></li><li style="" class="li1">        <span style="color: #b1b100;">Call</span> EraseObj<span style="color: #66cc66;">(</span>ToMap, <span style="color: #cc66cc;">0</span>, MapData<span style="color: #66cc66;">(</span>mapa, x, y<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">TileExit</span>.<span style="color: #66cc66;">Map</span>, <span style="color: #cc66cc;">1</span>, MapData<span style="color: #66cc66;">(</span>mapa, x, y<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">TileExit</span>.<span style="color: #66cc66;">Map</span>, MapData<span style="color: #66cc66;">(</span>mapa, x, y<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">TileExit</span>.<span style="color: #66cc66;">x</span>, MapData<span style="color: #66cc66;">(</span>mapa, x, y<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">TileExit</span>.<span style="color: #66cc66;">y</span><span style="color: #66cc66;">)</span></li><li style="" class="li2">        MapData<span style="color: #66cc66;">(</span>mapa, x, y<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">TileExit</span>.<span style="color: #66cc66;">Map</span> = <span style="color: #cc66cc;">0</span></li><li style="" class="li1">        MapData<span style="color: #66cc66;">(</span>mapa, x, y<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">TileExit</span>.<span style="color: #66cc66;">x</span> = <span style="color: #cc66cc;">0</span></li><li style="" class="li1">        MapData<span style="color: #66cc66;">(</span>mapa, x, y<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">TileExit</span>.<span style="color: #66cc66;">y</span> = <span style="color: #cc66cc;">0</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">         UserList<span style="color: #66cc66;">(</span>i<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">Portal</span> = <span style="color: #cc66cc;">0</span></li><li style="" class="li2">         UserList<span style="color: #66cc66;">(</span>i<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">PortalM</span> = <span style="color: #cc66cc;">0</span></li><li style="" class="li1">         UserList<span style="color: #66cc66;">(</span>i<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">PortalY</span> = <span style="color: #cc66cc;">0</span></li><li style="" class="li1">         UserList<span style="color: #66cc66;">(</span>i<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">PortalX</span> = <span style="color: #cc66cc;">0</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> UserList<span style="color: #66cc66;">(</span>i<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">Portal</span> > <span style="color: #cc66cc;">1</span> <span style="color: #b1b100;">Then</span> UserList<span style="color: #66cc66;">(</span>i<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">Portal</span> = UserList<span style="color: #66cc66;">(</span>i<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">Portal</span> - <span style="color: #cc66cc;">1</span></li><li style="" class="li2"> </li><li style="" class="li1"><span style="color: #b1b100;">Next</span> i </li></ol></div>[/vb]


Volvemos a Declares.bas y buscamos:

[vb]<div class="vb" id="{CB}" style="font-family: monospace;"><ol><li style="" class="li1"><span style="color: #808080;">'Flags</span></li><li style="" class="li1"><span style="color: #b1b100;">Type</span> UserFlags </li></ol></div>[/vb]


debajo agregamos y terminamos:

[vb]<div class="vb" id="{CB}" style="font-family: monospace;"><ol><li style="" class="li1">    Portal <span style="color: #b1b100;">As</span> <span style="color: #b1b100;">Integer</span></li><li style="" class="li1">    PortalM <span style="color: #b1b100;">As</span> <span style="color: #b1b100;">Integer</span></li><li style="" class="li2">    PortalX <span style="color: #b1b100;">As</span> <span style="color: #b1b100;">Integer</span></li><li style="" class="li1">    PortalY <span style="color: #b1b100;">As</span> <span style="color: #b1b100;">Integer</span></li></ol></div>[/vb]

Luego, en hechizos.dat agregamos HECHIZOxx y ponemos asi:

[HECHIZOxx]
Nombre=Portal Ullathorpe
Desc=Crea un portal a Ullathorpe
PalabrasMagicas=Di' Ulla'h Tl^p :lol: :lol: :lol:
HechizeroMsg=Has creado un portal a Ullathorpe
Tipo=0
WAV=17
FXgrh=0
MinSkill=40
ManaRequerido=1800
Target=4
StaRequerido= 16
Teleport=1
TeleportMap=1
TeleportX=50
TeleportY=50

----------------------------------------------------------------------------------

PASENLO A DESARROLLO COMPLETADOS
Haz clic para expandir...

Saludos :idea:
 
G

germu

Newbie Lvl 1
error no tira, no tengo mi pc aca, me tarda 2 horas en compilar :oops: fijate, sino tiene error creo qe funciona

Saludos
 
P

Pocho

Oráculo Lvl 3
yo creo que funciona, lo que falta, es si el usuario sale, q borre el teleport, no es dificil
 
P

Pocho

Oráculo Lvl 3
Hago doble post, asi revivo el post, y se dan cuenta que postie


para completar el codigo falta que si el usuario cierra, se borre el portal.


nose si anmda, y si me meti en algo jodido pero bue

buscamos

[vb]<div class="vb" id="{CB}" style="font-family: monospace;"><ol><li style="" class="li1">#If UsarQueSocket = <span style="color: #cc66cc;">1</span> <span style="color: #b1b100;">Or</span> UsarQueSocket = <span style="color: #cc66cc;">2</span> <span style="color: #b1b100;">Then</span></li><li style="" class="li1"> </li><li style="" class="li2"><span style="color: #b1b100;">Sub</span> CloseSocket<span style="color: #66cc66;">(</span>ByVal UserIndex <span style="color: #b1b100;">As</span> <span style="color: #b1b100;">Integer</span>, Optional ByVal cerrarlo <span style="color: #b1b100;">As</span> <span style="color: #b1b100;">Boolean</span> = <span style="color: #b1b100;">True</span><span style="color: #66cc66;">)</span></li><li style="" class="li1"><span style="color: #808080;">'<<<<<<<<<<<<<<<<<< NO TOCAR >>>>>>>>>>>>>>>>>>>>>></span></li><li style="" class="li1"><span style="color: #808080;">'<<<<<<<<<<<<<<<<<< NO TOCAR >>>>>>>>>>>>>>>>>>>>>></span></li><li style="" class="li2"><span style="color: #808080;">'<<<<<<<<<<<<<<<<<< NO TOCAR >>>>>>>>>>>>>>>>>>>>>></span></li></ol></div>[/vb]


abajo ponemoos

[vb]<div class="vb" id="{CB}" style="font-family: monospace;"><ol><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;">Portal</span> > <span style="color: #cc66cc;">0</span> <span style="color: #b1b100;">Then</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;">PortalX</span> = UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">PortalX</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;">PortalY</span> = UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">PortalY</span></li><li style="" class="li1">            <span style="color: #b1b100;">If</span> MapData<span style="color: #66cc66;">(</span>UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">PortalM</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">PortalX</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">PortalY</span><span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">TileExit</span>.<span style="color: #66cc66;">Map</span> > <span style="color: #cc66cc;">0</span> <span style="color: #b1b100;">Then</span></li><li style="" class="li1">            <span style="color: #b1b100;">Call</span> EraseObj<span style="color: #66cc66;">(</span>ToMap, <span style="color: #cc66cc;">0</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">PortalM</span>, MapData<span style="color: #66cc66;">(</span>UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">PortalM</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">PortalX</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">PortalY</span><span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">OBJInfo</span>.<span style="color: #66cc66;">Amount</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">PortalM</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">PortalX</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">PortalY</span><span style="color: #66cc66;">)</span></li><li style="" class="li2">            <span style="color: #b1b100;">Call</span> EraseObj<span style="color: #66cc66;">(</span>ToMap, <span style="color: #cc66cc;">0</span>, MapData<span style="color: #66cc66;">(</span>UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">PortalM</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">PortalX</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">PortalY</span><span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">TileExit</span>.<span style="color: #66cc66;">Map</span>, <span style="color: #cc66cc;">1</span>, MapData<span style="color: #66cc66;">(</span>UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">PortalM</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">PortalX</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">PortalY</span><span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">TileExit</span>.<span style="color: #66cc66;">Map</span>, MapData<span style="color: #66cc66;">(</span>UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">PortalM</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">PortalX</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">PortalY</span><span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">TileExit</span>.<span style="color: #66cc66;">X</span>, MapData<span style="color: #66cc66;">(</span>UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">PortalM</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">PortalX</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">PortalY</span><span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">TileExit</span>.<span style="color: #66cc66;">Y</span><span style="color: #66cc66;">)</span></li><li style="" class="li1">            MapData<span style="color: #66cc66;">(</span>UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">PortalM</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">PortalX</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">PortalY</span><span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">TileExit</span>.<span style="color: #66cc66;">Map</span> = <span style="color: #cc66cc;">0</span></li><li style="" class="li1">            MapData<span style="color: #66cc66;">(</span>UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">PortalM</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">PortalX</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">PortalY</span><span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">TileExit</span>.<span style="color: #66cc66;">X</span> = <span style="color: #cc66cc;">0</span></li><li style="" class="li2">            MapData<span style="color: #66cc66;">(</span>UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">PortalM</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">PortalX</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">PortalY</span><span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">TileExit</span>.<span style="color: #66cc66;">Y</span> = <span style="color: #cc66cc;">0</span></li><li style="" class="li1">        <span style="color: #b1b100;">End</span> <span style="color: #b1b100;">If</span></li></ol></div>[/vb]



dsp buscamos unas lineas mas abaqjo


[vb]<div class="vb" id="{CB}" style="font-family: monospace;"><ol><li style="" class="li1">#ElseIf UsarQueSocket = <span style="color: #cc66cc;">0</span> <span style="color: #b1b100;">Then</span></li><li style="" class="li1"> </li><li style="" class="li2"><span style="color: #b1b100;">Sub</span> CloseSocket<span style="color: #66cc66;">(</span>ByVal UserIndex <span style="color: #b1b100;">As</span> <span style="color: #b1b100;">Integer</span><span style="color: #66cc66;">)</span></li><li style="" class="li1"><span style="color: #808080;">'<<<<<<<<<<<<<<<<<< NO TOCAR >>>>>>>>>>>>>>>>>>>>>></span></li><li style="" class="li1"><span style="color: #808080;">'<<<<<<<<<<<<<<<<<< NO TOCAR >>>>>>>>>>>>>>>>>>>>>></span></li><li style="" class="li2"><span style="color: #808080;">'<<<<<<<<<<<<<<<<<< NO TOCAR >>>>>>>>>>>>>>>>>>>>>></span></li><li style="" class="li1"> </li><li style="" class="li1"><span style="color: #808080;">'Call LogTarea("Close Socket")</span></li><li style="" class="li2"> </li><li style="" class="li1"><span style="color: #b1b100;">On</span> <span style="color: #b1b100;">Error</span> <span style="color: #b1b100;">GoTo</span> errhandler</li><li style="" class="li1"> </li></ol></div>[/vb]

y abajo ponemos

[vb]<div class="vb" id="{CB}" style="font-family: monospace;"><ol><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;">Portal</span> > <span style="color: #cc66cc;">0</span> <span style="color: #b1b100;">Then</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;">PortalX</span> = UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">PortalX</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;">PortalY</span> = UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">PortalY</span></li><li style="" class="li1">            <span style="color: #b1b100;">If</span> MapData<span style="color: #66cc66;">(</span>UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">PortalM</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">PortalX</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">PortalY</span><span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">TileExit</span>.<span style="color: #66cc66;">Map</span> > <span style="color: #cc66cc;">0</span> <span style="color: #b1b100;">Then</span></li><li style="" class="li1">            <span style="color: #b1b100;">Call</span> EraseObj<span style="color: #66cc66;">(</span>ToMap, <span style="color: #cc66cc;">0</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">PortalM</span>, MapData<span style="color: #66cc66;">(</span>UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">PortalM</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">PortalX</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">PortalY</span><span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">OBJInfo</span>.<span style="color: #66cc66;">Amount</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">PortalM</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">PortalX</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">PortalY</span><span style="color: #66cc66;">)</span></li><li style="" class="li2">            <span style="color: #b1b100;">Call</span> EraseObj<span style="color: #66cc66;">(</span>ToMap, <span style="color: #cc66cc;">0</span>, MapData<span style="color: #66cc66;">(</span>UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">PortalM</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">PortalX</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">PortalY</span><span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">TileExit</span>.<span style="color: #66cc66;">Map</span>, <span style="color: #cc66cc;">1</span>, MapData<span style="color: #66cc66;">(</span>UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">PortalM</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">PortalX</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">PortalY</span><span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">TileExit</span>.<span style="color: #66cc66;">Map</span>, MapData<span style="color: #66cc66;">(</span>UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">PortalM</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">PortalX</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">PortalY</span><span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">TileExit</span>.<span style="color: #66cc66;">X</span>, MapData<span style="color: #66cc66;">(</span>UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">PortalM</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">PortalX</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">PortalY</span><span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">TileExit</span>.<span style="color: #66cc66;">Y</span><span style="color: #66cc66;">)</span></li><li style="" class="li1">            MapData<span style="color: #66cc66;">(</span>UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">PortalM</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">PortalX</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">PortalY</span><span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">TileExit</span>.<span style="color: #66cc66;">Map</span> = <span style="color: #cc66cc;">0</span></li><li style="" class="li1">            MapData<span style="color: #66cc66;">(</span>UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">PortalM</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">PortalX</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">PortalY</span><span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">TileExit</span>.<span style="color: #66cc66;">X</span> = <span style="color: #cc66cc;">0</span></li><li style="" class="li2">            MapData<span style="color: #66cc66;">(</span>UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">PortalM</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">PortalX</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">PortalY</span><span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">TileExit</span>.<span style="color: #66cc66;">Y</span> = <span style="color: #cc66cc;">0</span></li><li style="" class="li1">        <span style="color: #b1b100;">End</span> <span style="color: #b1b100;">If</span></li></ol></div>[/vb]


cualqier error avisen
 
G

germu

Newbie Lvl 1
aver, pocho, compile y abri, y no me tira ningun portal

fijate bien lo sigiente

[HECHIZO44]
Nombre=Portal Ulla
Desc= teleport a ulla
PalabrasMagicas=A' ullA pL`z
HechizeroMsg=Has lanzado portal
TargetMsg= laslas.
PropioMsg=lalals
Tipo=0
WAV=27
FXgrh=0
teleport=1
teleportmap=1
teleportx=50
teleporty=50
Target=4
MinSkill=1
ManaRequerido=1
StaRequerido= 1

creo qe ai qe buscar un tipo porq si es 0 no pasa nada, trate con invocando y tira y gasta el hechizo pero no pasa nada, materializar, tmp,

fijate o sino, puede qe sea todo esto mucho mas facil, tipo 4 materializa el objindex del portal a ulla, en tales coordenadas, si el usuario entro en tales coordenadas el portal se destruye, si no, 10 seg desp se destruye igual

saludos! :idea:
 
G

germu

Newbie Lvl 1
es una pregunta?

para mi si, si no no sabria el hechizo qe tirar, aparte es tipo = 0 qe no existe, no reconoce por lo tanto no hace nada, supongo
corrigan pls =)


saludos
 
P

Pocho

Oráculo Lvl 3
emm qien dijo que habia que hacer 5?

tienen que poner el de terreno ¬¬, y nose, ponele invocacion, es =


edito:

[HECHIZO44]
Nombre=Portal Ulla
Desc= teleport a ulla
PalabrasMagicas=A' ullA pL`z
HechizeroMsg=Has lanzado portal
TargetMsg= laslas.
PropioMsg=lalals
Tipo=5
WAV=27
FXgrh=0
Teleport=1
TeleportMap=1
TeleportX=50
TeleportY=50
Target=4
MinSkill=1
ManaRequerido=1
StaRequerido= 1
vale poner mayusculas y eso,

vos decis q no anda?

metele tipo 5
 
P

Pocho

Oráculo Lvl 3
vale aclarar esto

[vb]<div class="vb" id="{CB}" style="font-family: monospace;"><ol><li style="" class="li1"><span style="color: #b1b100;">If</span> Hechizos<span style="color: #66cc66;">(</span>uh<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">TeleportX</span> = <span style="color: #cc66cc;">1</span> <span style="color: #b1b100;">Then</span></li><li style="" class="li1"><span style="color: #b1b100;">Dim</span> Mapaf, Xf, Yf <span style="color: #b1b100;">As</span> <span style="color: #b1b100;">Integer</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;">Portal</span> > <span style="color: #cc66cc;">0</span> <span style="color: #b1b100;">Then</span></li><li style="" class="li1"><span style="color: #b1b100;">Dim</span> TiemPoP <span style="color: #b1b100;">As</span> <span style="color: #b1b100;">Integer</span></li><li style="" class="li1"><span style="color: #b1b100;">Dim</span> ET <span style="color: #b1b100;">As</span> Obj </li><li style="" class="li2">ET.<span style="color: #66cc66;">Amount</span> = <span style="color: #cc66cc;">1</span> </li><li style="" class="li1">ET.<span style="color: #66cc66;">ObjIndex</span> = <span style="color: #cc66cc;">378</span> </li><li style="" class="li1">Mapaf = Hechizos<span style="color: #66cc66;">(</span>uh<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">TeleportXMap</span></li><li style="" class="li2">Xf = Hechizos<span style="color: #66cc66;">(</span>uh<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">TeleportXX</span></li><li style="" class="li1">Yf = Hechizos<span style="color: #66cc66;">(</span>uh<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">TeleportXY</span></li><li style="" class="li1">    TiemPoP = <span style="color: #cc66cc;">10</span> <span style="color: #808080;">' segundos</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;">Portal</span> = TiemPoP</li><li style="" class="li1">    <span style="color: #b1b100;">Call</span> MakeObj<span style="color: #66cc66;">(</span>ToMap, <span style="color: #cc66cc;">0</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Pos</span>.<span style="color: #66cc66;">Map</span>, ET, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Pos</span>.<span style="color: #66cc66;">Map</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">TargetX</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">TargetY</span><span style="color: #66cc66;">)</span></li><li style="" class="li1"><span style="color: #66cc66;">[</span>size=<span style="color: #cc66cc;">150</span><span style="color: #66cc66;">]</span><span style="color: #66cc66;">[</span>color=red<span style="color: #66cc66;">]</span><span style="color: #66cc66;">[</span>b<span style="color: #66cc66;">]</span>    MapaF = <span style="color: #cc66cc;">1</span></li><li style="" class="li2">    Xf = <span style="color: #cc66cc;">50</span></li><li style="" class="li1">    Yf = <span style="color: #cc66cc;">70</span><span style="color: #66cc66;">[</span>/b<span style="color: #66cc66;">]</span><span style="color: #66cc66;">[</span>/color<span style="color: #66cc66;">]</span><span style="color: #66cc66;">[</span>/size<span style="color: #66cc66;">]</span>  </li><li style="" class="li1">  MapData<span style="color: #66cc66;">(</span>UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Pos</span>.<span style="color: #66cc66;">Map</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">TargetX</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">TargetY</span><span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">TileExit</span>.<span style="color: #66cc66;">Map</span> = Mapaf</li><li style="" class="li2">    MapData<span style="color: #66cc66;">(</span>UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Pos</span>.<span style="color: #66cc66;">Map</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">TargetX</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">TargetY</span><span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">TileExit</span>.<span style="color: #66cc66;">x</span> = Xf</li><li style="" class="li1">    MapData<span style="color: #66cc66;">(</span>UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Pos</span>.<span style="color: #66cc66;">Map</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">TargetX</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">TargetY</span><span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">TileExit</span>.<span style="color: #66cc66;">y</span> = Yf</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;">Portal</span> = TiemPoP</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;">PortalM</span> = UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Pos</span>.<span style="color: #66cc66;">Map</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;">PortalX</span> = UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">TargetX</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;">PortalY</span> = UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">TargetY</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 puedes lanzar mas de un portal a la vez"</span> & <span style="color: #b1b100;">vbRed</span><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"> </li><li style="" class="li1"><span style="color: #b1b100;">End</span> <span style="color: #b1b100;">If</span> </li></ol></div>[/vb]



ahi si mira, en un principio , puse para q siempre vaya al mismo lado


MapaF = 1
Xf = 50
Yf = 70

borrenlo

les quedaria asi

[vb]<div class="vb" id="{CB}" style="font-family: monospace;"><ol><li style="" class="li1">   <span style="color: #b1b100;">If</span> Hechizos<span style="color: #66cc66;">(</span>uh<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">TeleportX</span> = <span style="color: #cc66cc;">1</span> <span style="color: #b1b100;">Then</span></li><li style="" class="li1"><span style="color: #b1b100;">Dim</span> Mapaf, Xf, Yf <span style="color: #b1b100;">As</span> <span style="color: #b1b100;">Integer</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;">Portal</span> > <span style="color: #cc66cc;">0</span> <span style="color: #b1b100;">Then</span></li><li style="" class="li1"><span style="color: #b1b100;">Dim</span> TiemPoP <span style="color: #b1b100;">As</span> <span style="color: #b1b100;">Integer</span></li><li style="" class="li1"><span style="color: #b1b100;">Dim</span> ET <span style="color: #b1b100;">As</span> Obj </li><li style="" class="li2">ET.<span style="color: #66cc66;">Amount</span> = <span style="color: #cc66cc;">1</span> </li><li style="" class="li1">ET.<span style="color: #66cc66;">ObjIndex</span> = <span style="color: #cc66cc;">378</span> </li><li style="" class="li1">Mapaf = Hechizos<span style="color: #66cc66;">(</span>uh<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">TeleportXMap</span></li><li style="" class="li2">Xf = Hechizos<span style="color: #66cc66;">(</span>uh<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">TeleportXX</span></li><li style="" class="li1">Yf = Hechizos<span style="color: #66cc66;">(</span>uh<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">TeleportXY</span></li><li style="" class="li1">    TiemPoP = <span style="color: #cc66cc;">10</span> <span style="color: #808080;">' segundos</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;">Portal</span> = TiemPoP</li><li style="" class="li1">    <span style="color: #b1b100;">Call</span> MakeObj<span style="color: #66cc66;">(</span>ToMap, <span style="color: #cc66cc;">0</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Pos</span>.<span style="color: #66cc66;">Map</span>, ET, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Pos</span>.<span style="color: #66cc66;">Map</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">TargetX</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">TargetY</span><span style="color: #66cc66;">)</span></li><li style="" class="li1"> MapData<span style="color: #66cc66;">(</span>UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Pos</span>.<span style="color: #66cc66;">Map</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">TargetX</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">TargetY</span><span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">TileExit</span>.<span style="color: #66cc66;">Map</span> = Mapaf</li><li style="" class="li2">    MapData<span style="color: #66cc66;">(</span>UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Pos</span>.<span style="color: #66cc66;">Map</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">TargetX</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">TargetY</span><span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">TileExit</span>.<span style="color: #66cc66;">x</span> = Xf</li><li style="" class="li1">    MapData<span style="color: #66cc66;">(</span>UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Pos</span>.<span style="color: #66cc66;">Map</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">TargetX</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">TargetY</span><span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">TileExit</span>.<span style="color: #66cc66;">y</span> = Yf</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;">Portal</span> = TiemPoP</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;">PortalM</span> = UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Pos</span>.<span style="color: #66cc66;">Map</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;">PortalX</span> = UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">TargetX</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;">PortalY</span> = UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">TargetY</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 puedes lanzar mas de un portal a la vez"</span> & <span style="color: #b1b100;">vbRed</span><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"> </li><li style="" class="li1"><span style="color: #b1b100;">End</span> <span style="color: #b1b100;">If</span></li></ol></div>[/vb]
 
P

Pocho

Oráculo Lvl 3
ULTIMO MOMENTO

[vb]<div class="vb" id="{CB}" style="font-family: monospace;"><ol><li style="" class="li1"> </li><li style="" class="li1"><span style="color: #b1b100;">If</span> Hechizos<span style="color: #66cc66;">(</span>uh<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">TeleportX</span> = <span style="color: #cc66cc;">1</span> <span style="color: #b1b100;">Then</span></li><li style="" class="li2"><span style="color: #b1b100;">Dim</span> Mapaf, Xf, Yf <span style="color: #b1b100;">As</span> <span style="color: #b1b100;">Integer</span></li><li style="" class="li1"><span style="color: #66cc66;">[</span>color=orange<span style="color: #66cc66;">]</span><span style="color: #66cc66;">[</span>b<span style="color: #66cc66;">]</span><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;">Portal</span> > <span style="color: #cc66cc;">0</span> <span style="color: #b1b100;">Then</span><span style="color: #66cc66;">[</span>/b<span style="color: #66cc66;">]</span><span style="color: #66cc66;">[</span>/color<span style="color: #66cc66;">]</span><span style="color: #b1b100;">Dim</span> TiemPoP <span style="color: #b1b100;">As</span> <span style="color: #b1b100;">Integer</span></li><li style="" class="li1"><span style="color: #b1b100;">Dim</span> ET <span style="color: #b1b100;">As</span> Obj </li><li style="" class="li2">ET.<span style="color: #66cc66;">Amount</span> = <span style="color: #cc66cc;">1</span> </li><li style="" class="li1">ET.<span style="color: #66cc66;">ObjIndex</span> = <span style="color: #cc66cc;">378</span> </li><li style="" class="li1">Mapaf = Hechizos<span style="color: #66cc66;">(</span>uh<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">TeleportXMap</span></li><li style="" class="li2">Xf = Hechizos<span style="color: #66cc66;">(</span>uh<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">TeleportXX</span></li><li style="" class="li1">Yf = Hechizos<span style="color: #66cc66;">(</span>uh<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">TeleportXY</span></li><li style="" class="li1">    TiemPoP = <span style="color: #cc66cc;">10</span> <span style="color: #808080;">' segundos</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;">Portal</span> = TiemPoP</li><li style="" class="li1">    <span style="color: #b1b100;">Call</span> MakeObj<span style="color: #66cc66;">(</span>ToMap, <span style="color: #cc66cc;">0</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Pos</span>.<span style="color: #66cc66;">Map</span>, ET, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Pos</span>.<span style="color: #66cc66;">Map</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">TargetX</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">TargetY</span><span style="color: #66cc66;">)</span></li><li style="" class="li1">    MapaF = <span style="color: #cc66cc;">1</span></li><li style="" class="li2">    Xf = <span style="color: #cc66cc;">50</span></li><li style="" class="li1">    Yf = <span style="color: #cc66cc;">70</span></li><li style="" class="li1">    MapData<span style="color: #66cc66;">(</span>UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Pos</span>.<span style="color: #66cc66;">Map</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">TargetX</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">TargetY</span><span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">TileExit</span>.<span style="color: #66cc66;">Map</span> = Mapaf</li><li style="" class="li2">    MapData<span style="color: #66cc66;">(</span>UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Pos</span>.<span style="color: #66cc66;">Map</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">TargetX</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">TargetY</span><span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">TileExit</span>.<span style="color: #66cc66;">x</span> = Xf</li><li style="" class="li1">    MapData<span style="color: #66cc66;">(</span>UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Pos</span>.<span style="color: #66cc66;">Map</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">TargetX</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">TargetY</span><span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">TileExit</span>.<span style="color: #66cc66;">y</span> = Yf</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;">Portal</span> = TiemPoP</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;">PortalM</span> = UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Pos</span>.<span style="color: #66cc66;">Map</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;">PortalX</span> = UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">TargetX</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;">PortalY</span> = UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">TargetY</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 puedes lanzar mas de un portal a la vez"</span> & <span style="color: #b1b100;">vbRed</span><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"> </li><li style="" class="li1"><span style="color: #b1b100;">End</span> <span style="color: #b1b100;">If</span> </li></ol></div>[/vb]










ESO NO VA



VA ASI


[vb]<div class="vb" id="{CB}" style="font-family: monospace;"><ol><li style="" class="li1"> </li><li style="" class="li1"><span style="color: #b1b100;">If</span> Hechizos<span style="color: #66cc66;">(</span>uh<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">TeleportX</span> = <span style="color: #cc66cc;">1</span> <span style="color: #b1b100;">Then</span></li><li style="" class="li2"><span style="color: #b1b100;">Dim</span> Mapaf, Xf, Yf <span style="color: #b1b100;">As</span> <span style="color: #b1b100;">Integer</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;">Portal</span> = <span style="color: #cc66cc;">0</span> <span style="color: #b1b100;">Then</span></li><li style="" class="li1"><span style="color: #b1b100;">Dim</span> TiemPoP <span style="color: #b1b100;">As</span> <span style="color: #b1b100;">Integer</span></li><li style="" class="li2"><span style="color: #b1b100;">Dim</span> ET <span style="color: #b1b100;">As</span> Obj </li><li style="" class="li1">ET.<span style="color: #66cc66;">Amount</span> = <span style="color: #cc66cc;">1</span> </li><li style="" class="li1">ET.<span style="color: #66cc66;">ObjIndex</span> = <span style="color: #cc66cc;">378</span> </li><li style="" class="li2">Mapaf = Hechizos<span style="color: #66cc66;">(</span>uh<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">TeleportXMap</span></li><li style="" class="li1">Xf = Hechizos<span style="color: #66cc66;">(</span>uh<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">TeleportXX</span></li><li style="" class="li1">Yf = Hechizos<span style="color: #66cc66;">(</span>uh<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">TeleportXY</span></li><li style="" class="li2">    TiemPoP = <span style="color: #cc66cc;">10</span> <span style="color: #808080;">' segundos</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;">Portal</span> = TiemPoP</li><li style="" class="li1">    <span style="color: #b1b100;">Call</span> MakeObj<span style="color: #66cc66;">(</span>ToMap, <span style="color: #cc66cc;">0</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Pos</span>.<span style="color: #66cc66;">Map</span>, ET, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Pos</span>.<span style="color: #66cc66;">Map</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">TargetX</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">TargetY</span><span style="color: #66cc66;">)</span></li><li style="" class="li2">    MapaF = <span style="color: #cc66cc;">1</span></li><li style="" class="li1">    Xf = <span style="color: #cc66cc;">50</span></li><li style="" class="li1">    Yf = <span style="color: #cc66cc;">70</span></li><li style="" class="li2">    MapData<span style="color: #66cc66;">(</span>UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Pos</span>.<span style="color: #66cc66;">Map</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">TargetX</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">TargetY</span><span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">TileExit</span>.<span style="color: #66cc66;">Map</span> = Mapaf</li><li style="" class="li1">    MapData<span style="color: #66cc66;">(</span>UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Pos</span>.<span style="color: #66cc66;">Map</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">TargetX</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">TargetY</span><span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">TileExit</span>.<span style="color: #66cc66;">x</span> = Xf</li><li style="" class="li1">    MapData<span style="color: #66cc66;">(</span>UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Pos</span>.<span style="color: #66cc66;">Map</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">TargetX</span>, UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">TargetY</span><span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">TileExit</span>.<span style="color: #66cc66;">y</span> = Yf</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;">Portal</span> = TiemPoP</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;">PortalM</span> = UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">Pos</span>.<span style="color: #66cc66;">Map</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;">PortalX</span> = UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">TargetX</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;">PortalY</span> = UserList<span style="color: #66cc66;">(</span>UserIndex<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">flags</span>.<span style="color: #66cc66;">TargetY</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 puedes lanzar mas de un portal a la vez"</span> & <span style="color: #b1b100;">vbRed</span><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"> </li><li style="" class="li1"><span style="color: #b1b100;">End</span> <span style="color: #b1b100;">If</span></li></ol></div>[/vb]
 
Estado
Cerrado para nuevas respuestas.
Arriba