《匠人手记》推荐网上购书渠道： 互动出版网（china-pub）购书入口   >>> 当当网（dangdang）购书入口   >>> 卓越亚马逊网 购书入口   >>> 淘宝网（taobao）购书入口   >>> 更多购书渠道……   >>>

设为首页｜加入收藏｜联系匠人｜管理入口｜21IC首页｜21IC博客｜21IC社区｜侃单片机｜回复的贴｜参与的贴

[加入团队] [加入Q群] [广告赞助] [交换连接] [代理工具] [免责声明]      匠人的原创栏目：[匠人公告] [匠人文集] [匠人笔记] [写书近况]

天气预报 百宝日历 载入中... 百宝专栏 载入中... 最新货色 载入中... 粉丝评论 载入中... 载入中... 百宝信息 载入中... 百宝流量 （2006-07-01开始） 匠人手记

匠人学习：对PIC芯片ROM中的程序地址精确定位  匠人手记网络版：从零开始玩转PIC 之 旋转时钟  匠人观点： 好记性不如烂笔头    程序宝典：实用c程序、PIC软件串行口实现技巧  设计技巧： 如何阅读别人的代码（目录）  连载专题：程序规划方法漫谈(连载)  用“硬盘音圈电机+三星9454芯片”做的摇摆相框  网络酷文：一个有趣的关于C宏的题目及巧解  黑色幽默：三鹿门——后世畅想  匠人手记：购书攻略、勘误表、书友会、书友Q群  匠人手记： 《匠人手记》重印完成，新版照片 用AVR单片机8位数据产生随机数 程序匠人 发表于 2005-8-17 18:20:00  阅读全文 | 回复(1) | 引用通告 | 编辑 用AVR单片机8位数据产生随机数       作者：佚名       星星灯         源程序:SLAVR737.ASM       用AVR单片机8位数据产生随机数,由PORTA 口及PORTC 口输出随机数,在8X8       LED上显示,硬件接线电路见“7.3.8按钮猜数”。随机数的种子由程序设定(也可外接开关设定),启动种子后,由移位寄存器以互斥的异或逻辑组合返回循环产生。       .include"8515def.inc"           rjmp    RESET          .def    temp    =r16        ;暂存器       .def    temp1    =r17        ;暂存器1       .def    udata    =r21        ;存随机数送A口       .def    ddata    =r22        ;存随机数送C口       .cseg       .org    0x10       RESET:    ldi    temp,high(RAMEND);设堆栈指针           out    SPH,temp                       ldi    temp,low(RAMEND)               out    SPL,temp                           ldi     temp,0xff        ;设A口、C口为输出               out     ddra,temp        ;送方向寄存器A               out     ddrc,temp        ;送方向寄存器C       start:  wdr                        ;关看门狗               ldi     udata,0x6a        ; 设置随机数初值               ldi     ddata,0x3c        ;       startp: out     porta,udata        ;输出到A口               out     portc,ddata        ;输出到C口               ldi     temp,0x80        ;设延时常数               rcall   delay            ;调用延时子程序               rcall   randm            ;调用十六位随机数子程序               rjmp    startp        delay:                    ; 通用延时子程序    从略       ....       16位移位产生随机数原理图       8～16位移位寄存器产生随机数循环组合       位 数    循环输入组合 S=2＾n-1 Qn XOR Qm          8    Q2 ⊕ Q3 ⊕ Q4 ⊕ Q8 (现程序按钮猜数采用8位数)          9    Q5 ⊕ Q9         10    Q7 ⊕ Q10         11    Q9 ⊕ Q11         12    Q2 ⊕ Q10 ⊕ Q11 ⊕ Q12         13    Q1 ⊕ Q11 ⊕ Q12 ⊕ Q13         14    Q2 ⊕ Q12 ⊕ Q13 ⊕ Q14         15    Q14 ⊕ Q15         16    Q4 ⊕ Q13 ⊕ Q15 ⊕ Q16       randm:                            ;产生十六位随机数子程序          mov   temp,udata        ;产生A口随机数                 mov   temp1,udata        ;                 rol   temp                ;通过进位位左循环移位                 eor   temp1,temp        ;异或                 rol   temp            ; 通过进位位左循环移位                 rol   temp            ; 通过进位位左循环移位                 eor   temp1,temp    ;异或                 mov   temp,ddata    ; 产生C口随机数                 swap  temp            ; 通过进位位左循环移位                 eor   temp,temp1    ;异或通过进位位左循环移位                 rol   temp            ; 通过进位位左循环移位                 rol   ddata        ; 通过进位位左循环移位                 rol   udata        ; 通过进位位左循环移位                 ret                  ;子程序返回       7.3.8    按钮猜数程序       源程序:SLAVR738.ASM       许多场合如按钮猜数(电脑摇奖,电脑选出幸运号),游戏开始按钮等待一个不规则且不定序的数据产生,即须要随机数发生器。随机数的种子由程序设定(也可外接开关设定),启动种子后,由移位寄存器以互斥的异或逻辑组合返回循环产生。产生随机数的原理图如下:       16位移位产生随机数原理图       8～16位移位寄存器产生随机数循环组合       位 数    循环输入组合 S=2＾n-1 Qn XOR Qm          8    Q2 ⊕ Q3 ⊕ Q4 ⊕ Q8 (现程序按钮猜数采用8位数)          9    Q5 ⊕ Q9         10    Q7 ⊕ Q10         11    Q9 ⊕ Q11         12    Q2 ⊕ Q10 ⊕ Q11 ⊕ Q12         13    Q1 ⊕ Q11 ⊕ Q12 ⊕ Q13         14    Q2 ⊕ Q12 ⊕ Q13 ⊕ Q14         15    Q14 ⊕ Q15         16    Q4 ⊕ Q13 ⊕ Q15 ⊕ Q16       以8X8       LED阵列,开机时为了避免被使用者预测出压按时间对应随机数的变化值,故LED字幕以广告动画画面显示,并令随机数随着变化使无法预测随机数起始值,广告动画面共有四张,每张有8位数据。见”org         dpfstb”;       由按钮(PD1)按下,AVR用8位数据产生随机数,由PORTA 口及PORTC 口输出随机数,在8X8 LED上显示好玩的真实的按钮猜数。       .include "8515def.inc"       .def    peed    =r16       .def    dspn    =r17   ;存显示初始动画次数       .def    temp2   =r18       .def    temp1   =r19       .def    temp    =r20       .def    scndp   =r21       .def    cnt     =r22       .def    rdata   =r23        ;存随机种子数       .def    rdata9  =r24       .equ    dpfstb  =0x01e0     ;大小矩形图表首址       .equ    randtb  =0x0210     ;随机数种子表首址       .equ    numbertb=0x0240     ;0-9数字表首址       .org  $0000           rjmp    RESET        ;Reset Handle       .cseg       .org $0010       RESET:  ldi     peed,high(RAMEND)   ;设置堆栈$25F,见器件配置文件"8515def.inc"               out     SPH,peed               ldi     peed,low(RAMEND)               out     SPL,peed               ldi     peed,0xff    ;对口初始化,               out     ddra,peed    ;设A口为输出               out     ddrc,peed    ;设C口为输出               ldi     peed,0xfd    ;PD1作输入,且接内部上拉电阻               out     ddrd,peed    ;PD1为输入,其余为输出               ldi     peed,0xff    ;关D口               out     portd,peed               ldi     peed,0x13    ;显示画面次数       start:  ldi     dspn,0x06    ;显示初始动画               ldi     zh,high(dpfstb*2)                ldi     zl,low(dpfstb*2)        dspfm:  rcall   ldtb8        ;调用程序区数送到内存RAM               ldi     temp2,0xa0    ;显示动画面次数       dspfm1: rcall   scan1        ;调用从内存取数显示一次               sbis    pind,01        ;I/O口的位被置位跳行,检测到PD1按下否               rjmp    getseed     ; 检测到PD1按下转               dec     temp2        ;-1               brne    dspfm1        ;不为0转               dec     dspn        ; 初始画面次数-1               brne    dspfm        ; 不为0转               rjmp    start        ;转到显示初始动画       getseed:inc     temp        ;+`1,根据PD1按下的时间,选择随机数种子               sbis    pind,01        ; I/O口的位被置位跳行,检测到PD1按下否               rjmp    getseed        ; 检测到PD1按下,继续计数               andi    temp,0x1f    ;按钮松开,取随机数种子与0X0F加               ldi     zh,high(randtb*2)               ldi     zl,low(randtb*2)               add     zl,temp               lpm               mov     rdata,r0    ;得到随机数种子       next:   ldi     dspn,0x08   ;显示8个不同的随机数;       repeet: rcall   randm        ;调用产生随机数子程序               rcall   dspnumber    ;调用显示8个不同的随机数               dec     dspn        ;-1               brne    repeet        ;dspn不为0转               rcall   randm        ; 调用产生随机数子程序       guess1: rcall   dspnumber   ;调用显示同一随机数,直到有键按下               sbic    pind,01     ;松开后再往下执行(I/O口清零跳行)               rjmp    guess1         ;转显示同一随机数,直到有键按下       wait:   rcall   dspnumber    ;               sbis    pind,01               rjmp    wait         ;等待按钮按下               ldi     rdata9,0x03         ;显示动画三次       start0: ldi     dspn,0x06           ;每次显示六幅画面               ldi     zh,high(dpfstb*2)                ldi     zl,low(dpfstb*2)        dspfm0: rcall   ldtb8            ;调用从Z指向的程序区取数据送到内存0080-0087中               ldi     temp2,0xa0        ;显示次数       dspfm1a:rcall   scan1            ;调用从内存0080-0087中取数据显示一次               dec     temp2            ;-1               brne    dspfm1a            ;不为0转               dec     dspn            ;显示初始动画次数-1               brne    dspfm0            ;不为0转               dec     rdata9            ;显示动画三次-1               brne    start0            ;不为0转               rjmp    next                ;转显示8个不同的随机数       dspnumber:                         ;显示一个0-9数字的子程序               ldi     zh,high(numbertb*2)               ldi     zl,low(numbertb*2)               add     zl,rdata9               rcall   ldtb8            ;取数               ldi     temp2,0xa0       ;该数字重复显示A0H次       dspn1:  rcall   scan1               dec     temp2               brne    dspn1               ret       scan1:  push    xl                 ;从内存0080-0087中取数据显示一次               ldi     temp,0b01111111               mov     scndp,temp               ldi     cnt,0x08       col1:   out     portc,scndp       ;显示屏幕的一列               ld      r1,x+               out     porta,r1               rcall   delay               sec               ror     scndp               dec     cnt               brne    col1               pop     xl               ret       ldtb8:  ldi    xl,0x80     ;从Z指向的程序区取数据送到内存0080-0087中               ldi    xh,0x00               ldi    temp1,0x08               push   xl        nexld1: lpm               st     x+,r0               ld     r0,z+               dec    temp1               brne   nexld1               pop    xl               ret       delay:           ;通用延时子程序从略       ....       randm:  mov    temp,rdata    ;产生8N(0≤N≤9)随机数子程序               mov    temp1,rdata               swap   temp1               eor    temp,temp1               rol    temp1               eor    temp,temp1               rol    temp1               eor    temp,temp1               rol    temp               rol    rdata               mov    rdata9,rdata               andi   rdata9,0x0f               cpi    rdata9,0x0a               brsh   randm         ;产生了一个0≤RDATA9≤9的随机数               lsl    rdata9               lsl    rdata9               lsl    rdata9               ret       .cseg       .org      dpfstb;            ;大小方框字形表       ;small  o       .db       0b00000000,0b00000000,0b00000000,0b00011000       .db       0b00011000,0b00000000,0b00000000,0b00000000       .db       0b00000000,0b00000000,0b00111100,0b00100100       .db       0b00100100,0b00111100,0b00000000,0b00000000       .db       0b00000000,0b01111110,0b01000010,0b01000010       .db       0b01000010,0b01000010,0b01111110,0b00000000       ;big   o       .db       0b11111111,0b10000001,0b10000001,0b10000001       .db       0b10000001,0b10000001,0b10000001,0b11111111       .db       0b00000000,0b01111110,0b01000010,0b01000010       .db       0b01000010,0b01000010,0b01111110,0b00000000       .db       0b00000000,0b00000000,0b00111100,0b00100100       .db       0b00100100,0b00111100,0b00000000,0b00000000       .cseg       .org      randtb               ;随机数种子表       .db       0x5a,0x7b,0x5b,0x4f,0x66,0x6d,0x7d,0x07       .db       0x3b,0x8c,0x67,0x9a,0x99,0x7e,0x2d,0x3e       .db       0x5c,0x6d,0x5b,0x7e,0xf6,0xe7,0x4c,0xc8       .db       0x69,0x9c,0xe2,0x75,0x6c,0xd3,0xe8,0x9a       .cseg       .org      numbertb              ;0-9数字字形表       ;0       .db       0b00111000,0b01000100,0b01000100,0b01000100       .db       0b01000100,0b01000100,0b01000100,0b00111000       ;1       .db       0b00010000,0b00011000,0b00010000,0b00010000       .db       0b00010000,0b00010000,0b00010000,0b00111000       ;2       .db       0b00011100,0b00100010,0b00100000,0b00010000       .db       0b00001000,0b00000100,0b00000010,0b00111110       ;3       .db       0b00111100,0b00010000,0b00001000,0b00010000       .db       0b00100000,0b00100000,0b00100010,0b00011100       ;4       .db       0b00100000,0b00110000,0b00101000,0b00100100       .db       0b00100010,0b11111110,0b00100000,0b00100000       ;5       .db       0b01111110,0b00000010,0b00111110,0b01000000       .db       0b01000000,0b01000000,0b01000010,0b00111100       ;6       .db       0b00110000,0b00001000,0b00000100,0b00111100       .db       0b01000100,0b01000100,0b01000100,0b00111000       ;7       .db       0b01111100,0b01000000,0b00100000,0b00010000       .db       0b00001000,0b00001000,0b00001000,0b00001000       ;8       .db       0b00111000,0b01000100,0b01000100,0b00111000       .db       0b01000100,0b01000100,0b01000100,0b00111000       ;9       .db       0b00111000,0b01000100,0b01000100,0b01111000       .db       0b01000000,0b01000000,0b01000100,0b00111000   看《匠人手记》，与匠人同行！北航出版，正在热卖！ 上一篇：一些实用的单片机c程序 下一篇：用8515做的音乐演奏程序(c) Re:用AVR单片机8位数据产生随机数 王洪兵(游客)发表评论于2007-5-7 21:49:00  个人主页 | 引用 | 返回 | 删除 | 回复 各位大哥帮帮忙啊?怎么产生随机数啊??? 看《匠人手记》，与匠人同行！北航出版，正在热卖！ 发表评论： 昵称： 密码： (游客无须输入密码) 主页： 标题： 载入中... 芯片专题 器件专题 软件专题 硬件专题 综合专题 项目专题 原创专题 EMC Freescale PIC MSP430  AVR ARM 器件检测 LCD LED 按键 触摸键 E2PROM 电池 电机 电阻 电容 电感 指令系统 软件算法 编程规范 滤波算法 串行通讯 PCB设计 I2C PWM 红外遥控 充电技术 中断 ADC  新手入门 项目管理 电磁兼容 低功耗 汽车电子 电子秤 电磁炉 电动车 报警器 匠人手记 匠人夜话 网络心路 一周热点串烧 从零开始玩PIC DIY旋转时钟 广告5号位 [投放] 学习板、开发板、编程器、下载器、仿真器（查看详情……）

广告3号位 [投放] 站内搜索 日志标题日志内容 站外搜索 百度  google mp3  歌词  图片  FLASH  知道  文档 新闻  词典  地图  mp3  软件  天网  雅虎  爱问  搜狗  讯雷  网讯  华军  天空  21IC器件搜索 货源价格资料 百宝箱分站 《匠人的百宝箱》21IC站 《匠人的百宝箱》21IC笔记团队 《匠人手记》21IC书友会 《匠人的百宝箱》MCUBLOG站 《匠人的百宝箱》MCUBLOG笔记团队 《匠人的百宝箱》EDN站 《匠人手记》EDN书友会 《匠人的百宝箱》与非网站 《匠人的百宝箱》新浪站 《匠人的百宝箱》百度站 《匠人的百宝箱》网易126站 《匠人的百宝箱》网易163站 《匠人的百宝箱》互动出版网站 广告4号位 [投放]

匠人原创	往日酷贴
心灵的震撼——写在512地震之后、《戒色》新片发布会(网友聚会恶搞系列)、  两粒电子的爱情、出书的那些日子……、论21ic的论坛文化、续、性格决定命运、  选狼还是选狮子、狮子的结局…、《匠人夜话》27：七年之痒—写在升任21icbbs站长之际、  匠人自制低成本电容式触控板、《21icbbs人物志》续集、上海街头实景、 一阶滤波算法之深入研究、淘书手记、什么是散转程序、《匠人手记》新书艳照、 EDN《匠人手记》签名售书优惠活动开始报名啦！、欢迎加入《匠人手记》EDN书友会、 欢迎加入《匠人手记》书友会Q群、《匠人手记》终稿目录、《匠人手记》封面先睹为快、 IAR-C-FOR-SAM89(三星)中实现位操作、享受一下VIP的待遇，哈哈、 渐明渐暗动态流水灯效果（C源程序）、《匠人手记》购书全攻略、	《匠人的百宝箱》21IC笔记团队、《匠人手记》义拍活动，得款直接捐献灾区、浅谈A/D、 太阳能应用图片集粹1、Keil C动态内存管理机制分析及改进、一种触摸实现方式、 modelsim仿真UART接收功能、关于射频表无法用红外改写时间的问题、 一定要珍惜的十种人、PADS2007安装问题解决方案 、 ：博客，改变的不仅仅是图书 、  C语言宏定义技巧、C语言 条件编译详解、21IC上海2008-04聚会报名进行中。。。、 你的博客还能持续多久（转贴）、 电动车无刷电机控制器软件设计要点（作者:谢渊斌）、

大千八卦	友情连接
新浪新闻： 新浪财经： AK58新闻： 新浪股票： 新浪股票： 证券之星： 行情数据 分时走时图 K线分析 新闻资讯 代码查询 BBS论坛 个股资料	[更多酷站连接]     [欢迎交换连接] [百宝箱之与非门分舵] [电脑圈圈的家当] [IC921的博客] [柔月阁] [八楼的呼吸] [hotpower 的水潭] [xwj的文君阁] [所长的BLOG] [阿摆手记] [电子伙伴] [unaided的笔记] [小飞的笔记] [单片机开发联盟] [网址之家] [好东西网址大全] [美萍中文精选] [数字电视之家] [SMARTCODE电子书斋] [软件开发之窗] [Armoric的笔记] [我爱研发网] [infernal的笔记] [雄鹰的空中加油站] [SunK] [逍遥电子] [ningpanda的博客] [C-Design] [一网见天下] [海边淘沙] [嵌入式365] [水牛的仓库] [股剩是怎样炼成的] [PIC论坛] [ICC AVR开发网] [中国高校自动化网]

!!! 《匠人的百宝箱》 !!!