69 lines
1.6 KiB
Plaintext
69 lines
1.6 KiB
Plaintext
; --------------------------------------------------------------------------------
|
|
; @Title: eCos Demo for TRACE32 OS Awareness
|
|
; @Description:
|
|
;
|
|
; This batchfile loads all necessary files to demonstrate
|
|
; the OS Awareness for eCos.
|
|
;
|
|
; @Keywords: awareness, RTOS
|
|
; @Author: DIE
|
|
; @Chip: ARM7TDMI
|
|
; @Copyright: (C) 1989-2022 Lauterbach GmbH, licensed for use with TRACE32(R) only
|
|
; --------------------------------------------------------------------------------
|
|
; $Id: ecos.cmm 18850 2022-01-26 18:41:29Z bschroefel $
|
|
|
|
; Created by Rudolf Dienstbeck / Lauterbach GmbH at 23.10.2002
|
|
|
|
; NOTE:
|
|
; currently the demo runs only with Simulator
|
|
|
|
SCREEN.ON
|
|
WinPAGE.RESet
|
|
WinPOS 0. 22. 70. 8. 0. 0. W000
|
|
AREA.view
|
|
|
|
; Emulator reset
|
|
PRINT "resetting..."
|
|
SYStem.RESet
|
|
MAP.RESet
|
|
|
|
; initialize Simulator
|
|
PRINT "initializing..."
|
|
SYStem.CPU ARM7TDMI
|
|
SYStem.Up
|
|
|
|
; load sample application
|
|
PRINT "loading sample application..."
|
|
|
|
Data.LOAD.Elf twothreads.elf /GNUCPP /cygdrive
|
|
|
|
; patch IO to output to TRACE32 terminal
|
|
Data.Assemble haldiag_putc mov r2,#0x1000
|
|
Data.Assemble , ldrb r3,[r2]
|
|
Data.Assemble , cmp r3,#0x0
|
|
Data.Assemble , bne $-8
|
|
Data.Assemble , strb r1,[r2]
|
|
Data.Assemble , mov pc,r14
|
|
|
|
WinPOS 0. 0.
|
|
TERM.Protocol SingleE
|
|
TERM.view 0x1000 0x1001
|
|
|
|
; initialize mutitasking support
|
|
PRINT "initializing RTOS support..."
|
|
SCREEN.OFF
|
|
TASK.CONFIG ecos ; load ecos awareness (ecos.t32)
|
|
MENU.ReProgram ecos ; load ecos menu (ecos.men)
|
|
HELP.FILTER.Add rtosecos ; add ecos manual to filtered help
|
|
|
|
PRINT "load complete."
|
|
|
|
; open windows
|
|
WinPOS 48. 0. 65. 6. 0. 1. W001
|
|
TASK.THRead
|
|
WinPOS 50. 8. 70. 21.
|
|
List.auto
|
|
|
|
Go simple_program
|
|
|