8Kanal Relaiskarte Seriell

[Uli (Gast)]

8 Kanal Relaiskarte zum schalten von verschiedenen Geräten, Lampen oder
Motoren nach einen Computerprogramm über die Serielle Schnittstelle. Es
können bestimmte Schaltfolgen via Computer oder mit dem vorhandenen µC
AT90S2313 programmiert werden. Lichteffekte für Bühnen und Diskotheken
ist auch ein weiterer interessanter Einsatz für diese Karte. Die Relais
schalten max 250V AC und haben einen Schaltstrom von 16A (abhängig von
eingesetzten Relais).

Mfg Ulrich Radig

[Peter D. (peda)]

Du postest hier in der Codesammlung, aber Code kann ich nirgends finden
?

Und ein Schaltplan wäre auch ganz nett, für Leute die nicht Dein
Schaltplanprogramm XY haben, d.h. als PDF, JPG oder GIF.


Peter

[stromi (Gast)]

habe ich von seiner hompage kopiert :


    $crystal = 9600000 'Frequenz des Quarzes in Hz
    $baud = 9600 'Baudrate 9600 (8Bits, 1Stoppbit, NoParity)
    Config Portb = Output 'Config Port B als Output

    Dim A As Byte 'Declarieren der Variable als 8Bit Wert
    A = 0
    Loop: 'Setzen der Sprungmarke
    Input ">" , A 'Wartet auf Wert von der Seriellen Schnittstelle
    Portb = A 'Setze den Port A vorher Empfangenen Wert
    Goto Loop 'Spring zurück zur Sprungmarke