guiihl.ps

一款SmartPhone的驱动代码

	.align	2
IsErrorDownData.6:
	.word	0
	.code
	.align	1
	.def	fnIHL_ReadMouse,	val	fnIHL_ReadMouse,	scl	2,	type	0x24,	endef
	.global	fnIHL_ReadMouse

	.loc	188
	.def	ent,	scl	101,	type	0x0,	endef
fnIHL_ReadMouse:
;	.frame	%sp,20,$31		# vars= 4, regs= 4/0, args= 0, extra= 0
;	.mask	0x80070000,-4
;	.fmask	0x00000000,0
	pushn	%r2
	xsub	%sp,%sp,4
	ld.w	%r2,%r12
	ld.w	%r0,%r13
	ld.w	%r1,%r14
	.def	buttons,	val	2,	scl	17,	type	0x14,	endef
	.def	xPos,	val	0,	scl	17,	type	0x14,	endef
	.def	yPos,	val	1,	scl	17,	type	0x14,	endef

	.loc	189
	.def	begin,	scl	100,	type	0x0,	endef
	.def	xBefore,	val	xBefore.4,	scl	3,	type	0x4,	endef
	.def	yBefore,	val	yBefore.5,	scl	3,	type	0x4,	endef
	.def	IsErrorDownData,	val	IsErrorDownData.6,	scl	3,	type	0xe,	endef
	.def	tempx,	val	2,	scl	1,	type	0xd,	endef
	.def	tempy,	val	0,	scl	1,	type	0xd,	endef

	.loc	191
	ld.w	%r10,0x0
	xld.h	[%sp+2],%r10
	xld.h	[%sp],%r10

	.loc	193
	ld.w	%r12,%sp
	xadd	%r13,%sp,2
	xcall	fnIHL_GetPenPoint

	.loc	195
	xld.uh	%r10,[%sp]
	xsub	%r10,%r10,2
	ld.uh	%r10,%r10
	xcmp	%r10,157
	xjrugt	__L6
	xld.uh	%r10,[%sp+2]
	xsub	%r10,%r10,2
	ld.uh	%r10,%r10
	xcmp	%r10,117
	xjrugt	__L3

	.loc	197
	xld.w	%r10,[IsPenDown]
	cmp	%r10,0x0
	xjreq	__L4
	xld.uh	%r11,[%sp+2]
	xld.w	%r10,[xBefore.4]
	cmp	%r10,%r11
	xjrne	__L4
	xld.uh	%r11,[%sp]
	xld.w	%r10,[yBefore.5]
	cmp	%r10,%r11
	xjreq	__L5
__L4:

	.loc	200
	xld.w	%r10,0x00000004		; 4
	xld.w	[%r2],%r10

	.loc	201
	xld.uh	%r10,[%sp+2]
	xld.w	[%r0],%r10

	.loc	202
	xld.uh	%r10,[%sp]
	xld.w	[%r1],%r10

	.loc	203
	xld.w	%r10,[%r0]
	xld.w	[xBefore.4],%r10

	.loc	204
	xld.w	%r10,[%r1]
	xld.w	[yBefore.5],%r10

	.loc	205
	xld.w	%r10,0x00000001		; 1
	xld.w	[IsPenDown],%r10

	.loc	206
	ld.w	%r15,0x0
	xld.w	[IsErrorDownData.6],%r15

	.loc	207
	xjp	__L9
__L3:

	.loc	210
	xld.uh	%r10,[%sp]
	xsub	%r10,%r10,2
	ld.uh	%r10,%r10
	xcmp	%r10,157
	xjrugt	__L6
	xld.uh	%r10,[%sp+2]
	xsub	%r10,%r10,2
	ld.uh	%r10,%r10
	xcmp	%r10,117
	xjrule	__L5
__L6:

	.loc	212
	xld.w	%r11,[IsPenDown]
	cmp	%r11,0x0
	xjrne	__L7

	.loc	214
	xld.w	%r10,0x00000001		; 1
	xld.w	[IsPenDown],%r10

	.loc	215
	xld.w	[IsErrorDownData.6],%r10

	.loc	216
	xjp	__L5
__L7:

	.loc	219
	xld.w	%r10,[IsErrorDownData.6]
	cmp	%r10,0x0
	xjrne	__L8

	.loc	226
	ld.w	%r15,0x0
	xld.w	[%r2],%r15

	.loc	227
	xld.w	%r10,[xBefore.4]
	xld.w	[%r0],%r10

	.loc	228
	xld.w	%r10,[yBefore.5]
	xld.w	[%r1],%r10

	.loc	229
	xld.w	[xBefore.4],%r15

	.loc	230
	xld.w	[yBefore.5],%r15

	.loc	231
	xld.w	[IsPenDown],%r15

	.loc	232
	xcall	enable_tp_int

	.loc	233
	xld.w	%r10,0x00000001		; 1
	xjp	__L9
__L8:

	.loc	221
	ld.w	%r15,0x0
	xld.w	[IsPenDown],%r15

	.loc	222
	xcall	enable_tp_int

	.loc	223
__L5:

	.loc	236
	ld.w	%r10,0x0
__L9:

	.loc	237
	.def	bend,	scl	110,	type	0x0,	endef
	xadd	%sp,%sp,4
	popn	%r2
	ret
	.def	end,	scl	111,	type	0x0,	endef
	.align	1
	.def	fnIHL_InitKeyboard,	val	fnIHL_InitKeyboard,	scl	2,	type	0x21,	endef
	.global	fnIHL_InitKeyboard

	.loc	256
	.def	ent,	scl	101,	type	0x0,	endef
fnIHL_InitKeyboard:
;	.frame	%sp,4,$31		# vars= 0, regs= 1/0, args= 0, extra= 0
;	.mask	0x80000000,-4
;	.fmask	0x00000000,0

	.loc	257
	xcall	init_key

	.loc	258
	ld.w	%r12,0x0
	xld.h	[bKeyStatus],%r12

	.loc	260
	xld.w	%r11,0x00040270		; 262768
	xbset	[%r11],0x4

	.loc	262
	ret
	.def	end,	scl	111,	type	0x0,	endef
	.align	1
	.def	fnIHL_ReadKeyboard,	val	fnIHL_ReadKeyboard,	scl	2,	type	0x24,	endef
	.global	fnIHL_ReadKeyboard

	.loc	284
	.def	ent,	scl	101,	type	0x0,	endef
fnIHL_ReadKeyboard:
;	.frame	%sp,4,$31		# vars= 0, regs= 1/0, args= 0, extra= 0
;	.mask	0x80000000,-4
;	.fmask	0x00000000,0
	.def	ScanCode,	val	12,	scl	17,	type	0x12,	endef

	.loc	286
	xld.ub	%r10,[k5_data]
	xld.b	[%r12],%r10

	.loc	287
	xld.uh	%r10,[bKeyStatus]
	xld.h	[IsKeyDown],%r10

	.loc	289
	xcall	enable_key

	.loc	291
	xld.w	%r10,0x00000001		; 1

	.loc	292
	ret
	.def	end,	scl	111,	type	0x0,	endef
	.align	1
	.def	fnIHL_WriteKeyboard,	val	fnIHL_WriteKeyboard,	scl	2,	type	0x21,	endef
	.global	fnIHL_WriteKeyboard

	.loc	311
	.def	ent,	scl	101,	type	0x0,	endef
fnIHL_WriteKeyboard:
;	.frame	%sp,4,$31		# vars= 0, regs= 1/0, args= 0, extra= 0
;	.mask	0x80000000,-4
;	.fmask	0x00000000,0
	.def	cmd,	val	12,	scl	17,	type	0xe,	endef

	.loc	312
	ret
	.def	end,	scl	111,	type	0x0,	endef
	.def	x_avrg,	val	x_avrg,	scl	2,	type	0xd,	endef

	.comm	x_avrg 2
	.def	y_avrg,	val	y_avrg,	scl	2,	type	0xd,	endef

	.comm	y_avrg 2
	.def	x_add,	val	x_add,	scl	2,	dim	6,	size	12,	type	0x3d,	endef

	.comm	x_add 12
	.def	y_add,	val	y_add,	scl	2,	dim	6,	size	12,	type	0x3d,	endef

	.comm	y_add 12
	.def	x_step,	val	x_step,	scl	2,	type	0x6,	endef

	.comm	x_step 4
	.def	y_step,	val	y_step,	scl	2,	type	0x6,	endef

	.comm	y_step 4
	.def	x,	val	x,	scl	2,	type	0xc,	endef

	.comm	x 1
	.def	y,	val	y,	scl	2,	type	0xc,	endef

	.comm	y 1


	.endfile