Hallo Leute,
ich habe mir mal ein Programm Heruntergeladen und das schaut jetzt so aus:
woher weiß ich wie ich die Port/Pin zuweißen soll hier ist ja der Portb,c,d Output für was d?(für den kontakt in der mitte der Spule? und wo muß ich den am Board dann anschliessen?)Code:'################################################## 'Schrittmotoransteuerung mit RN-Control mega32 v1.4 'Art= Vollschritt bipolar 'Schrittmotor Mitsumi M35SP-7 'Anschluss 1 = Gelb 'Anschluss 2 = Orange 'Anschluss 3 = Schwarz 'Anschluss 4 = Braun 'nicht belegt = Rot '################################################## $regfile = "m32def.dat" 'controller definieren $crystal = 16000000 'Taktfrequenz definieren Config Portb = Output 'Port als "Ausgang" definieren Config Portc = Output 'Port als "Ausgang" definieren Config Portd = Output 'Port als "Ausgang" definieren 1a Alias Portb.0 'Pin als Spule 1a benennen 1b Alias Portb.1 'Spule 1b 2a Alias Portc.6 'Spule 2a 2b Alias Portc.7 'Spule 2b Portb.0 = 0 'Spule 1a definiert auf Null Portb.1 = 0 'Spule 1b Portc.6 = 0 'Spule 2a Portc.7 = 0 'Spule 2b Portd.4 = 1 'Motortreiber Spule 1 Enable Portd.5 = 1 'Motortreiber Spule 2 Enable Dim I As Byte For I = 1 To 240 Dim Zeit As Byte Zeit = 3 'Zeit zwischen den einzelnen Schritten (kleiner=schneller) 1a = 1 : 1b = 0 : 2a = 1 : 2b = 0 'Schritt 1 Waitms Zeit 1a = 1 : 1b = 0 : 2a = 0 : 2b = 1 'Schritt 2 Waitms Zeit 1a = 0 : 1b = 1 : 2a = 0 : 2b = 1 'Schritt 3 Waitms Zeit 1a = 0 : 1b = 1 : 2a = 1 : 2b = 0 'Schritt 4 Waitms Zeit Next I End
kann ich sagen das Portb.0 einmal an meinem Portstecker b Pin 0 liegt und die erste Schraubklemme von meinem ersten Motoranschluss???
Lesezeichen