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>
C2 Quellcode formatieren: <code>Quellcode</code>
ASM Quellcode formatieren: <asm>Quellcode</asm>
(Innerhalb eines Quellcodeabschnitts ist kein html möglich.)
Wichtig: Bitte mache Zeilenumbrüche, bevor Du am rechten Rand des Eingabefeldes ankommst !  
> > > > Hallo Rene, > > > > > > > Die Initialiesierung wird natürlich nur beim Programstart durchlaufen > > > und nicht mehr auf gerufen > > > > > swcom.init(); swcom.setspeed(5); > > > > > > > > > > > > > > > > > > Poste mal noch etwas mehr Quellcode.> > > > > Rene > > > > Hallo krassos > > > Hier ein Teil des Programmes > //-------------------------------- > thread main > //--------------------------------- > { > // Programmstart > for L=0...7 > { > data[L]=0; Zyklus[L]=0; > } > A=0; D=0; L=0; W=200; Zz=0; Count=0; Relais=0; > Impuls=0; > // 76543210 > Viedeounit=0b11001100; > // Baudrate einstellen, Standardeinstellung 9600 Baud > hwcom.init(); hwcom.setspeed(5); > swcom.init(); swcom.setspeed(5); > plm.settimebase(0,7); plm.setmode(0,0); plm.setperiod(0,100); > plm.settimebase(1,7); plm.setmode(1,0); plm.setperiod(1,100); > // relas treiber 0= relais ein > // 1= relais aus > pcf.out(7,255); > // > EEPOT = eeprom2k.readint(0, 10); > PWM0 = eeprom2k.readint(0, 20); > PWM1 = eeprom2k.readint(0, 30); > Menue = eeprom2k.readint(0, 40); > if EEPOT<=100 or EEPOT>=250 > { > EEPOT=182; // bei 25 C > } > > //CAN-Bustiming 500 kB/s > can.init(4,0x07FF,0x0000); > // 5 V Nertzteil für LCDKeys > // 0=6,3 Volt 255=4.5 Volt > i2c.e_pot(0,0,EEPOT); > // PLM 0 = digitalausgang für TFT Displays 5 V Pegel > // 0=aus 100=ein > plm.out(0,PWM0); > // PLM 1 = Instromenten Dimmer 12-14 V Pegel > // 0=aus 100=ein > plm.out(1,PWM1); > > > s="00"; > STK_P(0, s); STK_P(3, s); STK_PA(4, s, 0); STK_PA(7, s, 0); > s="32"; > STK_P(1, s); STK_PA(5, s, 18); > s="33"; > STK_P(2, s); STK_PA(6, s, 18); > > > hwcom.put(12); > > run Blink; > run Hold; > //--------------------------------------------------------------- > // CAN ModulStarten > // ports.deactb(0); > if ports.get(5)==0 // Modul Starter > { > X=modulreset(); > if X==0 > { > plm.beep(15);sleep 250; plm.beep(-1);sleep 100; > modulstart(); > } > else // Fehler > { > plm.beep(10);sleep 1000; plm.beep(-1);sleep 100; > } > } > > plm.beep(15);sleep 250; plm.beep(-1);sleep 100; > plm.beep(15);sleep 250; plm.beep(-1);sleep 100; > > > > if ports.get(7)==0 // ausgabe über Serrielleschnitstelle SW4 uf on > { > s= "Basismodul V 26.10.2004 c"; > hwcom.send(s, str.length(s)); > hwcom.put(10);//curser runter > hwcom.put(13);//zeile anfang > sleep 50; > s="Kanal :"; > hwcom.send(s, str.length(s)); > for L=0...4 > { > hwcom.put(48+L); for M=0...2 hwcom.put(32); > } > s="Relais E_P "; hwcom.send(s, str.length(s)); sleep 20; > s="Joystik Spannung"; hwcom.send(s, str.length(s)); sleep 20; > s=" Temp"; hwcom.send(s, str.length(s)); > hwcom.put(10);//curser runter > hwcom.put(13);//zeile anfang return > } > > run SCAN_SEND; > > // Warten auf Zündung oder KL S für Systemstart > // Solannge wird Intro angezeigt > E1=pcf.in(0); > if (E1 and 3)!=0 > { > for L=0...300 > { > if (pcf.in(0) and 3) != 3 break; > sleep 100; > } > } > > // Löeschen > s="00"; > for L=0...3 > { > STK_P(L, s); > } > > // Letzte Einstellung aufrufen > Viedeounit=VTabelle(Menue); > MenueKey(Menue); > > //--------------------------------------------------------------- > /// Haubtprogramm > loop > { > // I2c Bus Abfrage (0-4) PCF8574 > Relais=0; > EE=0; > E1=pcf.in(0); > E2=pcf.in(1); > E3=pcf.in(2); > E4=pcf.in(3); > E5=pcf.in(4); > > > Das ganze Programm zu senden währe zu komplex > > Der erste Teil wird nur zum Start der Systeme benötigt > Swcom steuert die Kontrolleuchtenunit >

Dateianhang: (.gif, .png., .jpg, .zip, .rar)

max. 256kB

max. 256kB