Kommentar: Einfügen von HTML im Kommentar: Link einfügen: <a href="LINKURL" target="_blank">LINKTITEL</a> Bild einfügen: <img src="BILDURL"> Text formatieren: <b>fetter Text</b> <i>kursiver Text</i> <u>unterstrichener Text</u> Kombinationen sind auch möglich z.B.: <b><i>fetter & kursiver Text</i></b> C Quellcode formatieren: <code>Quellcode</code> BASIC Quellcode formatieren: <basic>Quellcode</basic> (Innerhalb eines Quellcodeabschnitts ist kein html möglich.) Wichtig: Bitte mache Zeilenumbrüche, bevor Du am rechten Rand des Eingabefeldes ankommst ! -> I > > > > 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
