-- Clear Display
WHEN r8 =>
Dmsh[DATA_WITH-1..0] = H"01"; OE = vcc;
Eena = vcc; _RW = gnd; _RS = gnd; Pause. aclr = vcc;
ST = b8;
WHEN b8 =>
Dmsh[DATA_WITH-1..0] = H"00"; OE = gnd;
Eena = vcc; _RW = vcc; _RS = gnd; Pause. aclr = vcc;
ST = c8;
WHEN c8 =>
Dmsh[DATA_WITH-1..0] = H"00"; OE = gnd;
Eena = gnd; _RW = vcc; _RS = gnd; Pause. aclr = gnd;
IF Din[DATA_WITH-1].q==0 THEN ST = ds; ELSE ST = b8; END IF;
--формирование изображения
WHEN ds =>
Dmsh[DATA_WITH-1..0] = LINE[]; OE = vcc;
Eena = vcc; RW = gnd; _RS = vcc; Pause. aclr = vcc;
ST = bs;
WHEN bs =>
Dmsh[DATA_WITH-1..0] = H"00"; OE = gnd;
Eena = vcc; _RW = vcc; _RS = gnd; Pause. aclr = vcc;
ST = cs;
WHEN cs =>
Dmsh[DATA_WITH-1..0] = H"00"; OE = gnd;
Eena = gnd; _RW = vcc; _RS = gnd; Pause. aclr = gnd;
IF STR. q==H"F" THEN ST=dz0;
ELSIF Din[DATA_WITH-1].q==0 THEN ST = ds; ELSE ST = bs; END IF;
--перемещение в начало
WHEN dz0 =>
Dmsh[DATA_WITH-1..0] = H"40"; OE = vcc;
Eena = gnd; _RW = gnd; _RS = gnd; Pause. aclr = vcc;
ST = bz0;
WHEN bz0 =>
Dmsh[DATA_WITH-1..0] = H"00"; OE = gnd;
Eena = vcc; _RW = vcc; _RS = gnd; Pause. aclr = vcc;
ST = cz0;
WHEN cz0 =>
Dmsh[DATA_WITH-1..0] = H"00"; OE = gnd;
Eena = gnd; _RW = vcc; _RS = gnd; Pause. aclr = gnd;
IF Din[DATA_WITH-1].q==0 THEN ST = dz1; ELSE ST = bz0; END IF;
WHEN dz1 =>
Dmsh[DATA_WITH-1..0] = H"80"; OE = vcc;
Eena = vcc; _RW = gnd; _RS = gnd; Pause. aclr = vcc;
ST = bz1;
WHEN bz1 =>
Dmsh[DATA_WITH-1..0] = H"00"; OE = gnd;
Eena = vcc; _RW = vcc; _RS = gnd; Pause. aclr = vcc;
ST = cz1;
WHEN cz1 =>
Dmsh[DATA_WITH-1..0] = H"00"; OE = gnd;
Eena = gnd; _RW = vcc; _RS = gnd; Pause. aclr = gnd;
IF Din[DATA_WITH-1].q==0 THEN ST = ds; ELSE ST = bz1; END IF;
END CASE;
INBUF[5..0][DATA_WITH-1..0].clk=READ. q;
INBUF[5..0][DATA_WITH-1..0].d=IN[5..0][DATA_WITH-1..0];
IF ST==dz1 THEN READ. d=vcc; ELSE READ. d=gnd; END IF;
READ. clk=clk;
IF ST==ds THEN STR. clock=vcc; ELSE STR. clock=gnd; END IF;
STR. aclr=READ. q;
CASE STR. q[] IS
WHEN H"1" => LINE[]=INBUF[5][DATA_WITH-1..0];
WHEN H"2" => LINE[]=INBUF[4][DATA_WITH-1..0];
WHEN H"3" => LINE[]=INBUF[3][DATA_WITH-1..0];
WHEN H"4" => LINE[]=INBUF[2][DATA_WITH-1..0];
WHEN H"5" => LINE[]=INBUF[1][DATA_WITH-1..0];
WHEN H"6" => LINE[]=INBUF[0][DATA_WITH-1..0];
WHEN H"7" => LINE[]=H"20";
WHEN H"8" => LINE[]=H"43";
WHEN H"9" => LINE[]=H"44";
WHEN H"A" => LINE[]=H"45";
WHEN H"B" => LINE[]=H"46";
WHEN H"C" => LINE[]=H"47";
WHEN H"D" => LINE[]=H"48";
WHEN H"E" => LINE[]=H"49";
WHEN H"F" => LINE[]=H"4A";
END CASE;
END;
* промиль (миллионная часть, 10-6). Стабильность частоты
Допустимое отклонение частоты от номинального значения. Измеряется в процентах или в "ppm"
|
Из за большого объема этот материал размещен на нескольких страницах:
1 2 3 4 5 6 7 8 9 10 |
