mirror of
https://gitee.com/mirrors_PX4/PX4-Autopilot.git
synced 2026-04-14 10:07:39 +08:00
add995c32e
git-svn-id: https://nuttx.svn.sourceforge.net/svnroot/nuttx/trunk@4200 7fd9a85b-ad96-42d3-883c-3090e2eb8679
85 lines
2.4 KiB
NASM
85 lines
2.4 KiB
NASM
;************************************************************************
|
|
; example.s
|
|
;************************************************************************
|
|
|
|
.title z80sim Test
|
|
.module example
|
|
|
|
;************************************************************************
|
|
; Constants
|
|
;************************************************************************
|
|
|
|
STACKBASE == 0xFFFF
|
|
|
|
;************************************************************************
|
|
; Data
|
|
;************************************************************************
|
|
|
|
.area DATA (ABS,OVR)
|
|
.org 0x8000
|
|
hello:
|
|
.ascii "Hello, World!\n\0"
|
|
|
|
;************************************************************************
|
|
; Reset entry point
|
|
;************************************************************************
|
|
|
|
.area TEXT (ABS,OVR)
|
|
.org 0x0000
|
|
di ; Disable interrupts
|
|
ld SP, #STACKBASE ; Set stack pointer
|
|
im 1 ; Set interrupt mode 1
|
|
jp start ; jump to start of program
|
|
|
|
;************************************************************************
|
|
; Interrupt handler
|
|
;************************************************************************
|
|
|
|
.org 0x0038 ; Int mode 1
|
|
reti ; return from interrupt
|
|
|
|
;************************************************************************
|
|
; NMI interrupt handler
|
|
;************************************************************************
|
|
|
|
.org 0x0066
|
|
retn
|
|
|
|
;************************************************************************
|
|
; Start of program
|
|
;************************************************************************
|
|
|
|
.org 0x0100
|
|
start:
|
|
;ei ; Enable interrrupts
|
|
ld hl, #hello ; Say hello
|
|
call print
|
|
|
|
forever: ; Then stop execution
|
|
jp forever
|
|
|
|
;******************************************************************
|
|
; print *
|
|
; Funktion....: Sen tekst and data with serielport *
|
|
; Input.......: hl points at text start adr *
|
|
; Output......: Text to serielport *
|
|
; uses........: a,hl*
|
|
; call........: TX_BUSY tst 28-4-1994 *
|
|
;******************************************************************
|
|
|
|
print:
|
|
push af
|
|
loop:
|
|
ld a, (hl) ; Get character to print
|
|
cp #0 ; Null terminates the string
|
|
jp z, done
|
|
|
|
out (0xbe), a ; Send character
|
|
inc hl ; Increment to next character
|
|
jp loop ; Loop til done
|
|
done:
|
|
pop af
|
|
ret
|
|
|
|
|