《匠人手记》推荐网上购书渠道： 互动出版网（china-pub）购书入口   >>> 当当网（dangdang）购书入口   >>> 卓越亚马逊网 购书入口   >>> 淘宝网（taobao）购书入口   >>> 更多购书渠道……   >>>

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

[加入团队] [加入Q群] [广告赞助] [交换连接] [代理工具] [免责声明]      匠人的原创栏目：[匠人公告] [匠人文集] [匠人笔记] [写书近况]

天气预报 百宝日历 载入中... 百宝专栏 载入中... 最新货色 载入中... 粉丝评论 载入中... 载入中... 百宝信息 载入中... 百宝流量 （2006-07-01开始） 匠人手记

匠人学习：对PIC芯片ROM中的程序地址精确定位  匠人手记网络版：从零开始玩转PIC 之 旋转时钟  匠人观点： 好记性不如烂笔头    程序宝典：实用c程序、PIC软件串行口实现技巧  设计技巧： 如何阅读别人的代码（目录）  连载专题：程序规划方法漫谈(连载)  用“硬盘音圈电机+三星9454芯片”做的摇摆相框  网络酷文：一个有趣的关于C宏的题目及巧解  黑色幽默：三鹿门——后世畅想  匠人手记：购书攻略、勘误表、书友会、书友Q群  匠人手记： 《匠人手记》重印完成，新版照片 Freescale GP32监控程序1 程序匠人 发表于 2005-8-31 16:59:00  阅读全文 | 回复(0) | 引用通告 | 编辑 GP32监控程序仅供学习，不得它用--liu1234的博客liu1234的博客 - -| 回首页 | 2005年索引 | - -c实例，液晶时钟，串口调时 GP32监控程序仅供学习，不得它用- -                                        $INCLUDE "GP32.H" ;---------------------------------------------------------------- MAPREG1         EQU $0000 MAPREG2         EQU $FE00 ;---------------------------------------------------------------- ;RAM区 RAMSTART        EQU $0040 DBUFSTAddr      EQU $0040       ;(要写入FLASH的数据)的开始地址                                 ;$0041两个单元 PAGE            EQU $0042       ;下载程序的总页数 COUNT           EQU $0043       ;计数单元 VAR_COUNT       EQU $0044       ;计数单元 FlashAddress    EQU $0045       ;被擦写的FALSH地址                                 ;$0046两个单元 DATABUF         EQU $0047       ;$47-$C8为下载缓冲区,其中C7C8存放页地址 PAGEADDRBUF     EQU {DATABUF+!128}  ;C7C8存放页地址 VECTABBUF       EQU $00C9       ;00C9-00EC存放中断向量,其中EBEC 复位向量E9EA SWI向量 SWIVECBUF       EQU {VECTABBUF+!32};E9EA SWI向量 RESETVECBUF     EQU {VECTABBUF+!34};EBEC 复位向量 P_AddressInRAM  EQU $00ED       ;擦写flash子程序搬入ram的首地址,此后整个RAM区放擦写程序 ;---------------------------------------------------------------- ;FLASH区 U_RESET_H       EQU $FA00       ;用户程序复位向量挪入的区域,一页 U_RESET_L       EQU $FA01 MONADDR         EQU $FA80       ;监控程序开始地址 ;BRK_SWI_INT    EQU $FB8D VEC_TAB_ST      EQU $FFDC       ;中断向量起始地址 ;----------------------------------------------------------------         ORG MONADDR         SEI                     ;禁止所有中断         LDHX  #$023F            ;堆栈初始化放入GP32的RAM最高端         TXS ;---------------------------------------------------------------- ;初始化配置寄存器         LDA  #%00000001      ;[初始化CONFIG2] ;                  |+---------;SCIBDSRC=1 SCI波特率使用内部总线时钟 ;                  +----------;OSCSTOPENB=0 STOP模式下振荡器不工作、         STA  CONFIG2         LDA  #%00111101   ;[初始化CONFIG1] ;              |||||||+---------;COPD=1 禁止COP模块 ;              ||||||+----------;STOP=0 禁止STOP指令 ;              |||||+-----------;SSREC=1 经过32个CGMXCLK周期退出STOP模式 ;              ||||+------------;LVI5OR3=1 LVI工作在5V ;              |||+-------------;LVIPWRD=1 禁止LVI模块电源 ;              ||+--------------;LVIRSTD=1 允许LVI复位信号 ;              |+---------------;LVISTOP=0 在stop模式下禁止LVI ;              +----------------;COPRS=0 COP溢出范围在2^18-2^4个CGMXCLK时钟周期         STA  CONFIG1 ;[PLL编程] 由外部晶阵f=32.768，产生内部总线时钟2.4576MHz         CLR  PCTL               ;初始化PTCL         MOV  #$01,PCTL         MOV  #$01,PMSH      ;PLL倍频因子寄存器高位         MOV  #$2C,PMSL          ;PLL倍频因子寄存器低位         MOV  #$80,PMRS          ;PLL VCO范围选择寄存器         BSET 5,PCTL         BSET 7,PBWC         BSET 4,PCTL ;----------------------------------------------------------------         BSET 1,DDRA ;---------------------------------------------------------------- ;串行口初始化         LDA  #%01000000 ;              |||||||+---------;PTY=0偶校验 ;              ||||||+----------;PEN=0禁止奇偶校验 ;              |||||+-----------;ILTY=0线路空闲类型,从起始位计数 ;              ||||+------------;WAKE=0唤醒选择RXD引脚空闲时唤醒 ;              |||+-------------;M=0字符长度8位 ;              ||+--------------;TXINV=0反码选择,正常码输出 ;              |+---------------;ENSCI=1,允许SCI ;              +----------------;LOOPS=0,非环路         STA  SCC1         LDA  #%00001100 ;              |||||||+---------;SBK=0,禁止传送中止符 ;              ||||||+----------;RWU=0,正常操作 ;              |||||+-----------;D2(RE)=1,允许接收器 ;              ||||+------------;D3(TE)=1,允许发送器 ;              |||+-------------;ILIE=0线路空闲中断不允许 ;              ||+--------------;SCRIE=0禁止接收中断查询方式收发 ;              |+---------------;TCIE=0禁止发送中断查询方式收发 ;              +----------------;SXTIE=0禁止发送空中断         STA  SCC2         LDA  #%00000010 ;              |||||||+---------;0 ;              ||||||+----------;1 ;              |||||+-----------;0 010BD分频值为4 ;              ||||+------------;0 保留位 ;              |||+-------------;0 ;              ||+--------------;0 00预分频为1 ;              |+---------------;0 保留位 ;              +----------------;0 保留位         STA  SCBR               ;fBUS＝2.4576MHz,取PD=1(即SCP1,SCP0=00)                                 ;BD=2(即SCR2,SCR1,SCR0=010)                                 ;则波特率=2457600 /(64*1*4) = 9600 ;---------------------------------------------------------------- BEGIN:  LDA U_RESET_H           ;(FA00,FA01)=修改后的用户程序复位向量         CMP #$FF                ;用户复位向量是否为空         BNE DOWNNEW_OR_RUNOLD         LDA U_RESET_L         CMP #$FF         BNE DOWNNEW_OR_RUNOLD   ;用户程序复位向量不空,转去执行用户程序 LOOP:   JSR HAND_WITH_PC        ;与PC机的握手程序,成功 C=1         BCC LOOP                ;C=0握手不成功继续握手         BRA DOWNNEW_OR_BRK      ;握手成功,转去下载新用户程序或断点调试 ;---------------------------------------------------------------- DOWNNEW_OR_RUNOLD:         LDX #!50                ;用户程序复位向量不空,握手x次 LOOP1:  PSHX         JSR HAND_WITH_PC        ;与PC机的握手程序,成功 C=1         PULX         BCS DOWNNEW_OR_BRK      ;握手成功,转去下载新用户程序         DBNZX LOOP1         LDA U_RESET_H           ;握手不成功,转去执行用户程序         PSHA         PULH         LDA U_RESET_L         TAX         JMP ,X ;至此只有复位可以退出程序,否则一直执行用户程序 ;---------------------------------------------------------------- ;握手成功 DOWNNEW_OR_BRK:         BRCLR 5,SCS1,*          ;查询接收         LDA SCDR         CBEQA #$A7,DOWN_NEW_RUN ;第一字节=0xA7下载新用户程序         CBEQA #$A8,RUN_BRK      ;第一字节=0xA8,转去断点调试         BRA DOWNNEW_OR_BRK DOWN_NEW_RUN:         JSR DOWN_NEW            ;第一字节=0xA7下载新用户程序 RUNNEW: LDA U_RESET_H           ;执行用户程序         PSHA         PULH         LDA U_RESET_L         TAX         JMP ,X ;至此只有复位可以退出程序,否则一直执行用户程序 ;---------------------------------------------------------------- RUN_BRK:           LDA U_RESET_H           ;第一字节=0xA8断点调试;(FA00,FA01)=修改后的用户程序复位向量         CMP #$FF         BNE DOWITH_BRK          ;断点处理         LDA U_RESET_L         CMP #$FF         BNE DOWITH_BRK          ;用户程序复位向量不空,转去断点调试         LDHX #$0000             ;用户程序复位向量空,空片返回程序开始点 LOOP9:  LDA TAB_EMPTY,X         ;发送"空片"         JSR SEND_BYTE           ;发送一字节         AIX #$1         CPHX #$5                ;5个字符         BNE LOOP9         JMP BEGIN               ;空片返回程序开始点 DOWITH_BRK:                     ;断点处理         JSR AFFIRM_BRK_ADDR     ;确认断点子程序         LDA U_RESET_H         PSHA         PULH         LDA U_RESET_L         TAX         LDA #$80                ;断点允许,等待激活         STA BRKSCR              ;断点控制寄存器         CLI                     ;允许中断,主要是开放断点中断         JMP ,X                  ;执行用户程序 FB27:   JMP BEGIN               ;这条指令实际执行不到 ;---------------------------------------------------------------- AFFIRM_BRK_ADDR:                ;确认断点子程序         BRCLR 5,SCS1,*          ;接收断点地址         LDA SCDR         PSHA         PULH         BRCLR 5,SCS1,*         LDA SCDR         TAX         LDA #!10                ;连续接收从断点处10个字节 LOOP12: PSHA         BRCLR 5,SCS1,*         LDA SCDR         CMP ,X                  ;与FLASH中的字节比较         BNE ERROR               ;不等无效的断点地址         AIX #$1         PULA         DBNZA LOOP12         LDHX #$0                ;发送"成功" LOOP10: LDA TAB_SUCCE,X         JSR SEND_BYTE           ;发送一字节         AIX #$1         CPHX #5                 ;5个字符         BNE LOOP10         JMP SAVE_BRK ERROR:  LDHX #$0 LOOP11: LDA TAB_ISERR,X         ;发送"错误"         JSR SEND_BYTE           ;发送一字节         AIX #$1         CPHX #5         BNE LOOP11         JMP AFFIRM_BRK_ADDR TAB_EMPTY:   DB 'Empty' TAB_SUCCE:   DB 'Succe' TAB_ISERR:   DB 'IsErr' SAVE_BRK:                       ;接收断点并存入断点地址寄存器         BRCLR 5,SCS1,*         LDA SCDR         STA BRKH         BRCLR 5,SCS1,*         LDA SCDR         STA BRKL         RTS ;----------------------------------------------------------------        BRK_SWI_INT: ;中断后MCU自动进栈内容 ;大地址 ;| 1 PCL ;| 2 PCH ;| 3 X ;| 4 A ;| 5 CCR ;| 6 <-----SP ;V ;小地址         SEI                     ;关中断                 LDA #$0                 ;禁止断点中断,清除断点中断标志         STA BRKSCR                 PSHH         ;堆栈内容 ;大地址 ;| 1 PCL ;| 2 PCH ;| 3 X ;| 4 A ;| 5 CCR ;| 6 H ;| 7 <-----SP ;V ;小地址                LDHX #DIS_INFO         TXA         STA 6,SP                ;断点地址换为DIS_INFO         PSHH         PULA         STA 5,SP                ;断点地址换为DIS_INFO         PULH                        RTI                     ;退出中断,执行显示内容子程序想当于JMP指令         DIS_INFO:                       ;显示内容子程序,无返回         PSHA                LDA #$A8                ;发送引导符A8         JSR SEND_BYTE           ;发送一字节                 PULA                    ;A         JSR SEND_BYTE           ;发送一字节                 TXA                     ;X->A         JSR SEND_BYTE           ;发送一字节                 PSHH         PULA                    ;H->A         JSR SEND_BYTE           ;发送一字节                 TSX                     ;SP+1->H:X         TXA                     ;SPL         JSR SEND_BYTE           ;发送一字节                 PSHH         PULA                    ;SPH         JSR SEND_BYTE           ;发送一字节                 LDA #$0                         INCA                    ;1         JSR SEND_BYTE           ;发送一字节                 TPA                     ;CCR->A         JSR SEND_BYTE           ;发送一字节                 LDHX #RAMSTART          ;发送RAM区数据         LDA #0                  ;共512个,发两次         JSR SEND_N_BYTE         ;发送         LDA #0         JSR SEND_N_BYTE                 LDHX #MAPREG1           ;发送各寄存器数据         LDA #$40                ;共40H个         JSR SEND_N_BYTE                 LDHX #MAPREG2           ;发送其余各寄存器数据         LDA #$0D                ;共0DH个         JSR SEND_N_BYTE                 LDA FLBPR               ;发送FLASH保护寄存器         JSR SEND_BYTE           ;发送一字节 ;?????????????????????可泄密                LDHX #VEC_TAB_ST        ;发送中断向量表         LDA #!36         JSR SEND_N_BYTE         LOOP13:                         ;是否下一断点调试         BRCLR 5,SCS1,*          ;接收联络码64H         LDA SCDR         CMP #$64         BNE LOOP13                 BRCLR 5,SCS1,*          ;接收并存储下一断点地址         LDA SCDR         STA BRKH         BRCLR 5,SCS1,*         LDA SCDR         STA BRKL                 LDA U_RESET_H           ;重新从头运行用户程序         PSHA         PULH         LDA U_RESET_L         TAX         LDA #$80                ;断点允许,等待激活         STA BRKSCR              ;断点控制寄存器         CLI         JMP ,X                  ;执行用户程序                 RTS                     ;此句实际执行不到 SEND_N_BYTE:         PSHA         LDA ,X         BRCLR 7,SCS1,*         STA SCDR         AIX #$1         PULA         DBNZA SEND_N_BYTE         RTS         SEND_BYTE:         BRCLR 7,SCS1,*         STA SCDR         RTS ;---------------------------------------------------------------- ;---------------------------------------------------------------- ;接收用户程序代码 DOWN_NEW:         BRCLR 5,SCS1,*          ;查询接收程序的页数         LDA SCDR         STA PAGE                ;总页数 LOOP3:   LDHX #$0               ;接收一页数据(包括起始地址) LOOP2:  BRCLR 5,SCS1,*          ;查询接收某页的字节和起始地址         LDA SCDR         STA DATABUF,X           ;从$47开始存放数据$47-$C8,(00C700C8)存放地址         AIX #$1         CPX #!130               ;页起始地址+128字节/页=130         BCS LOOP2               ;C=1,X<#130         LDA #$F4                ;FA00--FFFF区域受保护         STA FLBPR         LDHX PAGEADDRBUF         STHX FlashAddress       ;擦FALSH程序的参数,被擦地址         JSR EraseSub            ;擦FALSH程序         LDHX #DATABUF         STHX DBUFSTAddr         MOV #!128,COUNT         ;43 计数单元         LDHX PAGEADDRBUF         STHX FlashAddress         JSR WRITESUB            ;写FLASH子程序         MOV #!128,COUNT         ;43 计数单元         LDHX PAGEADDRBUF LOOP4:  LDA ,X         BRCLR 7,SCS1,*         STA SCDR         AIX #1         DBNZ COUNT,LOOP4        ;发给pc机校验         DBNZ PAGE,LOOP3         ;所有页是否接收完毕?         JSR DOWITH_VECTAB       ;处理中断向量         RTS 看《匠人手记》，与匠人同行！北航出版，正在热卖！ 上一篇：一些实用的单片机c程序 下一篇：Freescale GP32监控程序2 发表评论： 昵称： 密码： (游客无须输入密码) 主页： 标题： 载入中... 芯片专题 器件专题 软件专题 硬件专题 综合专题 项目专题 原创专题 EMC Freescale PIC MSP430  AVR ARM 器件检测 LCD LED 按键 触摸键 E2PROM 电池 电机 电阻 电容 电感 指令系统 软件算法 编程规范 滤波算法 串行通讯 PCB设计 I2C PWM 红外遥控 充电技术 中断 ADC  新手入门 项目管理 电磁兼容 低功耗 汽车电子 电子秤 电磁炉 电动车 报警器 匠人手记 匠人夜话 网络心路 一周热点串烧 从零开始玩PIC DIY旋转时钟 广告5号位 [投放] 学习板、开发板、编程器、下载器、仿真器（查看详情……）

广告3号位 [投放] 站内搜索 日志标题日志内容 站外搜索 百度  google mp3  歌词  图片  FLASH  知道  文档 新闻  词典  地图  mp3  软件  天网  雅虎  爱问  搜狗  讯雷  网讯  华军  天空  21IC器件搜索 货源价格资料 百宝箱分站 《匠人的百宝箱》21IC站 《匠人的百宝箱》21IC笔记团队 《匠人手记》21IC书友会 《匠人的百宝箱》MCUBLOG站 《匠人的百宝箱》MCUBLOG笔记团队 《匠人的百宝箱》EDN站 《匠人手记》EDN书友会 《匠人的百宝箱》与非网站 《匠人的百宝箱》新浪站 《匠人的百宝箱》百度站 《匠人的百宝箱》网易126站 《匠人的百宝箱》网易163站 《匠人的百宝箱》互动出版网站 广告4号位 [投放]

匠人原创	往日酷贴
心灵的震撼——写在512地震之后、《戒色》新片发布会(网友聚会恶搞系列)、  两粒电子的爱情、出书的那些日子……、论21ic的论坛文化、续、性格决定命运、  选狼还是选狮子、狮子的结局…、《匠人夜话》27：七年之痒—写在升任21icbbs站长之际、  匠人自制低成本电容式触控板、《21icbbs人物志》续集、上海街头实景、 一阶滤波算法之深入研究、淘书手记、什么是散转程序、《匠人手记》新书艳照、 EDN《匠人手记》签名售书优惠活动开始报名啦！、欢迎加入《匠人手记》EDN书友会、 欢迎加入《匠人手记》书友会Q群、《匠人手记》终稿目录、《匠人手记》封面先睹为快、 IAR-C-FOR-SAM89(三星)中实现位操作、享受一下VIP的待遇，哈哈、 渐明渐暗动态流水灯效果（C源程序）、《匠人手记》购书全攻略、	《匠人的百宝箱》21IC笔记团队、《匠人手记》义拍活动，得款直接捐献灾区、浅谈A/D、 太阳能应用图片集粹1、Keil C动态内存管理机制分析及改进、一种触摸实现方式、 modelsim仿真UART接收功能、关于射频表无法用红外改写时间的问题、 一定要珍惜的十种人、PADS2007安装问题解决方案 、 ：博客，改变的不仅仅是图书 、  C语言宏定义技巧、C语言 条件编译详解、21IC上海2008-04聚会报名进行中。。。、 你的博客还能持续多久（转贴）、 电动车无刷电机控制器软件设计要点（作者:谢渊斌）、

大千八卦	友情连接
新浪新闻： 新浪财经： AK58新闻： 新浪股票： 新浪股票： 证券之星： 行情数据 分时走时图 K线分析 新闻资讯 代码查询 BBS论坛 个股资料	[更多酷站连接]     [欢迎交换连接] [百宝箱之与非门分舵] [电脑圈圈的家当] [IC921的博客] [柔月阁] [八楼的呼吸] [hotpower 的水潭] [xwj的文君阁] [所长的BLOG] [阿摆手记] [电子伙伴] [unaided的笔记] [小飞的笔记] [单片机开发联盟] [网址之家] [好东西网址大全] [美萍中文精选] [数字电视之家] [SMARTCODE电子书斋] [软件开发之窗] [Armoric的笔记] [我爱研发网] [infernal的笔记] [雄鹰的空中加油站] [SunK] [逍遥电子] [ningpanda的博客] [C-Design] [一网见天下] [海边淘沙] [嵌入式365] [水牛的仓库] [股剩是怎样炼成的] [PIC论坛] [ICC AVR开发网] [中国高校自动化网]

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