week    = tonumber (os.date( "%V"))
dag      = tostring(os.date("%a"));
status   = tonumber(otherdevices_svalues['Vuilnis'])
print('script bin_selector executed')

-- Elke 4 weken wordt plastic opgehaald, bijv in week 13, week 17, week 21, enz
-- Om de week wordt de groene bak (gft) geleegd, bijv in week 14, week 16, week 18, enz
-- Elke 4 weken wordt de grijze bak (rest) geleegd, bijv in week 15, week 19, week 23, enz
-- In de oneven weken wordt oud papier ingezameld

commandArray = {}
if (dag=='Sat' or dag=='Sun'  ) then
   weekend = true; weekdag = false
end

if (dag=='Mon' or dag=='Tue' or dag=='Wed' or dag=='Thu' or dag=='Fri') then
   weekend = false ; weekdag = true
end

--Grijze bak - Rest afval
if(week==3 or week==7 or week==11 or week==15 or week==19 or week==23 or week==27 or week==31 or week==35 or week==39 or week==43 or week==47 or week==51) then
      rest = true ; papier = true ; gft = false ; plastic = false
-- ('Rest afval en oud papier')
end

--Oranje bak - Plastic
if (week==1 or week==5 or week==9 or week==13 or week==17 or week==21 or week==25 or week==29 or week==33 or week==37 or week==41 or week==45 or week==49) then
      rest = false ; papier = true ; gft = false ; plastic = true
-- ('Plastic en oud papier')
end

--Groene bak - GFT
if (week==2 or week==4 or week==6 or week==8 or week==10 or week==12 or week==14 or week==16 or week==18 or week==20 or week==22 or week==24 or week==26 or week==28 or week==30 or week==32 or week==34 or week==36 or week==38 or week==40 or week==42 or week==44 or week==46 or week==48 or week==50 or week==52) then
      rest = false ; papier = false ; gft = true ;  plastic = false
end

if (not(rest) and not(papier) and not(gft) and not(plastic)) then
      commandArray ['UpdateDevice']= '3573|1|Geen ophaaldag'
end

if (rest and weekdag) or (rest and weekend) then
      commandArray ['UpdateDevice']= '3573|1|Rest afval'
end

if (gft and weekdag) or (gft and weekend) then
      commandArray ['UpdateDevice']= '3573|1|GFT'
end

if (papier and weekdag) or (papier and weekend) then
      commandArray ['UpdateDevice']= '3573|1|Papier'
end

if (plastic and weekdag) or (plastic and weekend) then
      commandArray ['UpdateDevice']= '3573|1|Plastic'
end

if (plastic and papier and weekdag) or (plastic and papier and weekend) then
      commandArray ['UpdateDevice']= '3573|1|Plastic en papier'
end

if (rest and papier and weekdag) or (rest and papier and weekend) then
      commandArray ['UpdateDevice']= '3573|1|Rest afval en papier'
end

if (gft and papier and weekdag) or (gft and papier and weekend) then
      commandArray ['UpdateDevice']= '3573|1|GFT en papier'
end

return commandArray