
Originally Posted by
2k1Toaster
Yeah you have a programming problem there... The betas draw too much
power and get hot with all the LEDs on. What you did was turn them all on at once... That is a lot of heat.
Unplug both and wait a second or two. Make sure it is not hot anymore. When you plug it in to the PC via USB only, does it connect? If so, then you should be able to control it normally, or you might have to reflash depending on how long you smoked it for.
That's why there is an explicit warning for beta users not to turn on all the outputs

No windows no longer detects it. The plastic around the barrel plug is slightly melted but i dont see any other damage. And i definitely didnt turn all outputs on. This is the code i ran (same code as all the ports)
Code:
SetDigitalOutput(1,6, true)
Public Shared Sub SetDigitalOutput(ByVal TheInstance As Integer, ByVal ThePort As Integer, ByVal TheOutcome As Boolean)
If FusionBrain_WinUSB.MainUSBClass.allFusionBrains(TheInstance - 1).fusionBrain_version.version = 6 Then
Dim _code As Integer = &H3
Dim _length As Integer = 1
Dim port As Integer = ThePort
Dim _toSendArray As Byte() = New Byte(1 + ((_length * 2) - 1)) {}
_toSendArray(0) = CByte((_code << 5) + _length)
_toSendArray(1) = CByte((port) << 3)
If TheOutcome = True Then
_toSendArray(2) = &HFF
'turn on indicator array
DigitalOutStatus(TheInstance, ThePort) = True
Else
_toSendArray(2) = &H0
'turn offindicator array
DigitalOutStatus(TheInstance, ThePort) = False
End If
FusionBrain_WinUSB.MainUSBClass.allFusionBrains(TheInstance - 1).SendDataToFusionBrain(_toSendArray, &H1)
Else
'v3 or v4 brain
End If
End Sub
which is the almost the same code as you posted here
Bookmarks