'############################################################### '## Grundgerüst eines BASCOM- Programmes für Multi2313- Board ## '############################################################### 'Den verwendeten Mikrocontroller nennen: $regfile = "attiny2313.dat" 'Belegungsplan des Controllers: 'PA0 Lochrasterfeld 'PA1 Lochrasterfeld 'PA2 ISP/EXT Pin5 'PB0 ISP/EXT Pin3 'PB1 Lochrasterfeld 'PB2 Leistungsausgang (blau) 'PB3 Leistungsausgang (grün) 'PB4 Leistungsausgang (rot) 'PB5 ISP/EXT Pin1 'PB6 ISP/EXT Pin9 'PB7 ISP/EXT Pin7 'PD0 Lochrasterfeld 'PD1 Lochrasterfeld 'PD2 Lochrasterfeld 'PD3 Lochrasterfeld 'PD4 Lochrasterfeld 'PD5 ISP/EXT Pin4 'PD6 ISP/EXT Pin6 'Angeben mit welcher Frequenz der Mikrocontroller arbeitet: $crystal = 1000000 'Eingänge einstellen: Config Portx.x = Input 'einzelner Pin als Eingang Config Portx = Output 'ein ganzer Port als Ausgang 'Namen für Eingänge festlegen: Pinname Alias Pinx.x 'Pullup- Widerstände für Eingänge einschalten: Pinname = 1 'Die Timer auf PWM-Modus stellen: Config Timer0 = Pwm , Pwm = On , Prescale = 8 , Compare A Pwm = Clear Down ', Compare B Pwm = Clear Down Config Timer1 = Pwm , Pwm = 8 , Prescale = 8 , Compare A Pwm = Clear Down , Compare B Pwm = Clear Down 'Diese PWM-Register haben eine Breite von 8 Bit - also Werte von 0 bis 255 'Wobei 0 = 0% Helligkeit und 255 = 100% Helligkeit bedeuten 'Timer freigeben: Enable Timer1 Enable Timer0 'Timer starten: Start Timer1 Start Timer0 'PWM-Register zuweisen: Ledg Alias Pwm1a Ledr Alias Pwm1b Ledb Alias Pwm0a 'PWM-Register vorladen: Ledr = 0 Ledg = 0 Ledb = 0 '...hier gehört EUER Hauptprogramm hin!