设为首页收藏本站
开启辅助访问

 找回密码
 立即注册

QQ登录

只需一步，快速开始

热门： 51单片机 | 24小时必答区 | 单片机教程 | 单片机DIY制作 | STM32 | Cortex M3 | 模数电子 | 电子DIY制作 | 音响/功放 | 拆机乐园 | Arduino | 嵌入式OS | 程序设计

搜索
»论坛 › 嵌入式/单片机论坛 › 单片机DIY制作 › 单片机控制PT2313 CD3313 1602显示 汇编程序

单片机控制PT2313 CD3313 1602显示 汇编程序

查看数: 7664 | 评论数: 8 | 收藏 6
关灯 | 提示：支持键盘翻页<-左 右->
帖子模式
    组图打开中，请稍候......
418854190
发布时间: 2020-5-10 14:09

正文摘要:

源程序《LM4766+PT2313-hifi放大器控制程序》  历尽千辛万苦、查找资料才把2313的部分抠出来修改变成自己想要的  觉得其2313很多功能用不到只有音量和高低音控 单片机是12C5A60S2 使用内部IRC ...

回复

ID:1071715 发表于 2023-4-23 07:30
哪位大神可以把程序移植到stc89c52RC上运行
ID:23844 发表于 2023-4-22 08:11
这个移植不方便,会汇编的都是高手
ID:1071715 发表于 2023-4-19 21:36
程序能不能烧录到st89c52芯片上使用？
ID:102189 发表于 2023-4-16 19:50
程序是不是有问题呀显示屏不能显示
ID:742085 发表于 2023-3-25 23:15
麻烦 可提供 打板文件 和原理图 谢谢...
ID:261025 发表于 2020-10-9 20:17
fushandz 发表于 2020-10-6 13:28
有没原理图

不需要原理图啊  看程序就知道怎么接     2313的原理图网上很多
ID:96926 发表于 2020-10-6 13:28
有没原理图
ID:328014 发表于 2020-5-10 14:44
好东东,下面是楼主的源码:

  2. ;;12M晶振可用
  3. ;----------------------
  4.        ISP_DATA  EQU 0C2H ;定义EEPROM相关寄存器
  5.        ISP_ADDRH EQU 0C3H ;此类寄存器地址需参考所用单片机的手册来设置
  6.        ISP_ADDRL EQU 0C4H ;
  7.        ISP_CMD   EQU 0C5H
  8.        ISP_TRIG  EQU 0C6H
  9.        ISP_CONTR EQU 0C7H
  10. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  11.                  P4 EQU 0C0H
  12.        P4SW EQU 0BBH;;;将P4设置成功普通IO口
  13.            P4M1 EQU 0B3H
  14.        P4M0 EQU 0B4H

  16.            MOV P4SW,#70H; #70H = P4.4\P4.5\P4.6

  18.             BASS_TONE         EQU         34H        ;低音控制缓冲
  19.         TREBLE_TONE EQU         35H        ;高音控制缓冲
  20.         M_VOL                 EQU         32H        ;主音量控制缓冲

  22.         IN_BUFF         EQU           33H        ;输入选择缓存
  23.                 PT2314_MSB         EQU         3DH        ;发送PT2314数高位
  24.             MUTE_BIT BIT  P3.2;静音状态指示

  26.                 SCL         BIT  P0.2;P3.4;
  27.         SDA         BIT  P0.3;P3.5;
  28.                 DAT1 EQU 13H         ;
  29.         DAT2 EQU 14H         ;

  31.             MOV DAT2,#7;
  32.             MOV DAT1,#7;  
  33.                 RS        BIT        P3.6        ;定义RS为P2.5
  34.             RW        BIT        P3.7        ;定义RW为P2.6
  35.             E        BIT        P4.0        ;定义E为P2.7
  36.             SETB P1.1;
  37.             SETB P0.2;
  38.                 SETB P0.3;
  39.                 SETB P0.4;
  40.                 SETB P0.5;
  41.                 SETB P0.6;
  42.                 CLR  P0.7;
  43. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  44.     MOV 36H,#02H;VOL
  45.     MOV 37H,#03H;VOL
  46.     MOV 38H,#04H;O
  47.         MOV 39H,#05H;F O
  48.     MOV 40H,#06H;F N
  49.     MOV 41H,#07H;+ -
  50.         MOV 42H,#08H;BASS
  51.     MOV 43H,#09H;BASS
  52.     MOV 44H,#10H;+ -
  53.         MOV 45H,#11H;TR
  54.         MOV 46H,#12H;TR
  55.         MOV 47H,#13H;IN
  56.         MOV 48H,#14;TR<
  57.         MOV 49H,#14;BASS<
  58. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;          
  59.                 MOV   M_VOL,#30        ;开机时默认音量为第30级  0级声音最大(一共0-63级)
  60.                 MOV IN_BUFF,#45H;输入通道默认2  1 #44H    2 #45H    3 #46H
  61. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;               
  62.                 JNB P0.4,EEPROMW_0
  63.                 LJMP YZ1;
  64. EEPROMW_0:               
  65.            LCALL ERASE
  66.            MOV DPTR,#00H     ;第1扇区
  67.            MOV A,DAT1;DAT1;
  68.            ACALL EEPROMW     ;写一字节
  69.            LCALL DELAY10;
  70.            MOV DPTR,#100H     ;第2扇区
  71.            MOV A,DAT2;
  72.            ACALL EEPROMW     ;写一字节

  74. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  75. YZ1:   MOV DPTR,#00H     ;第1扇区起始地址;存入新键值
  76.            LCALL EEPROMR         ;读
  77.            MOV TREBLE_TONE,A;MOV M_VOL,A;
  78.            LCALL DELAY10;
  79.            MOV DPTR,#100H     ;第1扇区起始地址;存入新键值
  80.            LCALL EEPROMR          ;
  81.            MOV BASS_TONE,A;   
  82.           
  83.            LCALL VOL_DIV; 调用音量除用以显示
  84.            LCALL BASS_DIV;调用低音强度查表用以显示
  85.            LCALL TR_DIV;  高音强度查表用以显示       
  86.            LCALL YZ;          调用预置音量
  87. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  88. ;×××××××××××××××××××××××××
  89. LCD:MOV        P2,#38H        ;设置功能
  90.         LCALL        XML
  91.         MOV        P2,#38H        ;设置功能
  92.         LCALL        XML
  93.         MOV        P2,#01H        ;清除屏幕
  94.         LCALL        XML
  95.         MOV        P2,#0CH        ;设置显示屏开,光标关
  96.         LCALL        XML
  97.         MOV        P2,#1CH        ;设置
  98.         LCALL        XML
  99.         LCALL DIP2;
  100.         LCALL DIP1;BASS+TR          DIP1显示低音 高音强弱 -7 0 +7
  101.         ;主程序
  102.         JNB P0.4,$;
  103.         LCALL DELAY10;
  104.         JNB P0.4,$;
  105. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  106. MAINN:         MOV 48H,#14;
  107.       MOV 49H,#14;
  108.           LCALL DIP1;
  109. MAIN:  
  110.      JNB P0.6,KI111;+vol
  111.          JNB P0.5,KI222;-vol
  112.          JNB P0.4,MAIN11;KK77;        MUTE
  113.      LJMP MAIN;
  114. KI111:LJMP KK111
  115. KI222:LJMP KK222;
  116. MAIN11:        LCALL T2MS;
  117.         JB P0.4,MAIN;
  118.                 LCALL T2MS;
  119.                 LCALL T2MS;
  120.                 LCALL T2MS;
  121.                 LCALL T2MS;
  122.                 LCALL T2MS;
  123.                 LCALL T2MS;
  124.                 LCALL T2MS;
  125.                 LCALL T2MS;
  126.                 LCALL T2MS;
  127.                 LCALL T2MS;
  128.                 LCALL T2MS;
  129.                 LCALL T2MS;
  130.                 LCALL T2MS;
  131.                 LCALL T2MS;
  132.                 LCALL T2MS;
  133.                 LCALL T2MS;
  134.                 LCALL T2MS;
  135.                 LCALL T2MS;
  136.                 LCALL T2MS;
  137.                 LCALL T2MS;
  138.                 LCALL T2MS;
  139.                 LCALL T2MS;
  140.                 JNB P0.4,GH;
  141.                 LCALL KK7;
  142.                 LJMP MAINN;
  143. MUTES:        JNB P0.4,$;
  144.                 LJMP MAINN;
  145. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  146. GH:           JB MUTE_BIT,MUTES;
  147.         MOV 48H,#16;           
  148.            LCALL DIP1;
  149.            JNB P0.4,$
  150.                 LCALL T2MS;
  151.                 JNB P0.4,$
  152.            MOV  66H,#245
  153.        MOV  67H,#245
  154.            MOV  68H,#10
  155. MAIN1:   
  156.      JNB P0.6,KI333;+vol
  157.          JNB P0.5,KI444;-vol
  158.          JNB P0.4,MAIN22;KK77;        MUTE
  159.          DJNZ 68H,MAIN1;
  160.          DJNZ  67H,MAIN1
  161.           DJNZ  66H,MAIN1
  162.      LJMP MAINN;
  163. KI333:LJMP KK333;
  164. KI444:LJMP KK444;
  165. MAIN22:        LCALL DELAY10;
  166.         JB P0.4,MAIN1;
  167.                 JNB P0.4,$
  168.                 LCALL DELAY10;
  169.                 JNB P0.4,$
  170. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  171.                 MOV 48H,#14;
  172.         MOV 49H,#16;
  173.                 LCALL DIP1;
  174.                 MOV  66H,#245
  175.        MOV  67H,#245
  176.            MOV  68H,#10
  177. MAIN2:   
  178.      JNB P0.6,KI555;+vol
  179.          JNB P0.5,KI666;-vol
  180.          JNB P0.4,MAIN33;KK77;        MUTE
  181. ;    LJMP MAIN2;
  182.          DJNZ 68H,MAIN2;
  183.          DJNZ  67H,MAIN2
  184.           DJNZ  66H,MAIN2
  185.      LJMP MAINN;
  186. KI555:LJMP KK555;
  187. KI666:LJMP KK666;
  188. MAIN33:        LCALL DELAY10;
  189.         JB P0.4,MAIN2;
  190.                 JNB P0.4,$
  191.                 LCALL DELAY10;
  192.                 JNB P0.4,$
  193.                 LJMP MAINN;
  194. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  195. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  196. ;×××××××××××××××××××××××××××××××××××××××××××××××××××××××××××

  198. ;秒延时子程序
  199. DELAY10:
  200. MOV         R4,#10;10
  201. D10:
  202. MOV         R5,#248;248
  203. DJNZ         R5,$
  204. DJNZ         R4,D10
  205. RET

  207. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  208. T2MS:   MOV R6,#248
  209. D21:        MOV R7,#248
  210.                 DJNZ R7,$
  211.                 DJNZ R6,D21
  212.                 RET
  213. ;EEPROM相关操作
  214. ;-----------------------
  215. ERASE:;擦除
  216.        MOV ISP_ADDRH,DPH   ;送高地址
  217.        MOV ISP_ADDRL,DPL   ;送低地址
  218.        MOV ISP_CONTR,#83H  ;允许ISP/IAP操作(6~12MHz)
  219.        MOV ISP_CMD,#03H    ;扇区擦除
  220.        ACALL ISPCF         ;触发IAP
  221.        ACALL ISP_DISABLE   ;禁止ISP/IAP操作
  222.        RET
  223. ;----------------------
  224. EEPROMW:;写
  225.        MOV ISP_DATA,A      ;ACC里是要写入的数据
  226.        MOV ISP_ADDRH,DPH   ;送高地址
  227.        MOV ISP_ADDRL,DPL   ;送低地址
  228.        MOV ISP_CONTR,#83H  ;允许ISP/IAP操作(6~12MHz)
  229.        MOV ISP_CMD,#02H    ;送写命令
  230.        ACALL ISPCF         ;触发IAP
  231.        ACALL ISP_DISABLE   ;禁止ISP/IAP操作
  232.        RET
  233. ;----------------------
  234. EEPROMR: ;读
  235.        MOV ISP_ADDRH,DPH   ;送高地址
  236.        MOV ISP_ADDRL,DPL   ;送低地址
  237.        MOV ISP_CONTR,#83H  ;允许ISP/IAP操作(6~12MHz)
  238.        MOV ISP_CMD,#01H    ;送读命令
  239.        ACALL ISPCF         ;触发IAP
  240.        MOV A,ISP_DATA      ;读出的数据放到ACC
  241.        ACALL ISP_DISABLE   ;禁止ISP/IAP操作
  242.        RET
  243. ;----------------------
  244. ISPCF: ;触发ISP/IAP
  245.        MOV ISP_TRIG,#5AH; #46H  ;以MCU型号来定;STC12C2052(46H/0B9H)
  246.        MOV ISP_TRIG,#0A5H; #0B9H ;11F和15F系列相同(5AH/0A5H)
  247.        NOP
  248.        RET
  249. ;----------------------
  250. ISP_DISABLE: ;禁止ISP/IAP操作(出于安全考虑才要)
  251.        MOV ISP_CONTR,#00H
  252.        MOV ISP_CMD,#00H
  253.        MOV ISP_TRIG,#00H
  254.        MOV ISP_ADDRH,#0FFH
  255.        MOV ISP_ADDRL,#0FFH
  256.        RET
  257. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  258. EEPROMW_1:      
  259.            LCALL ERASE
  260.            MOV DPTR,#00H     ;第1扇区
  261.            MOV A,TREBLE_TONE;MOV A,M_VOL;
  262.            ACALL EEPROMW     ;写一字节
  263.            LCALL DELAY10
  264.            LCALL DELAY10
  265.            MOV DPTR,#100H     ;第2扇区
  266.            MOV A,BASS_TONE;
  267.            ACALL EEPROMW     ;写一字节
  268.            RET;
  269. ;=============================================
  270. ;高低音调用
  271. CTRL_SHUI:
  272.                 MOV        DPTR,#TONG_DATA
  273.                 MOVC        A,@A+DPTR
  274.                 RET
  275. TONG_DATA:
  276.            DB 00H,01H,02H,03H,04H,05H,06H,07H
  277.            DB 0EH,0DH,0CH,0BH,0AH,09H,08H
  278. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  279. ;主音量调用
  280. VOL:
  281. MOV        DPTR,#VOL_DATA
  282. MOVC        A,@A+DPTR
  283. RET
  284. VOL_DATA:
  285.            DB 3FH,3EH,3DH,3CH,3BH,3AH,39H,38H,37H,36H ;
  286.                    DB 35H,34H,33H,32H,31H,30H,2FH,2EH,2DH,2CH
  287.                    DB 2BH,2AH,29H,28H,27H,26H,25H,24H,23H,22H
  288.                    DB 21H,20H,1FH,1EH,1DH,1CH,1BH,1AH,19H,18H
  289.                    DB 17H,16H,15H,14H,13H,12H,11H,10H,0FH,0EH
  290.                    DB 0DH,0CH,0BH,0AH,09H,08H,07H,06H,05H,04H
  291.                    DB 03H,02H,01H,00H  ;(PT2313主音量63)
  292. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  293. ;显示调用
  294. TABLE:  INC          A
  295.         MOVC         A,@A+PC
  296.         RET
  297.         DB 30H,31H,32H,33H,34H,35H,36H,37H,38H,39H,2DH,2BH,4FH,46H,20H,4EH,7FH;;1602
  298.            ;0   1   2   3   4   5   6   7   8   9        -        +   O        F  空位        N        ←   显示
  299.                    ;0   1   2   3   4        5        6        7        8        9        10        11        12        13        14        15        16  查表数
  300. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  301. ;高低音显示调用
  302. TAB:
  303. MOV DPTR,#TABLE1
  304.                 MOVC A,@A+DPTR         ;         以A中的数值为地址偏移量进行查表
  305.                 ret;
  306. TABLE1:  
  307.            DB 37H,36H,35H,34H,33H,32H,31H,30H,31H,32H,33H,34H,35H,36H,37H
  308.            ;   7   6   5   4   3   2   1   0   1   2   3   4   5   6   7   显示
  309.                    ;   0   1   2   3   4   5   6   7   8   9   10  11  12  13  14  查表数
  310. ;==============================================

  312. $INCLUDE (DIP.ASM)
  313. $INCLUDE (YZ.ASM)
  314. $INCLUDE (PT2314_WR.ASM)
  315. $INCLUDE (KEYDAT.ASM)
  316. $INCLUDE (VOL.ASM)
  317. $INCLUDE (BASS.ASM)
  318. $INCLUDE (TR.ASM)
  319. $INCLUDE (MUTE.ASM)



  323.         END
复制代码

小黑屋|51黑电子论坛 |51黑电子论坛6群 QQ 管理员QQ:125739409;技术交流QQ群281945664

Powered by 单片机教程网

快速回复 返回顶部 返回列表