Cuando morimos elegimos destyno estilo (Tpao)

es muy sencillo, la funcion seria que cuando moramos, nos aparesca un form que nos diga si queremos volver ulla o seguir caminando. Empezamos;
En el cliente agregamos un nuevo form, al cual llamaremos "frmHogar", y agregamos 2 command button.
El Command1 seria el de ir hacia Ulla y el Command2 seria el de seguir caminando.
Adentro del form ponemos



Private Sub Command1_Click()
Call SendData("/AULLA") 'Si aca tienen /HOGAR pueden ponerlo tmb
Unload Me
End Sub
Private Sub Command2_Click()
Unload Me
End Sub



Despues buscan



Case "PARADOK"


Y arriba ponen



Case "MUERTEE"
Frmhogar.show, frmMain
Exit sub



Ahora en el servidor buscamos:



Case "/AYUDA"



Y arriba ponemos



Case "/AULLA"
If UserList(UserIndex).flags.Muerto Then
Call SendData(SendTarget.ToIndex, UserIndex, 0, "||Has sido llevado a Ullathorpe" & FONTTYPE_INFO)
Call WarpUserChar(UserIndex, 1, 50, 50, True)
Else
Call SendData(SendTarget.ToIndex, UserIndex, 0, "||Debes estar muerto para utilizar el comando" & FONTTYPE_INFO)
End If
Exit Sub



Despues buscan en el Sub UserDie:


UserList(UserIndex).flags.Muerto = 1



Y aabajo ponen



Call SendData(SendTarget.ToIndex, UserIndex, 0, "MUERTEE")



Listo, sencillo