PIC产生伪随机数汇编语言程序_历史上今天-电子工程世界

分享到: 微博; QQ; 微信; LinkedIn

PSW    EQU   03
R0     EQU   08
R1     EQU   09
R2     EQU   0AH
R3     EQU   0BH
R4     EQU   0CH
R5     EQU   0DH
R6     EQU   0EH
R7     EQU   0FH
TEMP   EQU   13H
CNT1   EQU   11H
CNTH   EQU   12H
BUF0   EQU   17H
BUF1   EQU   18H
ESUM1  EQU   13H
ESUM2  EQU   14H
ESUM3  EQU   15H
ESUM4  EQU   16H
DSUM1  EQU   19H
DSUM2  EQU   1AH
DSUM3  EQU   1BH
DSUM4  EQU   1CH
DSUM5  EQU   1DH
DSUM6  EQU   1EH
       ORG   1FFH
       GOTO  RADM
       ORG   000
D_ADD  MOVF  R0,0
       ADDWF R6,1
       BTFSC PSW,0
       INCF  R7
       MOVF  R1,0
       ADDWF R7,1
       RETLW 0
DMU1   MOVLW 16
       MOVWF TEMP
       CLRF  R7
       CLRF  R6
DMUL_1 RRF   R3
       RRF   R2
       BTFSC PSW,0
       CALL  D_ADD
       RRF   R7
       RRF   R6
       RRF   R5
       RRF   R4
       DECFSZ TEMP
       GOTO  DMUL_1
       RETLW 0
RADM   CLRF  ESUM1
       CLRF  ESUM2
       CLRF  ESUM3
       CLRF  ESUM4
       CLRF  DSUM1
       CLRF  DSUM2
       CLRF  DSUM3
       CLRF  DSUM4
       CLRF  DSUM5
       CLRF  DSUM6
       MOVLW 20H
       MOVWF CNTH
RADM_1 MOVLW 00
       MOVWF CNTL
RADM_2 MOVLW 64H
       MOVWF R3
       MOVLW 85H
       MOVWF R2
       MOVF  BUF1,0
       MOVWF R1
       MOVF  BUF0,0
       MOVWF R0
       CALL  DMUL
       MOVLW 19H
       ADDWF R4,0
       MOVWF R0
       MOVWF BUF0
       BTFSC PSW,0
       INCF  R5
       MOVLW 36H
       ADDWF R5,0
       MOVWF R1
       MOVWF BUF1
       MOVF  R0,0
       ADDWF ESUM1,1
       BUFSS PSW,0
       GOTO  EADD_1
       INCF  ESUM2
       BTFSS PSW,2
       GOTO  EADD_1
       INCF  ESUM3
       BTFSS PSW,2
       GOTO  EADD_1
       INCF  ESUM4
EADD_1 MOVF  R1,0
       ADDWF ESUM2,1
       BTFSS PSW,0
       GOTO  EADD_2
       BTFSS PSW,2
       GOTO  EADD_2
       INCF  ESUM4
EADD_2 BTFSC R1,7
       GOTO  RADM_3
       COMF  R0,1
       COMF  R1,1
       MOVLW 1
       ADDWF R0,1
       BTFSC PSW,0
       INCF  R1
RADM_3 MOVLW 80H
       ADDWF R1,1
       MOVF  R1,0
       MOVWF R3
       MOVF  R0,0
       MOVWF R2
       CALL  DMUL
       MOVF  R4,0
       ADDWF DSUM1,1
       BTFSS PSW,0
       GOTO  DADD_1
       INCF  DSUM2
       BTFSS PSW,2
       GOTO  DADD_1
       INCF  DSUM3
       BTFSS PSW,2
       GOTO  DADD_1
       INCF  DSUM4
       BTFSS PSW,2
       GOTO  DADD_1
       INCF   DSUM6
DADD_1 MOVF   R5,0
       ADDWF  DSUM2,1
       BTFSS  PSW,0
       GOTO   DADD_2
       INCF   DSUM3
       BTFSS  PSW,2
       GOTO   DADD_2
       INCF   DSUM4
       BTFSS  PSW,2
       GOTO   DADD_2
       INCF   DSUM5
       BTFSS  PSW,2
       GOTO   DADD_2
       INCF   DSSUM6
DADD_2 MOVF   R6,0
       ADDWF  DSUM3,1
       BTFSS  PSW,0
       GOTO   DADD_3
       INCF   DSUM4
       BTFSS  PSW,2
       GOTO   DADD_3
       INCF   DSUM5
       BTFSS  PSW,2
       GOTO   DADD_3
       INCF   DSUM6
DADD_3 MOVF   R7,0
       ADDWF  DSUM4,1
       BTFSS  PSW,0
       GOTO   DADD_4
       INCF   DSUM5
       BTFSS  PSW,2
       GOTO   DADD_4
       INCF   DSUM6
DADD_4 DECFSZ CNTL
       GOTO   RADM_2
       DECFSZ CNTH
       GOTO   RADM_1
       MOVLW  5
       MOVWF  CNTL
RADM_4 BCF    PSW,0
       RRF    ESUM4
       RRF    ESUM3
       RRF    ESUM2
       RRF    ESUM1
       DECFSZ CNTL
       GOTO   RADM_4
       MOVLW  5
       MOVWF  CNTL
RADM_5 BCF    PSW,0
       RRF    DSUM6
       RRF    DSUM5
       RRF    DSUM4
       RRF    DSUM3
       RRF    DSUM2
       RRF    DSUM1
       DECFSZ CNTL
       GOTO   RADM_5
LOOP   GOTO   LOOP
       END

[1] [1]

关键字：PIC 伪随机数汇编语言引用地址：PIC产生伪随机数汇编语言程序

上一篇：16F870单片机的中断应用程序
下一篇：PIC单片机模拟异步串行通讯UART

根据New Atlas 10月15日报道，UACOS公司造型独特的高空伪卫星（HAPS）ApusDuo，已经顺利完成了10米原型的飞行测试。作为其太阳能飞行器开发项目的一部分，其翼展达到了28米（91.9英尺）。不过原型机的主要任务，包括了控制算法的测试（起飞与降落阶段），以及HAPS空气动力学的全面验证。本次试飞表明，其已完全具备了无人机所需的飞行特性。据了解，HAPS...

2019年10月16日 | 通过示波器测试SPC协议解码

在很多的场合，我们往往需要测量较高精度的角度和位置，例如汽车的油门，节气门位置以及转向扭矩感应等。由此，用于传输磁感应强度的SPC应运而生，下面我们来了解一下此协议的内容。SPC概述SPC（Short PWM Code）协议，是基于SENT（Single Edge Nibble Tranmission）协议的增强版，通过两个相邻周期的下降沿之间的脉冲实现数据传输，相对于模拟输出和...

2020年10月16日 | OPPO携手法国电信推出eSIM智能手表OPPO Watch，拓展欧洲市场

OPPO今日宣布，与全球领先的电信运营商Orange（法国电信）进行联合创新合作，推出全新搭载eSIM功能的OPPO Watch，为欧洲用户提供5G时代融合式科技体验。同时，OPPO也将携手法国电信推出个性化软件配置服务，公开市场用户也可享受到法国电信的服务。通过与法国电信的合作，OPPO进一步拓展欧洲公开市场和可穿戴设备市场，逐渐成为欧洲市场的重要参与者。OPP...

2021年10月16日 | 马来西亚解封可否解全球缺芯“难题”？

集微网报道，今年以来马来西亚疫情持续升温，当地政府不得不于3月份实施行动管制令，原定6月28日解除封锁的计划也被无限期延长。由此素来有着“半导体重镇”之称的马来西亚牵动着整个产业界的神经，近日该国终于传来了好消息。10月10日，马来西亚政府宣布，由于成人接种率已达到90%，11日起对完全接种新冠疫苗的居民，取消国内外旅游限制，不再需事先核准...

史海拾趣

ETRI公司的发展小趣事

在光通信技术领域，ETRI也取得了显著成果。他们与Eldis公司合作，成功将一种电吸收调制光源（EML）商业化。这种光源能够在30公里内每秒传输250亿比特，且在高温和室温下都能稳定工作。这一技术的成功商业化，对于提高数据传输速度和效率具有重要意义。

Hexawave公司的发展小趣事

自1976年成立以来，ETRI一直致力于打造高效便捷的智慧产业生态圈。在汽车制造、轨道交通等行业中，电气和机械设备是必不可少的。ETRI凭借其卓越的技术实力，为这些行业提供了在各种恶劣环境下都能保持稳定性的产品。无论是在电机马达、编码器、传感器，还是在泵、阀、流量计以及温度计压力表等广泛使用的设备中，ETRI都展现了其行业领先的解决方案。

晶群科技(Gem-micro)公司的发展小趣事

CONTTEK Group GmbH公司的发展小趣事

CONTTEK Group GmbH公司的创立，标志着电子行业内一颗璀璨的新星开始崭露头角。公司在创立初期，便凭借对市场的敏锐洞察力和对技术的深刻理解，确立了在电子连接器领域的专业地位。通过引进先进的生产设备和技术人才，公司成功开发出了一系列高质量、高性能的连接器产品，并逐渐在市场中获得了认可。

GE Power Electronics Inc公司的发展小趣事

作为儿童玩具的一部分，通过声音控制播放音乐，增加玩具的趣味性和互动性。

百佳(BAIJIA)公司的发展小趣事

百佳公司的创始人蔡永权，在改革开放初期，凭借敏锐的商业洞察力和对技术的执着追求，创立了中山市古镇百佳电子电器厂。初创时期，公司面临着资金短缺、设备简陋、市场竞争激烈等多重困难。然而，蔡永权带领团队坚持不懈，以质量为核心，通过不断改进生产工艺和提升产品质量，逐渐赢得了客户的信任和市场的认可。

问答坊 | AI 解惑

转载机器人 [ 本帖最后由 tsb00 于 2009-3-22 13:39 编辑 ]… 查看全部问答∨	《FPGA三国志》（五）Altera FPGA粗颗粒结构 [Flex10K,他的推出，已经表明，altera的思维已经非常清晰，大规模的fpga将会是将来的王道！而且，高速的嵌入式块RAM是一个开创新的思维。当时，Xilinx凭借分布式RAM以及内置三态的结构，的确大有横扫千军的架势。但是Flex10K的出现，有效提升了Alt ...… 查看全部问答∨
面试后遭遇小偷昨天6点下班以后,从深圳罗湖赶到南山蛇口,去参加一个面试,花了一个半小时才到,还好,主考官在那里等找我们,3个人同去了,一进去,主考官在互通姓名之后开考,说实话,题目不难,可就是不会,其中一个人做了2分钟试题,没和面试官交谈就走了,另一个人做了十 ...… 查看全部问答∨	一般来说，如果板子上有二个SD卡插槽，这二个SD卡插槽的插卡检测中断是不是同一个中断?还是其它什么形式. WinCE5.0/ARM9(i.MX27或其它ARM9 cpu)的环境下。一般来说，如果板子上有二个SD卡插槽，这二个SD卡插槽的插卡检测中断是不是同一个(当有SD卡插入进，会调用驱动的读卡功能)？还是其它什么形式. 请高手指导,谢谢.… 查看全部问答∨
掉电保护电路设计我最近在设计一个电路，单片机在复位时DA输出会掉电，但时间很短，我想设计一个电路可以在复位掉电时，起到保护作用，不让它电平下降，请高手帮忙设计一下，谢谢！！！如果能设计好可以发到我邮箱：fengdixue2007@yahoo.com.cn… 查看全部问答∨	急求助 UDA1341 WINCE 播放完系统声音后的噪声问题？驱动中如何消除这个芯片在播放语音后产生的噪声啊？… 查看全部问答∨
xpe远程桌面问题我用xpe开发,一个用户需要用开始所有程序附件通讯下的远程桌面连接,登陆到服务起上工作,请问这个用的什么组件呀,实在找不到了呀,谢谢呀… 查看全部问答∨	公司居然可以上论坛发帖子。。。 :D :D :D :D :D 公司屏蔽了那么多网站，哈哈，唯独电子工程世界的论坛么有啊，还可以发帖，赞！！！！… 查看全部问答∨
电池容量如何测量？来自电子工程师技术交流(12425841)… 查看全部问答∨	【小白求助】有关十进制加法计数器的问题~ 先上程序~ LIBRARY IEEE; USE IEEE.STD_LOGIC_1164.ALL; USE IEEE.STD_LOGIC_UNSIGNED.ALL; ENTITY CNT10 IS PORT(CLK,RST,EN:IN STD_LOGIC; &n ...… 查看全部问答∨

小广播

对于pcb板自学入门，请给一个学习大纲以下是一个 PCB 板自学入门的学习大纲：第一阶段：基础知识和准备工作理解 PCB 板的基本概念学习 PCB 板的基本结构、术语和原理，包括导线层、元件布局、电气连接等。选择合适的 PCB 设计软件研究并选择一款适合自己的 PCB 设计软件，如 Altium Des ...… 查看全部问答∨	对于机器学习小白入门，请给一个学习大纲以下是适用于机器学习小白入门的学习大纲：1. 了解机器学习基础概念了解什么是机器学习以及其在实际应用中的作用。理解监督学习、无监督学习和强化学习等基本概念。2. 学习编程基础学习一种编程语言，如Python，作为机器学习的主要编程语言。掌握基 ...… 查看全部问答∨
我想深度学习框架入门，应该怎么做呢？要入门深度学习框架，您可以按照以下步骤进行：选择框架：首先，选择一种流行的深度学习框架，如TensorFlow、PyTorch、Keras等。这些框架都有强大的社区支持和丰富的文档资源，适合初学者入门。学习基础知识：了解深度学习的基本概念和原理，包括神 ...… 查看全部问答∨	机器算法的发展和未来怎么了？机器学习算法的发展和未来是一个非常广泛而且令人兴奋的话题。从过去几十年的发展来看，机器学习算法已经取得了巨大的进步，其中一些关键的发展包括：深度学习的兴起：深度学习是近年来最引人注目的进展之一。通过神经网络的多层次结构，深度学习 ...… 查看全部问答∨
请问能否详细地讲解fpga串口通信原理呢？ FPGA（现场可编程门阵列）是一种可以配置为执行特定任务的硬件设备。串口通信，也称为串行通信，是一种常见的数据传输方式，它允许设备通过单一的数据线（通常称为TX线）发送数据，并通过另一条数据线（通常称为RX线）接收数据。在FPGA中实现串口通 ...… 查看全部问答∨	fpga入门了怎么提升一旦你已经入门了 FPGA，你可以通过以下方法来提升你的技能和知识：深入学习 FPGA 架构：了解不同型号和系列 FPGA 的架构、资源和特性，掌握其内部原理和工作原理。学习高级编程语言：深入学习 Verilog 或 VHDL 编程语言，掌握其高级特性和技巧， ...… 查看全部问答∨
请推荐一些单片机中文编程入门以下是一些适合电子工程师入门单片机中文编程的资源推荐：Arduino官方网站：Arduino是一种常用的开源硬件平台，支持中文编程环境，并且拥有丰富的中文教程和社区资源。你可以在Arduino官方网站上找到各种入门教程、示例代码和文档，以及与其他开发 ...… 查看全部问答∨	为什么深度学习感觉无法入门深度学习作为人工智能领域的一个重要分支，在学习过程中确实可能会遇到一些挑战。你可能已经具备了数学、编程和工程方面的基础知识，但深度学习可能仍然感觉无法入门的原因可能有以下几点：复杂的数学理论：深度学习涉及到复杂的数学理论，包括线性 ...… 查看全部问答∨
我想半导体单片机入门，应该怎么做呢？作为电子领域资深人士，你想要入门半导体单片机，以下是一些建议步骤：了解基础知识：首先，了解单片机的基本概念、工作原理和应用场景。了解单片机的内部结构、外部接口和功能模块等基础知识，包括CPU、存储器、输入输出端口等。学习编程语言：掌 ...… 查看全部问答∨	初学fpga用什么板子作为初学FPGA的电子工程师，你可以选择一款适合初学者的FPGA开发板，以下是几种常见的选择：Basys系列：由Xilinx提供的Basys系列开发板，如Basys 3或Basys 100，是初学者常用的入门级FPGA开发板。它们价格适中，具有丰富的外设和教学资源，适合学习 ...… 查看全部问答∨

2019年10月16日 | PIC产生伪随机数汇编语言程序

设计资源培训开发板精华推荐

2019年10月16日 | PIC产生伪随机数汇编语言程序

设计资源 培训 开发板 精华推荐

设计资源培训开发板精华推荐