  INFO - FAQ - CC2-Forum - CCPro-Forum |
|
Hallo danke für die antworten ich habe mir mal ein porgram zusammengebaut alerdings fehlen noch timer und die passende uhr dazu seriell port ausgabe leider habe ich noch nicht rausgefunden wie ich diese fungtionien in basic eingeb. würde das script unten fungtionieren ? Danke. 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 |
| Antwort schreiben |
Re: Programmier Fragen. (von ManfredW - 23.10.2006 0:38)Re: Programmier Fragen. (von Jörn - 23.10.2006 6:32)Re: Programmier Fragen. (von ManfredW - 23.10.2006 16:23)