Stap 6: Master neuronen voor Robots
Master Neuron Code
De feitelijke code van een basispagina neuron, is afhankelijk van de robot die wordt gecontroleerd. Mijn eerste echte wereld gebruiken is met behulp tinkertrons een lucht spier robot controller. Zie hier voor meer informatie over hoe te maken van de controller:
Hier is de code die wordt gebruikt in de master neuron van de lucht spier robot controller waarmee twee activator neuronen:
' 20 m 2 master neuron
B1 = 1
onderbreken van 100
serout c.0,t4800,(1,11) ' open inname
onderbreken van 40
serout c.0,t4800,(1,11) ' open inname
onderbreken van 40
serout-c.1,t2400,(170,9,$0C,127) ' m1 24-127, 84-2/3 kloksnelheid
onderbreken van 100
LOOP1:
lage c.7
' debug b1
IRIN [1000,loop1],b.5, b6
Als b6 = 0 dan send1 ' button1 = 0
Als b6 = 1 then send2
Als b6 = 2 dan send3
Als b6 = 3 dan send4
Als b6 = 4 dan send5
Als b6 = 5 dan send6
Als b6 = 6 dan send7
Als b6 = 7 dan send8
Als b6 = 8 dan send9
Als b6 = 9 dan send10
Als b6 = 59 dan send11 ' (-)
Als b6 = 11 then send12 ' invoeren
Als b6 = 14 dan send13 ' gids
Als b6 = 21 dan send14 ' macht
Als b6 = 16 dan is send16 ' ch +
Als b6 = 17 dan send17 ' ch -
Als b6 = 116 dan send116 ' terug
Als b6 = 117 dan send117 ' forw
Als b6 = 52 dan send52 ' links
Als b6 = 51 dan send51 ' juiste
Als b6 = 18 dan seq1 ' arm omlaag
Als b6 = 19 dan seq1rev ' omgekeerde arm omlaag
goto loop1
send1:
' serout c.0,t4800,(1,13) ' gids
' onderbreken van 40
serout c.0,t4800,(1,1) ' Stuur van 1 byte met 1, als kwalificatie
onderbreken van 40
goto loop1
send2:
serout c.0,t4800,(1,2)
onderbreken van 40
goto loop1
send3:
serout c.0,t4800,(1,3)
onderbreken van 40
goto loop1
send4:
serout c.0,t4800,(1,4)
onderbreken van 40
goto loop1
send5:
serout c.0,t4800,(1,5)
onderbreken van 40
goto loop1
send6:
serout c.0,t4800,(1,6)
onderbreken van 40
goto loop1
send7:
serout c.0,t4800,(1,7)
onderbreken van 40
goto loop1
send8:
serout c.0,t4800,(1,8)
onderbreken van 40
goto loop1
send9:
serout c.0,t4800,(1,9)
onderbreken van 40
goto loop1
send10:
serout c.0,t4800,(1,10)
onderbreken van 40
goto loop1
send11: ' (-)
serout c.0,t4800,(1,11)
onderbreken van 40
goto loop1
send12: ' Geef
serout c.0,t4800,(1,12)
onderbreken van 40
goto loop1
send13: ' gids
serout c.0,t4800,(1,13)
onderbreken van 40
goto loop1
send14: ' kracht verzenden 21
serout c.0,t4800,(1,21) ' Stuur 21
onderbreken van 40
goto loop1
send16: '
serout c.0,t4800,(1,16)
onderbreken van 40
goto loop1
send17: '
serout c.0,t4800,(1,17)
onderbreken van 40
goto loop1
send116: '
serout c.0,t4800,(1,116)
onderbreken van 40
goto loop1
send117: '
serout c.0,t4800,(1,117)
onderbreken van 40
goto loop1
send52: '
serout c.0,t4800,(1,52)
onderbreken van 40
goto loop1
send51: '
serout c.0,t4800,(1,51)
onderbreken van 40
goto loop1
seq1: '
serout c.0,t4800,(1,18)
onderbreken van 40
goto loop1
seq1rev: '
serout c.0,t4800,(1,19)
onderbreken van 40
goto loop1
