powerwindowscript.m

power window related simulink simulation

        l = add_line('powerwindow','driver bit-unpacking/2','power_window_control_system/3');
		set_param(l,'FontSize',9) % The default fontsize is 18, for some reason
        l = add_line('powerwindow','driver bit-unpacking/3','power_window_control_system/4');
		set_param(l,'FontSize',9) % The default fontsize is 18, for some reason
        l = add_line('powerwindow','passenger bit-unpacking/1','power_window_control_system/5');
		set_param(l,'FontSize',9) % The default fontsize is 18, for some reason
        l = add_line('powerwindow','passenger bit-unpacking/2','power_window_control_system/6');
		set_param(l,'FontSize',9) % The default fontsize is 18, for some reason
        l = add_line('powerwindow','passenger bit-unpacking/3','power_window_control_system/7');
		set_param(l,'FontSize',9) % The default fontsize is 18, for some reason
        
%        l = add_line('powerwindow','mux1/1','passenger control/1');
%		set_param(l,'FontSize',9) % The default fontsize is 18, for some reason
%        l = add_line('powerwindow','mux2/1','driver control/1');
%		set_param(l,'FontSize',9) % The default fontsize is 18, for some reason
%        l = add_line('powerwindow','passenger control/1','control/1');
%		set_param(l,'FontSize',9) % The default fontsize is 18, for some reason
%        l = add_line('powerwindow','driver control/1','control/2');
%		set_param(l,'FontSize',9) % The default fontsize is 18, for some reason
        
    case 'add CAN output'
        ret = stepTo(POWERWINDOWDEMO_STEP,28,POWERWINDOWDEMO_STEPS);
        if(ret < 0) return; end
        POWERWINDOWDEMO_STEP = ret;

        add_block('built-in/Goto',sprintf('powerwindow/passenger\naddress write'), ...
            'Position',[110, 345, 180, 365], ...
            'ForegroundColor','blue','GotoTag','passenger');
        add_block('built-in/Goto',sprintf('powerwindow/driver\naddress write'), ...
            'Position',[110, 295, 180, 315], ...
            'ForegroundColor','blue','GotoTag','driver','NamePlacement','alternate');

        add_block('built-in/Reference',sprintf('powerwindow/passenger\nswitch'), ...
            'Position',[25, 335, 85, 375],'SourceBlock','powerwindowlib/window control switch', ...
            'NamePlacement','alternate');
        add_block('built-in/Reference',sprintf('powerwindow/driver\nswitch'), ...
            'Position',[25, 285, 85, 325],'SourceBlock','powerwindowlib/window control switch', ...
            'NamePlacement','alternate');
        % For some reason, the name has to be moved around to recognize this block in the following statements
        set_param('powerwindow/passenger switch','NamePlacement','normal')

        %l = add_line('powerwindow','Vbattery 12[V]/1','driver switch/1','autorouting','on');
%        l = add_line('powerwindow',[515 70; 515 5; 5 5; 5 365; 25 365]);
%		set_param(l,'FontSize',9) % The default fontsize is 18, for some reason
        %l = add_line('powerwindow','Vbattery 12[V]/1','passenger switch/1','autorouting','on');
%        l = add_line('powerwindow',[5 305; 25 305]);
%		set_param(l,'FontSize',9) % The default fontsize is 18, for some reason
        l = add_line('powerwindow','passenger switch/1','passenger address write/1');
		set_param(l,'FontSize',9) % The default fontsize is 18, for some reason
        l = add_line('powerwindow','driver switch/1','driver address write/1');
		set_param(l,'FontSize',9) % The default fontsize is 18, for some reason
        
    case 'set sample input'
         if POWERWINDOWDEMO_STEP == 28
%            hilite_system('powerwindow/power_window_control_system','find');
%		    pause(0.75)	
%            hilite_system('powerwindow/power_window_control_system','none');

%            open_system('powerwindow/power_window_control_system');            
            
            hilite_system('powerwindow/power_window_control_system/driver_neutral','find');
            hilite_system('powerwindow/power_window_control_system/driver_up','find');
            hilite_system('powerwindow/power_window_control_system/driver_down','find');
            hilite_system('powerwindow/power_window_control_system/passenger_neutral','find');
            hilite_system('powerwindow/power_window_control_system/passenger_up','find');
            hilite_system('powerwindow/power_window_control_system/passenger_down','find');
		    pause(0.75)	
            hilite_system('powerwindow/power_window_control_system/driver_neutral','none');
            hilite_system('powerwindow/power_window_control_system/driver_up','none');
            hilite_system('powerwindow/power_window_control_system/driver_down','none');
            hilite_system('powerwindow/power_window_control_system/passenger_neutral','none');
            hilite_system('powerwindow/power_window_control_system/passenger_up','none');
            hilite_system('powerwindow/power_window_control_system/passenger_down','none');
       end
        
        powerwindowscript('sample input'); 
        
    case 'sample input'
        ret = stepTo(POWERWINDOWDEMO_STEP,29,POWERWINDOWDEMO_STEPS);
        if(ret < 0) return; end
        POWERWINDOWDEMO_STEP = ret;
        
        set_param('powerwindow/power_window_control_system/driver_neutral','SampleTime','10e-3')
        set_param('powerwindow/power_window_control_system/driver_up','SampleTime','10e-3')
        set_param('powerwindow/power_window_control_system/driver_down','SampleTime','10e-3')

        set_param('powerwindow/power_window_control_system/passenger_neutral','SampleTime','10e-3')
        set_param('powerwindow/power_window_control_system/passenger_up','SampleTime','10e-3')
        set_param('powerwindow/power_window_control_system/passenger_down','SampleTime','10e-3')

    case 'highlight control'
		hilite_system('powerwindow/10 ms','find')
		hilite_system('powerwindow/control','find')
		hilite_system('powerwindow/obstacle','find')
		hilite_system('powerwindow/top','find')
		hilite_system('powerwindow/c101','find')
		hilite_system('powerwindow/c102','find')
		pause(0.75);
 		hilite_system('powerwindow/10 ms','none')
		hilite_system('powerwindow/control','none')
		hilite_system('powerwindow/obstacle','none')
		hilite_system('powerwindow/top','none')
		hilite_system('powerwindow/c101','none')
		hilite_system('powerwindow/c102','none')
       
    case 'highlight window control'
		hilite_system('powerwindow/power_window_control_system','find')
		pause(0.75);
        hilite_system('powerwindow/power_window_control_system','none')
        
    case 'highlight statechart'
		hilite_system('powerwindow/control','find')
		pause(0.75);
 		hilite_system('powerwindow/control','none')
        
    case 'highlight sample rate'
		hilite_system('powerwindow/10 ms','find')
		pause(0.75);
 		hilite_system('powerwindow/10 ms','none')
       
    case 'highlight maps'
		hilite_system('powerwindow/passenger neutral, up, down map','find')
		hilite_system('powerwindow/driver neutral, up, down map','find')
		pause(0.75);
		hilite_system('powerwindow/passenger neutral, up, down map','none')
		hilite_system('powerwindow/driver neutral, up, down map','none')

    case 'highlight passenger up'
		hilite_system('powerwindow/passenger up','find')
		pause(0.75);
		hilite_system('powerwindow/passenger up','none')
        
    case 'highlight driver down'
		hilite_system('powerwindow/driver down','find')
		pause(0.75);
		hilite_system('powerwindow/driver down','none')
        
    case 'highlight obstacle'
		hilite_system('powerwindow/obstacle','find')
		pause(0.75);
		hilite_system('powerwindow/obstacle','none')

    case 'highlight electronics'
		hilite_system('powerwindow/amplification up','find')
		hilite_system('powerwindow/amplification down','find')
		hilite_system('powerwindow/actuator','find')
		pause(0.75);
		hilite_system('powerwindow/amplification up','none')
		hilite_system('powerwindow/amplification down','none')
		hilite_system('powerwindow/actuator','none')
        
    case 'highlight multi-body'
		hilite_system('powerwindow/plant','find')
		pause(0.75);
		hilite_system('powerwindow/plant','none')
        
    case 'highlight worm gear'
		hilite_system('powerwindow/plant/window/worm','find')
		hilite_system('powerwindow/plant/window/worm gear','find')
		hilite_system('powerwindow/plant/window/main gear','find')
		hilite_system('powerwindow/plant/window/link','find')
		hilite_system('powerwindow/plant/window/Revolute6','find')
		hilite_system('powerwindow/plant/window/Revolute8','find')
		hilite_system('powerwindow/plant/window/Revolute9','find')
		hilite_system('powerwindow/plant/window/GND2','find')
		pause(0.75);
		hilite_system('powerwindow/plant/window/worm','none')
		hilite_system('powerwindow/plant/window/worm gear','none')
		hilite_system('powerwindow/plant/window/main gear','none')
		hilite_system('powerwindow/plant/window/link','none')
		hilite_system('powerwindow/plant/window/Revolute6','none')
		hilite_system('powerwindow/plant/window/Revolute8','none')
		hilite_system('powerwindow/plant/window/Revolute9','none')
		hilite_system('powerwindow/plant/window/GND2','none')
        
    case 'highlight lever'
		hilite_system('powerwindow/plant/window/rotate & slide','find')
		pause(0.75);
		hilite_system('powerwindow/plant/window/rotate & slide','none')

    case 'highlight friction table'
		hilite_system('powerwindow/plant/window/friction/vehicle characteristic friction','find')
		pause(0.75);
		hilite_system('powerwindow/plant/window/friction/vehicle characteristic friction','none')

    case 'highlight window'
		hilite_system('powerwindow/plant/window/window','find')
		hilite_system('powerwindow/plant/window/Prismatic','find')
		hilite_system('powerwindow/plant/window/GND','find')
		pause(0.75);
		hilite_system('powerwindow/plant/window/window','none')
		hilite_system('powerwindow/plant/window/Prismatic','none')
		hilite_system('powerwindow/plant/window/GND','none')
        
    case 'delete control'
        ret = stepTo(POWERWINDOWDEMO_STEP,8,POWERWINDOWDEMO_STEPS);
        if(ret < 0) return; end
        POWERWINDOWDEMO_STEP = ret;

        delete_line('powerwindow','top/1','control/3');
        delete_line('powerwindow','obstacle/1','control/4');
        delete_line('powerwindow','10 ms/1','control/trigger');

%        delete_line('powerwindow','control/1','up signal conversion/2');
%        delete_line('powerwindow','control/2','down signal conversion/2');
        
%        delete_line('powerwindow','window position/1','obstacle/1');
        delete_line('powerwindow','c102/1','obstacle/2');
%        delete_line('powerwindow','window position/1','top/1');
        delete_line('powerwindow','c101/1','top/2');
        
		delete_block('powerwindow/10 ms')
		delete_block('powerwindow/control')
		delete_block('powerwindow/obstacle')
		delete_block('powerwindow/top')
		delete_block('powerwindow/c101')
		delete_block('powerwindow/c102')
        
    case 'add control subsystem'
        ret = stepTo(POWERWINDOWDEMO_STEP,9,POWERWINDOWDEMO_STEPS);
        if(ret < 0) return; end
        POWERWINDOWDEMO_STEP = ret;

        add_block('built-in/Reference',sprintf('powerwindow/power_window_control_system'), ...
            'Position',[180, 45, 340, 225],'SourceBlock','salib/power_window_control');        
        set_param('powerwindow/power_window_control_system','LinkStatus','inactive')
        
    case 'collapse DAQ subsystem'
        if POWERWINDOWDEMO_STEP == 21
            powerwindowscript('highlight DAQ subsystem');
        end
        %pause(0.75);
        powerwindowscript('delete DAQ subsystem');
        powerwindowscript('add DAQ subsystem');
        
    case 'collapse process'
        if POWERWINDOWDEMO_STEP == 23
            powerwindowscript('highlight process');
        end
        %pause(0.75);
        powerwindowscript('delete process');
        powerwindowscript('add process');
        
    case 'collapse control'
        if (POWERWINDOWDEMO_STEP == 13) | (POWERWINDOWDEMO_STEP == 14)
            powerwindowscript('highlight control');
        end
        powerwindowscript('delete control');
        powerwindowscript('add control');
        
    case 'context control'
        if (POWERWINDOWDEMO_STEP == 6)
            powerwindowscript('highlight control');
        end
        powerwindowscript('delete control');
        powerwindowscript('add control subsystem');
        
    case 'context connect'
        ret = stepTo(POWERWINDOWDEMO_STEP,10,POWERWINDOWDEMO_STEPS);
        if(ret < 0) return; end
        POWERWINDOWDEMO_STEP = ret;

        set_param('powerwindow/window_system','Position',[375, 43, 515, 227]);
        set_param('powerwindow/posi