We would like to build a community for Small Basic programmers of any age who like to code. Everyone from total beginner to guru is welcome. Click here to register and share your programming journey!


Thread Rating:
  • 0 Vote(s) - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
Creation of SB-Neuron. Ours. Branded.(v2)
#37
AB,

I will attach a file for an or gate. I haven't figured out how to do multiple gates. I couldn't do an attachment. So, I put it in as code/

JR

Code:
inputNode = 2
hiddenNode = 2
outputNode = 1
'scale = 100
trainingDataText = Program.Directory+"\orANNInput.txt"
trainingDataBinary = Program.Directory+"\orANNInput.bin"

name= "orANN"
NeuralNetwork.New(name,inputNode+","+hiddenNode+","+outputNode)
NeuralNetwork.BinaryOutput(name,0,"true")
'name = NeuralNetwork.Load(Program.Directory+"\"+name+".textwindow")

File.DeleteFile(trainingDataText)

separationCharacter = " " 'Can be LDText.LF, LDText.TAB, " " or ","

'orann
File.AppendContents(trainingDataText,"0 0 0")
File.AppendContents(trainingDataText,"1 0 1")
File.AppendContents(trainingDataText,"0 1 1")
File.AppendContents(trainingDataText,"1 1 1")

NeuralNetwork.ConvertFile(trainingDataText,trainingDatabinary,"False")
textwindow.writeline("Training started")
epoch = NeuralNetwork.Train(name,trainingDataBinary,"True")
NeuralNetwork.Save(name,Program.Directory+"\"+name+".txt")
textwindow.writeline("epoch="+epoch)
textwindow.writeline("Trained="+NeuralNetwork.Trained(name))
textwindow.writeline("BinaryOutput="+NeuralNetwork.BinaryOutput(name,0,"True"))
textwindow.writeline("Epoch="+NeuralNetwork.Epochs(name,0,"True"))
textwindow.writeline("LearningRate="+NeuralNetwork.LearningRate(name,0,"True"))
textwindow.writeline("Momentum="+NeuralNetwork.Momentum(name,0,"True"))
textwindow.writeline("SigmoidResponse="+NeuralNetwork.SigmoidResponse(name,0,"True"))
textwindow.writeline("ErrorRequired="+NeuralNetwork.ErrorRequired(name,0,"True"))

input = 0+","+0
output=NeuralNetwork.use(name,input)
textwindow.writeline(input)
textwindow.writeline(output)

input=1+","+0
output=NeuralNetwork.Use(name,input)
textwindow.writeline(input)
textwindow.writeline(output)

input=0+","+1
output=NeuralNetwork.Use(name,input)
textwindow.writeline(input)
textwindow.writeline(output)

input=1+","+1
output=NeuralNetwork.Use(name,input)
textwindow.writeline(input)
textwindow.writeline(output)
[-] The following 1 user Likes jrmrhrb00's post:
  • AbsoluteBeginner
Reply


Messages In This Thread
RE: Creation of SB-Neuron. Ours. Branded.(v2) - by jrmrhrb00 - 10-08-2024, 04:00 PM

Forum Jump:


Users browsing this thread: 2 Guest(s)