LDmicro0.1
MICRO=Microchip PIC16F628 18-PDIP or 18-SOIC
CYCLE=5000 us at Timer0, YPlcCycleDuty:0, ConfigurationWord(s):0xFF09235D00003F50
CRYSTAL=4000000 Hz
BAUD=2400 Hz, RATE=0 Hz, SPEED=0 Hz
COMPILED=E:\Luikbesturing\Luikbesturing.hex

IO LIST
    Xbutton at 6 0 0
    Xcurrent at 9 0 0
    Xmaxdwn at 12 0 0
    Xmaxup at 13 0 0
    Ydwnrelay at 11 0 0
    Yled at 17 0 0
    Yuprelay at 10 0 0
END

PROGRAM
RUNG
  COMMENT -- Eenknops luikbesturing  MGP Nov.21
END
RUNG
  COMMENT -- Knopbediening
END
RUNG
  CONTACTS Xbutton 1 1
  TON T1 20000 -1
  PARALLEL
    SERIES
      OSF
      CTC Cstate 1 0 /
    END
    SERIES
      TON T2 750000 -1
      OSR
      COIL Rtime 0 0 0 0
    END
  END
END
RUNG
  COMMENT -- direction
END
RUNG
  PARALLEL
    CONTACTS Rtime 0 0
    CONTACTS Rchange 0 0
  END
  COIL Rdir 0 0 0 1
END
RUNG
  COMMENT -- relay up/down
END
RUNG
  EQU Cstate 1
  CONTACTS Rdir 0 0
  TON T3 100000 -1
  CONTACTS Ydwnrelay 1 0
  CONTACTS Rmaxup 1 0
  CONTACTS Rcurrent 1 0
  COIL Yuprelay 0 0 0 0
END
RUNG
  EQU Cstate 1
  CONTACTS Rdir 1 0
  TON T4 100000 -1
  CONTACTS Yuprelay 1 0
  CONTACTS Rmaxdwn 1 0
  CONTACTS Rcurrent 1 0
  COIL Ydwnrelay 0 0 0 0
END
RUNG
  COMMENT -- Eindcontacten
END
RUNG
  CONTACTS Xmaxdwn 1 1
  COIL Rmaxdwn 0 0 0 0
END
RUNG
  CONTACTS Xmaxup 1 1
  COIL Rmaxup 0 0 0 0
END
RUNG
  PARALLEL
    CONTACTS Rmaxdwn 0 0
    CONTACTS Rmaxup 0 0
  END
  OSR
  PARALLEL
    RES Cstate
    COIL Rchange 0 0 0 0
  END
END
RUNG
  COMMENT -- Stroombeveiliging
END
RUNG
  CONTACTS Xcurrent 1 1
  PARALLEL
    RES Cstate
    COIL Rcurrent 0 0 0 0
  END
END
RUNG
  COMMENT -- LED besturing
END
RUNG
  PARALLEL
    SERIES
      CONTACTS Rcurrent 0 0
      TOF T5 5000000 -1
      TCY T8 100000 -1
    END
    SERIES
      EQU Cstate 1
      TCY T6 400000 -1
    END
  END
  COIL Rled 0 0 0 0
END
RUNG
  CONTACTS Rled 1 0
  COIL Yled 0 0 0 0
END