cus_r_correction .vhd

用DE2板子实现的控制64乘64点阵LED的点亮,硬件需要de2板及led点阵

LIBRARY IEEE;
USE IEEE.STD_LOGIC_1164.ALL;
USE IEEE.STD_LOGIC_UNSIGNED.ALL;
USE IEEE.STD_LOGIC_ARITH.ALL;
ENTITY CUS_r_CORRECTION IS
  PORT(
	dateg : IN STD_LOGIC_VECTOR(7 DOWNTO 0);		-- Operand A (optional)
	dater  : IN STD_LOGIC_VECTOR(7 DOWNTO 0);		-- Operand B (optional)
    dgin : OUT STD_LOGIC_VECTOR(7 DOWNTO 0);
	drin : OUT STD_LOGIC_VECTOR(7 DOWNTO 0));	-- result 
END; 
ARCHITECTURE LIN OF CUS_r_CORRECTION IS
  TYPE   MEMORY IS  ARRAY (0 TO 255) OF INTEGER RANGE 0 TO 255;
  SIGNAL CORRECT_TABLE1:MEMORY;
BEGIN
dgin<=CONV_STD_LOGIC_VECTOR(CORRECT_TABLE1(CONV_INTEGER(dateg)),8);
drin<=CONV_STD_LOGIC_VECTOR(CORRECT_TABLE1(CONV_INTEGER(dater)),8);

-------------r校正表----------------------------------------------
CORRECT_TABLE1(0)<=0;
CORRECT_TABLE1(1)<=0;
CORRECT_TABLE1(2)<=0;
CORRECT_TABLE1(3)<=0;
CORRECT_TABLE1(4)<=0;
CORRECT_TABLE1(5)<=0;
CORRECT_TABLE1(6)<=0;
CORRECT_TABLE1(7)<=0;
CORRECT_TABLE1(8)<=0;
CORRECT_TABLE1(9)<=1;
CORRECT_TABLE1(10)<=1;
CORRECT_TABLE1(11)<=1;
CORRECT_TABLE1(12)<=1;
CORRECT_TABLE1(13)<=1;
CORRECT_TABLE1(14)<=2;
CORRECT_TABLE1(15)<=2;

CORRECT_TABLE1(16)<=2;
CORRECT_TABLE1(17)<=2;
CORRECT_TABLE1(18)<=3;
CORRECT_TABLE1(19)<=3;
CORRECT_TABLE1(20)<=3;
CORRECT_TABLE1(21)<=3;
CORRECT_TABLE1(22)<=4;
CORRECT_TABLE1(23)<=4;
CORRECT_TABLE1(24)<=4;
CORRECT_TABLE1(25)<=5;
CORRECT_TABLE1(26)<=5;
CORRECT_TABLE1(27)<=5;
CORRECT_TABLE1(28)<=6;
CORRECT_TABLE1(29)<=6;
CORRECT_TABLE1(30)<=7;
CORRECT_TABLE1(31)<=7;

CORRECT_TABLE1(32)<=7;
CORRECT_TABLE1(33)<=8;
CORRECT_TABLE1(34)<=8;
CORRECT_TABLE1(35)<=9;
CORRECT_TABLE1(36)<=9;
CORRECT_TABLE1(37)<=10;
CORRECT_TABLE1(38)<=10;
CORRECT_TABLE1(39)<=10;
CORRECT_TABLE1(40)<=11;
CORRECT_TABLE1(41)<=11;
CORRECT_TABLE1(42)<=12;
CORRECT_TABLE1(43)<=12;
CORRECT_TABLE1(44)<=13;
CORRECT_TABLE1(45)<=13;
CORRECT_TABLE1(46)<=14;
CORRECT_TABLE1(47)<=14;

CORRECT_TABLE1(48)<=15;
CORRECT_TABLE1(49)<=15;
CORRECT_TABLE1(50)<=16;
CORRECT_TABLE1(51)<=17;
CORRECT_TABLE1(52)<=17;
CORRECT_TABLE1(53)<=18;
CORRECT_TABLE1(54)<=18;
CORRECT_TABLE1(55)<=19;
CORRECT_TABLE1(56)<=19;
CORRECT_TABLE1(57)<=20;
CORRECT_TABLE1(58)<=21;
CORRECT_TABLE1(59)<=21;
CORRECT_TABLE1(60)<=22;
CORRECT_TABLE1(61)<=23;
CORRECT_TABLE1(62)<=23;
CORRECT_TABLE1(63)<=24;

CORRECT_TABLE1(64)<=24;
CORRECT_TABLE1(65)<=25;
CORRECT_TABLE1(66)<=26;
CORRECT_TABLE1(67)<=26;
CORRECT_TABLE1(68)<=27;
CORRECT_TABLE1(69)<=28;
CORRECT_TABLE1(70)<=29;
CORRECT_TABLE1(71)<=29;
CORRECT_TABLE1(72)<=30;
CORRECT_TABLE1(73)<=31;
CORRECT_TABLE1(74)<=31;
CORRECT_TABLE1(75)<=32;
CORRECT_TABLE1(76)<=33;
CORRECT_TABLE1(77)<=34;
CORRECT_TABLE1(78)<=34;
CORRECT_TABLE1(79)<=35;

CORRECT_TABLE1(80)<=36;
CORRECT_TABLE1(81)<=37;
CORRECT_TABLE1(82)<=37;
CORRECT_TABLE1(83)<=38;
CORRECT_TABLE1(84)<=39;
CORRECT_TABLE1(85)<=40;
CORRECT_TABLE1(86)<=40;
CORRECT_TABLE1(87)<=41;
CORRECT_TABLE1(88)<=41;
CORRECT_TABLE1(89)<=42;
CORRECT_TABLE1(90)<=43;
CORRECT_TABLE1(91)<=44;
CORRECT_TABLE1(92)<=45;
CORRECT_TABLE1(93)<=45;
CORRECT_TABLE1(94)<=46;
CORRECT_TABLE1(95)<=47;

CORRECT_TABLE1(96)<=48;
CORRECT_TABLE1(97)<=49;
CORRECT_TABLE1(98)<=50;
CORRECT_TABLE1(99)<=51;
CORRECT_TABLE1(100)<=51;
CORRECT_TABLE1(101)<=52;
CORRECT_TABLE1(102)<=53;
CORRECT_TABLE1(103)<=54;
CORRECT_TABLE1(104)<=55;
CORRECT_TABLE1(105)<=56;
CORRECT_TABLE1(106)<=57;
CORRECT_TABLE1(107)<=58;
CORRECT_TABLE1(108)<=59;
CORRECT_TABLE1(109)<=60;
CORRECT_TABLE1(110)<=61;
CORRECT_TABLE1(111)<=62;

CORRECT_TABLE1(112)<=62;
CORRECT_TABLE1(113)<=63;
CORRECT_TABLE1(114)<=64;
CORRECT_TABLE1(115)<=65;
CORRECT_TABLE1(116)<=66;
CORRECT_TABLE1(117)<=67;
CORRECT_TABLE1(118)<=68;
CORRECT_TABLE1(119)<=69;
CORRECT_TABLE1(120)<=70;
CORRECT_TABLE1(121)<=71;
CORRECT_TABLE1(122)<=72;
CORRECT_TABLE1(123)<=73;
CORRECT_TABLE1(124)<=74;
CORRECT_TABLE1(125)<=75;
CORRECT_TABLE1(126)<=76;
CORRECT_TABLE1(127)<=77;

CORRECT_TABLE1(128)<=79;
CORRECT_TABLE1(129)<=80;
CORRECT_TABLE1(130)<=81;
CORRECT_TABLE1(131)<=82;
CORRECT_TABLE1(132)<=83;
CORRECT_TABLE1(133)<=84;
CORRECT_TABLE1(134)<=85;
CORRECT_TABLE1(135)<=86;
CORRECT_TABLE1(136)<=87;
CORRECT_TABLE1(137)<=88;
CORRECT_TABLE1(138)<=89;
CORRECT_TABLE1(139)<=90;
CORRECT_TABLE1(140)<=92;
CORRECT_TABLE1(141)<=93;
CORRECT_TABLE1(142)<=94;
CORRECT_TABLE1(143)<=95;

CORRECT_TABLE1(144)<=96;
CORRECT_TABLE1(145)<=97;
CORRECT_TABLE1(146)<=98;
CORRECT_TABLE1(147)<=99;
CORRECT_TABLE1(148)<=101;
CORRECT_TABLE1(149)<=102;
CORRECT_TABLE1(150)<=103;
CORRECT_TABLE1(151)<=104;
CORRECT_TABLE1(152)<=105;
CORRECT_TABLE1(153)<=107;
CORRECT_TABLE1(154)<=108;
CORRECT_TABLE1(155)<=109;
CORRECT_TABLE1(156)<=110;
CORRECT_TABLE1(157)<=111;
CORRECT_TABLE1(158)<=113;
CORRECT_TABLE1(159)<=114;

CORRECT_TABLE1(160)<=115;
CORRECT_TABLE1(161)<=116;
CORRECT_TABLE1(162)<=117;
CORRECT_TABLE1(163)<=119;
CORRECT_TABLE1(164)<=120;
CORRECT_TABLE1(165)<=121;
CORRECT_TABLE1(166)<=122;
CORRECT_TABLE1(167)<=124;
CORRECT_TABLE1(168)<=125;
CORRECT_TABLE1(169)<=126;
CORRECT_TABLE1(170)<=127;
CORRECT_TABLE1(171)<=129;
CORRECT_TABLE1(172)<=130;
CORRECT_TABLE1(173)<=131;
CORRECT_TABLE1(174)<=133;
CORRECT_TABLE1(175)<=134;

CORRECT_TABLE1(176)<=135;
CORRECT_TABLE1(177)<=137;
CORRECT_TABLE1(178)<=138;
CORRECT_TABLE1(179)<=139;
CORRECT_TABLE1(180)<=141;
CORRECT_TABLE1(181)<=142;
CORRECT_TABLE1(182)<=143;
CORRECT_TABLE1(183)<=145;
CORRECT_TABLE1(184)<=146;
CORRECT_TABLE1(185)<=147;
CORRECT_TABLE1(186)<=149;
CORRECT_TABLE1(187)<=150;
CORRECT_TABLE1(188)<=151;
CORRECT_TABLE1(189)<=153;
CORRECT_TABLE1(190)<=154;
CORRECT_TABLE1(191)<=156;

CORRECT_TABLE1(192)<=157;
CORRECT_TABLE1(193)<=158;
CORRECT_TABLE1(194)<=160;
CORRECT_TABLE1(195)<=161;
CORRECT_TABLE1(196)<=163;
CORRECT_TABLE1(197)<=164;
CORRECT_TABLE1(198)<=165;
CORRECT_TABLE1(199)<=167;
CORRECT_TABLE1(200)<=168;
CORRECT_TABLE1(201)<=170;
CORRECT_TABLE1(202)<=171;
CORRECT_TABLE1(203)<=173;
CORRECT_TABLE1(204)<=174;
CORRECT_TABLE1(205)<=175;
CORRECT_TABLE1(206)<=177;
CORRECT_TABLE1(207)<=178;

CORRECT_TABLE1(208)<=180;
CORRECT_TABLE1(209)<=181;
CORRECT_TABLE1(210)<=183;
CORRECT_TABLE1(211)<=184;
CORRECT_TABLE1(212)<=186;
CORRECT_TABLE1(213)<=187;
CORRECT_TABLE1(214)<=189;
CORRECT_TABLE1(215)<=190;
CORRECT_TABLE1(216)<=192;
CORRECT_TABLE1(217)<=193;
CORRECT_TABLE1(218)<=195;
CORRECT_TABLE1(219)<=196;
CORRECT_TABLE1(220)<=198;
CORRECT_TABLE1(221)<=199;
CORRECT_TABLE1(222)<=201;
CORRECT_TABLE1(223)<=203;

CORRECT_TABLE1(224)<=204;
CORRECT_TABLE1(225)<=206;
CORRECT_TABLE1(226)<=207;
CORRECT_TABLE1(227)<=209;
CORRECT_TABLE1(228)<=210;
CORRECT_TABLE1(229)<=212;
CORRECT_TABLE1(230)<=213;
CORRECT_TABLE1(231)<=215;
CORRECT_TABLE1(232)<=217;
CORRECT_TABLE1(233)<=218;
CORRECT_TABLE1(234)<=220;
CORRECT_TABLE1(235)<=221;
CORRECT_TABLE1(236)<=223;
CORRECT_TABLE1(237)<=225;
CORRECT_TABLE1(238)<=226;
CORRECT_TABLE1(239)<=228;

CORRECT_TABLE1(240)<=230;
CORRECT_TABLE1(241)<=231;
CORRECT_TABLE1(242)<=233;
CORRECT_TABLE1(243)<=234;
CORRECT_TABLE1(244)<=236;
CORRECT_TABLE1(245)<=238;
CORRECT_TABLE1(246)<=239;
CORRECT_TABLE1(247)<=241;
CORRECT_TABLE1(248)<=243;
CORRECT_TABLE1(249)<=244;
CORRECT_TABLE1(250)<=246;
CORRECT_TABLE1(251)<=248;
CORRECT_TABLE1(252)<=249;
CORRECT_TABLE1(253)<=251;
CORRECT_TABLE1(254)<=253;
CORRECT_TABLE1(255)<=255;
--完---------------------------------------------------------------
END LIN;