I start with mine ,it is still in development, but this is the nice part. It is developing continuously.
The used tabled is an older Surface RT. I used aluminum U profilesand sawed them in a 45 degree angle.
Then I created a rectangle of them. The power connector is drilled trough the wall so you can't see it

1 measure the aluminum U frame 10 times.
2 saw the frames in a 45 degree angle.
3 on the backside I used a very firm cardboard where I glued the frames on.
4 drill a hole in the wall (my wife was not around at than moment ) to get the wire trough.

week = tonumber (os.date( "%V"))
dag = tostring(os.date("%a"));
status = tonumber(otherdevices_svalues['Afval'])
print('script bin_selector executed')
commandArray = {}
print ('Dag= '..dag)
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
--Bepalen morgen papier
if(week==2 and dag=='Wed' or week==4 and dag=='Wed' or week==6 and dag=='Wed' or week==8 and dag=='Wed' or week==10 and dag=='Wed' or week==12 and dag=='Wed' or week==14 and dag=='Wed' or week==16 and dag=='Wed' or week==18 and dag=='Wed' or week==20 and dag=='Wed' or week==22 and dag=='Wed' or week==24 and dag=='Wed' or week==26 and dag=='Wed' or week==28 and dag=='Wed'
or week==30 and dag=='Wed' or week==32 and dag=='Wed' or week==34 and dag=='Wed' or week==36 and dag=='Wed' or week==38 and dag=='Wed' or week==40 and dag=='Wed' or week==42 and dag=='Wed' or week==44 and dag=='Wed' or week==46 and dag=='Wed' or week==48 and dag=='Wed' or week==50 and dag=='Wed' or week==52 and dag=='Wed') then
morgenpapier = true; papier = false; morgenplastic = false; plastic = false; niets = false
print ('morgen papier')
end
--Bepalen papier
if(week==2 and dag=='Thu' or week==4 and dag=='Thu' or week==6 and dag=='Thu' or week==8 and dag=='Thu' or week==10 and dag=='Thu' or week==12 and dag=='Thu' or week==14 and dag=='Thu' or week==16 and dag=='Thu' or week==18 and dag=='Thu' or week==20 and dag=='Thu' or week==22 and dag=='Thu' or week==24 and dag=='Thu' or week==26 and dag=='Thu' or week==28 and dag=='Thu'
or week==30 and dag=='Thu' or week==32 and dag=='Thu' or week==34 and dag=='Thu' or week==36 and dag=='Thu' or week==38 and dag=='Thu' or week==40 and dag=='Thu' or week==42 and dag=='Thu' or week==44 and dag=='Thu' or week==46 and dag=='Thu' or week==48 and dag=='Thu' or week==50 and dag=='Thu' or week==52 and dag=='Thu') then
morgenpapier = false; papier = true; morgenplastic = false; plastic = false; niets = false
print ('vandaag papier')
end
--Bepalen morgen plastic
if(week==2 and dag=='Thu' or week==4 and dag=='Thu' or week==6 and dag=='Thu' or week==8 and dag=='Thu' or week==10 and dag=='Thu' or week==12 and dag=='Thu' or week==14 and dag=='Thu' or week==16 and dag=='Thu' or week==18 and dag=='Thu' or week==20 and dag=='Thu' or week==22 and dag=='Thu' or week==24 and dag=='Thu' or week==26 and dag=='Thu' or week==28 and dag=='Thu'
or week==30 and dag=='Thu' or week==32 and dag=='Thu' or week==34 and dag=='Thu' or week==36 and dag=='Thu' or week==38 and dag=='Thu' or week==40 and dag=='Thu' or week==42 and dag=='Thu' or week==44 and dag=='Thu' or week==46 and dag=='Thu' or week==48 and dag=='Thu' or week==50 and dag=='Thu' or week==52 and dag=='Thu') then
morgenpapier = false; papier = false; morgenplastic = true; plastic = false; niets = false
print ('morgen plastic')
end
--Bepalen plastic
if(week==2 and dag=='Fri' or week==4 and dag=='Fri' or week==6 and dag=='Fri' or week==8 and dag=='Fri' or week==10 and dag=='Fri' or week==12 and dag=='Fri' or week==14 and dag=='Fri' or week==16 and dag=='Fri' or week==18 and dag=='Fri' or week==20 and dag=='Fri' or week==22 and dag=='Fri' or week==24 and dag=='Fri' or week==26 and dag=='Fri' or week==28 and dag=='Fri'
or week==30 and dag=='Fri' or week==32 and dag=='Fri' or week==34 and dag=='Fri' or week==36 and dag=='Fri' or week==38 and dag=='Fri' or week==40 and dag=='Fri' or week==42 and dag=='Fri' or week==44 and dag=='Fri' or week==46 and dag=='Fri' or week==48 and dag=='Fri' or week==50 and dag=='Fri' or week==52 and dag=='Fri') then
morgenpapier = false; papier = false; morgenplastic = false; plastic = true; niets = false
print ('vandaag plastic')
end
--Bepalen geen plastic en geen papier
if(week==1 or week==3 or week==5 or week==7 or week==9 or week==11 or week==13 or week==15 or week==17 or week==19 or week==21 or week==23 or week==25 or week==27 or week==29 or week==31 or week==33 or week==35
or week==37 or week==39 or week==41 or week==43 or week==45 or week==47 or week==49 or week==51 ) then
morgenpapier = false; papier = false; morgenplastic = false; plastic = false; niets = true
print ('vandaag geen afval buiten zetten')
end
if (niets and weekdag and status~=10) then
print ('not papier not plastic - status 10')
status=10
commandArray ['UpdateDevice']= '315|1|' .. status
end
if (morgenpapier and weekdag and dag and status~=20) then
print ('morgen papier and weekdag - status 20')
status=20
commandArray ['UpdateDevice']= '315|1|' .. status
end
if (papier and weekdag and dag and status~=30) then
print ('papier and weekdag - status 30')
status=30
commandArray ['UpdateDevice']= '315|1|' .. status
end
if (morgenplastic and weekdag and dag and status~=40) then
print ('morgen plastic and weekdag - status 40')
status=40
commandArray ['UpdateDevice']= '315|1|' .. status
end
if (plastic and weekdag and dag and status~=50) then
print ('plastic and weekdag - status 50')
status=50
commandArray ['UpdateDevice']= '315|1|' .. status
end
return commandArray