fbscripts.R aangevuld