xl2000单片机

1. 关于51系列单片机开发板的选购

吴鉴鹰单片机开发板我用过羡枯，感觉不错，视频讲解挺好的，售后服务也很好，我的板子是学校团购的，每次有问题都会及时回答，记得一次调试液晶，当时老是出现花屏的现象，找了好久，然后没办法，将程序发给他们技术支持，帮忙局宏分析桐派册，原来是数组定义错了。

2. 如果单片机故障了会不会烧坏和它连在一起的电脑呢 如果会。有没有...

如果采用电脑USB供电，单片机故障不会损坏电脑有关接口和部件，只要没有外部高电压输入，5V的信号电脑都能承受，即使单片机开发板短路，USB接口保护电路会起作用，放心地实验吧，弱电实验不会对人和设备产生危险，也很少发生损坏器件的现象，我曾把单片机电源正负极搞反，芯片发烫也没损坏，我作单片机实验很多，几乎没损坏什么元器件
但我做其它实验损失就大多了，如开关电源实验，大功率三极管，十几元甚至几十元，不知不觉瞬间就烧了，还损坏很多集成块也不便宜，那时候工资还很低，很令人心疼
前一段作DC-DC升压试验，烧了不少XL6009模块，最后连充电宝也烧坏了好在现在网购比较快，电子产品也较便宜

3. 学习protel multisim autocad单片机 好的建议统统give me 感谢

EDA不是软件,是一种技术^^^^

EDA技术的概念

EDA技术是在电子CAD技术基础上发展起来的计算机软件系统，是指以计算机为工作平台，融合了应用电子技术、计算机技术、信息处理及智能化技术的最新成果，进行电子产品的自动设计。

利用EDA工具，电子设计师可以从概念、算法、协议等开始设计电子系统，大量工作可以通过计算机完成，并可以将电子产品从电路设计、性能分析到设计出IC版图或PCB版图的整个过程的计算机上自动处理完成。

现在对EDA的概念或范畴用得很宽。包括在机械、电子、通信、航空航天、化工、矿产、生物、医学、军事等各个领域，都有EDA的应用。目前EDA技术已在各大公司、企事业单位和科研教学部门广泛使用。例如在飞机制造过程中，从设计、性能测试及特性分析直到飞行模拟，都可能涉及到EDA技术。本文所指的EDA技术，主要针对电子电路设计、PCB设计和IC设计。

EDA设计可分为系统级、电路级和物理实现级。

2 EDA常用软件

EDA工具层出不穷，目前进入我国并具有广泛影响的EDA软件有：multiSIM7（原EWB的最新版本）、PSPICE、OrCAD、PCAD、Protel、Viewlogic、Mentor、Graphics、Synopsys、LSIIogic、Cadence、MicroSim等等。这些工具都有较强的功能，一般可用于几个方面，例如很多软件都可以进行电路设计与仿真，同进还可以进行PCB自动布局布线，可输出多种网表文件与第三方软件接口。

(下面是关于EDA的软件介绍,有兴趣的话,旧看看吧^^^)

下面按主要功能或主要应用场合，分为电路设计与仿真工具、PCB设计软件、IC设计软件、PLD设计工具及其它EDA软件，进行简单介绍。

2.1 电子电路设计与仿真工具

我们大家可能都用过试验板或者其他的东西制作过一些电子制做来进行实践。但是有的时候，我们会发现做出来的东西有很多的问题，事先并没有想到，这样一来就浪费了我们的很多时间和物资。而且增加了产品的开发周期和延续了产品的上市时间从而使产品失去市场竞争优势。有没有能够不动用电烙铁试验板就能知道结果的方法呢？结论是有，这就是电路设计与仿真技术。

说到电子电路设计与仿真工具这项技术，就不能不提到美国，不能不提到他们的飞机设计为什么有很高的效率。以前我国定型一个中型飞机的设计，从草案到详细设计到风洞试验再到最后出图到实际投产，整个周期大概要10年。而美国是1年。为什么会有这样大的差距呢？因为美国在设计时大部分采用的是虚拟仿真技术，把多年积累的各项风洞实验参数都输入电脑，然后通过电脑编程编写出一个虚拟环境的软件，并且使它能够自动套用相关公式和调用长期积累后输入电脑的相关经验参数。这样一来，只要把飞机的外形计数据放入这个虚拟的风洞软件中进行试验，哪里不合理有问题就改动那里，直至最佳效果，效率自然高了，最后只要再在实际环境中测试几次找找不足就可以定型了，从他们的波音747到F16都是采用的这种方法。空气动力学方面的数据由资深专家提供，软件开发商是IBM，飞行器设计工程师只需利用仿真软件在计算机平台上进行各种仿真调试工作即可。同样，他们其他的很多东西都是采用了这样类似的方法，从大到小，从复杂到简单，甚至包括设计家具和作曲，只是具体软件内容不同。其实，他们发明第一代计算机时就是这个目的（当初是为了高效率设计大炮和相关炮弹以及其他计算量大的设计）。

电子电路设计与仿真工具包括SPICE/PSPICE；multiSIM7；Matlab；SystemView；MMICAD LiveWire、Edison、Tina Pro Bright Spark等。下面简单介绍前三个软件。

①SPICE（Simulation Program with Integrated Circuit Emphasis）：是由美国加州大学推出的电路分析仿真软件，是20世纪80年代世界上应用最广的电路设计软件，1998年被定为美国国家标准。1984年，美国MicroSim公司推出了基于SPICE的微机版PSPICE（Personal-SPICE）。现在用得较多的是PSPICE6.2，可以说在同类产品中，它是功能最为强大的模拟和数字电路混合仿真EDA软件，在国内普遍使用。最新推出了PSPICE9.1版本。它可以进行各种各样的电路仿真、激励建立、温度与噪声分析、模拟控制、波形输出、数据输出、并在同一窗口内同时显示模拟与数字的仿真结果。无论对哪种器件哪些电路进行仿真，都可以得到精确的仿真结果，并可以自行建立元器件及元器件库。

②multiSIM（EWB的最新版本）软件：是Interactive Image Technologies Ltd在20世纪末推出的电路仿真软件。其最新版本为multiSIM7，目前普遍使用的是multiSIM2001，相对于其它EDA软件，它具有更加形象直观的人机交互界面，特别是其仪器仪表库中的各仪器仪表与操作真实实验中的实际仪器仪表完全没有两样，但它对模数电路的混合仿真功能却毫不逊色，几乎能够100%地仿真出真实电路的结果，并且它在仪器仪表库中还提供了万用表、信号发生器、瓦特表、双踪示波器（对于multiSIM7还具有四踪示波器）、波特仪（相当实际中的扫频仪）、字信号发生器、逻辑分析仪、逻辑转换仪、失真度分析仪、频谱分析仪、网络分析仪和电压表及电流表等仪器仪表。还提供了我们日常常见的各种建模精确的元器件，比如电阻、电容、电感、三极管、二极管、继电器、可控硅、数码管等等。模拟集成电路方面有各种运算放大器、其他常用集成电路。数字电路方面有74系列集成电路、4000系列集成电路、等等还支持自制元器件。MultiSIM7还具有I-V分析仪（相当于真实环境中的晶体管特性图示仪）和Agilent信号发生器、Agilent万用表、Agilent示波器和动态逻辑平笔等。同时它还能进行VHDL仿真和Verilog HDL仿真。

③MATLAB产品族：它们的一大特性是有众多的面向具体应用的工具箱和仿真块，包含了完整的函数集用来对图像信号处理、控制系统设计、神经网络等特殊应用进行分析和设计。它具有数据采集、报告生成和MATLAB语言编程产生独立C/C++代码等功能。MATLAB产品族具有下列功能：数据分析；数值和符号计算、工程与科学绘图；控制系统设计；数字图像信号处理；财务工程；建模、仿真、原型开发；应用开发；图形用户界面设计等。MATLAB产品族被广泛应用于信号与图像处理、控制系统设计、通讯系统仿真等诸多领域。开放式的结构使MATLAB产品族很容易针对特定的需求进行扩充，从而在不断深化对问题的认识同时，提高自身的竞争力。

2.2 PCB设计软件

PCB（Printed-Circuit Board）设计软件种类很多，如Protel、OrCAD、Viewlogic、PowerPCB、Cadence PSD、MentorGraphices的Expedition PCB、Zuken CadStart、Winboard/Windraft/Ivex-SPICE、PCB Studio、TANGO、PCBWizard（与LiveWire配套的PCB制作软件包）、ultiBOARD7（与multiSIM2001配套的PCB制作软件包）等等。

目前在我国用得最多当属Protel，下面仅对此软件作一介绍。

Protel是PROTEL（现为Altium）公司在20世纪80年代末推出的CAD工具，是PCB设计者的首选软件。它较早在国内使用，普及率最高，在很多的大、中专院校的电路专业还专门开设Protel课程，几乎所在的电路公司都要用到它。早期的Protel主要作为印刷板自动布线工具使用，其最新版本为Protel DXP，现在普遍使用的是Protel99SE，它是个完整的全方位电路设计系统，包含了电原理图绘制、模拟电路与数字电路混合信号仿真、多层印刷电路板设计（包含印刷电路板自动布局布线），可编程逻辑器件设计、图表生成、电路表格生成、支持宏操作等功能，并具有Client/Server（客户/服务体系结构）， 同时还兼容一些其它设计软件的文件格式，如ORCAD、PSPICE、EXCEL等。使用多层印制线路板的自动布线，可实现高密度PCB的100%布通率。Protel软件功能强大（同时具有电路仿真功能和PLD开发功能）、界面友好、使用方便，但它最具代表性的是电路设计和PCB设计。

2.3 IC设计软件

IC设计工具很多，其中按市场所占份额排行为Cadence、Mentor Graphics和Synopsys。这三家都是ASIC设计领域相当有名的软件供应商。其它公司的软件相对来说使用者较少。中国华大公司也提供ASIC设计软件（熊猫2000）；另外近来出名的Avanti公司，是原来在Cadence的几个华人工程师创立的，他们的设计工具可以全面和Cadence公司的工具相抗衡，非常适用于深亚微米的IC设计。下面按用途对IC设计软件作一些介绍。

①设计输入工具

这是任何一种EDA软件必须具备的基本功能。像Cadence的composer，viewlogic的viewdraw，硬件描述语言VHDL、Verilog HDL是主要设计语言，许多设计输入工具都支持HDL（比如说multiSIM等）。另外像Active-HDL和其它的设计输入方法，包括原理和状态机输入方法，设计FPGA/CPLD的工具大都可作为IC设计的输入手段，如Xilinx、Altera等公司提供的开发工具Modelsim FPGA等。

②设计仿真工作

我们使用EDA工具的一个最大好处是可以验证设计是否正确，几乎每个公司的EDA产品都有仿真工具。Verilog-XL、NC-verilog用于Verilog仿真，Leapfrog用于VHDL仿真，Analog Artist用于模拟电路仿真。Viewlogic的仿真器有：viewsim门级电路仿真器，speedwaveVHDL仿真器，VCS-verilog仿真器。Mentor Graphics有其子公司Model Tech出品的VHDL和Verilog双仿真器：Model Sim。Cadence、Synopsys用的是VSS（VHDL仿真器）。现在的趋势是各大EDA公司都逐渐用HDL仿真器作为电路验证的工具。

③综合工具

综合工具可以把HDL变成门级网表。这方面Synopsys工具占有较大的优势，它的Design Compile是作为一个综合的工业标准，它还有另外一个产品叫Behavior Compiler，可以提供更高级的综合。

另外最近美国又出了一个软件叫Ambit，据说比Synopsys的软件更有效，可以综合50万门的电路，速度更快。今年初Ambit被Cadence公司收购，为此Cadence放弃了它原来的综合软件Synergy。随着FPGA设计的规模越来越大，各EDA公司又开发了用于FPGA设计的综合软件，比较有名的有：Synopsys的FPGA Express， Cadence的Synplity， Mentor的Leonardo，这三家的FPGA综合软件占了市场的绝大部分。

④布局和布线

在IC设计的布局布线工具中，Cadence软件是比较强的，它有很多产品，用于标准单元、门阵列已可实现交互布线。最有名的是Cadence spectra，它原来是用于PCB布线的，后来Cadence把它用来作IC的布线。其主要工具有：Cell3，Silicon Ensemble-标准单元布线器；Gate Ensemble-门阵列布线器；Design Planner-布局工具。其它各EDA软件开发公司也提供各自的布局布线工具。

⑤物理验证工具

物理验证工具包括版图设计工具、版图验证工具、版图提取工具等等。这方面Cadence也是很强的，其Dracula、Virtuso、Vampire等物理工具有很多的使用者。

⑥模拟电路仿真器

前面讲的仿真器主要是针对数字电路的，对于模拟电路的仿真工具，普遍使用SPICE，这是唯一的选择。只不过是选择不同公司的SPICE，像MiceoSim的PSPICE、Meta Soft的HSPICE等等。HSPICE现在被Avanti公司收购了。在众多的SPICE中，HSPICE作为IC设计，其模型多，仿真的精度也高。

2.4 PLD设计工具

PLD（Programmable Logic Device）是一种由用户根据需要而自行构造逻辑功能的数字集成电路。目前主要有两大类型：CPLD（Complex PLD）和FPGA(Field Programmable Gate Array)。它们的基本设计方法是借助于EDA软件，用原理图、状态机、布尔表达式、硬件描述语言等方法，生成相应的目标文件，最后用编程器或下载电缆，由目标器件实现。生产PLD的厂家很多，但最有代表性的PLD厂家为Altera、Xilinx和Lattice公司。

PLD的开发工具一般由器件生产厂家提供，但随着器件规模的不断增加，软件的复杂性也随之提高，目前由专门的软件公司与器件生产厂家使用，推出功能强大的设计软件。下面介绍主要器件生产厂家和开发工具。

①ALTERA：20世纪90年代以后发展很快。主要产品有：MAX3000/7000、FELX6K/10K、APEX20K、ACEX1K、Stratix等。其开发工具-MAX+PLUS II是较成功的PLD开发平台，最新又推出了Quartus II开发软件。Altera公司提供较多形式的设计输入手段，绑定第三方VHDL综合工具，如：综合软件FPGA Express、Leonard Spectrum，仿真软件ModelSim。

②ILINX：FPGA的发明者。产品种类较全，主要有：XC9500/4000、Coolrunner(XPLA3)、Spartan、Vertex等系列，其最大的Vertex-II Pro器件已达到800万门。开发软件为Foundation和ISE。通常来说，在欧洲用Xilinx的人多，在日本和亚太地区用ALTERA的人多，在美国则是平分秋色。全球PLD/FPGA产品60%以上是由Altera和Xilinx提供的。可以讲Altera和Xilinx共同决定了PLD技术的发展方向。

③Lattice-Vantis：Lattice是ISP（In-System Programmability）技术的发明者。ISP技术极大地促进了PLD产品的发展，与ALTERA和XILINX相比，其开发工具比Altera和Xilinx略逊一筹。中小规模PLD比较有特色，大规模PLD的竞争力还不够强（Lattice没有基于查找表技术的大规模FPGA），1999年推出可编程模拟器件，1999年收购Vantis（原AMD子公司），成为第三大可编程逻辑器件供应商。2001年12月收购Agere公司（原Lucent微电子部）的FPGA部门。主要产品有ispLSI2000/5000/8000，MACH4/5。

④ACTEL：反熔丝（一次性烧写）PLD的领导者。由于反熔丝PLD抗辐射、耐高低温、功耗低、速度快，所以在军品和宇航级上有较大优势。ALTERA和XILINX则一般不涉足军品和宇航级市场。

⑤Quicklogic：专业PLD/FPGA公司，以一次性反熔丝工艺为主，在中国地区销售量不大。

⑥Lucent：主要特点是有不少用于通讯领域的专用IP核，但PLD/FPGA不是Lucent的主要业务，在中国地区使用的人很少。

⑦ATMEL：中小规模PLD做得不错。ATMEL也做了一些与Altera和Xilinx兼容的片子，但在品质上与原厂家还是有一些差距，在高可靠性产品中使用较少，多用在低端产品上。

⑧Clear Logic：生产与一些着名PLD/FPGA大公司兼容的芯片，这种芯片可将用户的设计一次性固化，不可编程，批量生产时的成本较低。

⑨WSI：生产PSD（单片机可编程外围芯片）产品。这是一种特殊的PLD，如最新的PSD8xx、PSD9xx集成了PLD、EPROM、Flash，并支持ISP（在线编程），集成度高，主要用于配合单片机工作。

顺便提一下：PLD（可编程逻辑器件）是一种可以完全替代74系列及GAL、PLA的新型电路，只要有数字电路基础，会使用计算机，就可以进行PLD的开发。PLD的在线编程能力和强大的开发软件，使工程师可以几天，甚至几分钟内就可完成以往几周才能完成的工作，并可将数百万门的复杂设计集成在一颗芯片内。PLD技术在发达国家已成为电子工程师必备的技术。

2.5 其它EDA软件

①VHDL语言：超高速集成电路硬件描述语言（VHSIC Hardware Deseription Languagt，简称VHDL），是IEEE的一项标准设计语言。它源于美国国防部提出的超高速集成电路（Very High Speed Integrated Circuit，简称VHSIC）计划，是ASIC设计和PLD设计的一种主要输入工具。

②Veriolg HDL：是Verilog公司推出的硬件描述语言，在ASIC设计方面与VHDL语言平分秋色。

③其它EDA软件如专门用于微波电路设计和电力载波工具、PCB制作和工艺流程控制等领域的工具，在此就不作介绍了。

3 EDA的应用

EDA在教学、科研、产品设计与制造等各方面都发挥着巨大的作用。在教学方面，几乎所有理工科（特别是电子信息）类的高校都开设了EDA课程。主要是让学生了解EDA的基本概念和基本原理、掌握用HDL语言编写规范、掌握逻辑综合的理论和算法、使用EDA工具进行电子电路课程的实验验证并从事简单系统的设计。一般学习电路仿真工具（如multiSIM、PSPICE）和PLD开发工具（如Altera/Xilinx的器件结构及开发系统），为今后工作打下基础。

科研方面主要利用电路仿真工具（multiSIM或PSPICE）进行电路设计与仿真；利用虚拟仪器进行产品测试；将CPLD/FPGA器件实际应用到仪器设备中；从事PCB设计和ASIC设计等。

在产品设计与制造方面，包括计算机仿真，产品开发中的EDA工具应用、系统级模拟及测试环境的仿真，生产流水线的EDA技术应用、产品测试等各个环节。如PCB的制作、电子设备的研制与生产、电路板的焊接、ASIC的制作过程等。

从应用领域来看，EDA技术已经渗透到各行各业，如上文所说，包括在机械、电子、通信、航空航航天、化工、矿产、生物、医学、军事等各个领域，都有EDA应用。另外，EDA软件的功能日益强大，原来功能比较单一的软件，现在增加了很多新用途。如AutoCAD软件可用于机械及建筑设计，也扩展到建筑装璜及各类效果图、汽车和飞机的模型、电影特技等领域。

4 EDA技术的发展趋势

从目前的EDA技术来看，其发展趋势是政府重视、使用普及、应用广泛、工具多样、软件功能强大。

中国EDA市场已渐趋成熟，不过大部分设计工程师面向的是PCB制板和小型ASIC领域，仅有小部分（约11%）的设计人员开发复杂的片上系统器件。为了与台湾和美国的设计工程师形成更有力的竞争，中国的设计队伍有必要引进和学习一些最新的EDA技术。

在信息通信领域，要优先发展高速宽带信息网、深亚微米集成电路、新型元器件、计算机及软件技术、第三代移动通信技术、信息管理、信息安全技术，积极开拓以数字技术、网络技术为基础的新一代信息产品，发展新兴产业，培育新的经济增长点。要大力推进制造业信息化，积极开展计算机辅助设计（CAD）、计算机辅助工程（CAE）、计算机辅助工艺（CAPP）、计算机机辅助制造（CAM）、产品数据管理（PDM）、制造资源计划（MRPII）及企业资源管理（ERP）等。有条件的企业可开展“网络制造”，便于合作设计、合作制造，参与国内和国际竞争。开展“数控化”工程和“数字化”工程。自动化仪表的技术发展趋势的测试技术、控制技术与计算机技术、通信技术进一步融合，形成测量、控制、通信与计算机（M3C）结构。在ASIC和PLD设计方面，向超高速、高密度、低功耗、低电压方面发展。

外设技术与EDA工程相结合的市场前景看好，如组合超大屏幕的相关连接，多屏幕技术也有所发展。

中国自1995年以来加速开发半导体产业，先后建立了几所设计中心，推动系列设计活动以应对亚太地区其它EDA市场的竞争。

在EDA软件开发方面，目前主要集中在美国。但各国也正在努力开发相应的工具。日本、韩国都有ASIC设计工具，但不对外开放。中国华大集成电路设计中心，也提供IC设计软件，但性能不是很强。相信在不久的将来会有更多更好的设计工具在各地开花并结果。据最新统计显示，中国和印度正在成为电子设计自动化领域发展最快的两个市场，年夏合增长率分别达到了50%和30%。

EDA技术发展迅猛，完全可以用日新月异来描述。EDA技术的应用广泛，现在已涉及到各行各业。EDA水平不断提高，设计工具趋于完美的地步。EDA市场日趋成熟，但我国的研发水平仍很有限，尚需迎头赶上。

4. [请教高手]单片机怎么实现产生随机数

给你一个超强例子：
欢迎到卡卡空间：http://hi..com/woodking
主 题: 线性叠加伪随机数函数
; 关 键 词: 随机数,8位单片机,random,8 bit mcu
; 参考资料: 1.<<Linear Congruential Pseudo-Random Number Generator Routines>>
; by Bruce Clark, 7 Jun 2004
; 2.<<The Art Of Computer Programming, Volume 2>>
; by Donald Knuth
;

8位单片机很多地方需要随机数，比如游戏的洗牌，可在timer中取数，但是随机数质
量不高。随机数是一个既简单又复杂的问题,这里的例子使用了众所周知的线性叠加法，没
有完美的方法产生随机数，不过线性叠加法是一个合适的方法,彻底解决8位机随机数的问
题。
伪随机数函数总是返回可预知的数字,像抛骰子，如果抛足够多次，那么我们得到了一
个足够长的数字序列，
3,1,5,1,4,6,5,4,6,5,4,5,6,1,3,2,1,6,4,6,5,4,3,2,1,3,2,1,4,2,3,1,3......
如果从序列中一个接一个的取出数字,那么数字就看似随机。
问题的关键是从这序列的哪个点(数字)开始取数？这个开始的点(数字)叫做种子。
注意，如果从相同的点(种子)开始，将会得到相同的数字,这是因为我们是从固定的序
列中取数字(所以叫伪随机)。但这却是一个有用的特性，我们可以每次从不同的点取数，即
改变种子！

在6502上,8位或16位随机数是最常用的，函数返回一个32位的数字,范围0~2^32。名
词"线性叠加"听起来容易范晕, 其实只涉及二个内容:乘法和加法。三个步骤：
1. 为了取得新的种子(也就是从序列开始的那个点的数字)，旧的种子和一个常数A相乘，
2. 所得结果然后和第二个常数c相加。
3. 新的种子是结果的低32位(记住,这个函数返回32位数字)。保留低32位很重要,用来获
得下一个种子。

计算公式:
种子 = A * 种子 + C
此公式在几何图中表示一条直线，而且新种子由旧种子反复相加得来，所以叫线性叠加。

随机数函数的关键在于选择优秀的"常数A"(也叫乘数A),其实也就是选择了一个固定
的数字序列。"常数c",不像乘数A那样重要，但是它一定是个奇数。事实上， c可选1，而
且这是例程所使用的,因为它会简化计算。
注意，奇数(旧的种子)乘奇数(乘数A)是奇数,再加奇数(常数c)将会是一个偶数；偶数
(旧的种子)乘奇数(乘数A),加奇数(常数c)将会是一个奇数。如此种子将会在奇数和偶数之
间转变。因为种子的变化足够随机，所以新种子的值可以作为8位或16位随机数。

子程序F_RandomSeed，计算 "种子 = 乘数 * 种子+1" (记得,c=1)。有三个版本:

(1) 快速版本, 速度快，但占用Rom多。
(2) 兼顾版本，速度和占用Rom适中，空间和速度是在另外二个版本之间。
兼顾版B， 使用了另一个神奇的数字66066(10进制).
(3) 最小版本，速度慢，但占用Rom小。

三个版本中使用的乘数1664525(10进制)=19660D(16进制),是从<<计算机程序的艺术,
第2册>>一书中选出，这是一个神奇的数字，经过论证和测试，这个数字对产生随机数至
关重要。想进一步研究的朋友可以阅读原着(参考资料2)，书中以特别专业的数学方法讨论
了随机数问题。这里只是应用了其中的两个常数1664525(10进制)和69069(10进制),这里不
作讨论，因为篇幅问题是借口，其实自己没弄懂。

;==============================================================================
; 快速版本
;==============================================================================

丰收先要选好种子，育种很重要，同样，获得随机种子是重要的一步。

种子变量设定在零页RAM可以提高速度。
程序F_RandomSeed计算 1664525*种子，需要5个字节(R_Seed0~R_Seed3,R_Temp)。
F_GeneratTables预先计算1664525*X(x=0~255),生成四个256字节的列表T3,T2,T1,T0.

T3,X = 表T3的第X字节 = 1664525 * X的第31~24位(X = 0 to 255)
T2,X = 表T2的第X字节 = 1664525 * X的第23~16位(X = 0 to 255)
T1,X = 表T1的第X字节 = 1664525 * X的第15~ 8位(X = 0 to 255)
T0,X = 表T0的第X字节 = 1664525 * X的第 7~ 0位(X = 0 to 255)

对于单片机来说 使用1K RAM很夸张，也可以不用F_GeneratTables，直接把随机数表存
在ROM中。

;==============================================================================
; 伪随机数函数的线性叠加
; 计算 Seed = 1664525 * Seed + 1
;------------------------------------------------------------------------------
; 输入:
; R_Seed0 <--- 种子0
; R_Seed1 <--- 种子1
; R_Seed2 <--- 种子2
; R_Seed3 <--- 种子3
; 回返:
; 种子0 ---> R_Seed0
; 种子1 ---> R_Seed1
; 种子2 ---> R_Seed2
; 种子3 ---> R_Seed3
; 重写
; R_Temp
;------------------------------------------------------------------------------
; 为提高速度R_Seed0，R_Seed1，R_Seed2，R_Seed3，R_Temp选零页Ram
; 每张列表从Rom地址 xx00h 处开始 或在Rom中
;------------------------------------------------------------------------------
; 空间: 程序58个字节
; 列表1024个字节
; 速度: 调用F_RandomSeed需要94个周期
;==============================================================================
F_RandomSeed:
CLC ; 计算低32位:
LDX R_Seed0 ; 1664525*($100* R_Seed1+ R_Seed0)+1
LDY R_Seed1
LDA T0,X
ADC #1
STA R_Seed0
LDA T1,X
ADC T0,Y
STA R_Seed1
LDA T2,X
ADC T1,Y
STA R_Temp
LDA T3,X
ADC T2,Y
TAY ; 把字节3留在Y中
CLC ; 加低32位:
LDX R_Seed2 ; 1664525*($10000* R_Seed2)
LDA R_Temp
ADC T0,X
STA R_Seed2
TYA
ADC T1,X
CLC
LDX R_Seed3 ; 加低32位:
ADC T0,X ; 1664525*($1000000* R_Seed3)
STA R_Seed3
rts

;==============================================================================
; 产生T0，T1，T2和T3列表，使用F_GeneratTables，列表在ram中
;==============================================================================
F_GeneratTables:
LDX #0 ;1664525*0=0
STX T0
STX T1
STX T2
STX T3
INX
CLC
L_GT1:
LDA T0-1,X ;把1664525加入
ADC #$0D ;字节0
STA T0,X
LDA T1-1,X
ADC #$66 ;字节1
STA T1,X
LDA T2-1,X
ADC #$19 ;字节2
STA T2,X
LDA T3-1,X
ADC #$00 ;字节3
STA T3,X
INX ;进位C=0退出
BNE L_GT1
RTS

;------------------------------------------------------------------------------
; 生成的列表,如果不要F_GeneratTables，可以直接将此表放在Rom中
;------------------------------------------------------------------------------
;1664525 * X的第31~24位(X = 0 to 255)
T3:
.DB $00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$01,$01,$01,$01,$01
.DB $01,$01,$01,$01,$01,$02,$02,$02,$02,$02,$02,$02,$02,$02,$02,$03
.DB $03,$03,$03,$03,$03,$03,$03,$03,$03,$04,$04,$04,$04,$04,$04,$04
.DB $04,$04,$04,$05,$05,$05,$05,$05,$05,$05,$05,$05,$05,$06,$06,$06
.DB $06,$06,$06,$06,$06,$06,$06,$07,$07,$07,$07,$07,$07,$07,$07,$07
.DB $07,$08,$08,$08,$08,$08,$08,$08,$08,$08,$08,$09,$09,$09,$09,$09
.DB $09,$09,$09,$09,$09,$0A,$0A,$0A,$0A,$0A,$0A,$0A,$0A,$0A,$0A,$0B
.DB $0B,$0B,$0B,$0B,$0B,$0B,$0B,$0B,$0B,$0C,$0C,$0C,$0C,$0C,$0C,$0C
.DB $0C,$0C,$0C,$0C,$0D,$0D,$0D,$0D,$0D,$0D,$0D,$0D,$0D,$0D,$0E,$0E
.DB $0E,$0E,$0E,$0E,$0E,$0E,$0E,$0E,$0F,$0F,$0F,$0F,$0F,$0F,$0F,$0F
.DB $0F,$0F,$10,$10,$10,$10,$10,$10,$10,$10,$10,$10,$11,$11,$11,$11
.DB $11,$11,$11,$11,$11,$11,$12,$12,$12,$12,$12,$12,$12,$12,$12,$12
.DB $13,$13,$13,$13,$13,$13,$13,$13,$13,$13,$14,$14,$14,$14,$14,$14
.DB $14,$14,$14,$14,$15,$15,$15,$15,$15,$15,$15,$15,$15,$15,$16,$16
.DB $16,$16,$16,$16,$16,$16,$16,$16,$17,$17,$17,$17,$17,$17,$17,$17
.DB $17,$17,$18,$18,$18,$18,$18,$18,$18,$18,$18,$18,$19,$19,$19,$19

;1664525 * X的第23~16位(X = 0 to 255)
T2:
.DB $00,$19,$32,$4C,$65,$7E,$98,$B1,$CB,$E4,$FD,$17,$30,$4A,$63,$7C
.DB $96,$AF,$C9,$E2,$FB,$15,$2E,$48,$61,$7A,$94,$AD,$C7,$E0,$F9,$13
.DB $2C,$46,$5F,$78,$92,$AB,$C5,$DE,$F7,$11,$2A,$44,$5D,$76,$90,$A9
.DB $C3,$DC,$F5,$0F,$28,$42,$5B,$74,$8E,$A7,$C1,$DA,$F3,$0D,$26,$40
.DB $59,$72,$8C,$A5,$BF,$D8,$F1,$0B,$24,$3E,$57,$70,$8A,$A3,$BD,$D6
.DB $EF,$09,$22,$3C,$55,$6E,$88,$A1,$BB,$D4,$ED,$07,$20,$3A,$53,$6C
.DB $86,$9F,$B9,$D2,$EB,$05,$1E,$38,$51,$6A,$84,$9D,$B7,$D0,$E9,$03
.DB $1C,$36,$4F,$68,$82,$9B,$B5,$CE,$E7,$01,$1A,$34,$4D,$66,$80,$99
.DB $B3,$CC,$E5,$FF,$18,$32,$4B,$64,$7E,$97,$B1,$CA,$E3,$FD,$16,$30
.DB $49,$62,$7C,$95,$AE,$C8,$E1,$FB,$14,$2D,$47,$60,$7A,$93,$AC,$C6
.DB $DF,$F9,$12,$2B,$45,$5E,$78,$91,$AA,$C4,$DD,$F7,$10,$29,$43,$5C
.DB $76,$8F,$A8,$C2,$DB,$F5,$0E,$27,$41,$5A,$74,$8D,$A6,$C0,$D9,$F3
.DB $0C,$25,$3F,$58,$72,$8B,$A4,$BE,$D7,$F1,$0A,$23,$3D,$56,$70,$89
.DB $A2,$BC,$D5,$EF,$08,$21,$3B,$54,$6E,$87,$A0,$BA,$D3,$ED,$06,$1F
.DB $39,$52,$6C,$85,$9E,$B8,$D1,$EB,$04,$1D,$37,$50,$6A,$83,$9C,$B6
.DB $CF,$E9,$02,$1B,$35,$4E,$68,$81,$9A,$B4,$CD,$E7,$00,$19,$33,$4C

;1664525 * X的第15~ 8位(X = 0 to 255)
T1:
.DB $00,$66,$CC,$32,$98,$FE,$64,$CA,$30,$96,$FC,$62,$C8,$2E,$94,$FA
.DB $60,$C6,$2C,$92,$F9,$5F,$C5,$2B,$91,$F7,$5D,$C3,$29,$8F,$F5,$5B
.DB $C1,$27,$8D,$F3,$59,$BF,$25,$8B,$F2,$58,$BE,$24,$8A,$F0,$56,$BC
.DB $22,$88,$EE,$54,$BA,$20,$86,$EC,$52,$B8,$1E,$84,$EB,$51,$B7,$1D
.DB $83,$E9,$4F,$B5,$1B,$81,$E7,$4D,$B3,$19,$7F,$E5,$4B,$B1,$17,$7E
.DB $E4,$4A,$B0,$16,$7C,$E2,$48,$AE,$14,$7A,$E0,$46,$AC,$12,$78,$DE
.DB $44,$AA,$10,$77,$DD,$43,$A9,$0F,$75,$DB,$41,$A7,$0D,$73,$D9,$3F
.DB $A5,$0B,$71,$D7,$3D,$A3,$09,$70,$D6,$3C,$A2,$08,$6E,$D4,$3A,$A0
.DB $06,$6C,$D2,$38,$9E,$04,$6A,$D0,$36,$9C,$03,$69,$CF,$35,$9B,$01
.DB $67,$CD,$33,$99,$FF,$65,$CB,$31,$97,$FD,$63,$C9,$2F,$95,$FC,$62
.DB $C8,$2E,$94,$FA,$60,$C6,$2C,$92,$F8,$5E,$C4,$2A,$90,$F6,$5C,$C2
.DB $28,$8E,$F5,$5B,$C1,$27,$8D,$F3,$59,$BF,$25,$8B,$F1,$57,$BD,$23
.DB $89,$EF,$55,$BB,$21,$88,$EE,$54,$BA,$20,$86,$EC,$52,$B8,$1E,$84
.DB $EA,$50,$B6,$1C,$82,$E8,$4E,$B4,$1A,$81,$E7,$4D,$B3,$19,$7F,$E5
.DB $4B,$B1,$17,$7D,$E3,$49,$AF,$15,$7B,$E1,$47,$AD,$13,$7A,$E0,$46
.DB $AC,$12,$78,$DE,$44,$AA,$10,$76,$DC,$42,$A8,$0E,$74,$DA,$40,$A6

;1664525 * X的第 7~ 0位(X = 0 to 255)
T0:
.DB $00,$0D,$1A,$27,$34,$41,$4E,$5B,$68,$75,$82,$8F,$9C,$A9,$B6,$C3
.DB $D0,$DD,$EA,$F7,$04,$11,$1E,$2B,$38,$45,$52,$5F,$6C,$79,$86,$93
.DB $A0,$AD,$BA,$C7,$D4,$E1,$EE,$FB,$08,$15,$22,$2F,$3C,$49,$56,$63
.DB $70,$7D,$8A,$97,$A4,$B1,$BE,$CB,$D8,$E5,$F2,$FF,$0C,$19,$26,$33
.DB $40,$4D,$5A,$67,$74,$81,$8E,$9B,$A8,$B5,$C2,$CF,$DC,$E9,$F6,$03
.DB $10,$1D,$2A,$37,$44,$51,$5E,$6B,$78,$85,$92,$9F,$AC,$B9,$C6,$D3
.DB $E0,$ED,$FA,$07,$14,$21,$2E,$3B,$48,$55,$62,$6F,$7C,$89,$96,$A3
.DB $B0,$BD,$CA,$D7,$E4,$F1,$FE,$0B,$18,$25,$32,$3F,$4C,$59,$66,$73
.DB $80,$8D,$9A,$A7,$B4,$C1,$CE,$DB,$E8,$F5,$02,$0F,$1C,$29,$36,$43
.DB $50,$5D,$6A,$77,$84,$91,$9E,$AB,$B8,$C5,$D2,$DF,$EC,$F9,$06,$13
.DB $20,$2D,$3A,$47,$54,$61,$6E,$7B,$88,$95,$A2,$AF,$BC,$C9,$D6,$E3
.DB $F0,$FD,$0A,$17,$24,$31,$3E,$4B,$58,$65,$72,$7F,$8C,$99,$A6,$B3
.DB $C0,$CD,$DA,$E7,$F4,$01,$0E,$1B,$28,$35,$42,$4F,$5C,$69,$76,$83
.DB $90,$9D,$AA,$B7,$C4,$D1,$DE,$EB,$F8,$05,$12,$1F,$2C,$39,$46,$53
.DB $60,$6D,$7A,$87,$94,$A1,$AE,$BB,$C8,$D5,$E2,$EF,$FC,$09,$16,$23
.DB $30,$3D,$4A,$57,$64,$71,$7E,$8B,$98,$A5,$B2,$BF,$CC,$D9,$E6,$F3

;==============================================================================
; 最小版本
;==============================================================================

对于单片机来说，使用1K RAM或rom来完成一个随机数，是很浪费的，以下是最小版本，
但是程序执行周期长。程序每次计算所需要的列表值。

;==============================================================================
; 线性叠加伪随机数函数
; 计算 R_Seed=1664525 * R_Seed + 1
;------------------------------------------------------------------------------
; 输入:
; R_Seed0 <--- 种子0
; R_Seed1 <--- 种子1
; R_Seed2 <--- 种子2
; R_Seed3 <--- 种子3
; 回返:
; 种子0 ---> R_Seed0
; 种子1 ---> R_Seed1
; 种子2 ---> R_Seed2
; 种子3 ---> R_Seed3
; 重写
; R_Temp,R_Temp+1,R_Temp+2,R_Temp+3
; 注意
; R_Temp~R_Temp+3 和 L_Rand6 是高字节在前,低字节在后
;------------------------------------------------------------------------------
; 空间: 53个字节
; 速度: 调用F_RandomSeed平均2744个周期
; 1624+70* N(N=种子数) = 1624~3864个周期
;==============================================================================
F_RandomSeed:
LDA #1 ; R_Temp=1，需要给定初始值
LDX #3
L_Rand1 STA R_Temp,X
LSR
DEX
BPL L_Rand1
LDY #$20 ; 计算种子 = 种子 * L_Rand4+ R_Temp
BNE L_Rand5 ; 总是分支
L_Rand2 BCC L_Rand4 ; 如果零被移位，分支
CLC ; 把乘数加入乘积
LDX #3
L_Rand3 LDA R_Temp,X
ADC T_Rand6,X ;源码有误，已改正
STA R_Temp,X
DEX
BPL L_Rand3
L_Rand4 ROR R_Temp ; 右移结果
ROR R_Temp+1
ROR R_Temp+2
ROR R_Temp+3
L_Rand5 ROR R_Seed3 ; 右移种子
ROR R_Seed2
ROR R_Seed1
ROR R_Seed0
DEY
BPL L_Rand2
RTS

T_Rand6 .DB $00,$19,$66,$0D ;乘数(高字节在前)

;==============================================================================
; 兼顾版本 乘数1664525(10进制)
;==============================================================================

兼顾版本 是不用上面的循环加来做乘法，而是在必要的时候加上 种子,$100* 种子,
$10000* 种子,来获得数字序列，这样能够提高速度，又不增加太多代码。

分解公式表

b7 b6 b5 b4 b3 b2 b1 b0
$0D = 0 0 0 0 1 1 0 1 b ---> +种子
$66 = 0 1 1 0 0 1 1 0 b ---> *$100h
$19 = 0 0 0 1 1 0 0 1 b ---> *$10000h
$00 = 0 0 0 0 0 0 0 0 b --->
| | | | | | | |
| | | | | | | |
V V V V V V V V
左 左 左 左 左 左
移 移 移 移 移 移
6 5 4 3 2 1
位 位 位 位 位 位

那么 种子*bit0 时，种子*$10000+种子
种子*bit1 时，种子*$100， 左移1位
种子*bit2 时，种子*$100+种子， 左移2位
种子*bit3 时，种子*$10000+种子，左移3位
种子*bit4 时，种子*$10000， 左移4位
种子*bit5 时，种子*$100， 左移5位
种子*bit6 时，种子*$100， 左移6位

;==============================================================================
; 伪随机数函数的线性叠加
; 计算 R_Seed=1664525 * R_Seed + 1
;------------------------------------------------------------------------------
; 输入:
; R_Seed0 <--- 种子0
; R_Seed1 <--- 种子1
; R_Seed2 <--- 种子2
; R_Seed3 <--- 种子3
; 回返:
; 种子0 ---> R_Seed0
; 种子1 ---> R_Seed1
; 种子2 ---> R_Seed2
; 种子3 ---> R_Seed3
; 重写
; R_Temp,R_Temp+1,R_Temp+2,R_Temp+3
;-------------------------------------------------------------------------------
; 空间: 106个字节
; 速度: F_RandomSeed 517个周期
;===============================================================================
F_RandomSeed:
CLC ; 复制种子进入R_Temp
LDA R_Seed0 ; 计算 种子 = 种子 *$10000+ 种子 +1
STA R_Temp
ADC #1
STA R_Seed0
LDA R_Seed1
STA R_Temp+1
ADC #0
STA R_Seed1
LDA R_Seed2
STA R_Temp+2
ADC R_Temp
STA R_Seed2
LDA R_Seed3
STA R_Temp+3
ADC R_Temp+1
STA R_Seed3
;-------------------------------------------------
;因为$0019660D 的Bit7=0，所以只需6次移位
;-------------------------------------------------
LDY #5
L_Rand1 ASL R_Temp ; 左移旧的种子
ROL R_Temp+1
ROL R_Temp+2
ROL R_Temp+3
;-------------------------------------------------
; 从 L_Rand4 列表取得 X, 4个索引值对应4种情况，数值选的巧妙！
; X=$00, 种子 = 种子 +$10000* R_Temp
; X=$01, 种子 = 种子 +$100 * R_Temp
; X=$FE, 种子 = 种子 +$10000* R_Temp+ R_Temp
; X=$FF, 种子 = 种子 +$100 * R_Temp+ R_Temp
;-------------------------------------------------
LDX L_Rand4,Y
BPL L_Rand2 ; 分支如果 X=$00 或 X=$01
CLC ; 种子 = 种子 +R_Temp
LDA R_Seed0
ADC R_Temp
STA R_Seed0
LDA R_Seed1
ADC R_Temp+1
STA R_Seed1
LDA R_Seed2
ADC R_Temp+2
STA R_Seed2
LDA R_Seed3
ADC R_Temp+3
STA R_Seed3
INX ; $ FE->$00,$ FF->$01
INX
L_Rand2 CLC
BEQ L_Rand3 ; 如果 X=$00, 种子 =种子 + R_Temp*$10000
LDA R_Seed1 ; 种子 = 种子 + R_Temp*$100
ADC R_Temp
STA R_Seed1
L_Rand3 LDA R_Seed2
ADC R_Temp,X
STA R_Seed2
LDA R_Seed3
ADC R_Temp+1,X
STA R_Seed3
DEY
BPL L_Rand1
RTS

L_Rand4 .DB $01,$01,$00,$FE,$FF,$01

;==============================================================================
; 改进的 兼顾版本B 选择新的 乘数=69069(10进制)
;==============================================================================

兼顾版本B中, 用69069(10进制)替换1664525(10进制)作乘数,也就是说，选择了另外一
个数字序列，这个乘数也是<<计算机程序的艺术,第2册>>一书中选出，经过论证和测试，
这个数字虽不及1664525做乘数好，但也是个神奇的数字,而且可以进一步减小程序时间。

;===============================================================================
; 伪随机数函数的线性叠加
; 计算种子 = 种子 * 69069 + 1
;-------------------------------------------------------------------------------
; 输入:
; R_Seed0 <--- 种子0
; R_Seed1 <--- 种子1
; R_Seed2 <--- 种子2
; R_Seed3 <--- 种子3
; 回返:
; 种子0 ---> R_Seed0
; 种子1 ---> R_Seed1
; 种子2 ---> R_Seed2
; 种子3 ---> R_Seed3
; 重写
; R_Temp,R_Temp+1,R_Temp+2,R_Temp+3
;--------------------------------------------------------------------------------
; 空间: 173个字节
; 速度: F_RandomSeed 326个周期
;================================================================================
F_RandomSeed:
LDA R_Seed0 ; R_Temp= 种子 *2
ASL
STA R_Temp
LDA R_Seed1
ROL
STA R_Temp+1
LDA R_Seed2
ROL
STA R_Temp+2
LDA R_Seed3
ROL
STA R_Temp+3
CLC ; R_Temp= R_Temp+ 种子 (= 种子 *3)
LDA R_Seed0
ADC R_Temp
STA R_Temp
LDA R_Seed1
ADC R_Temp+1
STA R_Temp+1
LDA R_Seed2
ADC R_Temp+2
STA R_Temp+2
LDA R_Seed3
ADC R_Temp+3
STA R_Temp+3
CLC ; 种子 = 种子 +$10000* 种子
LDA R_Seed2
ADC R_Seed0
TAX ; 把字节2保存在X中(利于提高速度)
LDA R_Seed3
ADC R_Seed1
TAY ; 把字节3保存在Y中
CLC ; 种子 = 种子 +$100* 种子
LDA R_Seed1
ADC R_Seed0
PHA ; 压入堆栈字节1
TXA
ADC R_Seed1
TAX
TYA
ADC R_Seed2
TAY
LDA R_Temp ; R_Temp= R_Temp*4(= 旧种子 *$0C)
ASL
ROL R_Temp+1
ROL R_Temp+2
ROL R_Temp+3
ASL
ROL R_Temp+1
ROL R_Temp+2
ROL R_Temp+3
STA R_Temp
CLC ; 种子 = 种子 +R_Temp
ADC R_Seed0
STA R_Seed0
PLA ; 弹出堆栈的字节1
ADC R_Temp+1
STA R_Seed1
TXA
ADC R_Temp+2
TAX
TYA
ADC R_Temp+3
TAY
CLC
LDA R_Temp ; 种子 = 种子 + R_Temp*$100
ADC R_Seed1
STA R_Seed1