dann will ich auch mal das neue Forum ausprobieren. Ich bastel grad an meinem Stromzähleradapter mit nem PIC.
Da gibt es ja nun diese kleinen Käferchen mit 8 Beinen und internem Oszillator. Da hab ich bisher noch keine Erfahrungen
und ich bekomm die auch absolut nicht zum Laufen. Ich hab hier mal ein Einfachstprogramm gemacht, das einfach nur die
Beinchen auf 5 Volt schalten soll. Aber selbst das klappt nicht. Hat wer ne Idee?
Code: Alles auswählen
list p=12f675
#include <P12f675.INC>
ERRORLEVEL -302 ;SUPPRESS BANK SELECTION MESSAGES
; Configuration festlegen:
; kein Power on Timer, kein Watchdog, int-Oscillator, kein Brown out
__CONFIG _MCLRE_OFF & _PWRTE_OFF & _WDT_OFF & _INTRC_OSC_NOCLKOUT & _BODEN_OFF
;***********************************************************************
org 0x00
goto Init
;***********************************************************************
; Initialisierung
;
Init
; IO-Pins
bcf STATUS, RP0 ; Bank 0
clrf GPIO ; aus!
movlw 0x07
movwf CMCON ; Comparator aus
bsf STATUS, RP0 ; Bank 1
bcf TRISIO,5 ; alles output
bcf TRISIO,4 ; alles output
bcf TRISIO,3 ; alles output
bcf TRISIO,2 ; alles output
bcf TRISIO,1 ; alles output
bcf TRISIO,0 ; alles output
bcf STATUS, RP0 ; Bank0
; internen Taktgenerator kalibrieren
bsf STATUS, RP0 ; Bank 1
call 0x3FF
movwf OSCCAL ; 4-MHz-Kalibrierung
bcf STATUS, RP0 ; Bank 0
; Interrupt
bcf INTCON, GIE ; Int deaktiviert
;***********************************************************************
;Main
Mainloop
bsf GPIO,5 ;
bsf GPIO,4 ;
bsf GPIO,3 ;
bsf GPIO,2 ;
bsf GPIO,1 ;
bsf GPIO,0 ;
goto Mainloop
;***********************************************************************
end