%Example script

%function prototypes
%room = create_room(E0,Ex,Ey,Exx,Exy,Eyy);
%room = add_lamp(room,x,y,h,max_flux,semi_ang_degrees);
%room = actuate_luminaire(room, index, new_duty_cycle);
%l = read_luminaire(room,index)
%view_room(room, x_min, x_max, y_min, y_max, img_num);


r = create_room(10,1,0,0,0,0);
for i = 0:2:4,
    for j = 0:2:4,
        r = add_luminaire(r,i,j,1,50,85);
    end;
end;

r = luminaires_actuate( r, rand(length(r.luminaires),1) );

lux = luminaires_read( r );

view_room2(r, -1,5,-1,5, 5);