友情推荐网上购书渠道:
EDN网(ednchina)购书入口   >>>
互动出版网(china-pub)购书入口   >>>
当当网(dangdang)购书入口   >>>
淘宝网(taobao)购书入口   >>>
更多购书渠道……   >>> 

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

天气预报
百宝日历

百宝专栏

  • 首页 相册 标签
  • 电脑应用(65)
  • 供需信息(22)
  • 写书近况(82)
  • 匠人文集(115)
  • 硬件技术(171)
  • 匠人公告(86)
  • 与非门专栏(545)
  • 匠人笔记(115)
  • 团队撰写(96)
  • 汽车电子(52)
  • 编程技巧(465)
  • 程序宝典(476)
  • 网络酷文(472)
  • 开发工具(19)
  • 资料宝藏(274)
  • 项目管理(11)
  • 藏经宝阁(42)
  • 趣味设计(5)
  • 社区热贴(2)
  • 比尔盖茨熊专栏(0) 
  • 百宝信息

    载入中...

    百宝流量

    (2006-07-01开始)



    匠人手记

    芯片专题

    器件专题

    软件专题

    硬件专题

    综合专题

    项目专题

    原创专题

    器件检测
    LCD LED
    按键 触摸键
    E2PROM
    电池 电机
    电阻 电容 电感

    指令系统
    软件算法
    编程规范
    滤波算法
    串行通讯

    PCB设计
    I2C PWM
    红外遥控
    充电技术
    中断 ADC 

    匠人手记
    匠人夜话
    网络心路
    一周热点串烧
    从零开始玩PIC
    DIY旋转时钟

    用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
     

    看《匠人手记》,与匠人同行!北航出版,正在热卖!

    Re:用AVR单片机8位数据产生随机数
    王洪兵(游客)发表评论于2007-5-7 21:49:00  个人主页 | 引用 | 返回 | 删除 | 回复

    王洪兵(游客)各位大哥帮帮忙啊?怎么产生随机数啊???

    看《匠人手记》,与匠人同行!北航出版,正在热卖!

    发表评论:
    载入中...

    广告5号位 [投放]


    学习板、开发板、编程器、下载器、仿真器(查看详情……)

    站内搜索


    站外搜索


    百度  google
    mp3  歌词 
    图片  FLASH 
    知道  文档
    新闻  词典 
    地图  mp3 
    软件  天网 
    雅虎  爱问 
    搜狗  讯雷 
    网讯  华军 
    天空 

    21IC器件搜索
    百宝箱分站
  • 《匠人的百宝箱》21IC站
  • 《匠人的百宝箱》21IC笔记团队
  • 《匠人的百宝箱》MCUBLOG站
  • 《匠人的百宝箱》MCUBLOG笔记团队
  • 《匠人的百宝箱》EDN站
  • 《匠人手记》EDN书友会
  • 《匠人的百宝箱》与非网站
  • 《匠人的百宝箱》新浪站
  • 《匠人的百宝箱》百度站
  • 《匠人的百宝箱》网易126站
  • 《匠人的百宝箱》网易163站
  • 《匠人的百宝箱》互动出版网站
  • 广告4号位 [投放]

     
     
     

    新鲜货色

    匠人手记

    近期动态

    载入中...

      《匠人手记》购书全攻略 
     书友近况:淘书手记答疑与讨论:什么是散转程序 
     《匠人手记》新书艳照
     EDN《匠人手记》签名售书优惠活动开始报名啦!
     欢迎加入《匠人手记》EDN书友会
     欢迎加入《匠人手记》书友会Q群
     《匠人手记》终稿目录
     《匠人手记》封面,请大家先睹为快
     上周六收到了北航寄来的《匠人手记》清样,让大家先睹为快

    匠人原创

    粉丝评论

    往日酷贴

    载入中...

    载入中...



     网络酷文:博客,改变的不仅仅是图书 
     网络酷文:C语言宏定义技巧C语言 条件编译详解

      21IC上海2008-04聚会报名进行中。。。 
     两分钟让你明白什么是ERP![转]
      神奇的Duff's Device 算法
      实用一线通讯电路及软件设计方法
      程序员的“七年之痒”
      史上最短但最精彩的武侠小说
      网络无厘头文学《缺钙水浒》(爆笑)

     你的博客还能持续多久(转贴)
     电动车无刷电机控制器软件设计要点(作者:谢渊斌)

    大千八卦

    友情连接

    新浪新闻:
    新浪财经:
    AK58新闻:
    新浪股票:
    新浪股票:
    证券之星:

     [更多酷站连接]

     

     

    [欢迎交换连接]

    [百宝箱之与非门分舵]

    [电脑圈圈的家当]

    [IC921的博客]

    [柔月阁]

    [八楼的呼吸]

    [hotpower 的水潭]

    [xwj的文君阁]

    [所长的BLOG]

    [阿摆手记]

    [电子伙伴]

    [unaided的笔记]

    [小飞的笔记]

    [单片机开发联盟]

    [网址之家]

    [好东西网址大全]

    [美萍中文精选]

    [数字电视之家]

    [SMARTCODE电子书斋]

    [软件开发之窗]

    [Armoric]

    [我爱研发网]

    [infernal的笔记]

    [雄鹰的空中加油站]

    [SunK]

    [逍遥电子]

    [ningpanda的博客]

    [C-Design]

    [一网见天下]

    [海边淘沙]

    [嵌入式365]

    [水牛的仓库]

    [股剩是怎样炼成的]

    [PIC论坛]

    [ICC AVR开发网]

    [中国高校自动化网]

     

     

     

    MCU博客-中国电子工程师博客网 

    大学生电子网 

     

     

     

     

     

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