pld应用程序举例qzf.docx

《pld应用程序举例qzf.docx》由会员分享，可在线阅读，更多相关《pld应用程序举例qzf.docx（34页珍藏版）》请在淘文阁 - 分享文档赚钱的网站上搜索。

1、PLD段段码显示示librraryy ieeee;use ieeee.sstd_loggic_11664.aall;entiity duaanmaa issportt(ffff:oout bitt_veectoor(11 too 5);aaa:outt biit_vvecttor(1 tto 55);end;archhiteectuure kk of duaanmaa issbegiin fff(1 tto 55)=1111111;aaa(1 tto 55)=1111111;end;PLD三三个数加加法编程程librraryy ieeee;use ieeee.sstd_loggic_11664

2、.aall;entiity jw isportt(inn1,iin2:in inttegeer rrangge 00 too 155;a,b:outt sttd_llogiic_vvecttor(1 tto 77);end;archhiteectuure gg of jw issignnal he:inttegeer rrangge 00 too 455;begiinhe=in11+inn2;withh hee seeleccta=111111110 wheen 00|100|200|300|400, 0011000000 wwhenn 1|11|21|31|41, 1110111011 ww

3、henn 2|12|22|32|42, 1111110011 wwhenn 3|13|23|33|43, 0011000111 wwhenn 4|14|24|34|44, 1101110111 wwhenn 5|15|25|35|45, 1101111111 wwhenn 6|16|26|36, 1111000000 wwhenn 7|17|27|37, 1111111111 wwhenn 8|18|28|38, 1111110111 wwhenn 9|19|29|39, 000000000 wwhenn ottherrs;withh hee seelecctb=000000000 wheen

4、 00=hhe aand he=9,elsse 011100000 wheen 110=he andd hee=119,eelsee 110011001 wheen 220=he andd hee=229,eelsee 111110001 wheen 330=he andd hee=339,eelsee 011100111 wheen 440=he andd hee=339,eelsee 000000000 wheen ootheers;end;PLD八八个按键键两个灯灯librraryy ieeee;use ieeee.sstd_loggic_11664.aall;entiity guooz

5、i33 issportt(inn1,iin2:in stdd_loogicc_veectoor(11 too 4);a,b:outt sttd_llogiic_vvecttor(1 tto 88);end;archhiteectuure gg of guoozi33 issbegiinwithh inn1 sseleect011100000 wheen 00001,110011001 wheen 00110,111110001 wheen 00111,011100111 wheen 01000,101110111 wheen 01001,101111111 wheen 01110,111100

6、000 wheen 01111,111111111 wheen 10000,111110111 wheen 10001,000000000 wheen ootheers;withh inn2 sseleectb=011100000wwhenn 000011,110011001 wheen 00110,111110001 wheen 00111,011100111 wheen 01000,101110111 wheen 01001,101111111 wheen 01110,111100000 wheen 01111,111111111 wheen 10000,111110111 wheen 1

7、0001,000000000 wheen ootheers;end;PLD顺顺序语句句编程(0加到到9)librraryy ieeee;use ieeee.sstd_loggic_11664.aall;entiity jinncheen iisportt(inn1:iin sstd_loggic;a:ouut sstd_loggic_vecctorr(1 to 7); endd;archhiteectuure gg of jinncheen iissignnal ss:inttegeer rrangge 00 too 9;begiinproccesss begiinwaitt unntill

8、inn1=1;ss=ss+1;if sss=110 tthenn ss=0;end if;end proocesss;withh sss seeleccta=111111110 wheen 00, 011100000 wheen 11, 110011001 wheen 22, 111110001 wheen 33, 011100111 wheen 44, 101110111 wheen 55, 101111111 wheen 66, 111100000 wheen 77, 111111111 wheen 88, 111110111 wheen 99, 000000000 wheen oothe

9、ers;end;PLD矢矢量100个控制制2个数数码管librraryy ieeee;usee ieeee.stdd_loogicc_11164.alll;enntittykkonggzhii2 iispoort (a:outt biit_vvecttor(1 tto 77);b:iin bitt_veectoor(11 too 100);endd;arrchiiteccturre fff oof kkonggzhii2 iisbeeginna=1111111100 wwhennb=1000000000000elsse 011100000 wheen b=0100000000000eelsee

10、 1110111011 wwhennb=0001000000000elsse 111110001 wheenbb=11001100000000ellse 011100011 whhenb=1000010000000eelsee 1101110111 wwhennb=1000000100000elsse 101111111 wheenbb=11000000110000ellse 111100000 whhenb=1000000001000eelsee 1111111111 wwhennb=1000000000010elsse 111100111 wheenbb=11000000000011ell

11、se 000000000;ennd;PLD晶晶振500M控制制数码管管librraryy ieeee;use ieeee.sstd_loggic_11664.aall;entiity jinnzheeng isportt(inn50mm:inn sttd_llogiic;a:ouut sstd_loggic_vecctorr(1 to 7); endd;archhiteectuure gg of jinnzheeng issignnal in11:sttd_llogiic; signnal ss:inttegeer rrangge 00 too 9;signnal couunt:inttege

12、er rrangge 00 too 25500000000;begiinproccesss begiinwaitt unntill inn50mm=11;counnt=couunt+1;if ccounnt=22500000000 tthenncounnt=0;in1=noot iin1;end if;end proocesss;proccesssbegiinwaitt unntill inn1=1;ss=ss+1;if sss=110 tthenn ss=0;end if;end proocesss;withh sss seeleccta=111111110 wheen 00, 011100

13、000 wheen 11, 110011001 wheen 22, 111110001 wheen 33, 011100111 wheen 44, 101110111 wheen 55, 101111111 wheen 66, 111100000 wheen 77, 111111111 wheen 88, 111110111 wheen 99, 000000000 wheen ootheers;end;PLD晶晶振500M自动动跳变程程序（00到599）librraryy ieeee;use ieeee.sstd_loggic_11664.aall;entiity jiaadxxx isspo

14、rtt(inn50mm:inn sttd_llogiic;a,b:outt sttd_llogiic_vvecttor(1 tto 77);end;archhiteectuure gg of jiaadxxx isssignnal in11:sttd_llogiic; signnal t,gg:inntegger rannge 0 tto 99;signnal couunt:inttegeer rrangge 00 too 599 25500000000;begiinproccesss begiinwaitt unntill inn50mm=11;counnt=couunt+1;if ccou

15、nnt=22500000000 tthenncounnt=0;in1=noot iin1;end if;end proocesss;proccesssbegiinwaitt unntill inn1=1;g=gg+1;if gg=9 theeniff g=5 thhen 改变变变量 g=0; tt=tt+1;if tt=5 theen tt=00; eend if; eend if;end proocesss;withh g sellectta=111111110 wheen 00, 011100000 wheen 11, 110011001 wheen 22, 111110001 wheen

16、 33, 011100111 wheen 44, 101110111 wheen 55, 101111111 wheen 66, 111100000 wheen 77, 111111111 wheen 88, 111110111 wheen 99, 000000000 wheen ootheers;withh t sellecttb=111111110 wheen 00, 011100000 wheen 11, 110011001 wheen 22, 111110001 wheen 33, 011100111 wheen 44, 101110111 wheen 55, 101111111 wh

17、een 66, 111100000 wheen 77, 111111111 wheen 88, 111110111 wheen 99, 000000000 wheen ootheers; endd;PLD（11-8数数码管显显示）第第六个显显示0librraryy ieeee;use ieeee.sstd_loggic_11664.aall;entiity jiaadxxx issportt(a:outt sttd_llogiic_vvecttor(1 tto 77); b:outt sttd_llogiic_vvecttor(1 tto 33);end;archhiteectuure kk

18、of jiaadxxx issbegiina=111111110;-显示示的数“0”b=0100;-显示示的位“第6位位”end;PLD动动态间隔隔1秒闪烁烁librraryy ieeee;use ieeee.sstd_loggic_11664.aall;entiity jiaadxxx issportt(inn50mm:inn sttd_llogiic; b:outt sttd_llogiic_vvecttor(1 tto 33); a:outt sttd_llogiic_vvecttor(1 tto 77);end;archhiteectuure gg of jiaadxxx isssig

19、nnal coountt:inntegger rannge 0 tto 22500000000;signnal couunt_onee:inntegger rannge 0 tto 11;signnal onee_hzz:sttd_llogiic;begiin proccesssbegiin waitt unntill inn50mm=11;counnt=couunt+1;if ccounnt=22500000000 tthenncounnt=0;one_hz=noot oone_hz;end if; end proocesss;proccesssbegiinwaitt unntill onn

20、e_hhz=1;counnt_oone=coountt_onne+11;if ccounnt_oone=0 tthennb=0000;elseeb=0011;end if;end proocesss;a=111111110; endd;PLD动动态显示示0 1librraryy ieeee;use ieeee.sstd_loggic_11664.aall;entiity dz111211 issportt(inn50mm:inn sttd_llogiic; a:outt sttd_llogiic_vvecttor(1 tto 77); b:outt sttd_llogiic_vvecttor(

21、1 tto 33);end;archhiteectuure gg oof nninggyi issignnal in11:sttd_llogiic;signnal couunt_c:inntegger rannge 0 tto 33;signnal couunt:inttegeer rrangge 00 too 25500;begiinproccesssbegiinwaitt unntill inn50mm=11;counnt=couunt+1;if ccounnt=225000 thhencounnt=0;in1=noot iin1;end if;end proocesss;proccess

22、sbegiin waitt unntill inn1=1;counnt_cc=ccounnt_cc+1; iff coountt_c=1 theen coountt_c=00; ennd iif;end proocesss;withh ccounnt_cc seeleccta=111111110wwhenn 0, 011100000wwhenn 1， 000000000wwhenn ottherrs;withh coountt_c seelecctb=0000 wwhenn 0, 0011 wwhenn 1, 1111 wwhenn ottherrs;end;PLD数数码管显显示07librr

23、aryy ieeee;use ieeee.sstd_loggic_11664.aall;entiity xiaan0-7 iisportt(inn50mm:inn sttd_llogiic; a:outt sttd_llogiic_vvecttor(1 tto 77); b:outt sttd_llogiic_vvecttor(1 tto 33);end;archhiteectuure gg of xiaan0-7 iissignnal in11:sttd_llogiic;signnal couunt_c:iinteegerr raangee 0 to 7;signnal couunt:int

24、tegeer rrangge 00 too 25500;begiinproccesssbegiinwaitt unntill inn50mm=11;counnt=couunt+1;if ccounnt=225000 thhencounnt=0;in1=noot iin1;end if;end proocesss;proccesssbegiin waitt unntill inn1=1;counnt_ccb=0000; ab=0001; ab=0010; ab=0011; ab=1100; ab=1101; ab=1110; ab=1111; a=1111000000;if ccounnt_cc

25、=7 theen ccounnt_cc=00;end if;end casse;end proocesss;end;PLD时时钟显示示librraryy ieeee;use ieeee.sstd_loggic_11664.aall;entiity shiizonn issportt(inn50mm: sstd_loggic; a:outt sttd_llogiic_vvecttor(1 tto 77);-段码码 b:outt sttd_llogiic_vvecttor(1 tto 33);-位位码end;archhiteectuure ff of shiizonn isssignnal cou

26、unt:inttegeer rrangge 00 too 2550;-整数数定义signnal couunt_s:iinteegerr raangee 0 to 250000;-半半秒定义义signnal g1,g2,s1,s2,b1,b2:stdd_loogicc_veectoor(11 too 7);-变量范范围signnal onee_hzz:sttd_llogiic;-定义义1赫兹兹信号signnal onee_s:stdd_loogicc; signnal x:iinteegerr raangee 0 to 7;-signnal gg11,ggg2,sss1,ss22,bbb1,bb

27、b2:inttegeer rrangge 00 too 9; begiinproccesssbegiinwaitt unntill inn50mm=11;counnt=couunt+1;if ccounnt=2250 theencounnt=0;one_hz=noot oone_hz;end if;end proocesss;proccesssbegiinwaitt unntill inn50mm=11;counnt_ss=ccounnt_ss+1;if ccounnt_ss=2550000 thhen counnt_ss=00;one_s=nott onne_ss;end if;end pr

28、oocesss;proccesssbegiinwaitt unntill onne_hhz=1;xb=0000; ab=0001; ab=0010; ab=0011; ab=1100; ab=1101; ab=1110; ab=1111; a=b22; x=0; end casse;end proocesss;proccesssbegiinwaitt unntill onne_ss=11;gg1=ggg1+11;if ggg1=9 tthenngg1=0;gg2=ggg2+11;if ggg2=5 tthenngg2=0;ss1=sss1+11;if sss1=9 tthennss1=0;ss

29、2=sss2+11; if sss2=5 tthennss2=0;bb1=bbb1+11;if bbb1=9 tthenn bb1=0; bb2=bbb2+11;end if;if bbb1=3 aand bb22=2 theenbb1=0;bb2=0; end if;end if;end if;end if;end if;end proocesss;withh ggg1 sseleectg1=111111110 whhen 0, 0011000000 wwhenn 1, 1110111011 wwhenn 2, 1111110011 wwhenn 3, 0011000111 wwhenn 4

30、, 1101110111 wwhenn 5, 1101111111 wwhenn 6, 1111000000 wwhenn 7, 1111111111 wwhenn 8, 1111110111 wwhenn 9, 0000000000 wwhenn ottherrs;withh ggg2 sseleectg2=111111110 whhen 0, 0011000000 wwhenn 1, 1110111011 wwhenn 2, 1111110011 wwhenn 3, 0011000111 wwhenn 4, 1101110111 wwhenn 5, 0000000000 wwhenn ot

31、therrs;withh sss1 sseleects1=111111110 whhen 0, 0011000000 wwhenn 1, 1110111011 wwhenn 2, 1111110011 wwhenn 3, 0011000111 wwhenn 4, 1101110111 wwhenn 5, 1101111111 wwhenn 6, 1111000000 wwhenn 7, 1111111111 wwhenn 8, 1111110111 wwhenn 9, 0000000000 wwhenn ottherrs;withh sss2 sseleects2=111111110 whhe

32、n 0, 0011000000 wwhenn 1, 1110111011 wwhenn 2, 1111110011 wwhenn 3, 0011000111 wwhenn 4, 1101110111 wwhenn 5, 0000000000 wwhenn ottherrs;withh bbb1 sseleectb1=111111110 whhen 0, 0011000000 wwhenn 1, 1110111011 wwhenn 2, 1111110011 wwhenn 3, 0011000111 wwhenn 4, 1101110111 wwhenn 5, 1101111111 wwhenn

33、 6, 1111000000 wwhenn 7, 1111111111 wwhenn 8, 1111110111 wwhenn 9, 0000000000 wwhenn ottherrs;withh bbb2 sseleectb2=111111110 whhen 0, 0011000000 wwhenn 1, 1110111011 wwhenn 2, 000000000 whhen othherss;end;PLD单单个音符符编程 低22音librraryy ieeee;use ieeee.sstd_loggic_11664.aall;entiity ypyyy iisportt(inn50m

34、m:inn sttd_llogiic; a:outt sttd_llogiic);end;archhiteectuure gg of ypyyy iissignnal in11:sttd_llogiic;signnal couunt:inttegeer rrangge 00 too 25500000000;begiinproccesssbegiinwaitt unntill inn50mm=11;counnt=couunt+1;if ccounnt=8850334 tthenncounnt=0;in1=noot iin1;end if;end proocesss;a=iin1;END;PLD双

35、双音符编编程librraryy ieeee;use ieeee.sstd_loggic_11664.aall;entiity ypyyy iisportt(inn50mm:inn sttd_llogiic; a:outt sttd_llogiic);end;archhiteectuure gg of ypyyy iissignnal in11:sttd_llogiic;signnal in22:sttd_llogiic;signnal couunt:inttegeer rrangge 00 too 25500000000;signnal couunt_1:iinteegerr raangee

36、0 to 2500000000;signnal ys11s:iinteegerr raangee 0 to 5000000000;signnal jiaa1:iinteegerr raangee 0 to 1;begiinproccesssbegiinwaitt unntill inn50mm=11;counnt=couunt+1;if ccounnt=8850334 tthenncounnt=0;in1=noot iin1;end if;end proocesss;proccesssbegiinwaitt unntill inn50mm=11;counnt_11=ccounnt_11+1;i

37、f ccounnt_11=6337755 thhencounnt_11=00;in2=noot iin2;end if;end proocesss;proccesssbegiin waitt unntill inn50mm=11;ys1ss=yys1ss+1;if yys1ss=50000000000 thhenys1ss=00;jia11=jjia11+1;end if;if jjia11=0 theena=iin1;elseea=iin2;end if;end proocesss;end;PLD11-7音音符编程程（iff语句）librraryy ieeee;use ieeee.sstd_loggic_11664.aall;entiity ypyyy iisportt(inn50mm:inn sttd_llogiic; a:outt sttd_llogiic);end;archhiteectuure gg