moni.scl.scl

uCOS在PIC芯片中的移植：以PIC24HJ64GP210为例进行uCOS在Microchip芯片中的移植

//  d:\massage\micrium\software\evalboards\microchip\pic24hj\mplab\os-view\generated files\moni.scl.scl
//  Converted Stimulus file from d:\massage\micrium\software\evalboards\microchip\pic24hj\mplab\os-view\generated files\moni.scl
//  Generated by Stimulus dialog ver. 3.60.00.00
//  6/18/2008  10:24:24

configuration for "pic24hj64gp210" is
end configuration;

testbench for "pic24hj64gp210" is
begin
    process is
    begin
        wait;
    end process;

    COND1: process is
    begin
        wait until OC5R == 16#0000#;
        wait for 2000 ic;
        RA6 <= '0';
        RA7 <= '0';
        RD13 <= '0';
    end process COND1;

    MomiWide: process is
    begin
        wait until PC == 16#573E#;
        loop
            RA6 <= '0';
            wait until PC == 16#576A# for 1000000 ic;
            exit when PC == 16#576A#;
            RA6 <= '1';
            wait until PC == 16#576A# for 2000 ic;
            exit when PC == 16#576A#;
        end loop;
        RA6 <= '1';
    end process MomiWide;

end testbench;