func1.lst
来自「another 8051 core porocesssor vhdl sourc」· LST 代码 · 共 1,209 行 · 第 1/5 页
LST
1,209 行
435 endm
436
437 testpsfr macro addrsfr, valuesfr
438 mov a, #valuesfr ;get test value
439 xrl addrsfr, a ;zero if port == value
440 inc addrsfr ;to give 1
441 djnz addrsfr, $tp1# ;and if not zero then fail
442 sjmp $tp2#
443 ;
444 $tp1#: ajmp $tp1#
445 ;
446 $tp2#:
Tue Oct 19 1999 11:33 Page 9
func1.asm: 1 April 1997 - general instruction test module
447 endm
448
449
450
451 0000 include ..\openloop\inc\testdata.inc
452 ;**********************************************************************
453 ;
454 ; Module: testdata.inc
455 ;
456 ; Comments: test data definitions
457 ;
458 ; Date: 18th June 1991
459 ;
460 ; Version: V1.00
461 ;
462 ;**********************************************************************
463 ; (C) 3Soft Limited 1994
464 ; All rights reserved
465
466
467 ;**************************
468 ;** SYSTEM INCLUDE FILES **
469 ;**************************
470
471 ;***************************
472 ;** PROGRAM INCLUDE FILES **
473 ;***************************
474
475 ;************************
476 ;** EXTERNAL FUNCTIONS **
477 ;************************
478
479 ;************************
480 ;** EXTERNAL VARIABLES **
481 ;************************
482
483 ;*********************
484 ;** LOCAL FUNCTIONS **
485 ;*********************
486
487 ;*********************
488 ;** LOCAL VARIABLES **
489 ;*********************
490
491
492 0000 data0: equ 0
493 0001 data1: equ 1
494 0002 data2: equ 2
495 000F dataf: equ 0fh
496 0012 data12: equ 12h
497 0024 data24: equ 24h
498 0029 data29: equ 29h
499 0030 data30: equ 30h
500 0034 data34: equ 34h
501 0050 data50: equ 50h
502 0055 data55: equ 55h
503 0056 data56: equ 56h
Tue Oct 19 1999 11:33 Page 10
func1.asm: 1 April 1997 - general instruction test module
504 0067 data67: equ 67h
505 007F data7f: equ 7fh
506 0080 data80: equ 80h
507 0099 data99: equ 99h
508 00A0 dataa0: equ a0h
509 00AA dataaa: equ aah
510 00F0 dataf0: equ f0h
511 00FB datafb: equ fbh
512 00FF dataff: equ ffh
513 7F80 data7f80 equ 7f80h
514 ;
515 0007 addrbit7: equ 7
516 0078 addrbit78: equ 78h
517 ;
518 002E ext2e: equ 2eh
519 002F ext2f: equ 2fh
520 ;
521
522
523 0000 include ..\openloop\inc\register.inc
524 ;**********************************************************************
525 ;
526 ; Module: register.inc
527 ;
528 ; Comments: Register definitions
529 ;
530 ; Date: 20th June 1991
531 ;
532 ; Version: V1.00
533 ;
534 ;**********************************************************************
535 ; (C) 3Soft Limited 1994
536 ; All rights reserved
537
538
539 ;**************************
540 ;** SYSTEM INCLUDE FILES **
541 ;**************************
542
543 ;***************************
544 ;** PROGRAM INCLUDE FILES **
545 ;***************************
546
547 ;************************
548 ;** EXTERNAL FUNCTIONS **
549 ;************************
550
551 ;************************
552 ;** EXTERNAL VARIABLES **
553 ;************************
554
555 ;*********************
556 ;** LOCAL FUNCTIONS **
557 ;*********************
558
559 ;*********************
560 ;** LOCAL VARIABLES **
Tue Oct 19 1999 11:33 Page 11
func1.asm: 1 April 1997 - general instruction test module
561 ;*********************
562
563 ;
564 ; local options
565 ;
566 condlist on
567 ;
568
569 0000 reg0 register 0
570 001F reg1f: register 1fh
571 0020 reg20: register 20h
572 002F reg2f: register 2fh
573 006F reg6f: register 6fh
574
575
576
577
578 list on
579 0000 include ..\openloop\inc\func1.inc
580 ;**********************************************************************
581
582 ; Module: func1.inc
583
584 ; Comments: m8051 functional test 1 error number definitions
585
586 ; Date: 2nd April 1997
587
588 ; Version: V1.00
589
590 ;**********************************************************************
591 ; (C) Copyright Mentor Graphics Corporation and Licensors 1997.
592 ; All rights reserved.
593
594 ; ==============================
595 ; External data memory locations
596 ; ==============================
597
598 0E00 ext_data var E00h ; base address of external
599 ; data memory space
600
601 ; =============
602 ; error numbers
603 ; =============
604
605 0000 err var 0
606
607 ; ---------------------
608 ; errors from reset.asm
609 ; ---------------------
610
611 0000 E_rst_accnotzero equ err ;failed if acc not zero
612 0001 err var err + 1
613
614 0001 E_rst_bregnotzero equ err ;failed if b register <> 0
615 0002 err var err + 1
616
617 0002 E_rst_pswnotzero equ err ;failed if program status word <> zero
Tue Oct 19 1999 11:33 Page 12
func1.asm: 1 April 1997 - general instruction test module
618 0003 err var err + 1
619
620 0003 E_rst_spnoteq7 equ err ;failed if stack ptr <> 0
621 0004 err var err + 1
622
623 0004 E_rst_dptr_low equ err ;failed if data ptr low not equal 0
624 0005 err var err + 1
625
626 0005 E_rst_dptr_high equ err ;failed if data ptr high not equal 0
627 0006 err var err + 1
628
629 0006 E_rst_port0ne0 equ err ;failed if port 0 ne 0
630 0007 err var err + 1
631
632 0007 E_rst_port1ne0 equ err ;failed if port 1 ne 0
633 0008 err var err + 1
634
635 0008 E_rst_port2ne0 equ err ;failed if port 2 ne 0
636 0009 err var err + 1
637
638 0009 E_rst_port3ne0 equ err ;failed if port 3 ne 0
639 000A err var err + 1
640
641 000A E_rst_ipnotzero equ err ;failed if ip not equal to 0
642 000B err var err + 1
643
644 000B E_rst_ienotzero equ err ;failed if ie not equal to 0
645 000C err var err + 1
646
647 000C E_rst_tmodnotzero equ err ;failed if ip not equal to 0
648 000D err var err + 1
649
650 000D E_rst_tconnotzero equ err ;failed if ip not equal to 0
651 000E err var err + 1
652
653 000E E_rst_tl0_notzero equ err ;failed if timer counter 1 low <> 0
654 000F err var err + 1
655
656 000F E_rst_th0_notzero equ err ;failed if timer counter 0 high <> 0
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?