  INFO - FAQ - CC2-Forum - CCPro-Forum |
|
Hallo, nun sollen wir raten. Was ist USK1 ? Beispiel: Statt AL2 wäre zweckmäßig AlarmTueren zu schreiben Es fehlen die Kommentare zu jeder Zeile Deines Programms. Der Befehl PAUSE bedingt, dass Dein Programm dort blockiert ist. Du kannst zweckmäßig nur eine Funktion z.B. Blitzleuchte ein-aus programmieren und mit der Hardware testen. Danach erst den nächsten Schritt machen. MfG ManfredW > > > define CS1 as port[9] > define CS2 as port[10] > define AL1 as port[11] 'EDV RAUM > define AL2 as port[12] 'Türen > define AL3 as port[13] 'Fenster > define USK1 as port[14] > define USK2 as port[15] > > define ALARM1 as port[1] > define ALARM2 as port[2] > define BLITZLEUCHTE as port[3] > define SIRENE as port[4] > define ALARMSCHARF as port[5] > define ALARMUNSCHARF as port[6] > define INTERNSCHARF as port[7] > define INTERNUNSCHARF as port[8] > > ' --- Programmoperationen ------------- > > #loop > if CS1 = 0 then goto T ' > if AL1 = 0 then goto A1 ' > if CS2 = 0 then goto T1 ' > if AL2 = 0 then goto A2 ' > if AL3 = 0 then goto A3 ' > > goto loop > > #T > if AL1 = 0 then goto Alarm > > #T1 > if AL2 = 0 then goto Alarm > if AL3 = 0 then goto Alarm > > #A1 > ALARM1 = 1 'Alarm LED EDV > pause 200 > ALARM1 = 0 > > #A2 > Alarm2 = 1 'Alarm LED 2 > pause 200 > Alarm2 = 0 > > #A3 > Alarm2 = 1 'Alarm LED 2 > pause 200 > Alarm2 = 0 > > #scharf > > if BLITZLEUCHTE = 1 then goto blitz2 > > #Alarm > > Sirene = 1 > pause 200 > goto blitz1 > > #Blitz1 > > BLITZLEUCHTE = 1 > pause 200 > BLITZLEUCHTE = 0 > > #Blitz2 > > BLITZLEUCHTE = 1 > > #uns1 > if USK1 = 1 then > INTERNUNSCHARF = 1 > end if > > #uns2 > if USK2 = 1 then > ALARMUNSCHARF = 1 > end if > > goto loop > Meine Homepage: http://manfred.wilzeck.de |
| Antwort schreiben |
Re: Programmier Fragen. (von Jörn - 23.10.2006 6:32)Re: Programmier Fragen. (von ManfredW - 23.10.2006 16:23)