test.c

基于ti公司TMS320C5416编写的语言程序

#pragma CODE_SECTION(vect,"vect")
unsigned int *pmem=0;
#define IMR *(pmem+0x0000)
#define IFR *(pmem+0x0001)
#define PMST *(pmem+0x001d)
#define SWCR *(pmem+0x002b)
#define SWWSR *(pmem+0x0028)
#define CLKMD *(pmem+0x0058)
ioport unsigned portc001; //键盘地址
ioport unsigned portc000; //数码显示地址
//数据线的高8位是位码，低8位是段码
void cpu_init() /*初始化DSP*/
{
asm(" ssbx intm");
asm(" ssbx xf ");                //总清零
PMST=0xe8;
SWWSR=0x7fff;
SWCR=0x0001;
IMR=0x010c;
IFR=0xffff;
CLKMD=0x1000;
   asm(" rsbx xf ");                //打开数据口
asm(" rsbx intm");
}
void delay10ms()
{int i,j,k;
for (i=0;i<100;i++)
for (j=0;j<100;j++)
for (k=0;k<100;k++);
}
//主程序
void main()
{
cpu_init();
for(;;)
{ };
}
interrupt void keyint0() //键盘测试
{
int a;
a=portc001;
a=a&0xff00;
if(a!=0xff00)
{int i,j,k;
delay10ms();
a=portc001;
a=a&0xff00;
for(i=0;i<40;i++)
for(j=0;j<40;j++)
for(k=0;k<40;k++)
{
  portc000=0x803f;
           delay10ms();
  portc000=0x4006;
           delay10ms();
 portc000=0x2056;//2
delay10ms();
  portc000=0x104f;//3
 delay10ms();
 portc000=0x086b;//4
delay10ms();
  portc000=0x046d;//5
delay10ms();
 portc000=0x027d;//6
 delay10ms();
  portc000=0x0107;//7
 delay10ms();
  portc000=0x807f;//8
delay10ms();
  portc000=0x40ef;//9
delay10ms();
  portc000=0x20f7;//A
 delay10ms();

  portc000=0x107C;//B
delay10ms();
 portc000=0x0839;//C
          delay10ms();
  portc000=0x045E;//D
         delay10ms();

  portc000=0x0279;//E
delay10ms();

  portc000=0x0171;//F
delay10ms();
}
}
}
void vect()
{
asm(" .ref _c_int00");
asm(" .ref _keyint0");
asm(" b _c_int00"); /* reset */
asm(" nop");
asm(" nop");
asm(" rete"); /* nmi */
asm(" nop");
asm(" nop");
asm(" nop");
asm(" rete"); //
asm(" nop");
asm(" nop");
asm(" nop");
asm(" rete");
asm(" nop");
asm(" nop");
asm(" nop");
asm(" rete");
asm(" nop");
asm(" nop");
asm(" nop");
asm(" rete");
asm(" nop");
asm(" nop");
asm(" nop");
asm(" rete");
asm(" nop");
asm(" nop");
asm(" nop");
asm(" rete");
asm(" nop");
asm(" nop");
asm(" nop");
asm(" rete");
asm(" nop");
asm(" nop");
asm(" nop");
asm(" rete");
asm(" nop");
asm(" nop");
asm(" nop");
asm(" rete");
asm(" nop");
asm(" nop");
asm(" nop");
asm(" rete");
asm(" nop");
asm(" nop");
asm(" nop");
asm(" rete");
asm(" nop");
asm(" nop");
asm(" nop");
asm(" rete");
asm(" nop");
asm(" nop");
asm(" nop");
asm(" rete");
asm(" nop");
asm(" nop");
asm(" nop");
asm(" rete");
asm(" nop");
asm(" nop");
asm(" nop");
asm(" rete "); /* int0 */
asm(" nop");
asm(" nop");
asm(" nop");
asm(" rete"); /* int1 */
asm(" nop");
asm(" nop");
asm(" nop");
asm(" b _keyint0"); /* int2 */
asm(" nop");
asm(" nop");
asm(" nop");
asm(" nop"); /* tint0 */
asm(" nop");
asm(" nop");
asm(" rete"); /* brint0 */
asm(" nop");
asm(" nop");
asm(" nop");
asm(" rete"); /* bxint0 */
asm(" nop");
asm(" nop");
asm(" nop");
asm(" rete"); /* dmac0 */
asm(" nop");
asm(" nop");
asm(" nop");
asm(" rete"); /* tint1 */
asm(" nop");
asm(" nop");
asm(" nop");
asm(" nop");
asm(" nop"); /* int3 */
asm(" nop");
asm(" nop");
asm(" rete"); /* hpint */
asm(" nop");
asm(" nop");
asm(" nop");
asm(" rete "); /* brint1 */
asm(" nop");
asm(" nop");
asm(" nop");
asm(" rete"); /* bxint1 */
asm(" nop");
asm(" nop");
asm(" nop");
asm(" rete"); /* dmac4 */
asm(" nop");
asm(" nop");
asm(" nop");
asm(" rete"); /* dmac5 */
asm(" nop");
asm(" nop");
asm(" nop");
asm(" nop");
asm(" nop");
asm(" nop");
asm(" nop");
}