Che toy tratando de hacerte el code janzel, pero haber franeg vos que sabes, cuando yo deslogueo de la cuenta no veo el frmcuent 
En el finok separe haci
Case "FINOK2"
#If UsarWrench = 1 Then
frmMain.Socket1.Disconnect
frmMain.Socket1.Cleanup
#Else
If frmMain.Winsock1.State <> sckClosed Then _
frmMain.Winsock1.Close
#End If
Exit Sub
Case "FINOK" ' Graceful exit
)
frmMain.Visible = False
logged = False
UserParalizado = False
IScombate = False
pausa = False
UserMeditar = False
UserDescansar = False
UserNavegando = False
UserMontando = False
frmCuent.Visible = True
Call Audio.StopWave
Audio.MP3_Play (RandomNumber(1, 2))
Audio.StopMidi
frmMain.IsPlaying = PlayLoop.plNone
bRain = False
bFogata = False
SkillPoints = 0
' frmMain.Label1.Visible = False
Call Dialogos.RemoveAllDialogs
For i = 1 To LastChar
charlist(i).invisible = False
Next i
#If SeguridadAlkon Then
Call MI(CualMI).Inicializar(RandomNumber(1, 1000), 10000)
#End If
bK = 0
Exit Sub
y no veo el frmcuent ahora cuando deslogueo
En el finok separe haci
Case "FINOK2"
#If UsarWrench = 1 Then
frmMain.Socket1.Disconnect
frmMain.Socket1.Cleanup
#Else
If frmMain.Winsock1.State <> sckClosed Then _
frmMain.Winsock1.Close
#End If
Exit Sub
Case "FINOK" ' Graceful exit
frmMain.Visible = False
logged = False
UserParalizado = False
IScombate = False
pausa = False
UserMeditar = False
UserDescansar = False
UserNavegando = False
UserMontando = False
frmCuent.Visible = True
Call Audio.StopWave
Audio.MP3_Play (RandomNumber(1, 2))
Audio.StopMidi
frmMain.IsPlaying = PlayLoop.plNone
bRain = False
bFogata = False
SkillPoints = 0
' frmMain.Label1.Visible = False
Call Dialogos.RemoveAllDialogs
For i = 1 To LastChar
charlist(i).invisible = False
Next i
#If SeguridadAlkon Then
Call MI(CualMI).Inicializar(RandomNumber(1, 1000), 10000)
#End If
bK = 0
Exit Sub
y no veo el frmcuent ahora cuando deslogueo