Re: kann die PORTS nicht schalten Kategorie: CC-Pro Unit & Appl.Board (von GEMINI1606 - 8.12.2008 11:35) | ||
Als Antwort auf Re: kann die PORTS nicht schalten von vitty - 5.12.2008 17:45 | ||
| ||
> > > Hallo, > > > ich habe in meinem program ports 20-23 also PC4-Pc7 > > > auf ausgang initialisiert und steuere mit diesen in meinem > > > Programm ein schieberegister. > > > aber ich kann auch alle ports on schalten habe aber an den > > > pins keine Spannung. > > > > > > worwn könnte das liegen????? > > > > > > Die led´s funktionieren ohne probs. > > > aber meine pins net. > > > > > > mfg > > > > Hallo, > > > > wie schaltest du die Ausgänge ?? > > Gib mal bitte den Programmcode. > > > > Gru� > > GEMINI1606 > Ich bin noch ein totaler neuling im c-control pro programieren, > habe vorher nur mit der unit c-controll rumgeschpielt... > wär super wenn mir jemand helfen könnte.... > > Sub First_Charge() 'funktion zur messung der zellen > Port_DataDirBit(16,1) > Port_DataDirBit(17,1) > Port_DataDirBit(18,1) > Port_DataDirBit(19,1) > Port_DataDirBit(20,1) > Port_DataDirBit(21,1) > Port_DataDirBit(22,1) > Port_DataDirBit(23,1) > Port_DataDirBit(51,1) > Port_DataDirBit(52,1) > > > LCD_Start() > i=1 > adr=0 > curs=0 > For i=1 To 20 > > > > If i=1 Then > Port_WriteBit(20,PORT_ON)'register löschen > > AbsDelay(500) > Port_WriteBit(20,PORT_OFF)' > Port_WriteBit(23,PORT_ON)'register port a on wenn i=1 > Port_WriteBit(51,PORT_ON)'LED > Else > Port_WriteBit(23,PORT_OFF)'register port a off > Port_WriteBit(51,PORT_OFF)'LED > End If > If i>1 Then > 'Port_WriteBit(23,PORT_OFF)'register port a off > End If > Port_WriteBit(22,PORT_ON) 'portC6 register b > Port_WriteBit(21,PORT_ON) 'portC5 register clk > Port_WriteBit(52,PORT_ON)'LED > AbsDelay(500) > Port_WriteBit(21,PORT_OFF) 'off clk register > Port_WriteBit(52,PORT_OFF)'LED > AbsDelay(200) > > ADC_Set(ADC_VREF_BG,ADC1) 'adc F0 initialisieren (zellen) > > zellen(i)=0 > zellen(i)=ADC_Read()*2.56/1024' Spannung ausrechnen > > > zeile_1="ZELLE" > Einheit="V" > curs = ((i - 1) And 3) + 1 > 'Zeilenschub() > > LCD_Locate(curs,1) > LCD_WriteText(zeile_1) > LCD_Locate(curs,7) 'ausgabe der zellenwerte > LCD_WriteWord(i,2) 'auf dem bildschirm > LCD_Locate(curs,11) > LCD_WriteFloat(zellen(i),2) > LCD_Locate(curs,15) > LCD_WriteText(Einheit) > AbsDelay(2000) > > > EEPROM_WriteFloat(adr,zellen(i)) 'speichern der werte!!!!!!! > adr=adr+4 > > If i=20 Then > Port_WriteBit(20,PORT_ON) 'register löschen on Flanke > AbsDelay(500) 'verzögerung 0,5 sec. > Port_WriteBit(20,PORT_OFF)'Clr off > Port_WriteBit(22,PORT_OFF)'port b am register off. > End If > > Next > > die led´s sind nur zum testen da,die gehen auch. > aber bei den ports tut sich nix. bin ratlos, > bin schon am verzweifeln > > Danke im vorraus!!!! > > Hallo, sieht eigentlich ganz okay aus, woher nimmst du die Masse/GND und +5V/VCC??? Gru� GEMINI1606 | ||
Antwort schreiben Antworten: Re: kann die PORTS nicht schalten (von vitty - 8.12.2008 15:25) Re: kann die PORTS nicht schalten (von GEMINI1606 - 9.12.2008 10:54) Re: kann die PORTS nicht schalten (von vitty - 9.12.2008 13:52) Re: kann die PORTS nicht schalten (von GEMINI1606 - 9.12.2008 14:19) Re: kann die PORTS nicht schalten (von vitty - 9.12.2008 16:59) Danke ich habs hinbeckommen (von vitty - 10.12.2008 18:41) |
Zur Übersicht - INFO - Neueste 50 Beiträge - Neuer Beitrag - Suchen - Zum C-Control-I-Forum - Zum C-Control-II-Forum