home *** CD-ROM | disk | FTP | other *** search
/ World of A1200 / World_Of_A1200.iso / programs / develop / as65 / demo / s / main.asm < prev   
Assembly Source File  |  1995-02-27  |  6KB  |  384 lines
  1. ;**************************************************************************
  2. ;
  3. ; Filename : MAIN.ASM
  4. ; -------------------
  5. ;
  6. ; Main Modul für Jackophone Eprom 1 und 2
  7. ;
  8. ;
  9. ;
  10. ; Jackophone V5.00
  11. ; ----------------
  12. ; OBJ: $7000-$7FFF
  13. ;      $F000-$FFFF
  14. ;
  15. ;
  16. ;
  17. ; Assembler: AS65xx AMIGA Cross-Assembler V1.01, (c) 1989/90 by Thomas Lehmann
  18. ;
  19. ; Neuentwicklung Start : 12.02.1990
  20. ; Unterbrechung        : 19.05.1990
  21. ; Wiederaufnahme       : 26.01.1991
  22. ; Softwarestand        : 22.03.1993
  23. ;
  24. ;
  25. ; ==================================================
  26. ; manuelles Multitasking am 01.02.1991 implementiert
  27. ; ==================================================
  28. ;
  29. ;
  30. ;
  31. ; (c) 1990/91 by:
  32. ; ---------------
  33. ; Thomas Lehmann
  34. ; Zedernstraße 36
  35. ; 4050 Mönchengladbach 2
  36. ; Tel.:02161/340012
  37. ;
  38. ;***************************************************************************
  39.  
  40.  
  41.     ; ***********************
  42.     ; Assembler Einstellungen
  43.     ; ***********************
  44.  
  45.     pro R65C02
  46.     sernr TLS_B0001
  47.     showsym f
  48.     tabsize 3
  49.     showpc $100
  50.  
  51. ;===========================================================================
  52.  
  53.  
  54.  
  55.     ; ************
  56.     ; Header Files
  57.     ; ************
  58.  
  59.  
  60.     ; Macros
  61.     ; ------
  62.     include macros.d
  63.  
  64.     ; Configuration
  65.     ; -------------
  66.     include config.d
  67.  
  68.     ; ACIA un Protokoll
  69.     ; -----------------
  70.     include acia_tty.d
  71.  
  72.     ; allgemeine Defines
  73.     ; ------------------
  74.     include defs.d
  75.  
  76.     ; Timer Defines
  77.     ; -------------
  78.     include timer.d
  79.  
  80.     ; Tastatur und LED Defines
  81.     ; ------------------------
  82.     include tast_led.d
  83.  
  84.     ; I/O Adressen
  85.     ; ------------
  86.     include io.d
  87.  
  88.     ; Display Defines
  89.     ; ---------------
  90.     include display.d
  91.  
  92.     ; RAM-Zuweisungen
  93.     ; ---------------
  94.     include memory.d
  95.  
  96.  
  97.  
  98.  
  99.  
  100. ; *****************************************************************************
  101. ;                          Programm Files für Eprom 1
  102. ; *****************************************************************************
  103.  
  104.  
  105.  
  106.     ifndef EPROM2
  107.  
  108.     *= EPR1_PAGE1    ; Start Eprom1, Page1
  109.  
  110.  
  111.     ; Prg.-Version
  112.     ; ------------
  113.     include version.tab
  114.     include s1/version.asm
  115.  
  116.     ; Main Routine
  117.     ; ------------
  118.     include s1/main_task.asm
  119.  
  120.     ; Initialisierung
  121.     ; ---------------
  122.     include s1/init.asm
  123.  
  124.     ; Interrupt Routine
  125.     ; -----------------
  126.     include s1/irq.asm
  127.  
  128.     ; LED Routinen
  129.     ; ------------
  130.     include s1/led.asm
  131.  
  132.     ; zyklisches Update der LED Matrix
  133.     ; --------------------------------
  134.     include s1/led_update.asm
  135.  
  136.     ; Display Handling
  137.     ; ----------------
  138.     include s/display.asm
  139.  
  140.     ; Tastaturabfrage
  141.     ; ---------------
  142.     include s1/tast_abfr.asm
  143.  
  144.     ; Programmverteiler für Tasten
  145.     ; ----------------------------
  146.     include s1/tast_ausw.asm
  147.  
  148.     ; Routinen für Funktions Tasten
  149.     ; -----------------------------
  150.     include s1/funktast.asm
  151.  
  152.     ; Wahl auf Leitung
  153.     ; ----------------
  154.     include s1/wahl.asm
  155.  
  156.     ; BTA Programm
  157.     ; ------------
  158.     include s1/bta.asm
  159.  
  160.     ; Tastenberechtigung
  161.     ; ------------------
  162.     include s1/key_ber.asm
  163.  
  164.     ; Leitungs Routinen
  165.     ; -----------------
  166.     include s1/leitung.asm
  167.  
  168.     ; Speicher Funktionen
  169.     ; -------------------
  170.     include s1/speicher.asm
  171.  
  172.     ; Kontroll Funktionen
  173.     ; -------------------
  174.     include s1/kontrolle.asm
  175.  
  176.     ; Notruf Funktionen
  177.     ; -----------------
  178.     include s1/notruf.asm
  179.  
  180.  
  181.  
  182.  
  183. HLP    set    *
  184. _USED_E1P1 equ    HLP-EPR1_PAGE1    ; benutzer Bereich in Eprom1, PAGE1
  185.  
  186.     *=  END_EPR1_P1        ; Ende Eprom1, Page1
  187.     *!= EPR1_PAGE2        ; Startadr. Eprom1, Page2
  188.  
  189.  
  190.     ; Sprung nach Eprom 2, !! muß diese Adr. behalten
  191.     ; -----------------------------------------------
  192.     include s1/epr2_jmp.asm
  193.  
  194.  
  195.  
  196.  
  197.     ; Anrufbeantworter und Postapparat
  198.     ; --------------------------------
  199.     include s1/bea_post.asm
  200.  
  201.     ; Software Watchdog
  202.     ; -----------------
  203.     include s1/watchdog.asm
  204.  
  205.     ; Namentasten Handling
  206.     ; --------------------
  207.     include s1/namtast.asm
  208.  
  209.     ; Setup
  210.     ; -----
  211.     include s1/setup.asm
  212.  
  213.     ; Ende Taste auswerten
  214.     ; --------------------
  215.     include s1/key_ende.asm
  216.  
  217.     ; Babyruf Funktionen
  218.     ; ------------------
  219.     include s1/babyruf.asm
  220.  
  221.     ; Relais ein/ausschalten
  222.     ; ----------------------
  223.     include s1/relais.asm
  224.  
  225.     ; Uhr Programm
  226.     ; ------------
  227.     include s1/uhr.asm
  228.  
  229.     ; Schlüsselschalter Routinen
  230.     ; --------------------------
  231.     include s1/ss.asm
  232.  
  233.     ; Anruf Routinen
  234.     ; --------------
  235.     include s1/anruf.asm
  236.  
  237.     ; Gebührenanzeige
  238.     ; ---------------
  239.     include s1/gebuehren.asm
  240.  
  241.     ; Hörtonauswertung
  242.     ; ----------------
  243.     include s1/hoerton.asm
  244.  
  245.     ; Summer Routinen
  246.     ; ---------------
  247.     include s1/summer.asm
  248.  
  249.     ; Termineinrichtung
  250.     ; -----------------
  251.     include s1/termin.asm
  252.  
  253.     ; Statistik Auswertung
  254.     ; --------------------
  255.     include s1/statistik.asm
  256.  
  257.     ; Löschtaste
  258.     ; ----------
  259.     include s1/key_lösch.asm
  260.  
  261.     ; Update Task für Ports, ...
  262.     ; --------------------------
  263.     include s1/update.asm
  264.  
  265.     ; GU Zustand einlesen
  266.     ; -------------------
  267.     include s1/gu.asm
  268.  
  269.     ; Utility Routinen
  270.     ; ----------------
  271.     include s1/util.asm
  272.  
  273.     ; Umrechnungs Routinen
  274.     ; --------------------
  275.     include s/calculate.asm
  276.  
  277.     ; Taskwechsler
  278.     ; ------------
  279.     include s1/task.asm
  280.  
  281.  
  282.  
  283.  
  284. HLP    set    *
  285. _USED_E1P2 equ    HLP-EPR1_PAGE2        ; benutzer Bereich in Eprom1, PAGE2
  286.  
  287.  
  288.  
  289.     ; Reset und IRQ-Vektoren
  290.     ; ----------------------
  291.     *= INIT_VEKT
  292.     include s1/reset_vekt.asm
  293.  
  294.  
  295.     endif                ; Ende Eprom 1 Prg. Files
  296.  
  297.  
  298.  
  299.  
  300.  
  301. ; *****************************************************************************
  302. ;                          Programm Files für Eprom 2
  303. ; *****************************************************************************
  304.  
  305.  
  306.  
  307.  
  308.  
  309.     ifdef EPROM2
  310.  
  311.     *= EPR2_PAGE1        ; Start Eprom2, Page1
  312.  
  313.  
  314.     ; Kennung für Eprom2
  315.     ; ------------------
  316.     include version.tab
  317.  
  318.  
  319.     ; Terminal Mode
  320.     ; -------------
  321.     include s2/terminal.asm
  322.  
  323.     ; ACIA 6551
  324.     ; ---------
  325.     include s2/acia_6551.asm
  326.  
  327.     ; Auswertg. der Cmd.`s von serieller Schnittstelle
  328.     ; ------------------------------------------------
  329.     include s2/ext_cmd.asm
  330.  
  331.     ; Telefonbuch
  332.     ; -----------
  333.     include s2/telbuch.asm
  334.  
  335.     ; Debugger
  336.     ; --------
  337.     include s2/debug.asm
  338.  
  339.  
  340.  
  341.  
  342.  
  343. HLP    set    *
  344. _USED_E2P1    equ    HLP-EPR2_PAGE1    ; benutzer Bereich in PAGE1
  345.  
  346.     *=  END_EPR2_P1        ; Ende Eprom 2, Page1 (Rest gefüllt)
  347.     *!= EPR2_PAGE2        ; Startadr. Eprom2, Page2
  348.  
  349.  
  350.     ; Sprung nach Eprom 1, !! muß diese Adr. behalten
  351.     ; -----------------------------------------------
  352.     include s2/epr1_jmp.asm
  353.  
  354.  
  355.  
  356.     ; ============================================
  357.     ; !! in beiden EPROMS vorhandene Funktionen !!
  358.     ; ============================================
  359.  
  360.     ; Umrechnungs Routinen
  361.     ; --------------------
  362.     include s/calculate.asm
  363.  
  364.     ; Display Handling
  365.     ; ----------------
  366.     include s/display.asm
  367.  
  368.  
  369.  
  370.  
  371.  
  372. HLP    set    *
  373. _USED_E2P2    equ    HLP-EPR2_PAGE2    ; benutzer Bereich in PAGE2
  374.  
  375.  
  376.     *=  END_EPR2_P2        ; Ende Eprom 2, Page2 (Rest gefüllt)
  377.  
  378.  
  379.     endif
  380.  
  381.  
  382.  
  383.  
  384.