este code es muy sencillo,, cuando no entiendia nada lo busque pro el indice,, pero no estaba y ahora q aptrendi y puedo hacerlo yo, lo aporto,
espero que les guste
en el servidor buscas
Numero de Linea | Ocultar/Mostrar | Seleccionar todo
1. Case "#3"
y arriva pones
Numero de Linea | Ocultar/Mostrar | Seleccionar todo
1. Case "#_" '/ULLA by iL Sharow!
2.
3. If UserList(UserIndex).POS.Map = 66 Then
4. Call SendData(ToIndex, UserIndex, 0, "||No escaparás de la carcel." & FONTTYPE_TALK) ' iL Nolox!
5. Exit Sub
6. End If
7.
8. If UserList(UserIndex).POS.Map = 170 Then
9. Call SendData(ToIndex, UserIndex, 0, "||No podés usar los comandos desde los rings de agite." & FONTTYPE_TALK)' iL Nolox!
10. Exit Sub
11. End If
12.
13. If UserList(UserIndex).flags.Muerto = 1 Then
14. Call SendData(ToIndex, UserIndex, 0, "||Estás muerto!" & FONTTYPE_TALK)' iL Nolox!
15. Exit Sub
16. End IF
17.
18. If UserList(UserIndex).Stats.GLD < 300000 Then
19. Call SendData(ToIndex, UserIndex, 0, "||El viaje cuesta 300000 monedas de oro" & FONTTYPE_TALK)' iL Nolox!
20. Exit Sub
21. End If
22.
23. If (UserList(UserIndex).Stats.MinHP < UserList(UserIndex).Stats.MaxHP / 2) Then
24. Call SendData(ToIndex, UserIndex, 0, "||Si tienes menos de la mitad de la vida no serás teletransoportado a ULLA" & FONTTYPE_TALK)' iL Nolox!
25. Exit Sub
26. End If
27.
28. If UserList(UserIndex).flags.Paralizado = 1 Then
29. Call SendData(ToIndex, UserIndex, 0, "||No puedes ir a ULLA si estás paralizado." & FONTTYPE_TALK)' iL Nolox!
30. Exit Sub
31. End If
32.
33.
34.
35. Call WarpUserChar(UserIndex, 1, 50, 50, True)
36.
37. Exit Sub
en el cliente buscas
Numero de Linea | Ocultar/Mostrar | Seleccionar todo
1. Case "/RESUCITAR"
y arriva pones
Numero de Linea | Ocultar/Mostrar | Seleccionar todo
1. Case "/ULLA"' iL Nolox!
2. ReplaceData = "#_"
listo..
EL USER PONE /ULLA
Y SERÁ TRANSPORTADO SI CUMPLE CON SIERTOS REQUISITOS
ojala les guste,,,