Like I just checked my pc at 11am and it's been d/c since 3am.
[03:37:49 AM] [BNCS] Disconnected.
nothing other than that and no attempt to reconnect either.
E: uploaded the file but it's not here now?
Pasting it formats it all funky.
Quote
'Arc
'1.1
'&Auto-Reconnect Plugin:ZergMaster
'//Added ClearQue (Thanks badimo) ~ Snap
Sub Arc_Event_Load()
Call SetSetting("Arc", "ReconnectTime", "60", "Set this to change the delay between each time it tries to reconnect you. In seconds.", False)
Call SetSetting("Arc", "ReconnectWhenOnline", False, "Set this to have it reconnect even when currently online.", False)
Arc_Time = GetSetting("Arc", "ReconnectTime")
If IsNumeric(Arc_Time) Then
Arc_Seconds = CInt(Arc_Time)
Else
Arc_Seconds = 60
Call SSC.AddChat(vbRed, "Invalid reconnect time found: " & Arc_Time & "! Reset to 60 seconds.")
Call SetSetting("Arc", "ReconnectTime", "60", "", True)
End If
Call TimerInterval("Arc", "Reconnect", Arc_Seconds)
Call TimerEnabled("Arc", "Reconnect", True)
End Sub
Sub Arc_Reconnect_Timer()
Arc_Time = GetSetting("Arc", "ReconnectTime")
If IsNumeric(Arc_Time) Then
If CInt(Arc_Time) <> CInt(GetTimerWaiting("Arc", "Reconnect")) Then
Arc_Seconds = CInt(Arc_Time)
Call TimerInterval("Arc", "Reconnect", Arc_Seconds)
End If
Else
Call SSC.AddChat(vbRed, "Invalid reconnect time found: " & Arc_Time & "! Reset to 60 seconds.")
Call SetSetting("Arc", "ReconnectTime", "60", "", True)
Call TimerInterval("Arc", "Reconnect", 60)
End If
If SSC.IsOnline() = False Or GetSetting("Arc", "ReconnectWhenOnline") = True Then
Call SSC.AddChat(vbYellow, "The Auto-Reconnect Plugin is connecting your bot...")
Call Command(BotVars.Username, "/cq", True)
Call SSC.Connect()
End If
End Sub
'1.1
'&Auto-Reconnect Plugin:ZergMaster
'//Added ClearQue (Thanks badimo) ~ Snap
Sub Arc_Event_Load()
Call SetSetting("Arc", "ReconnectTime", "60", "Set this to change the delay between each time it tries to reconnect you. In seconds.", False)
Call SetSetting("Arc", "ReconnectWhenOnline", False, "Set this to have it reconnect even when currently online.", False)
Arc_Time = GetSetting("Arc", "ReconnectTime")
If IsNumeric(Arc_Time) Then
Arc_Seconds = CInt(Arc_Time)
Else
Arc_Seconds = 60
Call SSC.AddChat(vbRed, "Invalid reconnect time found: " & Arc_Time & "! Reset to 60 seconds.")
Call SetSetting("Arc", "ReconnectTime", "60", "", True)
End If
Call TimerInterval("Arc", "Reconnect", Arc_Seconds)
Call TimerEnabled("Arc", "Reconnect", True)
End Sub
Sub Arc_Reconnect_Timer()
Arc_Time = GetSetting("Arc", "ReconnectTime")
If IsNumeric(Arc_Time) Then
If CInt(Arc_Time) <> CInt(GetTimerWaiting("Arc", "Reconnect")) Then
Arc_Seconds = CInt(Arc_Time)
Call TimerInterval("Arc", "Reconnect", Arc_Seconds)
End If
Else
Call SSC.AddChat(vbRed, "Invalid reconnect time found: " & Arc_Time & "! Reset to 60 seconds.")
Call SetSetting("Arc", "ReconnectTime", "60", "", True)
Call TimerInterval("Arc", "Reconnect", 60)
End If
If SSC.IsOnline() = False Or GetSetting("Arc", "ReconnectWhenOnline") = True Then
Call SSC.AddChat(vbYellow, "The Auto-Reconnect Plugin is connecting your bot...")
Call Command(BotVars.Username, "/cq", True)
Call SSC.Connect()
End If
End Sub
This post has been edited by Evster: January 30, 2019 - 07:21 PM