历史上的今天
返回首页

历史上的今天

今天是:2025年01月30日(星期四)

2018年01月30日 | 三星单片机AD转换程序

2018-01-30 来源:eefocus

ADR0       .EQU      05H 
ADR1       .EQU      06H 
ADR2       .EQU      07H 

ADR3       .EQU      08H 
CNTR0      .EQU      10H 

           ORG   0000H 
           VECTOR  00H,  INT_9454 
           ORG   003CH 
           DB      00H 
           DB      00H 
           DB      0E7H ;允许低电平复位LVR=2.3V  
           DB      00H  ;选用外部晶振4M 
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;            
;          ORG   0040H 
;CODE_TABLE:DB 44H,46H,48H,4AH,4DH    ;0-4度 
;           DB 4FH,51H,54H,56H,58H    ;5-9度 
;           DB 5BH,5DH,60H,62H,64H    ;10-14度  
;            
;           LD    R4,  #00H 
;           LD    R5,  #3FH 
;AD_FIND:   INC   R5 
;           LDC   R10, @RR4 
;           CP    R10, A_DATA 
;           JR    ULT, AD_FIND 
;           SUB   R10, #40H 
;           LD    LED_D,R10          
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;              
             
             
           ORG    0044H  
CODE_TABLE:DB 0,0      ;44H-45H 
           DB 1,1      ;46H-47H 
           DB 2,2      ;48H-49H 
           DB 3,3,3    ;4AH-4BH-4CH 
           DB 4,4      ;4DH-4EH 
           DB 5,5      ;4FH-50H 
           DB 6,6,6    ;51H-52H-53H 
           DB 7,7      ;54H-55H 
           DB 8,8      ;56H-57H 
           DB 9,9,9    ;58H-59H-5AH  
           DB 10,10    ;5BH-5CH 
           DB 11,11,11 ;5DH-5EH-5FH 
           DB 12,12    ;60H-61H 
           DB 13,13,13 ;62H-63H-64H 
           DB 14,14    ;65H-66H 
           DB 15,15,15 ;67H-68H-69H  
           DB 16,16    ;6AH-6BH   
           DB 17,17    ;6CH-6DH     
           DB 18,18    ;6EH-6FH-70H 
           DB 19,19    ;71H-72H 
            
            
            
            
           ORG   0100H 
RESET:     DI 
           LD    SP,    #00C0H 
           LD    BTCON, #10100010B 
           LD    CLKCON,#00001000B ;允许外部晶振CPU分频 FOSC/8  
           CLR   P0 
           CLR   P1 
           CLR   P2 
           LD    P0CONL,#10101011B ;P0.0 AD输入转换   
           LD    P0CONH,#10100000B ;P0.6 P0.7 推拉式输出,数码管1选通、数码管2选通  
           LD    P1CON, #00001010B ;p0.0 p0.1输出 
           LD    P2CONL,#00001010B ;p2.0 p2.1 P2.2 P2.3 推拉式输出 a b c d 
           LD    P2CONH,#01001010B ;P2.4 P2.5 P2.6 推拉式输出      e f g 
           CLR   R10 
           CLR   R11 
           CLR   R12 
           LD    ADR0, #10         ;10*400us=4ms 
           LD    T0DATA,#200 
           LD    T0CON, #10001010B ;8/4*200=400us 
           
           LD    R0,    #0A0H 
CLRRAM:    CLR   @R0 
           DEC   R0 
           JR    NZ,    CLRRAM  
           CLR   @R0     
                       
           LD    ADCON,   #00000101B 
AD_WAIT:   TM    ADCON,   #00001000B 
           JR    Z,       AD_WAIT 
           LD    A_DATA,  ADDATAH 
            

            
MAIN:      EI 
           OR   BTCON,    #02H 
           CP   A_DATA,   #44H  ;超出范围,报错  
           JR   ULT,      LED_W 
           CP   A_DATA,   #72H  ;未定义  
           JR   UGT,      LED_W 

           LD    R4,  #00H 
           LD    R5,  A_DATA 
           LDC   R10, @RR4 
ADR10:     LD    CNTR0, @R10 
           XOR   CRTL_R0,  #04H 
           TM    CRTL_R0,  #04H 
           JR    NZ,       AD_H ;屏蔽低4位  
            
AD_L:      AND   CNTR0, #0FH                    
           LD    ADR1,  CNTR0 
           JR    LED_ 
            
AD_H:      AND   CNTR0, #0F0H 
           LD    ADR2,  CNTR0 
           RCF 
           RL ADR2    
           RL ADR2 
           RL ADR2 
           RL ADR2           
           RCF 
           JR   ADR10 
            
LED_W:     LD   ADR1,  #10 
           LD   ADR2,  #10         
           
LED_:      AND   P0,  #80H       ;P0.7高电平,个位数码管停止  
           OR    P0,  0BFH       ;P0.6低电平,十位数码管选通  
           LD    LED_D, ADR2 
            
LED_0:     LD    R2,  #0AH 
           LD    R3,  #LED_D 
           LDC   R12, @RR2 
           LD    P2,  R12        ;十位数送给p2口  
           CALL T0_WAIT 
           XOR   CRTL_R0,  #02H 
           TM    CRTL_R0,  #02H 
           JR    Z,        LED_      
           AND   P0,       #7FH  ; P0.7低电平,个位数码管选通  
           OR    P0,       #40H  ; P0.6高电平,十位数码管停止 
           LD    LED_D,    ADR1 
           JR    LED_0 
              
T0_WAIT:   TM    CRTL_R0,  #01H 
           JR    Z,        T0_WAIT 
           DEC   ADR0 
           JR    NZ,       T0_WAIT 
           RET                       
                                             
           ORG     0A00H   
CODE_LED:  DB 40H,7CH,24H,30H,19H,12H,02H,78H,00H,10H,06H 
             ;"0" "1" "2" "3" "4" "5" "6" "7" "8" "9" "E" 

INT_9454:   OR     BTCON,  #02H 
            TM     T0CON,  #01H 
            JR     Z,      INTRET 
            OR     CRTL_R0,#01H   

INTRET:     IRET 

            .END  


推荐阅读

史海拾趣

达晶微(CREATEK)公司的发展小趣事

随着市场需求的不断变化,达晶微不断加大研发投入,推出了一系列具有创新性的产品。这些产品不仅提高了能效,降低了成本,还满足了客户对高质量、高性能半导体器件的需求。公司凭借技术创新和产品升级,赢得了客户的广泛认可。

巨盛电子(Chesen)公司的发展小趣事

在电子行业,成本控制对于企业的竞争力至关重要。巨盛电子(Chesen)通过优化供应链管理,实现了成本的降低。公司与供应商建立了长期稳定的合作关系,实现了原材料的规模化采购和成本控制。同时,公司还加强了对生产过程的监控和管理,降低了生产过程中的浪费和损耗。这些措施使得巨盛电子在保持产品质量的同时,实现了成本的降低,提高了企业的盈利能力。

EMCORE公司的发展小趣事

随着环保意识的提高,消费者对环保产品的需求也越来越高。巨盛电子(Chesen)积极响应环保号召,将环保理念融入产品设计和生产过程中。公司采用环保材料、优化生产工艺、加强废弃物处理等措施,减少了对环境的污染。同时,公司还积极开展环保宣传活动,提高了消费者对环保产品的认识和接受度。这些举措不仅塑造了巨盛电子的环保品牌形象,还为企业赢得了更多消费者的支持。

Hisetec Electronic Co Ltd公司的发展小趣事

背景:随着全球化进程的加速,电子产品的供应链越来越复杂,国际合作成为必然趋势。Hisetec Electronic Co Ltd公司敏锐地洞察到这一点,开始实施国际化战略。

发展:公司首先在欧洲设立研发中心,与当地高校和科研机构合作,共同开发新技术。随后,又在亚洲多个国家和地区建立生产基地和销售网络,实现了全球范围内的资源配置和市场覆盖。通过这一系列举措,Hisetec公司不仅降低了生产成本,还提升了品牌知名度,实现了业务的高速增长。

CalAmp公司的发展小趣事

在物联网领域,安全问题一直是业界关注的焦点。某年,CalAmp公司运营的一台服务器因配置错误,导致黑客可以通过该漏洞接入账号数据,甚至接管相关车辆。这一事件引起了业界的广泛关注。面对这一挑战,CalAmp公司迅速采取行动,加强了对服务器的安全配置和监控,同时积极与安全专家合作,共同解决存在的安全问题。通过这一事件的应对和改进,CalAmp公司不仅提升了自身的安全防护能力,也为整个物联网行业树立了良好的安全榜样。

这些故事展示了CalAmp公司在电子行业中的发展历程和取得的成就。无论是通过签署全球分销协议拓展市场、推出创新的车队管理解决方案、发展新业务领域还是积极应对物联网安全挑战,CalAmp公司都展现出了其卓越的技术实力和市场竞争力。这些努力不仅推动了公司自身的持续发展,也为整个电子行业的进步做出了积极贡献。

法思特(FAST)公司的发展小趣事
有序启动可以确保每个热水器都有足够的时间来加热和稳定水温,从而保证水温的均匀性。

问答坊 | AI 解惑

USB_M8_RGBLED彩灯

用M8控制RGBLED测试了一下,效果不错。并做了一个上位机软件,通过USB控制,现将资料整理上传与君共享! 源码资料包 点击此处下载ourdev_196735.rar(文件大小:1.52M) 原理图(已更正) PC软件界面         &nbs ...…

查看全部问答>

(看门狗)MAX6034微处理器监控芯片51系统应用实例(原理图+源程序)

MAX6034是一款专用、高性能、低功耗的微处理器监控芯片,对单片机的监控只需要硬件电路 就可以实现,而看门狗功能需要软件程序的配合,实际上和看门狗有关的程序非常简单,那就是在程序中 放置喂狗的程序。有关程序请自己看软件包。该实例程序用C ...…

查看全部问答>

lm3s8962学习心得——中断控制按钮和灯

下面是我学生写的如何使用8962的中断,大家看看吧   …

查看全部问答>

arm用户模式不能访问的系统资源到底是什么?

google了一大把都是说“某些资源”,我有点晕,“某些资源”难道仅仅指的是arm不同的工作模式下的特殊寄存器? 我现在的项目当中,我在用户模式下是可以访问所有的资源的啊。。。 疑惑中。。…

查看全部问答>

急!!想知道超市刷卡的的卡机控制!

问题: 1 目前市场上都有哪些接口的卡机? 2 一般这些卡机,怎么写这么卡(用程序控制写卡) 3 怎么读这些卡的信息? 4 是不是信息都写在磁条上的(还是要另外的数据库)?…

查看全部问答>

求助:USB通讯问题(新手)

我想把单片机采集的数据用USB传到电脑上(我的单片机是C8051F120).不知道如何下手.不知道具体的该怎么做,大致可以分几步.谢谢!!! …

查看全部问答>

小弟刚开始学WINCE,两种方法实现,物理内存分配时,遇到一问题

两种方法实现,物理内存分配: 1 pOpen->pDriverInfo->pVIMRegs[VIN_MB1 ] = (unsigned long)AllocPhysMem(0x80000, PAGE_READWRITE, 0, 0, (PULONG)0x09000000); 2 pOpen->pDriverInfo->pVIMRegs[VIN_MB1 ] = (unsigned long)VirtualAlloc ...…

查看全部问答>

wdm驱动开发如何才能入门?

我刚开始学wdm驱动开发,请大虾指点一下如何才能少走弯路,早点入门,能不能推荐几本书籍?…

查看全部问答>

Illegalopcodereset

                                 有那几种情况会造成非法操作,机器出现了非正常复位,感觉是 Illegal opcode reset 的原因…

查看全部问答>

2011年04月 版主芯币奖励!

伙计们 领导要来发工资 速领 过期不补 统统充公 …

查看全部问答>