Code:
 #CONFIG 
     __CONFIG  _INTRC_OSC_NOCLKOUT & _WDT_OFF & _MCLRE_OFF  & _BOD_OFF & _CP_OFF & _PWRTE_ON
    #ENDCONFIG
    DEFINE OSC 4


'-------------------------- PDESAVANJA -------------------------------
         
    ANSEL = $30
    WPU = $37
    
    CMCON0 = 7                ' Analog comparators off
      ANSEL      = %00000000     ' select all digital
        OSCCON     = %01110101     ' 8Mhz  
    TRISIO = %111100      
     '------------------------PROOGRAM------------------------------------        
 
   'DEFINMISANJE PORTOVA
    symbol otvara = GPIO.0      
    LOW otvara
    
    symbol zatvara = GPIO.1
    low zatvara
    
    symbol komanda1 = GPIO.2
    input komanda1
   
    symbol komanda2 = GPIO.3
    input komanda2
    
    
    symbol magnet1 = GPIO.4
   
     input magnet1
     
     
     symbol magnet2 = GPIO.5
     input magnet2
     
     
     
     pocetak:
    do while komanda1 = 0
    loop
    
    do while komanda2 = 0 
    loop
    
    
     do
        if komanda1 = 0 then goto digni
        if komanda2 = 0 then goto spusti
        
    loop
  
  
  '****************************************************
  
  digni:
  do while komanda1 = 0  
  loop
  
  otvara = 1
    pause 200
  
  do while magnet1 = 1 
  
  if komanda1 = 0 then
  otvara = 0 
  goto pocetak
  endif
  
  loop
  otvara = 0
  goto pocetak
  
  spusti:
  
  do while komanda2 = 0 
  loop
  
  
  zatvara = 1
  
  pause 500
  do while magnet2 = 1
  
  if komanda2 = 0 then
  zatvara = 0
  goto pocetak
  
  endif
  
  loop
  zatvara = 0
  goto pocetak
  
  end