sys_support.app

免费的OS源代码 符合ITRON4.0规范 http://www.toppers.jp/official_release.html

;
;   TOPPERS/JSP Kernel
;       Toyohashi Open Platform for Embedded Real-Time Systems/
;       Just Standard Profile Kernel
;
;   Copyright (C) 2006 by Witz Corporation, JAPAN
;
;   惧淡螟侯涪荚は·笆布の (1)×(4) の掘凤か·Free Software Foundation 
;   によって给山されている GNU General Public License の Version 2 に淡
;   揭されている掘凤を塔たす眷圭に嘎り·塑ソフトウェア∈塑ソフトウェア
;   を猖恃したものを崔むˉ笆布票じ∷を蝗脱ˇ剩澜ˇ猖恃ˇ浩芹邵∈笆布·
;   网脱と钙ぶ∷することを痰浸で钓满するˉ
;   (1) 塑ソフトウェアをソ〖スコ〖ドの妨で网脱する眷圭には·惧淡の螟侯
;       涪山绩·この网脱掘凤および布淡の痰瘦沮惮年が·そのままの妨でソ〖
;       スコ〖ド面に崔まれていることˉ
;   (2) 塑ソフトウェアを·ライブラリ妨及など·戮のソフトウェア倡券に蝗
;       脱できる妨で浩芹邵する眷圭には·浩芹邵に燃うドキュメント∈网脱
;       荚マニュアルなど∷に·惧淡の螟侯涪山绩·この网脱掘凤および布淡
;       の痰瘦沮惮年を非很することˉ
;   (3) 塑ソフトウェアを·怠达に寥み哈むなど·戮のソフトウェア倡券に蝗
;       脱できない妨で浩芹邵する眷圭には·肌のいずれかの掘凤を塔たすこ
;       とˉ
;     (a) 浩芹邵に燃うドキュメント∈网脱荚マニュアルなど∷に·惧淡の螟
;         侯涪山绩·この网脱掘凤および布淡の痰瘦沮惮年を非很することˉ
;     (b) 浩芹邵の妨轮を·侍に年める数恕によって·TOPPERSプロジェクトに
;         鼠桂することˉ
;   (4) 塑ソフトウェアの网脱により木儡弄または粗儡弄に栏じるいかなる禄
;       巢からも·惧淡螟侯涪荚およびTOPPERSプロジェクトを倘勒することˉ
;
;   塑ソフトウェアは·痰瘦沮で捏丁されているものであるˉ惧淡螟侯涪荚お
;   よびTOPPERSプロジェクトは·塑ソフトウェアに簇して·その努脱材墙拉も
;   崔めて·いかなる瘦沮も乖わないˉまた·塑ソフトウェアの网脱により木
;   儡弄または粗儡弄に栏じたいかなる禄巢に簇しても·その勒扦を砷わないˉ
;
;   @(#) $Id: sys_support.app,v 1.1 2006/04/10 08:19:25 honda Exp $
;

	$MAXIMUM
	module sys_support_app

;
;	タ〖ゲットシステム巴赂モジュ〖ル アセンブリ咐胳婶
;	∈Zup-F16橙磨ボ〖ド脱∷
;

#include "jsp_rename.h"
#include "cpu_rename.h"
#include "sys_rename.h"
#include "tmp91cy22.h"

f_code section code large align=1,1

;
; タ〖ゲットハ〖ドウェアに巴赂して涩妥な介袋步借妄がある眷圭
;
	public hardware_init_hook
hardware_init_hook:
; 瓢侯クロック肋年(光庐クロック1尸件を4宁擒の1/2)∈6.144*(1/1)*4*(1/2)=12.288∷
	ldb		(TADR_SFR_SYSCR0), 0xa0
	ldb		(TADR_SFR_SYSCR1), 0x00
	ldb		(TADR_SFR_SYSCR2), 0x2c ; halt炭吾にてIDLE2に莲败
	ldb		(TADR_SFR_DFMCR1), 0x0b
	ldb		(TADR_SFR_DFMCR0), 0x40
lockup:			; ロックアップ略ち
	bit		5, (TADR_SFR_DFMCR0)
	jr		nz, lockup
	ldb		(TADR_SFR_DFMCR0), 0x80

; 嘲婶アドレス鄂粗2痰跟
	ldb		(TADR_SFR_B2CS), 0x00
; 嘲婶アドレス鄂粗1铜跟(1MByteSRAM)
	ldb		(TADR_SFR_P1CR), 0x00
	ldb		(TADR_SFR_P1FC), 0xff	; AD0×AD15を蝗脱
	ldb		(TADR_SFR_P2CR), 0xff
	ldb		(TADR_SFR_P2FC), 0x0f	; A16×A19を蝗脱(荒りはポ〖ト)
	ldb		(TADR_SFR_P2), 0xff
	ldb		(TADR_SFR_P3), 0x78
	ldb		(TADR_SFR_P3CR), 0x7f
	ldb		(TADR_SFR_P3FC), 0x07	; RD/WR/HWRを蝗脱
	ldb		(TADR_SFR_P4FC), 0x02	; CS1を蝗脱
	ldb		(TADR_SFR_P4CR), 0x0e
	ldb		(TADR_SFR_MSAR1), 0x10	; 0x00100000×
	ldb		(TADR_SFR_MAMR1), 0x3f	; 0x001fffff
	ldb		(TADR_SFR_B1CS), 0x83	; 0ウェイト/16bitDataBus

; WDT匿贿
	ldb		(TADR_SFR_WDMOD), 0x00
	ldb		(TADR_SFR_WDCR), 0xb1

	ret

;
;  腮警箕粗略ち
;
	public _sil_dly_nse
_sil_dly_nse:
	ld	WA, (XSP+0x4)
	sub	WA, 3173
	ret	le
	nop
sil_dly_nse1:
	sub	WA, 732
	jr	gt, sil_dly_nse1
	ret


	end