Hallo, Suche jemand der einem Anfänger in einfachen Schritte bei der Entwicklung eines Frequenzgenerators hilft, habe schon einige Versuchem mit Timer unternommen, allerdings komme ich nicht über Frequenz von ca 4 Khz hinaus. Habe zwar schon einige fertige Programm gefunden , allerdings habe ich die nicht durchschauen können.
Mir geht es aber in der Hauptsache um das Verständnis.
Das war mein letzter Test:
Code:$regfile "m32def.dat" $crystal = 1000000 $hwstack = 32 $swstack = 10 Config Lcd = 16 * 2 Config Lcdpin = Pin , Db4 = Portc.2 , Db5 = Portc.3 , Db6 = Portc.6 , Db7 = Portc.7 , Rs = Portc.5 , E = Portc.4 D e f i n i t i o n d e r V a r i a b l e n Dim Taktwert As Byte D e f i n i t i o n d e r P in 's Portb = &B00011110 Ddra = &B11111111 T i m e r 0 Config Timer0 = Timer , Prescale = 1 Enable Timer0 On Timer0 Timer_null Enable Interrupts H a u p t p r o g r a m m Do If Pinb.1 = 0 Then Taktwert = Taktwert + 1 If Pinb.2 = 0 Then Taktwert = Taktwert -1 Gosub Anzeige Waitms 50 Loop U n t e r r o u t í n e A n z e i g e Anzeige: Cls Locate 1 , 1 Lcd "Taktwert=" ; Taktwert Locate 2 , 9 Lcd "V.FG6A" Waitms 100 Return U n t e r r o u t i n e T i m e r 0 Timer_null: Timer0 = Taktwert Toggle Porta.0 Return







Zitieren

Lesezeichen