home *** CD-ROM | disk | FTP | other *** search
- ;****************************
- ; Main.asm
- ;
- ; Main program
- ;****************************
-
- IFND GLOB_DAT
- include <Glob_Dat.i> ;pick up globals
- ENDIF
-
- CODE ;set PC to next code area
-
- Start: ldaa Reg_dat.m ;data for hardware
- ldab First.m ;register #
- jsr Output
-
- ldab Second.m ;reg #
- jsr Output
-
- ldaa #$FF ;nonsense busy loop
- staa Scratch1 ;to use RAM
- Loop@: dec Scratch1
- bne Loop@
-
- jmp Start ;get the cables, George
-
- ;local static data
-
- DATA ;set PC to next data area
- Reg_dat.m: FCB #200 ;register data
- First.m: FCB 0 ;reg nos.
- Second.m: FCB 1
-
- ;local dynamic data
-
- AUTO
- ORG 0 ;auto area
-
- Scratch1: RMB BYTE
- Scratch2: RMB WORD
-
- include <Output.asm>
-
- IFND OUTPUT
- include <D_Output.asm>
- ENDIF
-
- end
-