sdrv_init_xbl.s01

炬力方案176*132软件源码,适用于AK1025

	NAME	sdrv_init_xbl(16)
	RSEG	BBC_IE(0)
	RSEG	BBD_IE(0)
	RSEG	BBS_IE(0)
	EXTERN	AsciiFontLibAddr
	PUBLIC	AsciiFontName
	EXTERN	BufPage
	EXTERN	Drv_Entrance
	EXTERN	Hdrv_HardInit
	EXTERN	SD_FClose
	EXTERN	SD_FOpen
	PUBLIC	Sdrv_Exit
	PUBLIC	Sdrv_Init
	PUBLIC	fp
	EXTERN	?CLZ80L_4_04_L00
	RSEG	BBC_IE
Sdrv_Init:
; 1.	/*
; 2.	********************************************************************************
; 3.	*                       ACTOS
; 4.	*                  UI Init function
; 5.	*
; 6.	*                (c) Copyright 2002-2003, Actions Co,Ld.
; 7.	*                        All Right Reserved
; 8.	*
; 9.	* File   : UI_Init.msa
; 10.	* By     : Gongee
; 11.	* Version: 1> v1.00     first version     10/17/2003 9:47PM
; 12.	********************************************************************************
; 13.	*/
; 14.	
; 15.	#include "display.h"
; 16.	#include "Drv_S6B33B0A.h"
; 17.	
; 18.	//#define DEBUG
; 19.	#ifdef DEBUG
; 20.	#define ERR(x) x
; 21.	#define MSG(x) x
; 22.	#else
; 23.	#define ERR(x)
; 24.	#define MSG(x)
; 25.	#endif
; 26.	
; 27.	#pragma memory=dataseg(BBD_IE)
; 28.	SD_FILE *fp;
; 29.	//extern  unsigned char BufPage;
; 30.	#pragma memory=default
; 31.	
; 32.	#pragma memory=constseg(BBS_IE)
; 33.	char AsciiFontName[] = "XBL.BIN";          //在ASCII.BIN中,嵌入了0x80~0xff的Latin1字符点阵信息
; 34.	                                             //地址:6*8 Font:0x400~0x7ff; 8*16 Font:0x1000~0x17ff.
; 35.	//char FontLibName[] = "FONT_B5.$$$";
; 36.	#pragma memory=default
; 37.	
; 38.	#pragma codeseg(BBC_IE)
; 39.	bool    Sdrv_Init(char mode)
; 40.	{
	PUSH	BC
	PUSH	IY
	PUSH	IX
	PUSH	DE
	PUSH	AF
	PUSH	AF
; 41.	        fp = SD_FOpen(AsciiFontName,MODE_READ);
	LD	C,0
	LD	DE,AsciiFontName
	CALL	SD_FOpen
	LD	(fp),HL
; 42.	        if (fp == NULL)
	LD	A,L
	OR	H
	JR	Z,?0004
?0000:
; 43.	        {
; 44.	                ERR(printf("Cannot open Fontlib\n"));
; 45.	                return 0;
; 46.	        }
?0001:
; 47.	        AsciiFontLibAddr = fp->startaddr;
	LD	HL,12
	LD	BC,(fp)
	ADD	HL,BC
	LD	C,(HL)
	INC	HL
	LD	B,(HL)
	INC	HL
	LD	E,(HL)
	INC	HL
	LD	D,(HL)
	LD	(AsciiFontLibAddr),BC
	LD	(AsciiFontLibAddr+2),DE
; 48.	        SD_FClose(fp);
	LD	DE,(fp)
	CALL	SD_FClose
; 49.	
; 50.	        BufPage=0x07;           //Buffer默认位于Zram2
	LD	A,7
	LD	(BufPage),A
; 51.	                                //必需
; 52.	           {
; 53.	            char *i;
; 54.	            int  *j;
; 55.	            //********** 显示中断向量的赋值 ********
; 56.	            i = (char *)RSTDisplayAPI;
	LD	IX,32
; 57.	            *i = 0xc3;
	LD	(IX+0),195
; 58.	            i++;
; 59.	            j = (int *)i;
	INC	IX
	PUSH	IX
	POP	HL
; 60.	            *j = (int)Drv_Entrance;
	LD	(HL),LOW(Drv_Entrance)
	INC	HL
	LD	(HL),HIGH(Drv_Entrance)
; 61.	           }
; 62.	        if(mode==0)
	LD	HL,4
	ADD	HL,SP
	XOR	A
	OR	(HL)
	JR	NZ,?0003
?0002:
; 63.	        {
; 64.	            Hdrv_HardInit();
	CALL	Hdrv_HardInit
?0003:
; 65.	        }
; 66.	
; 67.	        return 1;
	LD	A,1
; 68.	}
?0004:
	POP	HL
	POP	HL
	POP	HL
	POP	IX
	POP	IY
	POP	BC
	RET
Sdrv_Exit:
; 69.	
; 70.	void Sdrv_Exit(void)
; 71.	{
; 72.	    return;
; 73.	}
	RET
	RSEG	BBD_IE
fp:
	DEFS	2
	RSEG	BBS_IE
AsciiFontName:
	DEFB	'XBL.BIN'
	DEFB	0
	END